From f507252aa566adc062ac19bc5a8eaa98a4da0f48 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?G=C3=A9=20van=20Geldorp?= Date: Sun, 11 May 2003 11:12:00 +0000 Subject: [PATCH] Implement DrawTextA()/DrawTextW() (mostly copied from Wine) svn path=/trunk/; revision=4671 --- reactos/lib/user32/windows/font.c | 1072 +++++++++++++++++++++++++++-- 1 file changed, 1033 insertions(+), 39 deletions(-) diff --git a/reactos/lib/user32/windows/font.c b/reactos/lib/user32/windows/font.c index 55a268d7141..cdd689229c6 100644 --- a/reactos/lib/user32/windows/font.c +++ b/reactos/lib/user32/windows/font.c @@ -16,7 +16,7 @@ * along with this program; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ -/* $Id: font.c,v 1.3 2002/09/08 10:23:12 chorns Exp $ +/* $Id: font.c,v 1.4 2003/05/11 11:12:00 gvg Exp $ * * PROJECT: ReactOS user32.dll * FILE: lib/user32/windows/input.c @@ -29,6 +29,7 @@ /* INCLUDES ******************************************************************/ #include +#include #include #include @@ -57,52 +58,1045 @@ GetTabbedTextExtentW( { return 0; } -int -STDCALL -DrawTextA( - HDC hDC, - LPCSTR lpString, - int nCount, - LPRECT lpRect, - UINT uFormat) + +/********************************************************************* + * + * DrawText functions + * + * Copied from Wine. + * Copyright 1993, 1994 Alexandre Julliard + * Copyright 2002 Bill Medland + * + * Design issues + * How many buffers to use + * While processing in DrawText there are potentially three different forms + * of the text that need to be held. How are they best held? + * 1. The original text is needed, of course, to see what to display. + * 2. The text that will be returned to the user if the DT_MODIFYSTRING is + * in effect. + * 3. The buffered text that is about to be displayed e.g. the current line. + * Typically this will exclude the ampersands used for prefixing etc. + * + * Complications. + * a. If the buffered text to be displayed includes the ampersands then + * we will need special measurement and draw functions that will ignore + * the ampersands (e.g. by copying to a buffer without the prefix and + * then using the normal forms). This may involve less space but may + * require more processing. e.g. since a line containing tabs may + * contain several underlined characters either we need to carry around + * a list of prefix locations or we may need to locate them several + * times. + * b. If we actually directly modify the "original text" as we go then we + * will need some special "caching" to handle the fact that when we + * ellipsify the text the ellipsis may modify the next line of text, + * which we have not yet processed. (e.g. ellipsification of a W at the + * end of a line will overwrite the W, the \n and the first character of + * the next line, and a \0 will overwrite the second. Try it!!) + * + * Option 1. Three separate storages. (To be implemented) + * If DT_MODIFYSTRING is in effect then allocate an extra buffer to hold + * the edited string in some form, either as the string itself or as some + * sort of "edit list" to be applied just before returning. + * Use a buffer that holds the ellipsified current line sans ampersands + * and accept the need occasionally to recalculate the prefixes (if + * DT_EXPANDTABS and not DT_NOPREFIX and not DT_HIDEPREFIX) + */ + +#define TAB 9 +#define LF 10 +#define CR 13 +#define SPACE 32 +#define PREFIX 38 + +#define FORWARD_SLASH '/' +#define BACK_SLASH '\\' + +static const WCHAR ELLIPSISW[] = {'.','.','.', 0}; + +typedef struct tag_ellipsis_data { - return 0; + int before; + int len; + int under; + int after; +} ellipsis_data; + +/********************************************************************* + * TEXT_Ellipsify (static) + * + * Add an ellipsis to the end of the given string whilst ensuring it fits. + * + * If the ellipsis alone doesn't fit then it will be returned anyway. + * + * See Also TEXT_PathEllipsify + * + * Arguments + * hdc [in] The handle to the DC that defines the font. + * str [in/out] The string that needs to be modified. + * max_str [in] The dimension of str (number of WCHAR). + * len_str [in/out] The number of characters in str + * width [in] The maximum width permitted (in logical coordinates) + * size [out] The dimensions of the text + * modstr [out] The modified form of the string, to be returned to the + * calling program. It is assumed that the caller has + * made sufficient space available so we don't need to + * know the size of the space. This pointer may be NULL if + * the modified string is not required. + * len_before [out] The number of characters before the ellipsis. + * len_ellip [out] The number of characters in the ellipsis. + * + * See for example Microsoft article Q249678. + * + * For now we will simply use three dots rather than worrying about whether + * the font contains an explicit ellipsis character. + */ +static void TEXT_Ellipsify (HDC hdc, WCHAR *str, unsigned int max_len, + unsigned int *len_str, int width, SIZE *size, + WCHAR *modstr, + int *len_before, int *len_ellip) +{ + unsigned int len_ellipsis; + unsigned int lo, mid, hi; + + len_ellipsis = wcslen (ELLIPSISW); + if (len_ellipsis > max_len) len_ellipsis = max_len; + if (*len_str > max_len - len_ellipsis) + *len_str = max_len - len_ellipsis; + + /* First do a quick binary search to get an upper bound for *len_str. */ + if (*len_str > 0 && + GetTextExtentExPointW(hdc, str, *len_str, width, NULL, NULL, size) && + size->cx > width) + { + for (lo = 0, hi = *len_str; lo < hi; ) + { + mid = (lo + hi) / 2; + if (!GetTextExtentExPointW(hdc, str, mid, width, NULL, NULL, size)) + break; + if (size->cx > width) + hi = mid; + else + lo = mid + 1; + } + *len_str = hi; + } + /* Now this should take only a couple iterations at most. */ + for ( ; ; ) + { + wcsncpy (str + *len_str, ELLIPSISW, len_ellipsis); + + if (!GetTextExtentExPointW (hdc, str, *len_str + len_ellipsis, width, + NULL, NULL, size)) break; + + if (!*len_str || size->cx <= width) break; + + (*len_str)--; + } + *len_ellip = len_ellipsis; + *len_before = *len_str; + *len_str += len_ellipsis; + + if (modstr) + { + wcsncpy (modstr, str, *len_str); + *(str+*len_str) = '\0'; + } } -int -STDCALL -DrawTextExA( - HDC hdc, - LPSTR lpchText, - int cchText, - LPRECT lprc, - UINT dwDTFormat, - LPDRAWTEXTPARAMS lpDTParams) +/********************************************************************* + * TEXT_PathEllipsify (static) + * + * Add an ellipsis to the provided string in order to make it fit within + * the width. The ellipsis is added as specified for the DT_PATH_ELLIPSIS + * flag. + * + * See Also TEXT_Ellipsify + * + * Arguments + * hdc [in] The handle to the DC that defines the font. + * str [in/out] The string that needs to be modified + * max_str [in] The dimension of str (number of WCHAR). + * len_str [in/out] The number of characters in str + * width [in] The maximum width permitted (in logical coordinates) + * size [out] The dimensions of the text + * modstr [out] The modified form of the string, to be returned to the + * calling program. It is assumed that the caller has + * made sufficient space available so we don't need to + * know the size of the space. This pointer may be NULL if + * the modified string is not required. + * pellip [out] The ellipsification results + * + * For now we will simply use three dots rather than worrying about whether + * the font contains an explicit ellipsis character. + * + * The following applies, I think to Win95. We will need to extend it for + * Win98 which can have both path and end ellipsis at the same time (e.g. + * C:\MyLongFileName.Txt becomes ...\MyLongFileN...) + * + * The resulting string consists of as much as possible of the following: + * 1. The ellipsis itself + * 2. The last \ or / of the string (if any) + * 3. Everything after the last \ or / of the string (if any) or the whole + * string if there is no / or \. I believe that under Win95 this would + * include everything even though some might be clipped off the end whereas + * under Win98 that might be ellipsified too. + * Yet to be investigated is whether this would include wordbreaking if the + * filename is more than 1 word and splitting if DT_EDITCONTROL was in + * effect. (If DT_EDITCONTROL is in effect then on occasions text will be + * broken within words). + * 4. All the stuff before the / or \, which is placed before the ellipsis. + */ +static void TEXT_PathEllipsify (HDC hdc, WCHAR *str, unsigned int max_len, + unsigned int *len_str, int width, SIZE *size, + WCHAR *modstr, ellipsis_data *pellip) { - return 0; + int len_ellipsis; + int len_trailing; + int len_under; + WCHAR *lastBkSlash, *lastFwdSlash, *lastSlash; + + len_ellipsis = wcslen (ELLIPSISW); + if (!max_len) return; + if (len_ellipsis >= max_len) len_ellipsis = max_len - 1; + if (*len_str + len_ellipsis >= max_len) + *len_str = max_len - len_ellipsis-1; + /* Hopefully this will never happen, otherwise it would probably lose + * the wrong character + */ + str[*len_str] = '\0'; /* to simplify things */ + + lastBkSlash = wcsrchr (str, BACK_SLASH); + lastFwdSlash = wcsrchr (str, FORWARD_SLASH); + lastSlash = lastBkSlash > lastFwdSlash ? lastBkSlash : lastFwdSlash; + if (!lastSlash) lastSlash = str; + len_trailing = *len_str - (lastSlash - str); + + /* overlap-safe movement to the right */ + memmove (lastSlash+len_ellipsis, lastSlash, len_trailing * sizeof(WCHAR)); + wcsncpy (lastSlash, ELLIPSISW, len_ellipsis); + len_trailing += len_ellipsis; + /* From this point on lastSlash actually points to the ellipsis in front + * of the last slash and len_trailing includes the ellipsis + */ + + len_under = 0; + for ( ; ; ) + { + if (!GetTextExtentExPointW (hdc, str, *len_str + len_ellipsis, width, + NULL, NULL, size)) break; + + if (lastSlash == str || size->cx <= width) break; + + /* overlap-safe movement to the left */ + memmove (lastSlash-1, lastSlash, len_trailing * sizeof(WCHAR)); + lastSlash--; + len_under++; + + assert (*len_str); + (*len_str)--; + } + pellip->before = lastSlash-str; + pellip->len = len_ellipsis; + pellip->under = len_under; + pellip->after = len_trailing - len_ellipsis; + *len_str += len_ellipsis; + + if (modstr) + { + wcsncpy (modstr, str, *len_str); + *(str+*len_str) = '\0'; + } } -int -STDCALL -DrawTextExW( - HDC hdc, - LPWSTR lpchText, - int cchText, - LPRECT lprc, - UINT dwDTFormat, - LPDRAWTEXTPARAMS lpDTParams) +/********************************************************************* + * TEXT_WordBreak (static) + * + * Perform wordbreak processing on the given string + * + * Assumes that DT_WORDBREAK has been specified and not all the characters + * fit. Note that this function should even be called when the first character + * that doesn't fit is known to be a space or tab, so that it can swallow them. + * + * Note that the Windows processing has some strange properties. + * 1. If the text is left-justified and there is room for some of the spaces + * that follow the last word on the line then those that fit are included on + * the line. + * 2. If the text is centred or right-justified and there is room for some of + * the spaces that follow the last word on the line then all but one of those + * that fit are included on the line. + * 3. (Reasonable behaviour) If the word breaking causes a space to be the first + * character of a new line it will be skipped. + * + * Arguments + * hdc [in] The handle to the DC that defines the font. + * str [in/out] The string that needs to be broken. + * max_str [in] The dimension of str (number of WCHAR). + * len_str [in/out] The number of characters in str + * width [in] The maximum width permitted + * format [in] The format flags in effect + * chars_fit [in] The maximum number of characters of str that are already + * known to fit; chars_fit+1 is known not to fit. + * chars_used [out] The number of characters of str that have been "used" and + * do not need to be included in later text. For example this will + * include any spaces that have been discarded from the start of + * the next line. + * size [out] The size of the returned text in logical coordinates + * + * Pedantic assumption - Assumes that the text length is monotonically + * increasing with number of characters (i.e. no weird kernings) + * + * Algorithm + * + * Work back from the last character that did fit to either a space or the last + * character of a word, whichever is met first. + * If there was one or the first character didn't fit then + * If the text is centred or right justified and that one character was a + * space then break the line before that character + * Otherwise break the line after that character + * and if the next character is a space then discard it. + * Suppose there was none (and the first character did fit). + * If Break Within Word is permitted + * break the word after the last character that fits (there must be + * at least one; none is caught earlier). + * Otherwise + * discard any trailing space. + * include the whole word; it may be ellipsified later + * + * Break Within Word is permitted under a set of circumstances that are not + * totally clear yet. Currently our best guess is: + * If DT_EDITCONTROL is in effect and neither DT_WORD_ELLIPSIS nor + * DT_PATH_ELLIPSIS is + */ + +static void TEXT_WordBreak (HDC hdc, WCHAR *str, unsigned int max_str, + unsigned int *len_str, + int width, int format, unsigned int chars_fit, + unsigned int *chars_used, SIZE *size) { - return 0; + WCHAR *p; + int word_fits; + assert (format & DT_WORDBREAK); + assert (chars_fit < *len_str); + + /* Work back from the last character that did fit to either a space or the + * last character of a word, whichever is met first. + */ + p = str + chars_fit; /* The character that doesn't fit */ + word_fits = TRUE; + if (!chars_fit) + ; /* we pretend that it fits anyway */ + else if (*p == SPACE) /* chars_fit < *len_str so this is valid */ + p--; /* the word just fitted */ + else + { + while (p > str && *(--p) != SPACE) + ; + word_fits = (p != str || *p == SPACE); + } + /* If there was one or the first character didn't fit then */ + if (word_fits) + { + int next_is_space; + /* break the line before/after that character */ + if (!(format & (DT_RIGHT | DT_CENTER)) || *p != SPACE) + p++; + next_is_space = (p - str) < *len_str && *p == SPACE; + *len_str = p - str; + /* and if the next character is a space then discard it. */ + *chars_used = *len_str; + if (next_is_space) + (*chars_used)++; + } + /* Suppose there was none. */ + else + { + if ((format & (DT_EDITCONTROL | DT_WORD_ELLIPSIS | DT_PATH_ELLIPSIS)) == + DT_EDITCONTROL) + { + /* break the word after the last character that fits (there must be + * at least one; none is caught earlier). + */ + *len_str = chars_fit; + *chars_used = chars_fit; + + /* FIXME - possible error. Since the next character is now removed + * this could make the text longer so that it no longer fits, and + * so we need a loop to test and shrink. + */ + } + /* Otherwise */ + else + { + /* discard any trailing space. */ + const WCHAR *e = str + *len_str; + p = str + chars_fit; + while (p < e && *p != SPACE) + p++; + *chars_used = p - str; + if (p < e) /* i.e. loop failed because *p == SPACE */ + (*chars_used)++; + + /* include the whole word; it may be ellipsified later */ + *len_str = p - str; + /* Possible optimisation; if DT_WORD_ELLIPSIS only use chars_fit+1 + * so that it will be too long + */ + } + } + /* Remeasure the string */ + GetTextExtentExPointW (hdc, str, *len_str, 0, NULL, NULL, size); } -int -STDCALL -DrawTextW( - HDC hDC, - LPCWSTR lpString, - int nCount, - LPRECT lpRect, - UINT uFormat) +/********************************************************************* + * TEXT_SkipChars + * + * Skip over the given number of characters, bearing in mind prefix + * substitution and the fact that a character may take more than one + * WCHAR (Unicode surrogates are two words long) (and there may have been + * a trailing &) + * + * Parameters + * new_count [out] The updated count + * new_str [out] The updated pointer + * start_count [in] The count of remaining characters corresponding to the + * start of the string + * start_str [in] The starting point of the string + * max [in] The number of characters actually in this segment of the + * string (the & counts) + * n [in] The number of characters to skip (if prefix then + * &c counts as one) + * prefix [in] Apply prefix substitution + * + * Return Values + * none + * + * Remarks + * There must be at least n characters in the string + * We need max because the "line" may have ended with a & followed by a tab + * or newline etc. which we don't want to swallow + */ + +static void TEXT_SkipChars (int *new_count, const WCHAR **new_str, + int start_count, const WCHAR *start_str, + int max, int n, int prefix) { - return 0; + /* This is specific to wide characters, MSDN doesn't say anything much + * about Unicode surrogates yet and it isn't clear if _wcsinc will + * correctly handle them so we'll just do this the easy way for now + */ + + if (prefix) + { + const WCHAR *str_on_entry = start_str; + assert (max >= n); + max -= n; + while (n--) + if (*start_str++ == PREFIX && max--) + start_str++; + else; + start_count -= (start_str - str_on_entry); + } + else + { + start_str += n; + start_count -= n; + } + *new_str = start_str; + *new_count = start_count; +} + +/********************************************************************* + * TEXT_Reprefix + * + * Reanalyse the text to find the prefixed character. This is called when + * wordbreaking or ellipsification has shortened the string such that the + * previously noted prefixed character is no longer visible. + * + * Parameters + * str [in] The original string segment (including all characters) + * ns [in] The number of characters in str (including prefixes) + * pe [in] The ellipsification data + * + * Return Values + * The prefix offset within the new string segment (the one that contains the + * ellipses and does not contain the prefix characters) (-1 if none) + */ + +static int TEXT_Reprefix (const WCHAR *str, unsigned int ns, + const ellipsis_data *pe) +{ + int result = -1; + unsigned int i = 0; + unsigned int n = pe->before + pe->under + pe->after; + assert (n <= ns); + while (i < n) + { + if (i == pe->before) + { + /* Reached the path ellipsis; jump over it */ + if (ns < pe->under) break; + str += pe->under; + ns -= pe->under; + i += pe->under; + if (!pe->after) break; /* Nothing after the path ellipsis */ + } + if (!ns) break; + ns--; + if (*str++ == PREFIX) + { + if (!ns) break; + if (*str != PREFIX) + result = (i < pe->before || pe->under == 0) ? i : i - pe->under + pe->len; + /* pe->len may be non-zero while pe_under is zero */ + str++; + ns--; + } + else; + i++; + } + return result; +} + +/********************************************************************* + * Returns true if and only if the remainder of the line is a single + * newline representation or nothing + */ + +static int remainder_is_none_or_newline (int num_chars, const WCHAR *str) +{ + if (!num_chars) return TRUE; + if (*str != LF && *str != CR) return FALSE; + if (!--num_chars) return TRUE; + if (*str == *(str+1)) return FALSE; + str++; + if (*str != CR && *str != LF) return FALSE; + if (--num_chars) return FALSE; + return TRUE; +} + +/********************************************************************* + * Return next line of text from a string. + * + * hdc - handle to DC. + * str - string to parse into lines. + * count - length of str. + * dest - destination in which to return line. + * len - dest buffer size in chars on input, copied length into dest on output. + * width - maximum width of line in pixels. + * format - format type passed to DrawText. + * retsize - returned size of the line in pixels. + * last_line - TRUE if is the last line that will be processed + * p_retstr - If DT_MODIFYSTRING this points to a cursor in the buffer in which + * the return string is built. + * tabwidth - The width of a tab in logical coordinates + * pprefix_offset - Here is where we return the offset within dest of the first + * prefixed (underlined) character. -1 is returned if there + * are none. Note that there may be more; the calling code + * will need to use TEXT_Reprefix to find any later ones. + * pellip - Here is where we return the information about any ellipsification + * that was carried out. Note that if tabs are being expanded then + * this data will correspond to the last text segment actually + * returned in dest; by definition there would not have been any + * ellipsification in earlier text segments of the line. + * + * Returns pointer to next char in str after end of the line + * or NULL if end of str reached. + */ +static const WCHAR *TEXT_NextLineW( HDC hdc, const WCHAR *str, int *count, + WCHAR *dest, int *len, int width, DWORD format, + SIZE *retsize, int last_line, WCHAR **p_retstr, + int tabwidth, int *pprefix_offset, + ellipsis_data *pellip) +{ + int i = 0, j = 0; + int plen = 0; + SIZE size; + int maxl = *len; + int seg_i, seg_count, seg_j; + int max_seg_width; + int num_fit; + int word_broken; + int line_fits; + int j_in_seg; + int ellipsified; + *pprefix_offset = -1; + + /* For each text segment in the line */ + + retsize->cy = 0; + while (*count) + { + + /* Skip any leading tabs */ + + if (str[i] == TAB && (format & DT_EXPANDTABS)) + { + plen = ((plen/tabwidth)+1)*tabwidth; + (*count)--; if (j < maxl) dest[j++] = str[i++]; else i++; + while (*count && str[i] == TAB) + { + plen += tabwidth; + (*count)--; if (j < maxl) dest[j++] = str[i++]; else i++; + } + } + + + /* Now copy as far as the next tab or cr/lf or eos */ + + seg_i = i; + seg_count = *count; + seg_j = j; + + while (*count && + (str[i] != TAB || !(format & DT_EXPANDTABS)) && + ((str[i] != CR && str[i] != LF) || (format & DT_SINGLELINE))) + { + if (str[i] == PREFIX && !(format & DT_NOPREFIX) && *count > 1) + { + (*count)--, i++; /* Throw away the prefix itself */ + if (str[i] == PREFIX) + { + /* Swallow it before we see it again */ + (*count)--; if (j < maxl) dest[j++] = str[i++]; else i++; + } + else if (*pprefix_offset == -1 || *pprefix_offset >= seg_j) + { + *pprefix_offset = j; + } + /* else the previous prefix was in an earlier segment of the + * line; we will leave it to the drawing code to catch this + * one. + */ + } + else + { + (*count)--; if (j < maxl) dest[j++] = str[i++]; else i++; + } + } + + + /* Measure the whole text segment and possibly WordBreak and + * ellipsify it + */ + + j_in_seg = j - seg_j; + max_seg_width = width - plen; + GetTextExtentExPointW (hdc, dest + seg_j, j_in_seg, max_seg_width, &num_fit, NULL, &size); + + /* The Microsoft handling of various combinations of formats is weird. + * The following may very easily be incorrect if several formats are + * combined, and may differ between versions (to say nothing of the + * several bugs in the Microsoft versions). + */ + word_broken = 0; + line_fits = (num_fit >= j_in_seg); + if (!line_fits && (format & DT_WORDBREAK)) + { + const WCHAR *s; + int chars_used; + TEXT_WordBreak (hdc, dest+seg_j, maxl-seg_j, &j_in_seg, + max_seg_width, format, num_fit, &chars_used, &size); + line_fits = (size.cx <= max_seg_width); + /* and correct the counts */ + TEXT_SkipChars (count, &s, seg_count, str+seg_i, i-seg_i, + chars_used, !(format & DT_NOPREFIX)); + i = s - str; + word_broken = 1; + } + pellip->before = j_in_seg; + pellip->under = 0; + pellip->after = 0; + pellip->len = 0; + ellipsified = 0; + if (!line_fits && (format & DT_PATH_ELLIPSIS)) + { + TEXT_PathEllipsify (hdc, dest + seg_j, maxl-seg_j, &j_in_seg, + max_seg_width, &size, *p_retstr, pellip); + line_fits = (size.cx <= max_seg_width); + ellipsified = 1; + } + /* NB we may end up ellipsifying a word-broken or path_ellipsified + * string */ + if ((!line_fits && (format & DT_WORD_ELLIPSIS)) || + ((format & DT_END_ELLIPSIS) && + ((last_line && *count) || + (remainder_is_none_or_newline (*count, &str[i]) && !line_fits)))) + { + int before, len_ellipsis; + TEXT_Ellipsify (hdc, dest + seg_j, maxl-seg_j, &j_in_seg, + max_seg_width, &size, *p_retstr, &before, &len_ellipsis); + if (before > pellip->before) + { + /* We must have done a path ellipsis too */ + pellip->after = before - pellip->before - pellip->len; + /* Leave the len as the length of the first ellipsis */ + } + else + { + /* If we are here after a path ellipsification it must be + * because even the ellipsis itself didn't fit. + */ + assert (pellip->under == 0 && pellip->after == 0); + pellip->before = before; + pellip->len = len_ellipsis; + /* pellip->after remains as zero as does + * pellip->under + */ + } + line_fits = (size.cx <= max_seg_width); + ellipsified = 1; + } + /* As an optimisation if we have ellipsified and we are expanding + * tabs and we haven't reached the end of the line we can skip to it + * now rather than going around the loop again. + */ + if ((format & DT_EXPANDTABS) && ellipsified) + { + if (format & DT_SINGLELINE) + *count = 0; + else + { + while ((*count) && str[i] != CR && str[i] != LF) + { + (*count)--, i++; + } + } + } + + j = seg_j + j_in_seg; + if (*pprefix_offset >= seg_j + pellip->before) + { + *pprefix_offset = TEXT_Reprefix (str + seg_i, i - seg_i, pellip); + if (*pprefix_offset != -1) + *pprefix_offset += seg_j; + } + + plen += size.cx; + if (size.cy > retsize->cy) + retsize->cy = size.cy; + + if (word_broken) + break; + else if (!*count) + break; + else if (str[i] == CR || str[i] == LF) + { + (*count)--, i++; + if (*count && (str[i] == CR || str[i] == LF) && str[i] != str[i-1]) + { + (*count)--, i++; + } + break; + } + /* else it was a Tab and we go around again */ + } + + retsize->cx = plen; + *len = j; + if (*count) + return (&str[i]); + else + return NULL; +} + + +/*********************************************************************** + * TEXT_DrawUnderscore + * + * Draw the underline under the prefixed character + * + * Parameters + * hdc [in] The handle of the DC for drawing + * x [in] The x location of the line segment (logical coordinates) + * y [in] The y location of where the underscore should appear + * (logical coordinates) + * str [in] The text of the line segment + * offset [in] The offset of the underscored character within str + */ + +static void TEXT_DrawUnderscore (HDC hdc, int x, int y, const WCHAR *str, int offset) +{ + int prefix_x; + int prefix_end; + SIZE size; + HPEN hpen; + HPEN oldPen; + + GetTextExtentPointW (hdc, str, offset, &size); + prefix_x = x + size.cx; + GetTextExtentPointW (hdc, str, offset+1, &size); + prefix_end = x + size.cx - 1; + /* The above method may eventually be slightly wrong due to kerning etc. */ + + hpen = CreatePen (PS_SOLID, 1, GetTextColor (hdc)); + oldPen = SelectObject (hdc, hpen); + MoveToEx (hdc, prefix_x, y, NULL); + LineTo (hdc, prefix_end, y); + SelectObject (hdc, oldPen); + DeleteObject (hpen); +} + +/*********************************************************************** + * DrawTextExW (USER32.@) + * + * The documentation on the extra space required for DT_MODIFYSTRING at MSDN + * is not quite complete, especially with regard to \0. We will assume that + * the returned string could have a length of up to i_count+3 and also have + * a trailing \0 (which would be 4 more than a not-null-terminated string but + * 3 more than a null-terminated string). If this is not so then increase + * the allowance in DrawTextExA. + */ +#define MAX_STATIC_BUFFER 1024 +int STDCALL +DrawTextExW( HDC hdc, LPWSTR str, INT i_count, + LPRECT rect, UINT flags, LPDRAWTEXTPARAMS dtp ) +{ + SIZE size; + const WCHAR *strPtr; + WCHAR *retstr, *p_retstr; + size_t size_retstr; + static WCHAR line[MAX_STATIC_BUFFER]; + int len, lh, count=i_count; + TEXTMETRICW tm; + int lmargin = 0, rmargin = 0; + int x = rect->left, y = rect->top; + int width = rect->right - rect->left; + int max_width = 0; + int last_line; + int tabwidth /* to keep gcc happy */ = 0; + int prefix_offset; + ellipsis_data ellip; + +#if 0 + TRACE("%s, %d , [(%d,%d),(%d,%d)]\n", debugstr_wn (str, count), count, + rect->left, rect->top, rect->right, rect->bottom); + + if (dtp) TRACE("Params: iTabLength=%d, iLeftMargin=%d, iRightMargin=%d\n", + dtp->iTabLength, dtp->iLeftMargin, dtp->iRightMargin); +#endif + + if (!str) return 0; + if (count == -1) count = wcslen(str); + if (count == 0) return 0; + strPtr = str; + + if (flags & DT_SINGLELINE) + flags &= ~DT_WORDBREAK; + + GetTextMetricsW(hdc, &tm); + if (flags & DT_EXTERNALLEADING) + lh = tm.tmHeight + tm.tmExternalLeading; + else + lh = tm.tmHeight; + + if (dtp) + { + lmargin = dtp->iLeftMargin * tm.tmAveCharWidth; + rmargin = dtp->iRightMargin * tm.tmAveCharWidth; + if (!(flags & (DT_CENTER | DT_RIGHT))) + x += lmargin; + dtp->uiLengthDrawn = 0; /* This param RECEIVES number of chars processed */ + } + + if (flags & DT_EXPANDTABS) + { + int tabstop = ((flags & DT_TABSTOP) && dtp) ? dtp->iTabLength : 8; + tabwidth = tm.tmAveCharWidth * tabstop; + } + + if (flags & DT_CALCRECT) flags |= DT_NOCLIP; + + if (flags & DT_MODIFYSTRING) + { + size_retstr = (count + 4) * sizeof (WCHAR); + retstr = HeapAlloc(GetProcessHeap(), 0, size_retstr); + if (!retstr) return 0; + memcpy (retstr, str, size_retstr); + } + else + { + size_retstr = 0; + retstr = NULL; + } + p_retstr = retstr; + + do + { + len = MAX_STATIC_BUFFER; + last_line = !(flags & DT_NOCLIP) && y + ((flags & DT_EDITCONTROL) ? 2*lh-1 : lh) > rect->bottom; + strPtr = TEXT_NextLineW(hdc, strPtr, &count, line, &len, width, flags, &size, last_line, &p_retstr, tabwidth, &prefix_offset, &ellip); + + if (flags & DT_CENTER) x = (rect->left + rect->right - + size.cx) / 2; + else if (flags & DT_RIGHT) x = rect->right - size.cx; + + if (flags & DT_SINGLELINE) + { + if (flags & DT_VCENTER) y = rect->top + + (rect->bottom - rect->top) / 2 - size.cy / 2; + else if (flags & DT_BOTTOM) y = rect->bottom - size.cy; + } + + if (!(flags & DT_CALCRECT)) + { + const WCHAR *str = line; + int xseg = x; + while (len) + { + int len_seg; + SIZE size; + if ((flags & DT_EXPANDTABS)) + { + const WCHAR *p; + p = str; while (p < str+len && *p != TAB) p++; + len_seg = p - str; + if (len_seg != len && !GetTextExtentPointW(hdc, str, len_seg, &size)) + return 0; + } + else + len_seg = len; + + if (!ExtTextOutW( hdc, xseg, y, + ((flags & DT_NOCLIP) ? 0 : ETO_CLIPPED) | + ((flags & DT_RTLREADING) ? ETO_RTLREADING : 0), + rect, str, len_seg, NULL )) return 0; + if (prefix_offset != -1 && prefix_offset < len_seg) + { + TEXT_DrawUnderscore (hdc, xseg, y + tm.tmAscent + 1, str, prefix_offset); + } + len -= len_seg; + str += len_seg; + if (len) + { + assert ((flags & DT_EXPANDTABS) && *str == TAB); + len--; str++; + xseg += ((size.cx/tabwidth)+1)*tabwidth; + if (prefix_offset != -1) + { + if (prefix_offset < len_seg) + { + /* We have just drawn an underscore; we ought to + * figure out where the next one is. I am going + * to leave it for now until I have a better model + * for the line, which will make reprefixing easier. + * This is where ellip would be used. + */ + prefix_offset = -1; + } + else + prefix_offset -= len_seg; + } + } + } + } + else if (size.cx > max_width) + max_width = size.cx; + + y += lh; + if (dtp) + dtp->uiLengthDrawn += len; + } + while (strPtr && !last_line); + + if (flags & DT_CALCRECT) + { + rect->right = rect->left + max_width; + rect->bottom = y; + if (dtp) + rect->right += lmargin + rmargin; + } + if (retstr) + { + memcpy (str, retstr, size_retstr); + HeapFree (GetProcessHeap(), 0, retstr); + } + return y - rect->top; +} + +/*********************************************************************** + * DrawTextExA (USER32.@) + * + * If DT_MODIFYSTRING is specified then there must be room for up to + * 4 extra characters. We take great care about just how much modified + * string we return. + */ +int STDCALL +DrawTextExA( HDC hdc, LPSTR str, INT count, + LPRECT rect, UINT flags, LPDRAWTEXTPARAMS dtp ) +{ + WCHAR *wstr; + WCHAR *p; + INT ret = 0; + int i; + DWORD wcount; + DWORD wmax; + DWORD amax; + + if (!str) return 0; + if (count == -1) count = strlen(str); + if (!count) return 0; + wcount = MultiByteToWideChar( CP_ACP, 0, str, count, NULL, 0 ); + wmax = wcount; + amax = count; + if (flags & DT_MODIFYSTRING) + { + wmax += 4; + amax += 4; + } + wstr = HeapAlloc(GetProcessHeap(), 0, wmax * sizeof(WCHAR)); + if (wstr) + { + MultiByteToWideChar( CP_ACP, 0, str, count, wstr, wcount ); + if (flags & DT_MODIFYSTRING) + for (i=4, p=wstr+wcount; i--; p++) *p=0xFFFE; + /* Initialise the extra characters so that we can see which ones + * change. U+FFFE is guaranteed to be not a unicode character and + * so will not be generated by DrawTextEx itself. + */ + ret = DrawTextExW( hdc, wstr, wcount, rect, flags, NULL ); + if (flags & DT_MODIFYSTRING) + { + /* Unfortunately the returned string may contain multiple \0s + * and so we need to measure it ourselves. + */ + for (i=4, p=wstr+wcount; i-- && *p != 0xFFFE; p++) wcount++; + WideCharToMultiByte( CP_ACP, 0, wstr, wcount, str, amax, NULL, NULL ); + } + HeapFree(GetProcessHeap(), 0, wstr); + } + return ret; +} + +/*********************************************************************** + * DrawTextW (USER32.@) + */ +int STDCALL +DrawTextW( HDC hdc, LPCWSTR str, INT count, LPRECT rect, UINT flags ) +{ + DRAWTEXTPARAMS dtp; + + memset (&dtp, 0, sizeof(dtp)); + if (flags & DT_TABSTOP) + { + dtp.iTabLength = (flags >> 8) && 0xff; + flags &= 0xffff00ff; + } + return DrawTextExW(hdc, (LPWSTR)str, count, rect, flags, &dtp); +} + +/*********************************************************************** + * DrawTextA (USER32.@) + */ +int STDCALL +DrawTextA( HDC hdc, LPCSTR str, INT count, LPRECT rect, UINT flags ) +{ + DRAWTEXTPARAMS dtp; + + memset (&dtp, 0, sizeof(dtp)); + if (flags & DT_TABSTOP) + { + dtp.iTabLength = (flags >> 8) && 0xff; + flags &= 0xffff00ff; + } + return DrawTextExA( hdc, (LPSTR)str, count, rect, flags, &dtp ); }