git.oblomov.eu Git - wine/blob - dlls/crtdll/wcstring.c

   1 /*
   2  * CRTDLL wide-char functions
   3  *
   4  * Copyright 1999 Alexandre Julliard
   5  */
   6
   7 #include "crtdll.h"
   8 #include <ctype.h>
   9 #include <stdlib.h>
  10 #include <string.h>
  11 #include "winnls.h"
  12 #include "wine/unicode.h"
  13
  14
  15 DEFAULT_DEBUG_CHANNEL(crtdll);
  16
  17
  18 /*********************************************************************
  19  *           CRTDLL__wcsdup    (CRTDLL.320)
  20  */
  21 LPWSTR __cdecl CRTDLL__wcsdup( LPCWSTR str )
  22 {
  23     LPWSTR ret = NULL;
  24     if (str)
  25     {
  26         int size = (strlenW(str) + 1) * sizeof(WCHAR);
  27         ret = CRTDLL_malloc( size );
  28         if (ret) memcpy( ret, str, size );
  29     }
  30     return ret;
  31 }
  32
  33
  34 /*********************************************************************
  35  *           CRTDLL__wcsicoll    (CRTDLL.322)
  36  */
  37 INT __cdecl CRTDLL__wcsicoll( LPCWSTR str1, LPCWSTR str2 )
  38 {
  39     /* FIXME: handle collates */
  40     return strcmpiW( str1, str2 );
  41 }
  42
  43
  44 /*********************************************************************
  45  *           CRTDLL__wcsnset    (CRTDLL.325)
  46  */
  47 LPWSTR __cdecl CRTDLL__wcsnset( LPWSTR str, WCHAR c, INT n )
  48 {
  49     LPWSTR ret = str;
  50     while ((n-- > 0) && *str) *str++ = c;
  51     return ret;
  52 }
  53
  54
  55 /*********************************************************************
  56  *           CRTDLL__wcsrev    (CRTDLL.326)
  57  */
  58 LPWSTR __cdecl CRTDLL__wcsrev( LPWSTR str )
  59 {
  60     LPWSTR ret = str;
  61     LPWSTR end = str + strlenW(str) - 1;
  62     while (end > str)
  63     {
  64         WCHAR t = *end;
  65         *end--  = *str;
  66         *str++  = t;
  67     }
  68     return ret;
  69 }
  70
  71
  72 /*********************************************************************
  73  *           CRTDLL__wcsset    (CRTDLL.327)
  74  */
  75 LPWSTR __cdecl CRTDLL__wcsset( LPWSTR str, WCHAR c )
  76 {
  77     LPWSTR ret = str;
  78     while (*str) *str++ = c;
  79     return ret;
  80 }
  81
  82
  83 /*********************************************************************
  84  *           CRTDLL_wcscoll    (CRTDLL.506)
  85  */
  86 DWORD __cdecl CRTDLL_wcscoll( LPCWSTR str1, LPCWSTR str2 )
  87 {
  88     /* FIXME: handle collates */
  89     return strcmpW( str1, str2 );
  90 }
  91
  92
  93 /*********************************************************************
  94  *           CRTDLL_wcspbrk    (CRTDLL.514)
  95  */
  96 LPWSTR __cdecl CRTDLL_wcspbrk( LPCWSTR str, LPCWSTR accept )
  97 {
  98     LPCWSTR p;
  99     while (*str)
 100     {
 101         for (p = accept; *p; p++) if (*p == *str) return (LPWSTR)str;
 102         str++;
 103     }
 104     return NULL;
 105 }
 106
 107
 108 /*********************************************************************
 109  *           CRTDLL_wctomb    (CRTDLL.524)
 110  */
 111 INT __cdecl CRTDLL_wctomb( LPSTR dst, WCHAR ch )
 112 {
 113     return WideCharToMultiByte( CP_ACP, 0, &ch, 1, dst, 6, NULL, NULL );
 114 }
 115
 116 /*********************************************************************
 117  *           CRTDLL_iswalnum    (CRTDLL.405)
 118  */
 119 INT __cdecl CRTDLL_iswalnum( WCHAR wc )
 120 {
 121     return get_char_typeW(wc) & (C1_ALPHA|C1_DIGIT|C1_LOWER|C1_UPPER);
 122 }
 123
 124 /*********************************************************************
 125  *           CRTDLL_iswalpha    (CRTDLL.406)
 126  */
 127 INT __cdecl CRTDLL_iswalpha( WCHAR wc )
 128 {
 129     return get_char_typeW(wc) & (C1_ALPHA|C1_LOWER|C1_UPPER);
 130 }
 131
 132 /*********************************************************************
 133  *           CRTDLL_iswcntrl    (CRTDLL.408)
 134  */
 135 INT __cdecl CRTDLL_iswcntrl( WCHAR wc )
 136 {
 137     return get_char_typeW(wc) & C1_CNTRL;
 138 }
 139
 140 /*********************************************************************
 141  *           CRTDLL_iswdigit    (CRTDLL.410)
 142  */
 143 INT __cdecl CRTDLL_iswdigit( WCHAR wc )
 144 {
 145     return get_char_typeW(wc) & C1_DIGIT;
 146 }
 147
 148 /*********************************************************************
 149  *           CRTDLL_iswgraph    (CRTDLL.411)
 150  */
 151 INT __cdecl CRTDLL_iswgraph( WCHAR wc )
 152 {
 153     return get_char_typeW(wc) & (C1_ALPHA|C1_PUNCT|C1_DIGIT|C1_LOWER|C1_UPPER);
 154 }
 155
 156 /*********************************************************************
 157  *           CRTDLL_iswlower    (CRTDLL.412)
 158  */
 159 INT __cdecl CRTDLL_iswlower( WCHAR wc )
 160 {
 161     return get_char_typeW(wc) & C1_LOWER;
 162 }
 163
 164 /*********************************************************************
 165  *           CRTDLL_iswprint    (CRTDLL.413)
 166  */
 167 INT __cdecl CRTDLL_iswprint( WCHAR wc )
 168 {
 169     return get_char_typeW(wc) & (C1_ALPHA|C1_BLANK|C1_PUNCT|C1_DIGIT|C1_LOWER|C1_UPPER);
 170 }
 171
 172 /*********************************************************************
 173  *           CRTDLL_iswpunct    (CRTDLL.414)
 174  */
 175 INT __cdecl CRTDLL_iswpunct( WCHAR wc )
 176 {
 177     return get_char_typeW(wc) & C1_PUNCT;
 178 }
 179
 180 /*********************************************************************
 181  *           CRTDLL_iswspace    (CRTDLL.415)
 182  */
 183 INT __cdecl CRTDLL_iswspace( WCHAR wc )
 184 {
 185     return get_char_typeW(wc) & C1_SPACE;
 186 }
 187
 188 /*********************************************************************
 189  *           CRTDLL_iswupper    (CRTDLL.416)
 190  */
 191 INT __cdecl CRTDLL_iswupper( WCHAR wc )
 192 {
 193     return get_char_typeW(wc) & C1_UPPER;
 194 }
 195
 196 /*********************************************************************
 197  *           CRTDLL_iswxdigit    (CRTDLL.417)
 198  */
 199 INT __cdecl CRTDLL_iswxdigit( WCHAR wc )
 200 {
 201     return get_char_typeW(wc) & C1_XDIGIT;
 202 }