git.oblomov.eu Git - wine/blob - dlls/msvcp90/string.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
  23 #include "msvcp90.h"
  24 #include "stdio.h"
  25
  26 #include "windef.h"
  27 #include "winbase.h"
  28 #include "wine/debug.h"
  29 WINE_DEFAULT_DEBUG_CHANNEL(msvcp90);
  30
  31 /* char_traits<char> */
  32 /* ?assign@?$char_traits@D@std@@SAXAADABD@Z */
  33 /* ?assign@?$char_traits@D@std@@SAXAEADAEBD@Z */
  34 void CDECL MSVCP_char_traits_char_assign(char *ch, const char *assign)
  35 {
  36     *ch = *assign;
  37 }
  38
  39 /* ?eq@?$char_traits@D@std@@SA_NABD0@Z */
  40 /* ?eq@?$char_traits@D@std@@SA_NAEBD0@Z */
  41 MSVCP_BOOL CDECL MSVCP_char_traits_char_eq(const char *ch1, const char *ch2)
  42 {
  43     return *ch1 == *ch2;
  44 }
  45
  46 /* ?lt@?$char_traits@D@std@@SA_NABD0@Z */
  47 /* ?lt@?$char_traits@D@std@@SA_NAEBD0@Z */
  48 MSVCP_BOOL CDECL MSVCP_char_traits_lt(const char *ch1, const char *ch2)
  49 {
  50     return *ch1 < *ch2;
  51 }
  52
  53 /* ?compare@?$char_traits@D@std@@SAHPBD0I@Z */
  54 /* ?compare@?$char_traits@D@std@@SAHPEBD0_K@Z */
  55 int CDECL MSVCP_char_traits_char_compare(
  56         const char *s1, const char *s2, size_t count)
  57 {
  58     int ret = memcmp(s1, s2, count);
  59     return (ret>0 ? 1 : (ret<0 ? -1 : 0));
  60 }
  61
  62 /* ?length@?$char_traits@D@std@@SAIPBD@Z */
  63 /* ?length@?$char_traits@D@std@@SA_KPEBD@Z */
  64 size_t CDECL MSVCP_char_traits_char_length(const char *str)
  65 {
  66     return strlen(str);
  67 }
  68
  69 /* ?_Copy_s@?$char_traits@D@std@@SAPADPADIPBDI@Z */
  70 /* ?_Copy_s@?$char_traits@D@std@@SAPEADPEAD_KPEBD1@Z */
  71 char* CDECL MSVCP_char_traits_char__Copy_s(char *dest,
  72         size_t size, const char *src, size_t count)
  73 {
  74     if(!dest || !src || size<count) {
  75         if(dest && size)
  76             dest[0] = '\0';
  77         _invalid_parameter(NULL, NULL, NULL, 0, 0);
  78         return dest;
  79     }
  80
  81     return memcpy(dest, src, count);
  82 }
  83
  84 /* ?copy@?$char_traits@D@std@@SAPADPADPBDI@Z */
  85 /* ?copy@?$char_traits@D@std@@SAPEADPEADPEBD_K@Z */
  86 char* CDECL MSVCP_char_traits_char_copy(
  87         char *dest, const char *src, size_t count)
  88 {
  89     return MSVCP_char_traits_char__Copy_s(dest, count, src, count);
  90 }
  91
  92 /* ?find@?$char_traits@D@std@@SAPBDPBDIABD@Z */
  93 /* ?find@?$char_traits@D@std@@SAPEBDPEBD_KAEBD@Z */
  94 const char * CDECL MSVCP_char_traits_char_find(
  95         const char *str, size_t range, const char *c)
  96 {
  97     return memchr(str, *c, range);
  98 }
  99
 100 /* ?_Move_s@?$char_traits@D@std@@SAPADPADIPBDI@Z */
 101 /* ?_Move_s@?$char_traits@D@std@@SAPEADPEAD_KPEBD1@Z */
 102 char* CDECL MSVCP_char_traits_char__Move_s(char *dest,
 103         size_t size, const char *src, size_t count)
 104 {
 105     if(!dest || !src || size<count) {
 106         if(dest && size)
 107             dest[0] = '\0';
 108         _invalid_parameter(NULL, NULL, NULL, 0, 0);
 109         return dest;
 110     }
 111
 112     return memmove(dest, src, count);
 113 }
 114
 115 /* ?move@?$char_traits@D@std@@SAPADPADPBDI@Z */
 116 /* ?move@?$char_traits@D@std@@SAPEADPEADPEBD_K@Z */
 117 char* CDECL MSVCP_char_traits_char_move(
 118         char *dest, const char *src, size_t count)
 119 {
 120     return MSVCP_char_traits_char__Move_s(dest, count, src, count);
 121 }
 122
 123 /* ?assign@?$char_traits@D@std@@SAPADPADID@Z */
 124 /* ?assign@?$char_traits@D@std@@SAPEADPEAD_KD@Z */
 125 char* CDECL MSVCP_char_traits_char_assignn(char *str, size_t num, char c)
 126 {
 127     return memset(str, c, num);
 128 }
 129
 130 /* ?to_char_type@?$char_traits@D@std@@SADABH@Z */
 131 /* ?to_char_type@?$char_traits@D@std@@SADAEBH@Z */
 132 char CDECL MSVCP_char_traits_char_to_char_type(const int *i)
 133 {
 134     return (char)*i;
 135 }
 136
 137 /* ?to_int_type@?$char_traits@D@std@@SAHABD@Z */
 138 /* ?to_int_type@?$char_traits@D@std@@SAHAEBD@Z */
 139 int CDECL MSVCP_char_traits_char_to_int_type(const char *ch)
 140 {
 141     return (int)*ch;
 142 }
 143
 144 /* ?eq_int_type@?$char_traits@D@std@@SA_NABH0@Z */
 145 /* ?eq_int_type@?$char_traits@D@std@@SA_NAEBH0@Z */
 146 MSVCP_BOOL CDECL MSVCP_char_traits_char_eq_int_type(const int *i1, const int *i2)
 147 {
 148     return *i1 == *i2;
 149 }
 150
 151 /* ?eof@?$char_traits@D@std@@SAHXZ */
 152 int CDECL MSVCP_char_traits_char_eof(void)
 153 {
 154     return EOF;
 155 }
 156
 157 /* ?not_eof@?$char_traits@D@std@@SAHABH@Z */
 158 /* ?not_eof@?$char_traits@D@std@@SAHAEBH@Z */
 159 int CDECL MSVCP_char_traits_char_not_eof(int *in)
 160 {
 161     return (*in==EOF ? !EOF : *in);
 162 }
 163
 164
 165 /* char_traits<wchar_t> */
 166 /* ?assign@?$char_traits@_W@std@@SAXAA_WAB_W@Z */
 167 /* ?assign@?$char_traits@_W@std@@SAXAEA_WAEB_W@Z */
 168 void CDECL MSVCP_char_traits_wchar_assign(wchar_t *ch,
 169         const wchar_t *assign)
 170 {
 171     *ch = *assign;
 172 }
 173
 174 /* ?eq@?$char_traits@_W@std@@SA_NAB_W0@Z */
 175 /* ?eq@?$char_traits@_W@std@@SA_NAEB_W0@Z */
 176 MSVCP_BOOL CDECL MSVCP_char_traits_wchar_eq(wchar_t *ch1, wchar_t *ch2)
 177 {
 178     return *ch1 == *ch2;
 179 }
 180
 181 /* ?lt@?$char_traits@_W@std@@SA_NAB_W0@Z */
 182 /* ?lt@?$char_traits@_W@std@@SA_NAEB_W0@Z */
 183 MSVCP_BOOL CDECL MSVCP_char_traits_wchar_lt(const wchar_t *ch1,
 184         const wchar_t *ch2)
 185 {
 186     return *ch1 < *ch2;
 187 }
 188
 189 /* ?compare@?$char_traits@_W@std@@SAHPB_W0I@Z */
 190 /* ?compare@?$char_traits@_W@std@@SAHPEB_W0_K@Z */
 191 int CDECL MSVCP_char_traits_wchar_compare(const wchar_t *s1,
 192         const wchar_t *s2, size_t count)
 193 {
 194     int ret = memcmp(s1, s2, sizeof(wchar_t[count]));
 195     return (ret>0 ? 1 : (ret<0 ? -1 : 0));
 196 }
 197
 198 /* ?length@?$char_traits@_W@std@@SAIPB_W@Z */
 199 /* ?length@?$char_traits@_W@std@@SA_KPEB_W@Z */
 200 size_t CDECL MSVCP_char_traits_wchar_length(const wchar_t *str)
 201 {
 202     return wcslen((WCHAR*)str);
 203 }
 204
 205 /* ?_Copy_s@?$char_traits@_W@std@@SAPA_WPA_WIPB_WI@Z */
 206 /* ?_Copy_s@?$char_traits@_W@std@@SAPEA_WPEA_W_KPEB_W1@Z */
 207 wchar_t* CDECL MSVCP_char_traits_wchar__Copy_s(wchar_t *dest,
 208         size_t size, const wchar_t *src, size_t count)
 209 {
 210     if(!dest || !src || size<count) {
 211         if(dest && size)
 212             dest[0] = '\0';
 213         _invalid_parameter(NULL, NULL, NULL, 0, 0);
 214         return dest;
 215     }
 216
 217     return memcpy(dest, src, sizeof(wchar_t[count]));
 218 }
 219
 220 /* ?copy@?$char_traits@_W@std@@SAPA_WPA_WPB_WI@Z */
 221 /* ?copy@?$char_traits@_W@std@@SAPEA_WPEA_WPEB_W_K@Z */
 222 wchar_t* CDECL MSVCP_char_traits_wchar_copy(wchar_t *dest,
 223         const wchar_t *src, size_t count)
 224 {
 225     return MSVCP_char_traits_wchar__Copy_s(dest, count, src, count);
 226 }
 227
 228 /* ?find@?$char_traits@_W@std@@SAPB_WPB_WIAB_W@Z */
 229 /* ?find@?$char_traits@_W@std@@SAPEB_WPEB_W_KAEB_W@Z */
 230 const wchar_t* CDECL MSVCP_char_traits_wchar_find(
 231         const wchar_t *str, size_t range, const wchar_t *c)
 232 {
 233     size_t i=0;
 234
 235     for(i=0; i<range; i++)
 236         if(str[i] == *c)
 237             return str+i;
 238
 239     return NULL;
 240 }
 241
 242 /* ?_Move_s@?$char_traits@_W@std@@SAPA_WPA_WIPB_WI@Z */
 243 /* ?_Move_s@?$char_traits@_W@std@@SAPEA_WPEA_W_KPEB_W1@Z */
 244 wchar_t* CDECL MSVCP_char_traits_wchar__Move_s(wchar_t *dest,
 245         size_t size, const wchar_t *src, size_t count)
 246 {
 247     if(!dest || !src || size<count) {
 248         if(dest && size)
 249             dest[0] = '\0';
 250         _invalid_parameter(NULL, NULL, NULL, 0, 0);
 251         return dest;
 252     }
 253
 254     return memmove(dest, src, sizeof(WCHAR[count]));
 255 }
 256
 257 /* ?move@?$char_traits@_W@std@@SAPA_WPA_WPB_WI@Z */
 258 /* ?move@?$char_traits@_W@std@@SAPEA_WPEA_WPEB_W_K@Z */
 259 wchar_t* CDECL MSVCP_char_traits_wchar_move(wchar_t *dest,
 260         const wchar_t *src, size_t count)
 261 {
 262     return MSVCP_char_traits_wchar__Move_s(dest, count, src, count);
 263 }
 264
 265 /* ?assign@?$char_traits@_W@std@@SAPA_WPA_WI_W@Z */
 266 /* ?assign@?$char_traits@_W@std@@SAPEA_WPEA_W_K_W@Z */
 267 wchar_t* CDECL MSVCP_char_traits_wchar_assignn(wchar_t *str,
 268         size_t num, wchar_t c)
 269 {
 270     size_t i;
 271
 272     for(i=0; i<num; i++)
 273         str[i] = c;
 274
 275     return str;
 276 }
 277
 278 /* ?to_char_type@?$char_traits@_W@std@@SA_WABG@Z */
 279 /* ?to_char_type@?$char_traits@_W@std@@SA_WAEBG@Z */
 280 wchar_t CDECL MSVCP_char_traits_wchar_to_char_type(const unsigned short *i)
 281 {
 282     return *i;
 283 }
 284
 285 /* ?to_int_type@?$char_traits@_W@std@@SAGAB_W@Z */
 286 /* ?to_int_type@?$char_traits@_W@std@@SAGAEB_W@Z */
 287 unsigned short CDECL MSVCP_char_traits_wchar_to_int_type(const wchar_t *ch)
 288 {
 289     return *ch;
 290 }
 291
 292 /* ?eq_int_type@?$char_traits@_W@std@@SA_NABG0@Z */
 293 /* ?eq_int_type@?$char_traits@_W@std@@SA_NAEBG0@Z */
 294 MSVCP_BOOL CDECL MSVCP_char_traits_wchar_eq_int_tpe(const unsigned short *i1,
 295         const unsigned short *i2)
 296 {
 297     return *i1 == *i2;
 298 }
 299
 300 /* ?eof@?$char_traits@_W@std@@SAGXZ */
 301 unsigned short CDECL MSVCP_char_traits_wchar_eof(void)
 302 {
 303     return WEOF;
 304 }
 305
 306 /* ?not_eof@?$char_traits@_W@std@@SAGABG@Z */
 307 /* ?not_eof@?$char_traits@_W@std@@SAGAEBG@Z */
 308 unsigned short CDECL MSVCP_char_traits_wchar_not_eof(const unsigned short *in)
 309 {
 310     return (*in==WEOF ? !WEOF : *in);
 311 }
 312
 313
 314 /* char_traits<unsigned short> */
 315 /* ?assign@?$char_traits@G@std@@SAXAAGABG@Z */
 316 /* ?assign@?$char_traits@G@std@@SAXAEAGAEBG@Z */
 317 void CDECL MSVCP_char_traits_short_assign(unsigned short *ch,
 318         const unsigned short *assign)
 319 {
 320     *ch = *assign;
 321 }
 322
 323 /* ?eq@?$char_traits@G@std@@SA_NABG0@Z */
 324 /* ?eq@?$char_traits@G@std@@SA_NAEBG0@Z */
 325 MSVCP_BOOL CDECL MSVCP_char_traits_short_eq(const unsigned short *ch1,
 326         const unsigned short *ch2)
 327 {
 328     return *ch1 == *ch2;
 329 }
 330
 331 /* ?lt@?$char_traits@G@std@@SA_NABG0@Z */
 332 /* ?lt@?$char_traits@G@std@@SA_NAEBG0@Z */
 333 MSVCP_BOOL CDECL MSVCP_char_traits_short_lt(const unsigned short *ch1,
 334         const unsigned short *ch2)
 335 {
 336     return *ch1 < *ch2;
 337 }
 338
 339 /* ?compare@?$char_traits@G@std@@SAHPBG0I@Z */
 340 /* ?compare@?$char_traits@G@std@@SAHPEBG0_K@Z */
 341 int CDECL MSVCP_char_traits_short_compare(const unsigned short *s1,
 342         const unsigned short *s2, size_t count)
 343 {
 344     size_t i;
 345
 346     for(i=0; i<count; i++)
 347         if(s1[i] != s2[i])
 348             return (s1[i] < s2[i] ? -1 : 1);
 349
 350     return 0;
 351 }
 352
 353 /* ?length@?$char_traits@G@std@@SAIPBG@Z */
 354 /* ?length@?$char_traits@G@std@@SA_KPEBG@Z */
 355 size_t CDECL MSVCP_char_traits_short_length(const unsigned short *str)
 356 {
 357     size_t len;
 358
 359     for(len=0; str[len]; len++);
 360
 361     return len;
 362 }
 363
 364 /* ?_Copy_s@?$char_traits@G@std@@SAPAGPAGIPBGI@Z */
 365 /* ?_Copy_s@?$char_traits@G@std@@SAPEAGPEAG_KPEBG1@Z */
 366 unsigned short * CDECL MSVCP_char_traits_short__Copy_s(unsigned short *dest,
 367         size_t size, const unsigned short *src, size_t count)
 368 {
 369     if(size<count) {
 370         _invalid_parameter(NULL, NULL, NULL, 0, 0);
 371         return dest;
 372     }
 373
 374     return memcpy(dest, src, sizeof(unsigned short[count]));
 375 }
 376
 377 /* ?copy@?$char_traits@G@std@@SAPAGPAGPBGI@Z */
 378 /* ?copy@?$char_traits@G@std@@SAPEAGPEAGPEBG_K@Z */
 379 unsigned short* CDECL MSVCP_char_traits_short_copy(unsigned short *dest,
 380         const unsigned short *src, size_t count)
 381 {
 382     return MSVCP_char_traits_short__Copy_s(dest, count, src, count);
 383 }
 384
 385 /* ?find@?$char_traits@G@std@@SAPBGPBGIABG@Z */
 386 /* ?find@?$char_traits@G@std@@SAPEBGPEBG_KAEBG@Z */
 387 const unsigned short* CDECL MSVCP_char_traits_short_find(
 388         const unsigned short *str, size_t range, const unsigned short *c)
 389 {
 390     size_t i;
 391
 392     for(i=0; i<range; i++)
 393         if(str[i] == *c)
 394             return str+i;
 395
 396     return NULL;
 397 }
 398
 399 /* ?_Move_s@?$char_traits@G@std@@SAPAGPAGIPBGI@Z */
 400 /* ?_Move_s@?$char_traits@G@std@@SAPEAGPEAG_KPEBG1@Z */
 401 unsigned short* CDECL MSVCP_char_traits_short__Move_s(unsigned short *dest,
 402         size_t size, const unsigned short *src, size_t count)
 403 {
 404     if(size<count) {
 405         _invalid_parameter(NULL, NULL, NULL, 0, 0);
 406         return dest;
 407     }
 408
 409     return memmove(dest, src, sizeof(unsigned short[count]));
 410 }
 411
 412 /* ?move@?$char_traits@G@std@@SAPAGPAGPBGI@Z */
 413 /* ?move@?$char_traits@G@std@@SAPEAGPEAGPEBG_K@Z */
 414 unsigned short* CDECL MSVCP_char_traits_short_move(unsigned short *dest,
 415         const unsigned short *src, size_t count)
 416 {
 417     return MSVCP_char_traits_short__Move_s(dest, count, src, count);
 418 }
 419
 420 /* ?assign@?$char_traits@G@std@@SAPAGPAGIG@Z */
 421 /* ?assign@?$char_traits@G@std@@SAPEAGPEAG_KG@Z */
 422 unsigned short* CDECL MSVCP_char_traits_short_assignn(unsigned short *str,
 423         size_t num, unsigned short c)
 424 {
 425     size_t i;
 426
 427     for(i=0; i<num; i++)
 428         str[i] = c;
 429
 430     return str;
 431 }
 432
 433 /* ?to_char_type@?$char_traits@G@std@@SAGABG@Z */
 434 /* ?to_char_type@?$char_traits@G@std@@SAGAEBG@Z */
 435 unsigned short CDECL MSVCP_char_traits_short_to_char_type(const unsigned short *i)
 436 {
 437     return *i;
 438 }
 439
 440 /* ?to_int_type@?$char_traits@G@std@@SAGABG@Z */
 441 /* ?to_int_type@?$char_traits@G@std@@SAGAEBG@Z */
 442 unsigned short CDECL MSVCP_char_traits_short_to_int_type(const unsigned short *ch)
 443 {
 444     return *ch;
 445 }
 446
 447 /* ?eq_int_type@?$char_traits@G@std@@SA_NABG0@Z */
 448 /* ?eq_int_type@?$char_traits@G@std@@SA_NAEBG0@Z */
 449 MSVCP_BOOL CDECL MSVCP_char_traits_short_eq_int_type(unsigned short *i1,
 450         unsigned short *i2)
 451 {
 452     return *i1 == *i2;
 453 }
 454
 455 /* ?eof@?$char_traits@G@std@@SAGXZ */
 456 unsigned short CDECL MSVCP_char_traits_short_eof(void)
 457 {
 458     return -1;
 459 }
 460
 461 /* ?not_eof@?$char_traits@G@std@@SAGABG@Z */
 462 /* ?not_eof@?$char_traits@G@std@@SAGAEBG@Z */
 463 unsigned short CDECL MSVCP_char_traits_short_not_eof(const unsigned short *in)
 464 {
 465     return (*in==(unsigned short)-1 ? 0 : *in);
 466 }
 467
 468
 469 /* _String_base */
 470 /* ?_Xlen@_String_base@std@@SAXXZ */
 471 void  CDECL MSVCP__String_base_Xlen(void)
 472 {
 473     static const char msg[] = "string too long";
 474
 475     TRACE("\n");
 476     throw_exception(EXCEPTION_LENGTH_ERROR, msg);
 477 }
 478
 479 /* ?_Xran@_String_base@std@@SAXXZ */
 480 void CDECL MSVCP__String_base_Xran(void)
 481 {
 482     static const char msg[] = "invalid string position";
 483
 484     TRACE("\n");
 485     throw_exception(EXCEPTION_OUT_OF_RANGE, msg);
 486 }
 487
 488 /* ?_Xinvarg@_String_base@std@@SAXXZ */
 489 void CDECL MSVCP__String_base_Xinvarg(void)
 490 {
 491     static const char msg[] = "invalid string argument";
 492
 493     TRACE("\n");
 494     throw_exception(EXCEPTION_INVALID_ARGUMENT, msg);
 495 }
 496
 497
 498 /* basic_string<char, char_traits<char>, allocator<char>> */
 499 /* ?npos@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@2IB */
 500 /* ?npos@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@2_KB */
 501 const size_t MSVCP_basic_string_char_npos = -1;
 502
 503 /* Internal: basic_string_char_ptr - return pointer to stored string */
 504 static char* basic_string_char_ptr(basic_string_char *this)
 505 {
 506     if(this->res == BUF_SIZE_CHAR-1)
 507         return this->data.buf;
 508     return this->data.ptr;
 509 }
 510
 511 /* Internal: basic_string_char_const_ptr - returns const pointer to stored string */
 512 static const char* basic_string_char_const_ptr(const basic_string_char *this)
 513 {
 514     if(this->res == BUF_SIZE_CHAR-1)
 515         return this->data.buf;
 516     return this->data.ptr;
 517 }
 518
 519 /* Internal: basic_string_char_eos - sets string length, puts '\0' on the end */
 520 static void basic_string_char_eos(basic_string_char *this, size_t len)
 521 {
 522     static const char nullbyte = '\0';
 523
 524     this->size = len;
 525     MSVCP_char_traits_char_assign(basic_string_char_ptr(this)+len, &nullbyte);
 526 }
 527
 528 /* Internal: basic_string_char_inside - checks if given pointer points inside stored string */
 529 static MSVCP_BOOL basic_string_char_inside(
 530         basic_string_char *this, const char *ptr)
 531 {
 532     char *cstr = basic_string_char_ptr(this);
 533
 534     return (ptr<cstr || ptr>=cstr+this->size) ? FALSE : TRUE;
 535 }
 536
 537 /* Internal: basic_string_char_tidy - initialize basic_string buffer, deallocates data */
 538 /* Caution: new_size have to be smaller than BUF_SIZE_CHAR */
 539 static void basic_string_char_tidy(basic_string_char *this,
 540         MSVCP_BOOL built, size_t new_size)
 541 {
 542     if(built && BUF_SIZE_CHAR<=this->res) {
 543         char *ptr = this->data.ptr;
 544
 545         if(new_size > 0)
 546             MSVCP_char_traits_char__Copy_s(this->data.buf, BUF_SIZE_CHAR, ptr, new_size);
 547         MSVCP_allocator_char_deallocate(this->allocator, ptr, this->res+1);
 548     }
 549
 550     this->res = BUF_SIZE_CHAR-1;
 551     basic_string_char_eos(this, new_size);
 552 }
 553
 554 /* Internal: basic_string_char_grow - changes size of internal buffer */
 555 static MSVCP_BOOL basic_string_char_grow(
 556         basic_string_char *this, size_t new_size, MSVCP_BOOL trim)
 557 {
 558     if(this->res < new_size) {
 559         size_t new_res = new_size;
 560         char *ptr;
 561
 562         new_res |= 0xf;
 563
 564         if(new_res/3 < this->res/2)
 565             new_res = this->res + this->res/2;
 566
 567         ptr = MSVCP_allocator_char_allocate(this->allocator, new_res);
 568         if(!ptr)
 569             ptr = MSVCP_allocator_char_allocate(this->allocator, new_size+1);
 570         else
 571             new_size = new_res;
 572         if(!ptr) {
 573             ERR("Out of memory\n");
 574             basic_string_char_tidy(this, TRUE, 0);
 575             return FALSE;
 576         }
 577
 578         MSVCP_char_traits_char__Copy_s(ptr, new_size,
 579                 basic_string_char_ptr(this), this->size);
 580         basic_string_char_tidy(this, TRUE, 0);
 581         this->data.ptr = ptr;
 582         this->res = new_size;
 583         basic_string_char_eos(this, this->size);
 584     } else if(trim && new_size < BUF_SIZE_CHAR)
 585         basic_string_char_tidy(this, TRUE,
 586                 new_size<this->size ? new_size : this->size);
 587     else if(new_size == 0)
 588         basic_string_char_eos(this, 0);
 589
 590     return (new_size>0);
 591 }
 592
 593 /* ?erase@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@II@Z */
 594 /* ?erase@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@_K0@Z */
 595 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_erase, 12)
 596 basic_string_char* __thiscall MSVCP_basic_string_char_erase(
 597         basic_string_char *this, size_t pos, size_t len)
 598 {
 599     TRACE("%p %lu %lu\n", this, (unsigned long)pos, (unsigned long)len);
 600
 601     if(pos > this->size) {
 602         MSVCP__String_base_Xran();
 603         return NULL;
 604     }
 605
 606     if(len > this->size-pos)
 607         len = this->size-pos;
 608
 609     if(len) {
 610         MSVCP_char_traits_char__Move_s(basic_string_char_ptr(this)+pos,
 611                 this->res-pos, basic_string_char_ptr(this)+pos+len,
 612                 this->size-pos-len);
 613         basic_string_char_eos(this, this->size-len);
 614     }
 615
 616     return this;
 617 }
 618
 619 /* ?assign@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@ABV12@II@Z */
 620 /* ?assign@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@AEBV12@_K1@Z */
 621 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_assign_substr, 16)
 622 basic_string_char* __thiscall MSVCP_basic_string_char_assign_substr(
 623         basic_string_char *this, const basic_string_char *assign,
 624         size_t pos, size_t len)
 625 {
 626     TRACE("%p %p %lu %lu\n", this, assign, (unsigned long)pos, (unsigned long)len);
 627
 628     if(assign->size < pos) {
 629         MSVCP__String_base_Xran();
 630         return NULL;
 631     }
 632
 633     if(len > assign->size-pos)
 634         len = assign->size-pos;
 635
 636     if(this == assign) {
 637         MSVCP_basic_string_char_erase(this, pos+len, MSVCP_basic_string_char_npos);
 638         MSVCP_basic_string_char_erase(this, 0, pos);
 639     } else if(basic_string_char_grow(this, len, FALSE)) {
 640         MSVCP_char_traits_char__Copy_s(basic_string_char_ptr(this),
 641                 this->res, basic_string_char_const_ptr(assign)+pos, len);
 642         basic_string_char_eos(this, len);
 643     }
 644
 645     return this;
 646 }
 647
 648 /* ?assign@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@ABV12@@Z */
 649 /* ?assign@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@AEBV12@@Z */
 650 /* ??4?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV01@ABV01@@Z */
 651 /* ??4?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV01@AEBV01@@Z */
 652 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_assign, 8)
 653 basic_string_char* __thiscall MSVCP_basic_string_char_assign(
 654         basic_string_char *this, const basic_string_char *assign)
 655 {
 656     return MSVCP_basic_string_char_assign_substr(this, assign,
 657             0, MSVCP_basic_string_char_npos);
 658 }
 659
 660 /* ?assign@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@PBDI@Z */
 661 /* ?assign@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@PEBD_K@Z */
 662 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_assign_cstr_len, 12)
 663 basic_string_char* __thiscall MSVCP_basic_string_char_assign_cstr_len(
 664         basic_string_char *this, const char *str, size_t len)
 665 {
 666     TRACE("%p %s %lu\n", this, debugstr_a(str), (unsigned long)len);
 667
 668     if(basic_string_char_inside(this, str))
 669         return MSVCP_basic_string_char_assign_substr(this, this,
 670                 str-basic_string_char_ptr(this), len);
 671     else if(basic_string_char_grow(this, len, FALSE)) {
 672         MSVCP_char_traits_char__Copy_s(basic_string_char_ptr(this),
 673                 this->res, str, len);
 674         basic_string_char_eos(this, len);
 675     }
 676
 677     return this;
 678 }
 679
 680 /* ?assign@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@PBD@Z */
 681 /* ?assign@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@PEBD@Z */
 682 /* ??4?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV01@PBD@Z */
 683 /* ??4?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV01@PEBD@Z */
 684 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_assign_cstr, 8)
 685 basic_string_char* __thiscall MSVCP_basic_string_char_assign_cstr(
 686         basic_string_char *this, const char *str)
 687 {
 688     return MSVCP_basic_string_char_assign_cstr_len(this, str,
 689             MSVCP_char_traits_char_length(str));
 690 }
 691
 692 /* ?c_str@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEPBDXZ */
 693 /* ?c_str@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAPEBDXZ */
 694 /* ?data@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEPBDXZ */
 695 /* ?data@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAPEBDXZ */
 696 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_c_str, 4)
 697 const char* __thiscall MSVCP_basic_string_char_c_str(basic_string_char *this)
 698 {
 699     TRACE("%p\n", this);
 700     return basic_string_char_const_ptr(this);
 701 }
 702
 703 /* ?capacity@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEIXZ */
 704 /* ?capacity@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBA_KXZ */
 705 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_capacity, 4)
 706 size_t __thiscall MSVCP_basic_string_char_capacity(basic_string_char *this)
 707 {
 708     TRACE("%p\n", this);
 709     return this->res;
 710 }
 711
 712 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAE@XZ */
 713 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAA@XZ */
 714 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_ctor, 4)
 715 basic_string_char* __thiscall MSVCP_basic_string_char_ctor(basic_string_char *this)
 716 {
 717     TRACE("%p\n", this);
 718
 719     basic_string_char_tidy(this, FALSE, 0);
 720     return this;
 721 }
 722
 723 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAE@ABV01@@Z */
 724 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAA@AEBV01@@Z */
 725 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_copy_ctor, 8)
 726 basic_string_char* __thiscall MSVCP_basic_string_char_copy_ctor(
 727     basic_string_char *this, const basic_string_char *copy)
 728 {
 729     TRACE("%p %p\n", this, copy);
 730
 731     basic_string_char_tidy(this, FALSE, 0);
 732     MSVCP_basic_string_char_assign(this, copy);
 733     return this;
 734 }
 735
 736 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAE@PBD@Z */
 737 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAA@PEBD@Z */
 738 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_ctor_cstr, 8)
 739 basic_string_char* __thiscall MSVCP_basic_string_char_ctor_cstr(
 740         basic_string_char *this, const char *str)
 741 {
 742     TRACE("%p %s\n", this, debugstr_a(str));
 743
 744     basic_string_char_tidy(this, FALSE, 0);
 745     MSVCP_basic_string_char_assign_cstr(this, str);
 746     return this;
 747 }
 748
 749 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAE@PBDI@Z */
 750 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAA@PEBD_K@Z */
 751 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_ctor_cstr_len, 12)
 752 basic_string_char* __thiscall MSVCP_basic_string_char_ctor_cstr_len(
 753         basic_string_char *this, const char *str, size_t len)
 754 {
 755     TRACE("%p %s %d\n", this, str, len);
 756
 757     basic_string_char_tidy(this, FALSE, 0);
 758     MSVCP_basic_string_char_assign_cstr_len(this, str, len);
 759     return this;
 760 }
 761
 762 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAE@ABV01@II@Z */
 763 /* ??0?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAA@AEBV01@_K1@Z */
 764 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_ctor_substr, 16)
 765 basic_string_char* __thiscall MSVCP_basic_string_char_ctor_substr(
 766         basic_string_char *this, const basic_string_char *assign,
 767         size_t pos, size_t len)
 768 {
 769     TRACE("%p %p %lu %lu\n", this, assign, (unsigned long)pos, (unsigned long)len);
 770
 771     basic_string_char_tidy(this, FALSE, 0);
 772     MSVCP_basic_string_char_assign_substr(this, assign, pos, len);
 773     return this;
 774 }
 775
 776 /* ??1?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAE@XZ */
 777 /* ??1?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAA@XZ */
 778 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_dtor, 4)
 779 void __thiscall MSVCP_basic_string_char_dtor(basic_string_char *this)
 780 {
 781     TRACE("%p\n", this);
 782     basic_string_char_tidy(this, TRUE, 0);
 783 }
 784
 785 /* ?size@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEIXZ */
 786 /* ?size@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBA_KXZ */
 787 /* ?length@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEIXZ */
 788 /* ?length@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBA_KXZ */
 789 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_length, 4)
 790 size_t __thiscall MSVCP_basic_string_char_length(basic_string_char *this)
 791 {
 792     TRACE("%p\n", this);
 793     return this->size;
 794 }
 795
 796 /* ?swap@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEXAAV12@@Z */
 797 /* ?swap@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAXAEAV12@@Z */
 798 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_swap, 8)
 799 void __thiscall MSVCP_basic_string_char_swap(basic_string_char *this, basic_string_char *str)
 800 {
 801     if(this != str) {
 802         char tmp[sizeof(this->data)];
 803         const size_t size = this->size;
 804         const size_t res = this->res;
 805
 806         memcpy(tmp, this->data.buf, sizeof(this->data));
 807         memcpy(this->data.buf, str->data.buf, sizeof(this->data));
 808         memcpy(str->data.buf, tmp, sizeof(this->data));
 809
 810         this->size = str->size;
 811         this->res = str->res;
 812
 813         str->size = size;
 814         str->res = res;
 815     }
 816 }
 817
 818 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@ABV12@II@Z */
 819 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@AEBV12@_K1@Z */
 820 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_append_substr, 16)
 821 basic_string_char* __thiscall MSVCP_basic_string_char_append_substr(basic_string_char *this,
 822         const basic_string_char *append, size_t offset, size_t count)
 823 {
 824     TRACE("%p %p %lu %lu\n", this, append, (unsigned long)offset, (unsigned long)count);
 825
 826     if(append->size < offset)
 827         MSVCP__String_base_Xran();
 828
 829     if(count > append->size-offset)
 830         count = append->size-offset;
 831
 832     if(MSVCP_basic_string_char_npos-this->size<=count || this->size+count<this->size)
 833         MSVCP__String_base_Xlen();
 834
 835     if(basic_string_char_grow(this, this->size+count, FALSE)) {
 836         MSVCP_char_traits_char__Copy_s(basic_string_char_ptr(this)+this->size,
 837                 this->res-this->size, basic_string_char_const_ptr(append)+offset, count);
 838         basic_string_char_eos(this, this->size+count);
 839     }
 840
 841     return this;
 842 }
 843
 844 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@ABV12@@Z */
 845 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@AEBV12@@Z */
 846 /* ??Y?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV01@ABV01@@Z */
 847 /* ??Y?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV01@AEBV01@@Z */
 848 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_append, 8)
 849 basic_string_char* __thiscall MSVCP_basic_string_char_append(
 850         basic_string_char *this, const basic_string_char *append)
 851 {
 852     return MSVCP_basic_string_char_append_substr(this, append,
 853             0, MSVCP_basic_string_char_npos);
 854 }
 855
 856 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@PBDI@Z */
 857 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@PEBD_K@Z */
 858 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_append_cstr_len, 12)
 859 basic_string_char* __thiscall MSVCP_basic_string_char_append_cstr_len(
 860         basic_string_char *this, const char *append, size_t count)
 861 {
 862     TRACE("%p %s %lu\n", this, append, (unsigned long)count);
 863
 864     if(basic_string_char_inside(this, append))
 865         return MSVCP_basic_string_char_append_substr(this, this,
 866                 append-basic_string_char_ptr(this), count);
 867
 868     if(MSVCP_basic_string_char_npos-this->size<=count || this->size+count<this->size)
 869         MSVCP__String_base_Xlen();
 870
 871     if(basic_string_char_grow(this, this->size+count, FALSE)) {
 872         MSVCP_char_traits_char__Copy_s(basic_string_char_ptr(this)+this->size,
 873                 this->res-this->size, append, count);
 874         basic_string_char_eos(this, this->size+count);
 875     }
 876
 877     return this;
 878 }
 879
 880 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@PBD@Z */
 881 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@PEBD@Z */
 882 /* ??Y?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV01@PBD@Z */
 883 /* ??Y?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV01@PEBD@Z */
 884 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_append_cstr, 8)
 885 basic_string_char* __thiscall MSVCP_basic_string_char_append_cstr(
 886         basic_string_char *this, const char *append)
 887 {
 888     return MSVCP_basic_string_char_append_cstr_len(this, append,
 889             MSVCP_char_traits_char_length(append));
 890 }
 891
 892 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV12@ID@Z */
 893 /* ?append@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV12@_KD@Z */
 894 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_append_len_ch, 12)
 895 basic_string_char* __thiscall MSVCP_basic_string_char_append_len_ch(
 896         basic_string_char *this, size_t count, char ch)
 897 {
 898     TRACE("%p %lu %c\n", this, (unsigned long)count, ch);
 899
 900     if(MSVCP_basic_string_char_npos-this->size <= count)
 901         MSVCP__String_base_Xlen();
 902
 903     if(basic_string_char_grow(this, this->size+count, FALSE)) {
 904         MSVCP_char_traits_char_assignn(basic_string_char_ptr(this)+this->size, count, ch);
 905         basic_string_char_eos(this, this->size+count);
 906     }
 907
 908     return this;
 909 }
 910
 911 /* ??Y?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAAV01@D@Z */
 912 /* ??Y?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAV01@D@Z */
 913 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_append_ch, 8)
 914 basic_string_char* __thiscall MSVCP_basic_string_char_append_ch(
 915         basic_string_char *this, char ch)
 916 {
 917     return MSVCP_basic_string_char_append_len_ch(this, 1, ch);
 918 }
 919
 920 /* ??$?HDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA?AV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@ABV10@PBD@Z */
 921 /* ??$?HDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA?AV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@AEBV10@PEBD@Z */
 922 basic_string_char* __cdecl MSVCP_basic_string_char_concatenate_bstr_cstr(basic_string_char *ret,
 923         const basic_string_char *left, const char *right)
 924 {
 925     TRACE("%p %s\n", left, right);
 926
 927     MSVCP_basic_string_char_copy_ctor(ret, left);
 928     MSVCP_basic_string_char_append_cstr(ret, right);
 929     return ret;
 930 }
 931
 932 /* ??$?HDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA?AV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@PBDABV10@@Z */
 933 /* ??$?HDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA?AV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@PEBDAEBV10@@Z */
 934 basic_string_char* __cdecl MSVCP_basic_string_char_concatenate_cstr_bstr(basic_string_char *ret,
 935         const char *left, const basic_string_char *right)
 936 {
 937     TRACE("%s %p\n", left, right);
 938
 939     MSVCP_basic_string_char_ctor_cstr(ret, left);
 940     MSVCP_basic_string_char_append(ret, right);
 941     return ret;
 942 }
 943
 944 /* ??$?HDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA?AV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@ABV10@0@Z */
 945 /* ??$?HDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA?AV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@AEBV10@0@Z */
 946 basic_string_char* __cdecl MSVCP_basic_string_char_concatenate(basic_string_char *ret,
 947         const basic_string_char *left, const basic_string_char *right)
 948 {
 949     TRACE("%p %p\n", left, right);
 950
 951     MSVCP_basic_string_char_copy_ctor(ret, left);
 952     MSVCP_basic_string_char_append(ret, right);
 953     return ret;
 954 }
 955
 956 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEHIIPBDI@Z */
 957 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAH_K0PEBD0@Z */
 958 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_compare_substr_cstr_len, 20)
 959 int __thiscall MSVCP_basic_string_char_compare_substr_cstr_len(
 960             const basic_string_char *this, size_t pos, size_t num,
 961             const char *str, size_t count)
 962 {
 963     int ans;
 964
 965     TRACE("%p %lu %lu %s %lu\n", this, (unsigned long)pos,
 966             (unsigned long)num, str, (unsigned long)count);
 967
 968     if(this->size < pos)
 969         MSVCP__String_base_Xran();
 970
 971     if(pos+num > this->size)
 972         num = this->size-pos;
 973
 974     ans = MSVCP_char_traits_char_compare(basic_string_char_const_ptr(this)+pos,
 975             str, num>count ? count : num);
 976     if(ans)
 977         return ans;
 978
 979     if(num > count)
 980         ans = 1;
 981     else if(num < count)
 982         ans = -1;
 983     return ans;
 984 }
 985
 986 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEHIIPBD@Z */
 987 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAH_K0PEBD@Z */
 988 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_compare_substr_cstr, 16)
 989 int __thiscall MSVCP_basic_string_char_compare_substr_cstr(const basic_string_char *this,
 990         size_t pos, size_t num, const char *str)
 991 {
 992     return MSVCP_basic_string_char_compare_substr_cstr_len(this, pos, num,
 993             str, MSVCP_char_traits_char_length(str));
 994 }
 995
 996 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEHPBD@Z */
 997 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAHPEBD@Z */
 998 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_compare_cstr, 8)
 999 int __thiscall MSVCP_basic_string_char_compare_cstr(
1000         const basic_string_char *this, const char *str)
1001 {
1002     return MSVCP_basic_string_char_compare_substr_cstr_len(this, 0, this->size,
1003             str, MSVCP_char_traits_char_length(str));
1004 }
1005
1006 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEHIIABV12@II@Z */
1007 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAH_K0AEBV12@00@Z */
1008 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_compare_substr_substr, 24)
1009 int __thiscall MSVCP_basic_string_char_compare_substr_substr(
1010         const basic_string_char *this, size_t pos, size_t num,
1011         const basic_string_char *compare, size_t off, size_t count)
1012 {
1013     TRACE("%p %lu %lu %p %lu %lu\n", this, (unsigned long)pos, (unsigned long)num,
1014             compare, (unsigned long)off, (unsigned long)count);
1015
1016     if(compare->size < off)
1017         MSVCP__String_base_Xran();
1018
1019     if(off+count > compare->size)
1020         count = compare->size-off;
1021
1022     return MSVCP_basic_string_char_compare_substr_cstr_len(this, pos, num,
1023             basic_string_char_const_ptr(compare)+off, count);
1024 }
1025
1026 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEHIIABV12@@Z */
1027 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAH_K0AEBV12@@Z */
1028 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_compare_substr, 16)
1029 int __thiscall MSVCP_basic_string_char_compare_substr(
1030         const basic_string_char *this, size_t pos, size_t num,
1031         const basic_string_char *compare)
1032 {
1033     return MSVCP_basic_string_char_compare_substr_cstr_len(this, pos, num,
1034             basic_string_char_const_ptr(compare), compare->size);
1035 }
1036
1037 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEHABV12@@Z */
1038 /* ?compare@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAHAEBV12@@Z */
1039 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_compare, 8)
1040 int __thiscall MSVCP_basic_string_char_compare(
1041         const basic_string_char *this, const basic_string_char *compare)
1042 {
1043     return MSVCP_basic_string_char_compare_substr_cstr_len(this, 0, this->size,
1044             basic_string_char_const_ptr(compare), compare->size);
1045 }
1046
1047 /* ??$?MDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA_NABV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@0@Z */
1048 /* ??$?MDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA_NAEBV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@0@Z */
1049 MSVCP_BOOL __cdecl MSVCP_basic_string_char_lower(
1050         const basic_string_char *left, const basic_string_char *right)
1051 {
1052     return MSVCP_basic_string_char_compare(left, right) < 0;
1053 }
1054
1055 /* ??$?MDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA_NABV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@PBD@Z */
1056 /* ??$?MDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA_NAEBV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@PEBD@Z */
1057 MSVCP_BOOL __cdecl MSVCP_basic_string_char_lower_bstr_cstr(
1058         const basic_string_char *left, const char *right)
1059 {
1060     return MSVCP_basic_string_char_compare_cstr(left, right) < 0;
1061 }
1062
1063 /* ??$?MDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA_NPBDABV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@@Z */
1064 /* ??$?MDU?$char_traits@D@std@@V?$allocator@D@1@@std@@YA_NPEBDAEBV?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@0@@Z */
1065 MSVCP_BOOL __cdecl MSVCP_basic_string_char_lower_cstr_bstr(
1066         const char *left, const basic_string_char *right)
1067 {
1068     return MSVCP_basic_string_char_compare_cstr(right, left) > 0;
1069 }
1070
1071 /* ?find@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEIPBDII@Z */
1072 /* ?find@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBA_KPEBD_K1@Z */
1073 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_find_cstr_substr, 16)
1074 size_t __thiscall MSVCP_basic_string_char_find_cstr_substr(
1075         const basic_string_char *this, const char *find, size_t pos, size_t len)
1076 {
1077     const char *p, *end;
1078
1079     TRACE("%p %s %lu %lu\n", this, find, (unsigned long)pos, (unsigned long)len);
1080
1081     if(len==0 && pos<=this->size)
1082         return pos;
1083
1084     end = basic_string_char_const_ptr(this)+this->size-len+1;
1085     for(p=basic_string_char_const_ptr(this)+pos; p<end; p++) {
1086         p = MSVCP_char_traits_char_find(p, end-p, find);
1087         if(!p)
1088             break;
1089
1090         if(!MSVCP_char_traits_char_compare(p, find, len))
1091             return p-basic_string_char_const_ptr(this);
1092     }
1093
1094     return MSVCP_basic_string_char_npos;
1095 }
1096
1097 /* ?find@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEIDI@Z */
1098 /* ?find@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBA_KD_K@Z */
1099 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_find_ch, 12)
1100 size_t __thiscall MSVCP_basic_string_char_find_ch(
1101         const basic_string_char *this, char ch, size_t pos)
1102 {
1103     return MSVCP_basic_string_char_find_cstr_substr(this, &ch, pos, 1);
1104 }
1105
1106 /* ?at@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAADI@Z */
1107 /* ?at@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAD_K@Z */
1108 /* ??A?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEAADI@Z */
1109 /* ??A?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAAEAD_K@Z */
1110 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_at, 8)
1111 char* __thiscall MSVCP_basic_string_char_at(
1112         basic_string_char *this, size_t pos)
1113 {
1114     TRACE("%p %lu\n", this, (unsigned long)pos);
1115
1116     if(this->size <= pos)
1117         MSVCP__String_base_Xran();
1118
1119     return basic_string_char_ptr(this)+pos;
1120 }
1121
1122 /* ?at@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEABDI@Z */
1123 /* ?at@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAAEBD_K@Z */
1124 /* ??A?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QBEABDI@Z */
1125 /* ??A?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEBAAEBD_K@Z */
1126 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_const_at, 8)
1127 const char* __thiscall MSVCP_basic_string_char_const_at(
1128         const basic_string_char *this, size_t pos)
1129 {
1130     TRACE("%p %lu\n", this, (unsigned long)pos);
1131
1132     if(this->size <= pos)
1133         MSVCP__String_base_Xran();
1134
1135     return basic_string_char_const_ptr(this)+pos;
1136 }
1137
1138 /* ?resize@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEXID@Z */
1139 /* ?resize@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAX_KD@Z */
1140 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_resize_ch, 12)
1141 void __thiscall MSVCP_basic_string_char_resize_ch(
1142         basic_string_char *this, size_t size, char ch)
1143 {
1144     TRACE("%p %lu %c\n", this, (unsigned long)size, ch);
1145
1146     if(size <= this->size)
1147         MSVCP_basic_string_char_erase(this, size, this->size);
1148     else
1149         MSVCP_basic_string_char_append_len_ch(this, size-this->size, ch);
1150 }
1151
1152 /* ?resize@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEXI@Z */
1153 /* ?resize@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAX_K@Z */
1154 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_resize, 8)
1155 void __thiscall MSVCP_basic_string_char_resize(
1156         basic_string_char *this, size_t size)
1157 {
1158     MSVCP_basic_string_char_resize_ch(this, size, '\0');
1159 }
1160
1161 /* ?clear@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QAEXXZ */
1162 /* ?clear@?$basic_string@DU?$char_traits@D@std@@V?$allocator@D@2@@std@@QEAAXXZ */
1163 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_char_clear, 4)
1164 void __thiscall MSVCP_basic_string_char_clear(basic_string_char *this)
1165 {
1166     basic_string_char_eos(this, 0);
1167 }
1168
1169
1170 /* basic_string<wchar_t, char_traits<wchar_t>, allocator<wchar_t>> */
1171 /* ?npos@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@2IB */
1172 /* ?npos@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@2_KB */
1173 const size_t MSVCP_basic_string_wchar_npos = -1;
1174
1175 /* Internal: basic_string_wchar_ptr - return pointer to stored string */
1176 static wchar_t* basic_string_wchar_ptr(basic_string_wchar *this)
1177 {
1178     if(this->res == BUF_SIZE_WCHAR-1)
1179         return this->data.buf;
1180     return this->data.ptr;
1181 }
1182
1183 /* Internal: basic_string_wchar_const_ptr - returns const pointer to stored string */
1184 static const wchar_t* basic_string_wchar_const_ptr(const basic_string_wchar *this)
1185 {
1186     if(this->res == BUF_SIZE_WCHAR-1)
1187         return this->data.buf;
1188     return this->data.ptr;
1189 }
1190
1191 /* Internal: basic_string_wchar_eos - sets string length, puts '\0' on the end */
1192 static void basic_string_wchar_eos(basic_string_wchar *this, size_t len)
1193 {
1194     static const wchar_t nullbyte_w = '\0';
1195
1196     this->size = len;
1197     MSVCP_char_traits_wchar_assign(basic_string_wchar_ptr(this)+len, &nullbyte_w);
1198 }
1199
1200 /* Internal: basic_string_char_inside - checks if given pointer points inside stored string */
1201 static MSVCP_BOOL basic_string_wchar_inside(
1202         basic_string_wchar *this, const wchar_t *ptr)
1203 {
1204     wchar_t *cstr = basic_string_wchar_ptr(this);
1205
1206     return (ptr<cstr || ptr>=cstr+this->size) ? FALSE : TRUE;
1207 }
1208
1209 /* Internal: basic_string_char_tidy - initialize basic_string buffer, deallocates data */
1210 /* Caution: new_size have to be smaller than BUF_SIZE_WCHAR */
1211 static void basic_string_wchar_tidy(basic_string_wchar *this,
1212         MSVCP_BOOL built, size_t new_size)
1213 {
1214     if(built && BUF_SIZE_WCHAR<=this->res) {
1215         wchar_t *ptr = this->data.ptr;
1216
1217         if(new_size > 0)
1218             MSVCP_char_traits_wchar__Copy_s(this->data.buf, BUF_SIZE_WCHAR, ptr, new_size);
1219         MSVCP_allocator_wchar_deallocate(this->allocator, ptr, this->res+1);
1220     }
1221
1222     this->res = BUF_SIZE_WCHAR-1;
1223     basic_string_wchar_eos(this, new_size);
1224 }
1225
1226 /* Internal: basic_string_wchar_grow - changes size of internal buffer */
1227 static MSVCP_BOOL basic_string_wchar_grow(
1228         basic_string_wchar *this, size_t new_size, MSVCP_BOOL trim)
1229 {
1230     if(this->res < new_size) {
1231         size_t new_res = new_size;
1232         wchar_t *ptr;
1233
1234         new_res |= 0xf;
1235
1236         if(new_res/3 < this->res/2)
1237             new_res = this->res + this->res/2;
1238
1239         ptr = MSVCP_allocator_wchar_allocate(this->allocator, new_res);
1240         if(!ptr)
1241             ptr = MSVCP_allocator_wchar_allocate(this->allocator, new_size+1);
1242         else
1243             new_size = new_res;
1244         if(!ptr) {
1245             ERR("Out of memory\n");
1246             basic_string_wchar_tidy(this, TRUE, 0);
1247             return FALSE;
1248         }
1249
1250         MSVCP_char_traits_wchar__Copy_s(ptr, new_size,
1251                 basic_string_wchar_ptr(this), this->size);
1252         basic_string_wchar_tidy(this, TRUE, 0);
1253         this->data.ptr = ptr;
1254         this->res = new_size;
1255         basic_string_wchar_eos(this, this->size);
1256     } else if(trim && new_size < BUF_SIZE_WCHAR)
1257         basic_string_wchar_tidy(this, TRUE,
1258                 new_size<this->size ? new_size : this->size);
1259     else if(new_size == 0)
1260         basic_string_wchar_eos(this, 0);
1261
1262     return (new_size>0);
1263 }
1264
1265 /* ?erase@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@II@Z */
1266 /* ?erase@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@_K0@Z */
1267 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_erase, 12)
1268 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_erase(
1269             basic_string_wchar *this, size_t pos, size_t len)
1270 {
1271     TRACE("%p %lu %lu\n", this, (unsigned long)pos, (unsigned long)len);
1272
1273     if(pos > this->size) {
1274         MSVCP__String_base_Xran();
1275         return NULL;
1276     }
1277
1278     if(len > this->size-pos)
1279         len = this->size-pos;
1280
1281     if(len) {
1282         MSVCP_char_traits_wchar__Move_s(basic_string_wchar_ptr(this)+pos,
1283                 this->res-pos, basic_string_wchar_ptr(this)+pos+len,
1284                 this->size-pos-len);
1285         basic_string_wchar_eos(this, this->size-len);
1286     }
1287
1288     return this;
1289 }
1290
1291 /* ?assign@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@ABV12@II@Z */
1292 /* ?assign@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@AEBV12@_K1@Z */
1293 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_assign_substr, 16)
1294 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_assign_substr(
1295             basic_string_wchar *this, const basic_string_wchar *assign,
1296             size_t pos, size_t len)
1297 {
1298     TRACE("%p %p %lu %lu\n", this, assign, (unsigned long)pos, (unsigned long)len);
1299
1300     if(assign->size < pos) {
1301         MSVCP__String_base_Xran();
1302         return NULL;
1303     }
1304
1305     if(len > assign->size-pos)
1306         len = assign->size-pos;
1307
1308     if(this == assign) {
1309         MSVCP_basic_string_wchar_erase(this, pos+len, MSVCP_basic_string_wchar_npos);
1310         MSVCP_basic_string_wchar_erase(this, 0, pos);
1311     } else if(basic_string_wchar_grow(this, len, FALSE)) {
1312         MSVCP_char_traits_wchar__Copy_s(basic_string_wchar_ptr(this),
1313                 this->res, basic_string_wchar_const_ptr(assign)+pos, len);
1314         basic_string_wchar_eos(this, len);
1315     }
1316
1317     return this;
1318 }
1319
1320 /* ?assign@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@ABV12@@Z */
1321 /* ?assign@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@AEBV12@@Z */
1322 /* ??4?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV01@ABV01@@Z */
1323 /* ??4?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV01@AEBV01@@Z */
1324 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_assign, 8)
1325 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_assign(
1326             basic_string_wchar *this, const basic_string_wchar *assign)
1327 {
1328     return MSVCP_basic_string_wchar_assign_substr(this, assign,
1329             0, MSVCP_basic_string_wchar_npos);
1330 }
1331
1332 /* ?assign@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@PB_WI@Z */
1333 /* ?assign@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@PEB_W_K@Z */
1334 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_assign_cstr_len, 12)
1335 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_assign_cstr_len(
1336             basic_string_wchar *this, const wchar_t *str, size_t len)
1337 {
1338     TRACE("%p %s %lu\n", this, debugstr_w(str), (unsigned long)len);
1339
1340     if(basic_string_wchar_inside(this, str))
1341         return MSVCP_basic_string_wchar_assign_substr(this, this,
1342                 str-basic_string_wchar_ptr(this), len);
1343     else if(basic_string_wchar_grow(this, len, FALSE)) {
1344         MSVCP_char_traits_wchar__Copy_s(basic_string_wchar_ptr(this),
1345                 this->res, str, len);
1346         basic_string_wchar_eos(this, len);
1347     }
1348
1349     return this;
1350 }
1351
1352 /* ?assign@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@PB_W@Z */
1353 /* ?assign@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@PEB_W@Z */
1354 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_assign_cstr, 8)
1355 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_assign_cstr(
1356             basic_string_wchar *this, const wchar_t *str)
1357 {
1358     return MSVCP_basic_string_wchar_assign_cstr_len(this, str,
1359             MSVCP_char_traits_wchar_length(str));
1360 }
1361
1362 /* ?c_str@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEPB_WXZ */
1363 /* ?c_str@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAPEB_WXZ */
1364 /* ?data@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEPB_WXZ */
1365 /* ?data@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAPEB_WXZ */
1366 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_c_str, 4)
1367 const wchar_t* __thiscall MSVCP_basic_string_wchar_c_str(basic_string_wchar *this)
1368 {
1369     TRACE("%p\n", this);
1370     return basic_string_wchar_const_ptr(this);
1371 }
1372
1373 /* ?capacity@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEIXZ */
1374 /* ?capacity@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBA_KXZ */
1375 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_capacity, 4)
1376 size_t __thiscall MSVCP_basic_string_wchar_capacity(basic_string_wchar *this)
1377 {
1378     TRACE("%p\n", this);
1379     return this->res;
1380 }
1381
1382 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAE@XZ */
1383 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAA@XZ */
1384 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_ctor, 4)
1385 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_ctor(basic_string_wchar *this)
1386 {
1387     TRACE("%p\n", this);
1388
1389     basic_string_wchar_tidy(this, FALSE, 0);
1390     return this;
1391 }
1392
1393 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAE@ABV01@@Z */
1394 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAA@AEBV01@@Z */
1395 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_copy_ctor, 8)
1396 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_copy_ctor(
1397             basic_string_wchar *this, const basic_string_wchar *copy)
1398 {
1399     TRACE("%p %p\n", this, copy);
1400
1401     basic_string_wchar_tidy(this, FALSE, 0);
1402     MSVCP_basic_string_wchar_assign(this, copy);
1403     return this;
1404 }
1405
1406 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAE@PB_W@Z */
1407 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAA@PEB_W@Z */
1408 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_ctor_cstr, 8)
1409 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_ctor_cstr(
1410             basic_string_wchar *this, const wchar_t *str)
1411 {
1412     TRACE("%p %s\n", this, debugstr_w(str));
1413
1414     basic_string_wchar_tidy(this, FALSE, 0);
1415     MSVCP_basic_string_wchar_assign_cstr(this, str);
1416     return this;
1417 }
1418
1419 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAE@PB_WI@Z */
1420 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAA@PEB_W_K@Z */
1421 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_ctor_cstr_len, 12)
1422 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_ctor_cstr_len(
1423         basic_string_wchar *this, const wchar_t *str, size_t len)
1424 {
1425     TRACE("%p %s %d\n", this, debugstr_w(str), len);
1426
1427     basic_string_wchar_tidy(this, FALSE, 0);
1428     MSVCP_basic_string_wchar_assign_cstr_len(this, str, len);
1429     return this;
1430 }
1431
1432 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAE@ABV01@II@Z */
1433 /* ??0?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAA@AEBV01@_K1@Z */
1434 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_ctor_substr, 16)
1435 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_ctor_substr(
1436         basic_string_wchar *this, const basic_string_wchar *assign,
1437         size_t pos, size_t len)
1438 {
1439     TRACE("%p %p %lu %lu\n", this, assign, (unsigned long)pos, (unsigned long)len);
1440
1441     basic_string_wchar_tidy(this, FALSE, 0);
1442     MSVCP_basic_string_wchar_assign_substr(this, assign, pos, len);
1443     return this;
1444 }
1445
1446 /* ??1?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAE@XZ */
1447 /* ??1?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAA@XZ */
1448 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_dtor, 4)
1449 void __thiscall MSVCP_basic_string_wchar_dtor(basic_string_wchar *this)
1450 {
1451     TRACE("%p\n", this);
1452     basic_string_wchar_tidy(this, TRUE, 0);
1453 }
1454
1455 /* ?size@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEIXZ */
1456 /* ?size@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBA_KXZ */
1457 /* ?length@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEIXZ */
1458 /* ?length@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBA_KXZ */
1459 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_length, 4)
1460 size_t __thiscall MSVCP_basic_string_wchar_length(basic_string_wchar *this)
1461 {
1462     TRACE("%p\n", this);
1463     return this->size;
1464 }
1465
1466 /* ?swap@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEXAAV12@@Z */
1467 /* ?swap@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAXAEAV12@@Z */
1468 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_swap, 8)
1469 void __thiscall MSVCP_basic_string_wchar_swap(basic_string_wchar *this, basic_string_wchar *str)
1470 {
1471     if(this != str) {
1472         char tmp[sizeof(this->data)];
1473         const size_t size = this->size;
1474         const size_t res = this->res;
1475
1476         memcpy(tmp, this->data.buf, sizeof(this->data));
1477         memcpy(this->data.buf, str->data.buf, sizeof(this->data));
1478         memcpy(str->data.buf, tmp, sizeof(this->data));
1479
1480         this->size = str->size;
1481         this->res = str->res;
1482
1483         str->size = size;
1484         str->res = res;
1485     }
1486 }
1487
1488 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@ABV12@II@Z */
1489 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@AEBV12@_K1@Z */
1490 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_append_substr, 16)
1491 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_append_substr(basic_string_wchar *this,
1492         const basic_string_wchar *append, size_t offset, size_t count)
1493 {
1494     TRACE("%p %p %lu %lu\n", this, append, (unsigned long)offset, (unsigned long)count);
1495
1496     if(append->size < offset)
1497         MSVCP__String_base_Xran();
1498
1499     if(count > append->size-offset)
1500         count = append->size-offset;
1501
1502     if(MSVCP_basic_string_wchar_npos-this->size<=count || this->size+count<this->size)
1503         MSVCP__String_base_Xlen();
1504
1505     if(basic_string_wchar_grow(this, this->size+count, FALSE)) {
1506         MSVCP_char_traits_wchar__Copy_s(basic_string_wchar_ptr(this)+this->size,
1507                 this->res-this->size, basic_string_wchar_const_ptr(append)+offset, count);
1508         basic_string_wchar_eos(this, this->size+count);
1509     }
1510
1511     return this;
1512 }
1513
1514 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@ABV12@@Z */
1515 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@AEBV12@@Z */
1516 /* ??Y?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV01@ABV01@@Z */
1517 /* ??Y?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV01@AEBV01@@Z */
1518 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_append, 8)
1519 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_append(
1520             basic_string_wchar *this, const basic_string_wchar *append)
1521 {
1522     return MSVCP_basic_string_wchar_append_substr(this, append,
1523             0, MSVCP_basic_string_wchar_npos);
1524 }
1525
1526 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@PB_WI@Z */
1527 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@PEB_W_K@Z */
1528 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_append_cstr_len, 12)
1529 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_append_cstr_len(
1530         basic_string_wchar *this, const wchar_t *append, size_t count)
1531 {
1532     TRACE("%p %s %lu\n", this, debugstr_w(append), (unsigned long)count);
1533
1534     if(basic_string_wchar_inside(this, append))
1535         return MSVCP_basic_string_wchar_append_substr(this, this,
1536                 append-basic_string_wchar_ptr(this), count);
1537
1538     if(MSVCP_basic_string_wchar_npos-this->size<=count || this->size+count<this->size)
1539         MSVCP__String_base_Xlen();
1540
1541     if(basic_string_wchar_grow(this, this->size+count, FALSE)) {
1542         MSVCP_char_traits_wchar__Copy_s(basic_string_wchar_ptr(this)+this->size,
1543                 this->res-this->size, append, count);
1544         basic_string_wchar_eos(this, this->size+count);
1545     }
1546
1547     return this;
1548 }
1549
1550 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@PB_W@Z */
1551 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@PEB_W@Z */
1552 /* ??Y?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV01@PB_W@Z */
1553 /* ??Y?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV01@PEB_W@Z */
1554 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_append_cstr, 8)
1555 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_append_cstr(
1556         basic_string_wchar *this, const wchar_t *append)
1557 {
1558     return MSVCP_basic_string_wchar_append_cstr_len(this, append,
1559             MSVCP_char_traits_wchar_length(append));
1560 }
1561
1562 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV12@I_W@Z */
1563 /* ?append@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV12@_K_W@Z */
1564 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_append_len_ch, 12)
1565 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_append_len_ch(
1566         basic_string_wchar *this, size_t count, wchar_t ch)
1567 {
1568     TRACE("%p %lu %c\n", this, (unsigned long)count, ch);
1569
1570     if(MSVCP_basic_string_wchar_npos-this->size <= count)
1571         MSVCP__String_base_Xlen();
1572
1573     if(basic_string_wchar_grow(this, this->size+count, FALSE)) {
1574         MSVCP_char_traits_wchar_assignn(basic_string_wchar_ptr(this)+this->size, count, ch);
1575         basic_string_wchar_eos(this, this->size+count);
1576     }
1577
1578     return this;
1579 }
1580
1581 /* ??Y?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAAV01@_W@Z */
1582 /* ??Y?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEAV01@_W@Z */
1583 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_append_ch, 8)
1584 basic_string_wchar* __thiscall MSVCP_basic_string_wchar_append_ch(
1585         basic_string_wchar *this, wchar_t ch)
1586 {
1587     return MSVCP_basic_string_wchar_append_len_ch(this, 1, ch);
1588 }
1589
1590 /* ??$?H_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA?AV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@ABV10@PB_W@Z */
1591 /* ??$?H_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA?AV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@AEBV10@PEB_W@Z */
1592 basic_string_wchar* __cdecl MSVCP_basic_string_wchar_concatenate_bstr_cstr(basic_string_wchar *ret,
1593         const basic_string_wchar *left, const wchar_t *right)
1594 {
1595     TRACE("%p %s\n", left, debugstr_w(right));
1596
1597     MSVCP_basic_string_wchar_copy_ctor(ret, left);
1598     MSVCP_basic_string_wchar_append_cstr(ret, right);
1599     return ret;
1600 }
1601
1602 /* ??$?H_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA?AV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@PB_WABV10@@Z */
1603 /* ??$?H_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA?AV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@PEB_WAEBV10@@Z */
1604 basic_string_wchar* __cdecl MSVCP_basic_string_wchar_concatenate_cstr_bstr(basic_string_wchar *ret,
1605         const wchar_t *left, const basic_string_wchar *right)
1606 {
1607     TRACE("%s %p\n", debugstr_w(left), right);
1608
1609     MSVCP_basic_string_wchar_ctor_cstr(ret, left);
1610     MSVCP_basic_string_wchar_append(ret, right);
1611     return ret;
1612 }
1613
1614 /* ??$?H_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA?AV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@ABV10@0@Z */
1615 /* ??$?H_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA?AV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@AEBV10@0@Z */
1616 basic_string_wchar* __cdecl MSVCP_basic_string_wchar_concatenate(basic_string_wchar *ret,
1617         const basic_string_wchar *left, const basic_string_wchar *right)
1618 {
1619     TRACE("%p %p\n", left, right);
1620
1621     MSVCP_basic_string_wchar_copy_ctor(ret, left);
1622     MSVCP_basic_string_wchar_append(ret, right);
1623     return ret;
1624 }
1625
1626 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEHIIPB_WI@Z */
1627 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAH_K0PEB_W0@Z */
1628 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_compare_substr_cstr_len, 20)
1629 int __thiscall MSVCP_basic_string_wchar_compare_substr_cstr_len(
1630         const basic_string_wchar *this, size_t pos, size_t num,
1631         const wchar_t *str, size_t count)
1632 {
1633     int ans;
1634
1635     TRACE("%p %lu %lu %s %lu\n", this, (unsigned long)pos,
1636             (unsigned long)num, debugstr_w(str), (unsigned long)count);
1637
1638     if(this->size < pos)
1639         MSVCP__String_base_Xran();
1640
1641     if(pos+num > this->size)
1642         num = this->size-pos;
1643
1644     ans = MSVCP_char_traits_wchar_compare(basic_string_wchar_const_ptr(this)+pos,
1645             str, num>count ? count : num);
1646     if(ans)
1647         return ans;
1648
1649     if(num > count)
1650         ans = 1;
1651     else if(num < count)
1652         ans = -1;
1653     return ans;
1654 }
1655
1656 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEHIIPB_W@Z */
1657 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAH_K0PEB_W@Z */
1658 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_compare_substr_cstr, 16)
1659 int __thiscall MSVCP_basic_string_wchar_compare_substr_cstr(const basic_string_wchar *this,
1660         size_t pos, size_t num, const wchar_t *str)
1661 {
1662     return MSVCP_basic_string_wchar_compare_substr_cstr_len(this, pos, num,
1663             str, MSVCP_char_traits_wchar_length(str));
1664 }
1665
1666 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEHPB_W@Z */
1667 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAHPEB_W@Z */
1668 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_compare_cstr, 8)
1669 int __thiscall MSVCP_basic_string_wchar_compare_cstr(
1670         const basic_string_wchar *this, const wchar_t *str)
1671 {
1672     return MSVCP_basic_string_wchar_compare_substr_cstr_len(this, 0, this->size,
1673             str, MSVCP_char_traits_wchar_length(str));
1674 }
1675
1676 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEHIIABV12@II@Z */
1677 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAH_K0AEBV12@00@Z */
1678 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_compare_substr_substr, 24)
1679 int __thiscall MSVCP_basic_string_wchar_compare_substr_substr(
1680         const basic_string_wchar *this, size_t pos, size_t num,
1681         const basic_string_wchar *compare, size_t off, size_t count)
1682 {
1683     TRACE("%p %lu %lu %p %lu %lu\n", this, (unsigned long)pos, (unsigned long)num,
1684             compare, (unsigned long)off, (unsigned long)count);
1685
1686     if(compare->size < off)
1687         MSVCP__String_base_Xran();
1688
1689     if(off+count > compare->size)
1690         count = compare->size-off;
1691
1692     return MSVCP_basic_string_wchar_compare_substr_cstr_len(this, pos, num,
1693             basic_string_wchar_const_ptr(compare)+off, count);
1694 }
1695
1696 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEHIIABV12@@Z */
1697 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAH_K0AEBV12@@Z */
1698 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_compare_substr, 16)
1699 int __thiscall MSVCP_basic_string_wchar_compare_substr(
1700         const basic_string_wchar *this, size_t pos, size_t num,
1701         const basic_string_wchar *compare)
1702 {
1703     return MSVCP_basic_string_wchar_compare_substr_cstr_len(this, pos, num,
1704             basic_string_wchar_const_ptr(compare), compare->size);
1705 }
1706
1707 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEHABV12@@Z */
1708 /* ?compare@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAHAEBV12@@Z */
1709 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_compare, 8)
1710 int __thiscall MSVCP_basic_string_wchar_compare(
1711         const basic_string_wchar *this, const basic_string_wchar *compare)
1712 {
1713     return MSVCP_basic_string_wchar_compare_substr_cstr_len(this, 0, this->size,
1714             basic_string_wchar_const_ptr(compare), compare->size);
1715 }
1716
1717 /* ??$?M_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA_NABV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@0@Z */
1718 /* ??$?M_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA_NAEBV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@0@Z */
1719 MSVCP_BOOL __cdecl MSVCP_basic_string_wchar_lower(
1720         const basic_string_wchar *left, const basic_string_wchar *right)
1721 {
1722     return MSVCP_basic_string_wchar_compare(left, right) < 0;
1723 }
1724
1725 /* ??$?M_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA_NABV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@PB_W@Z */
1726 /* ??$?M_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA_NAEBV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@PEB_W@Z */
1727 MSVCP_BOOL __cdecl MSVCP_basic_string_wchar_lower_bstr_cstr(
1728         const basic_string_wchar *left, const wchar_t *right)
1729 {
1730     return MSVCP_basic_string_wchar_compare_cstr(left, right) < 0;
1731 }
1732
1733 /* ??$?M_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA_NPB_WABV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@@Z */
1734 /* ??$?M_WU?$char_traits@_W@std@@V?$allocator@_W@1@@std@@YA_NPEB_WAEBV?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@0@@Z */
1735 MSVCP_BOOL __cdecl MSVCP_basic_string_wchar_lower_cstr_bstr(
1736         const wchar_t *left, const basic_string_wchar *right)
1737 {
1738     return MSVCP_basic_string_wchar_compare_cstr(right, left) > 0;
1739 }
1740
1741 /* ?find@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEIPB_WII@Z */
1742 /* ?find@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBA_KPEB_W_K1@Z */
1743 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_find_cstr_substr, 16)
1744 size_t __thiscall MSVCP_basic_string_wchar_find_cstr_substr(
1745         const basic_string_wchar *this, const wchar_t *find, size_t pos, size_t len)
1746 {
1747     const wchar_t *p, *end;
1748
1749     TRACE("%p %s %lu %lu\n", this, debugstr_w(find), (unsigned long)pos, (unsigned long)len);
1750
1751     if(len==0 && pos<=this->size)
1752         return pos;
1753
1754     end = basic_string_wchar_const_ptr(this)+this->size-len+1;
1755     for(p=basic_string_wchar_const_ptr(this)+pos; p<end; p++) {
1756         p = MSVCP_char_traits_wchar_find(p, end-p, find);
1757         if(!p)
1758             break;
1759
1760         if(!MSVCP_char_traits_wchar_compare(p, find, len))
1761             return p-basic_string_wchar_const_ptr(this);
1762     }
1763
1764     return MSVCP_basic_string_wchar_npos;
1765 }
1766
1767 /* ?find@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEI_WI@Z */
1768 /* ?find@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBA_K_W_K@Z */
1769 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_find_ch, 12)
1770 size_t __thiscall MSVCP_basic_string_wchar_find_ch(
1771         const basic_string_wchar *this, wchar_t ch, size_t pos)
1772 {
1773     return MSVCP_basic_string_wchar_find_cstr_substr(this, &ch, pos, 1);
1774 }
1775
1776 /* ?at@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAA_WI@Z */
1777 /* ?at@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEA_W_K@Z */
1778 /* ??A?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEAA_WI@Z */
1779 /* ??A?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAAEA_W_K@Z */
1780 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_at, 8)
1781 wchar_t* __thiscall MSVCP_basic_string_wchar_at(
1782         basic_string_wchar *this, size_t pos)
1783 {
1784     TRACE("%p %lu\n", this, (unsigned long)pos);
1785
1786     if(this->size <= pos)
1787         MSVCP__String_base_Xran();
1788
1789     return basic_string_wchar_ptr(this)+pos;
1790 }
1791
1792 /* ?at@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEAB_WI@Z */
1793 /* ?at@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAAEB_W_K@Z */
1794 /* ??A?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QBEAB_WI@Z */
1795 /* ??A?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEBAAEB_W_K@Z */
1796 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_const_at, 8)
1797 const wchar_t* __thiscall MSVCP_basic_string_wchar_const_at(
1798         const basic_string_wchar *this, size_t pos)
1799 {
1800     TRACE("%p %lu\n", this, (unsigned long)pos);
1801
1802     if(this->size <= pos)
1803         MSVCP__String_base_Xran();
1804
1805     return basic_string_wchar_const_ptr(this)+pos;
1806 }
1807
1808 /* ?resize@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEXI_W@Z */
1809 /* ?resize@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAX_K_W@Z */
1810 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_resize_ch, 12)
1811 void __thiscall MSVCP_basic_string_wchar_resize_ch(
1812         basic_string_wchar *this, size_t size, wchar_t ch)
1813 {
1814     TRACE("%p %lu %c\n", this, (unsigned long)size, ch);
1815
1816     if(size <= this->size)
1817         MSVCP_basic_string_wchar_erase(this, size, this->size);
1818     else
1819         MSVCP_basic_string_wchar_append_len_ch(this, size-this->size, ch);
1820 }
1821
1822 /* ?resize@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEXI@Z */
1823 /* ?resize@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAX_K@Z */
1824 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_resize, 8)
1825 void __thiscall MSVCP_basic_string_wchar_resize(
1826         basic_string_wchar *this, size_t size)
1827 {
1828     MSVCP_basic_string_wchar_resize_ch(this, size, '\0');
1829 }
1830
1831 /* ?clear@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QAEXXZ */
1832 /* ?clear@?$basic_string@_WU?$char_traits@_W@std@@V?$allocator@_W@2@@std@@QEAAXXZ */
1833 DEFINE_THISCALL_WRAPPER(MSVCP_basic_string_wchar_clear, 4)
1834 void __thiscall MSVCP_basic_string_wchar_clear(basic_string_wchar *this)
1835 {
1836     basic_string_wchar_eos(this, 0);
1837 }