1 /*
2 * RichEdit - string operations
3 *
4 * Copyright 2004 by Krzysztof Foltman
5 *
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.
10 *
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.
15 *
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #include "editor.h"
22
23 WINE_DEFAULT_DEBUG_CHANNEL(richedit);
24
25 static int ME_GetOptimalBuffer(int nLen)
26 {
27 /* FIXME: This seems wasteful for tabs and end of lines strings,
28 * since they have a small fixed length. */
29 return ((sizeof(WCHAR) * nLen) + 128) & ~63;
30 }
31
32 /* Create a buffer (uninitialized string) of size nMaxChars */
33 static ME_String *ME_MakeStringB(int nMaxChars)
34 {
35 ME_String *s = ALLOC_OBJ(ME_String);
36
37 s->nLen = nMaxChars;
38 s->nBuffer = ME_GetOptimalBuffer(s->nLen + 1);
39 s->szData = ALLOC_N_OBJ(WCHAR, s->nBuffer);
40 s->szData[s->nLen] = 0;
41 return s;
42 }
43
44 ME_String *ME_MakeStringN(LPCWSTR szText, int nMaxChars)
45 {
46 ME_String *s = ME_MakeStringB(nMaxChars);
47 /* Native allows NULL chars */
48 memcpy(s->szData, szText, s->nLen * sizeof(WCHAR));
49 return s;
50 }
51
52 ME_String *ME_MakeString(LPCWSTR szText)
53 {
54 return ME_MakeStringN(szText, lstrlenW(szText));
55 }
56
57 /* Make a string by repeating a char nMaxChars times */
58 ME_String *ME_MakeStringR(WCHAR cRepeat, int nMaxChars)
59 {
60 int i;
61 ME_String *s = ME_MakeStringB(nMaxChars);
62 for (i = 0; i < nMaxChars; i++)
63 s->szData[i] = cRepeat;
64 return s;
65 }
66
67 ME_String *ME_StrDup(const ME_String *s)
68 {
69 return ME_MakeStringN(s->szData, s->nLen);
70 }
71
72 void ME_DestroyString(ME_String *s)
73 {
74 if (!s) return;
75 FREE_OBJ(s->szData);
76 FREE_OBJ(s);
77 }
78
79 void ME_AppendString(ME_String *s1, const ME_String *s2)
80 {
81 if (s1->nLen+s2->nLen+1 <= s1->nBuffer)
82 {
83 memcpy(s1->szData + s1->nLen, s2->szData, s2->nLen * sizeof(WCHAR));
84 s1->nLen += s2->nLen;
85 s1->szData[s1->nLen] = 0;
86 } else {
87 WCHAR *buf;
88 s1->nBuffer = ME_GetOptimalBuffer(s1->nLen+s2->nLen+1);
89
90 buf = ALLOC_N_OBJ(WCHAR, s1->nBuffer);
91 memcpy(buf, s1->szData, s1->nLen * sizeof(WCHAR));
92 memcpy(buf + s1->nLen, s2->szData, s2->nLen * sizeof(WCHAR));
93 FREE_OBJ(s1->szData);
94 s1->szData = buf;
95 s1->nLen += s2->nLen;
96 s1->szData[s1->nLen] = 0;
97 }
98 }
99
100 ME_String *ME_VSplitString(ME_String *orig, int charidx)
101 {
102 ME_String *s;
103
104 /*if (charidx<0) charidx = 0;
105 if (charidx>orig->nLen) charidx = orig->nLen;
106 */
107 assert(charidx>=0);
108 assert(charidx<=orig->nLen);
109
110 s = ME_MakeStringN(orig->szData+charidx, orig->nLen-charidx);
111 orig->nLen = charidx;
112 orig->szData[charidx] = '\0';
113 return s;
114 }
115
116 int ME_IsWhitespaces(const ME_String *s)
117 {
118 /* FIXME multibyte */
119 WCHAR *pos = s->szData;
120 while(ME_IsWSpace(*pos++))
121 ;
122 pos--;
123 if (*pos)
124 return 0;
125 else
126 return 1;
127 }
128
129 int ME_IsSplitable(const ME_String *s)
130 {
131 WCHAR *pos = s->szData;
132 WCHAR ch;
133 while(ME_IsWSpace(*pos++))
134 ;
135 pos--;
136 while((ch = *pos++) != 0)
137 {
138 if (ME_IsWSpace(ch))
139 return 1;
140 }
141 return 0;
142 }
143
144 void ME_StrDeleteV(ME_String *s, int nVChar, int nChars)
145 {
146 int end_ofs = nVChar + nChars;
147
148 assert(nChars >= 0);
149 assert(nVChar >= 0);
150 assert(end_ofs <= s->nLen);
151
152 memmove(s->szData + nVChar, s->szData + end_ofs,
153 (s->nLen - end_ofs + 1) * sizeof(WCHAR));
154 s->nLen -= nChars;
155 }
156
157 int ME_FindNonWhitespaceV(const ME_String *s, int nVChar) {
158 int i;
159 for (i = nVChar; i<s->nLen && ME_IsWSpace(s->szData[i]); i++)
160 ;
161
162 return i;
163 }
164
165 /* note: returns offset of the first trailing whitespace */
166 int ME_ReverseFindNonWhitespaceV(const ME_String *s, int nVChar) {
167 int i;
168 for (i = nVChar; i>0 && ME_IsWSpace(s->szData[i-1]); i--)
169 ;
170
171 return i;
172 }
173
174 /* note: returns offset of the first trailing nonwhitespace */
175 int ME_ReverseFindWhitespaceV(const ME_String *s, int nVChar) {
176 int i;
177 for (i = nVChar; i>0 && !ME_IsWSpace(s->szData[i-1]); i--)
178 ;
179
180 return i;
181 }
182
183
184 static int
185 ME_WordBreakProc(LPWSTR s, INT start, INT len, INT code)
186 {
187 /* FIXME: Native also knows about punctuation */
188 TRACE("s==%s, start==%d, len==%d, code==%d\n",
189 debugstr_wn(s, len), start, len, code);
190 /* convert number of bytes to number of characters. */
191 len /= sizeof(WCHAR);
192 switch (code)
193 {
194 case WB_ISDELIMITER:
195 return ME_IsWSpace(s[start]);
196 case WB_LEFT:
197 case WB_MOVEWORDLEFT:
198 while (start && ME_IsWSpace(s[start - 1]))
199 start--;
200 while (start && !ME_IsWSpace(s[start - 1]))
201 start--;
202 return start;
203 case WB_RIGHT:
204 case WB_MOVEWORDRIGHT:
205 while (start < len && !ME_IsWSpace(s[start]))
206 start++;
207 while (start < len && ME_IsWSpace(s[start]))
208 start++;
209 return start;
210 }
211 return 0;
212 }
213
214
215 int
216 ME_CallWordBreakProc(ME_TextEditor *editor, ME_String *str, INT start, INT code)
217 {
218 if (!editor->pfnWordBreak) {
219 return ME_WordBreakProc(str->szData, start, str->nLen*sizeof(WCHAR), code);
220 } else if (!editor->bEmulateVersion10) {
221 /* MSDN lied about the third parameter for EditWordBreakProc being the number
222 * of characters, it is actually the number of bytes of the string. */
223 return editor->pfnWordBreak(str->szData, start, str->nLen*sizeof(WCHAR), code);
224 } else {
225 int result;
226 int buffer_size = WideCharToMultiByte(CP_ACP, 0, str->szData, str->nLen,
227 NULL, 0, NULL, NULL);
228 char *buffer = heap_alloc(buffer_size);
229 WideCharToMultiByte(CP_ACP, 0, str->szData, str->nLen,
230 buffer, buffer_size, NULL, NULL);
231 result = editor->pfnWordBreak(str->szData, start, str->nLen, code);
232 heap_free(buffer);
233 return result;
234 }
235 }
236
237 LPWSTR ME_ToUnicode(BOOL unicode, LPVOID psz)
238 {
239 assert(psz != NULL);
240
241 if (unicode)
242 return psz;
243 else {
244 WCHAR *tmp;
245 int nChars = MultiByteToWideChar(CP_ACP, 0, psz, -1, NULL, 0);
246 if((tmp = ALLOC_N_OBJ(WCHAR, nChars)) != NULL)
247 MultiByteToWideChar(CP_ACP, 0, psz, -1, tmp, nChars);
248 return tmp;
249 }
250 }
251
252 void ME_EndToUnicode(BOOL unicode, LPVOID psz)
253 {
254 if (!unicode)
255 FREE_OBJ(psz);
256 }
257
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.