/* * RichEdit - string operations * * Copyright 2004 by Krzysztof Foltman * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA */ #include "editor.h" WINE_DEFAULT_DEBUG_CHANNEL(richedit); static int ME_GetOptimalBuffer(int nLen) { /* FIXME: This seems wasteful for tabs and end of lines strings, * since they have a small fixed length. */ return ((sizeof(WCHAR) * nLen) + 128) & ~63; } /* Create a buffer (uninitialized string) of size nMaxChars */ static ME_String *ME_MakeStringB(int nMaxChars) { ME_String *s = ALLOC_OBJ(ME_String); s->nLen = nMaxChars; s->nBuffer = ME_GetOptimalBuffer(s->nLen + 1); s->szData = ALLOC_N_OBJ(WCHAR, s->nBuffer); s->szData[s->nLen] = 0; return s; } ME_String *ME_MakeStringN(LPCWSTR szText, int nMaxChars) { ME_String *s = ME_MakeStringB(nMaxChars); /* Native allows NULL chars */ memcpy(s->szData, szText, s->nLen * sizeof(WCHAR)); return s; } /* Make a string by repeating a char nMaxChars times */ ME_String *ME_MakeStringR(WCHAR cRepeat, int nMaxChars) { int i; ME_String *s = ME_MakeStringB(nMaxChars); for (i = 0; i < nMaxChars; i++) s->szData[i] = cRepeat; return s; } ME_String *ME_StrDup(const ME_String *s) { return ME_MakeStringN(s->szData, s->nLen); } void ME_DestroyString(ME_String *s) { if (!s) return; FREE_OBJ(s->szData); FREE_OBJ(s); } void ME_AppendString(ME_String *s1, const ME_String *s2) { if (s1->nLen+s2->nLen+1 <= s1->nBuffer) { memcpy(s1->szData + s1->nLen, s2->szData, s2->nLen * sizeof(WCHAR)); s1->nLen += s2->nLen; s1->szData[s1->nLen] = 0; } else { WCHAR *buf; s1->nBuffer = ME_GetOptimalBuffer(s1->nLen+s2->nLen+1); buf = ALLOC_N_OBJ(WCHAR, s1->nBuffer); memcpy(buf, s1->szData, s1->nLen * sizeof(WCHAR)); memcpy(buf + s1->nLen, s2->szData, s2->nLen * sizeof(WCHAR)); FREE_OBJ(s1->szData); s1->szData = buf; s1->nLen += s2->nLen; s1->szData[s1->nLen] = 0; } } ME_String *ME_VSplitString(ME_String *orig, int charidx) { ME_String *s; /*if (charidx<0) charidx = 0; if (charidx>orig->nLen) charidx = orig->nLen; */ assert(charidx>=0); assert(charidx<=orig->nLen); s = ME_MakeStringN(orig->szData+charidx, orig->nLen-charidx); orig->nLen = charidx; orig->szData[charidx] = '\0'; return s; } int ME_IsWhitespaces(const ME_String *s) { /* FIXME multibyte */ WCHAR *pos = s->szData; while(ME_IsWSpace(*pos++)) ; pos--; if (*pos) return 0; else return 1; } int ME_IsSplitable(const ME_String *s) { WCHAR *pos = s->szData; WCHAR ch; while(ME_IsWSpace(*pos++)) ; pos--; while((ch = *pos++) != 0) { if (ME_IsWSpace(ch)) return 1; } return 0; } void ME_StrDeleteV(ME_String *s, int nVChar, int nChars) { int end_ofs = nVChar + nChars; assert(nChars >= 0); assert(nVChar >= 0); assert(end_ofs <= s->nLen); memmove(s->szData + nVChar, s->szData + end_ofs, (s->nLen - end_ofs + 1) * sizeof(WCHAR)); s->nLen -= nChars; } int ME_FindNonWhitespaceV(const ME_String *s, int nVChar) { int i; for (i = nVChar; i<s->nLen && ME_IsWSpace(s->szData[i]); i++) ; return i; } /* note: returns offset of the first trailing whitespace */ int ME_ReverseFindNonWhitespaceV(const ME_String *s, int nVChar) { int i; for (i = nVChar; i>0 && ME_IsWSpace(s->szData[i-1]); i--) ; return i; } /* note: returns offset of the first trailing nonwhitespace */ int ME_ReverseFindWhitespaceV(const ME_String *s, int nVChar) { int i; for (i = nVChar; i>0 && !ME_IsWSpace(s->szData[i-1]); i--) ; return i; } static int ME_WordBreakProc(LPWSTR s, INT start, INT len, INT code) { /* FIXME: Native also knows about punctuation */ TRACE("s==%s, start==%d, len==%d, code==%d\n", debugstr_wn(s, len), start, len, code); /* convert number of bytes to number of characters. */ len /= sizeof(WCHAR); switch (code) { case WB_ISDELIMITER: return ME_IsWSpace(s[start]); case WB_LEFT: case WB_MOVEWORDLEFT: while (start && ME_IsWSpace(s[start - 1])) start--; while (start && !ME_IsWSpace(s[start - 1])) start--; return start; case WB_RIGHT: case WB_MOVEWORDRIGHT: while (start < len && !ME_IsWSpace(s[start])) start++; while (start < len && ME_IsWSpace(s[start])) start++; return start; } return 0; } int ME_CallWordBreakProc(ME_TextEditor *editor, ME_String *str, INT start, INT code) { if (!editor->pfnWordBreak) { return ME_WordBreakProc(str->szData, start, str->nLen*sizeof(WCHAR), code); } else if (!editor->bEmulateVersion10) { /* MSDN lied about the third parameter for EditWordBreakProc being the number * of characters, it is actually the number of bytes of the string. */ return editor->pfnWordBreak(str->szData, start, str->nLen*sizeof(WCHAR), code); } else { int result; int buffer_size = WideCharToMultiByte(CP_ACP, 0, str->szData, str->nLen, NULL, 0, NULL, NULL); char *buffer = heap_alloc(buffer_size); WideCharToMultiByte(CP_ACP, 0, str->szData, str->nLen, buffer, buffer_size, NULL, NULL); result = editor->pfnWordBreak(str->szData, start, str->nLen, code); heap_free(buffer); return result; } } LPWSTR ME_ToUnicode(BOOL unicode, LPVOID psz) { assert(psz != NULL); if (unicode) return psz; else { WCHAR *tmp; int nChars = MultiByteToWideChar(CP_ACP, 0, psz, -1, NULL, 0); if((tmp = ALLOC_N_OBJ(WCHAR, nChars)) != NULL) MultiByteToWideChar(CP_ACP, 0, psz, -1, tmp, nChars); return tmp; } } void ME_EndToUnicode(BOOL unicode, LPVOID psz) { if (!unicode) FREE_OBJ(psz); }