2 * RichEdit - string operations
4 * Copyright 2004 by Krzysztof Foltman
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 WINE_DEFAULT_DEBUG_CHANNEL(richedit
);
25 int ME_GetOptimalBuffer(int nLen
)
27 return ((2*nLen
+1)+128)&~63;
30 ME_String
*ME_MakeString(LPCWSTR szText
)
32 ME_String
*s
= ALLOC_OBJ(ME_String
);
33 s
->nLen
= lstrlenW(szText
);
34 s
->nBuffer
= ME_GetOptimalBuffer(s
->nLen
+1);
35 s
->szData
= ALLOC_N_OBJ(WCHAR
, s
->nBuffer
);
36 lstrcpyW(s
->szData
, szText
);
40 ME_String
*ME_MakeStringN(LPCWSTR szText
, int nMaxChars
)
42 ME_String
*s
= ALLOC_OBJ(ME_String
);
44 for (i
=0; i
<nMaxChars
&& szText
[i
]; i
++)
47 s
->nBuffer
= ME_GetOptimalBuffer(s
->nLen
+1);
48 s
->szData
= ALLOC_N_OBJ(WCHAR
, s
->nBuffer
);
49 lstrcpynW(s
->szData
, szText
, s
->nLen
+1);
53 ME_String
*ME_StrDup(ME_String
*s
)
55 return ME_MakeStringN(s
->szData
, s
->nLen
);
58 void ME_DestroyString(ME_String
*s
)
64 void ME_AppendString(ME_String
*s1
, ME_String
*s2
)
66 if (s1
->nLen
+s2
->nLen
+1 <= s1
->nBuffer
) {
67 lstrcpyW(s1
->szData
+s1
->nLen
, s2
->szData
);
73 s1
->nBuffer
= ME_GetOptimalBuffer(s1
->nLen
+s2
->nLen
+1);
75 buf
= ALLOC_N_OBJ(WCHAR
, s1
->nBuffer
);
76 lstrcpyW(buf
, s1
->szData
);
77 lstrcpyW(buf
+s1
->nLen
, s2
->szData
);
84 ME_String
*ME_ConcatString(ME_String
*s1
, ME_String
*s2
)
86 ME_String
*s
= ALLOC_OBJ(ME_String
);
87 s
->nLen
= s1
->nLen
+s2
->nLen
;
88 s
->nBuffer
= ME_GetOptimalBuffer(s1
->nLen
+s2
->nLen
+1);
89 s
->szData
= ALLOC_N_OBJ(WCHAR
, s
->nBuffer
);
90 lstrcpyW(s
->szData
, s1
->szData
);
91 lstrcpyW(s
->szData
+s1
->nLen
, s2
->szData
);
95 ME_String
*ME_VSplitString(ME_String
*orig
, int charidx
)
99 /*if (charidx<0) charidx = 0;
100 if (charidx>orig->nLen) charidx = orig->nLen;
103 assert(charidx
<=orig
->nLen
);
105 s
= ME_MakeString(orig
->szData
+charidx
);
106 orig
->nLen
= charidx
;
107 orig
->szData
[charidx
] = L
'\0';
111 int ME_IsWhitespaces(ME_String
*s
)
113 /* FIXME multibyte */
114 WCHAR
*pos
= s
->szData
;
124 int ME_IsSplitable(ME_String
*s
)
126 /* FIXME multibyte */
127 WCHAR
*pos
= s
->szData
;
129 while(*pos
++ == L
' ')
132 while((ch
= *pos
++) != 0)
140 /* FIXME multibyte */
142 int ME_CalcSkipChars(ME_String *s)
145 while(cnt < s->nLen && s->szData[s->nLen-1-cnt]==' ')
151 int ME_StrLen(ME_String
*s
) {
155 int ME_StrVLen(ME_String
*s
) {
159 /* FIXME we use widechars, not multibytes, inside, no need for complex logic anymore */
160 int ME_StrRelPos(ME_String
*s
, int nVChar
, int *pRelChars
)
162 TRACE("%s,%d,&%d\n", debugstr_w(s
->szData
), nVChar
, *pRelChars
);
165 if (!*pRelChars
) return nVChar
;
169 while(nVChar
<s
->nLen
&& *pRelChars
>0)
177 while(nVChar
>0 && *pRelChars
<0)
185 int ME_StrRelPos2(ME_String
*s
, int nVChar
, int nRelChars
)
187 return ME_StrRelPos(s
, nVChar
, &nRelChars
);
190 int ME_VPosToPos(ME_String
*s
, int nVPos
)
201 if (s->szData[i]=='\\') i++;
209 int ME_PosToVPos(ME_String
*s
, int nPos
)
213 return ME_StrRelPos2(s
, 0, nPos
);
216 void ME_StrDeleteV(ME_String
*s
, int nVChar
, int nChars
)
220 assert(nVChar
>=0 && nVChar
<= s
->nLen
);
222 assert(nVChar
+nChars
<= s
->nLen
);
224 end_ofs
= ME_StrRelPos2(s
, nVChar
, nChars
);
225 assert(end_ofs
<= s
->nLen
);
226 memmove(s
->szData
+nVChar
, s
->szData
+end_ofs
, 2*(s
->nLen
+1-end_ofs
));
227 s
->nLen
-= (end_ofs
- nVChar
);
230 int ME_GetCharFwd(ME_String
*s
, int nPos
)
234 assert(nPos
< ME_StrLen(s
));
236 nVPos
= ME_StrRelPos2(s
, nVPos
, nPos
);
239 return s
->szData
[nVPos
];
243 int ME_GetCharBack(ME_String
*s
, int nPos
)
245 int nVPos
= ME_StrVLen(s
);
247 assert(nPos
< ME_StrLen(s
));
249 nVPos
= ME_StrRelPos2(s
, nVPos
, -nPos
);
252 return s
->szData
[nVPos
];
256 int ME_FindNonWhitespaceV(ME_String
*s
, int nVChar
) {
258 for (i
= nVChar
; isspace(s
->szData
[i
]) && i
<s
->nLen
; i
++)
264 /* note: returns offset of the first trailing whitespace */
265 int ME_ReverseFindNonWhitespaceV(ME_String
*s
, int nVChar
) {
267 for (i
= nVChar
; i
>0 && isspace(s
->szData
[i
-1]); i
--)
273 /* note: returns offset of the first trailing nonwhitespace */
274 int ME_ReverseFindWhitespaceV(ME_String
*s
, int nVChar
) {
276 for (i
= nVChar
; i
>0 && !isspace(s
->szData
[i
-1]); i
--)
282 LPWSTR
ME_ToUnicode(HWND hWnd
, LPVOID psz
)
284 if (IsWindowUnicode(hWnd
))
288 int nChars
= MultiByteToWideChar(CP_ACP
, 0, (char *)psz
, -1, NULL
, 0);
289 if((tmp
= ALLOC_N_OBJ(WCHAR
, nChars
)) != NULL
)
290 MultiByteToWideChar(CP_ACP
, 0, (char *)psz
, -1, tmp
, nChars
);
295 void ME_EndToUnicode(HWND hWnd
, LPVOID psz
)
297 if (IsWindowUnicode(hWnd
))
301 LPSTR
ME_ToAnsi(HWND hWnd
, LPVOID psz
)
303 if (!IsWindowUnicode(hWnd
))
307 int nChars
= WideCharToMultiByte(CP_ACP
, 0, (WCHAR
*)psz
, -1, NULL
, 0, NULL
, NULL
);
308 if((tmp
= ALLOC_N_OBJ(char, nChars
)) != NULL
)
309 WideCharToMultiByte(CP_ACP
, 0, (WCHAR
*)psz
, -1, tmp
, nChars
, NULL
, NULL
);
314 void ME_EndToAnsi(HWND hWnd
, LPVOID psz
)
316 if (!IsWindowUnicode(hWnd
))