richedit: Store an internal copy of the window style flags.
[wine] / dlls / riched20 / paint.c
1 /*
2  * RichEdit - painting functions
3  *
4  * Copyright 2004 by Krzysztof Foltman
5  * Copyright 2005 by Phil Krylov
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include "editor.h"
23
24 WINE_DEFAULT_DEBUG_CHANNEL(richedit);
25
26 static void ME_DrawParagraph(ME_Context *c, ME_DisplayItem *paragraph);
27
28 void ME_PaintContent(ME_TextEditor *editor, HDC hDC, BOOL bOnlyNew, const RECT *rcUpdate)
29 {
30   ME_DisplayItem *item;
31   ME_Context c;
32   int ys, ye;
33   HRGN oldRgn;
34
35   oldRgn = CreateRectRgn(0, 0, 0, 0);
36   if (!GetClipRgn(hDC, oldRgn))
37   {
38     DeleteObject(oldRgn);
39     oldRgn = NULL;
40   }
41   IntersectClipRect(hDC, rcUpdate->left, rcUpdate->top,
42                      rcUpdate->right, rcUpdate->bottom);
43
44   editor->nSequence++;
45   ME_InitContext(&c, editor, hDC);
46   SetBkMode(hDC, TRANSPARENT);
47   ME_MoveCaret(editor); /* Calls ME_WrapMarkedParagraphs */
48   item = editor->pBuffer->pFirst->next;
49   /* This context point is an offset for the paragraph positions stored
50    * during wrapping. It shouldn't be modified during painting. */
51   c.pt.x = c.rcView.left - editor->horz_si.nPos;
52   c.pt.y = c.rcView.top - editor->vert_si.nPos;
53   while(item != editor->pBuffer->pLast)
54   {
55     assert(item->type == diParagraph);
56
57     ys = c.pt.y + item->member.para.pt.y;
58     if (item->member.para.pCell
59         != item->member.para.next_para->member.para.pCell)
60     {
61       ME_Cell *cell = NULL;
62       cell = &ME_FindItemBack(item->member.para.next_para, diCell)->member.cell;
63       ye = c.pt.y + cell->pt.y + cell->nHeight;
64     } else {
65       ye = ys + item->member.para.nHeight;
66     }
67     if (item->member.para.pCell && !(item->member.para.nFlags & MEPF_ROWEND) &&
68         item->member.para.pCell != item->member.para.prev_para->member.para.pCell)
69     {
70       /* the border shifts the text down */
71       ys -= item->member.para.pCell->member.cell.yTextOffset;
72     }
73
74     if (!bOnlyNew || (item->member.para.nFlags & MEPF_REPAINT))
75     {
76       /* Draw the pargraph if any of the paragraph is in the update region. */
77       BOOL bPaint = (rcUpdate == NULL);
78       if (rcUpdate)
79         bPaint = ys < rcUpdate->bottom && ye > rcUpdate->top;
80       if (bPaint)
81       {
82         ME_DrawParagraph(&c, item);
83         /* Clear the repaint flag if the whole paragraph is in the
84          * update region. */
85         if (!rcUpdate || (rcUpdate->top <= ys && rcUpdate->bottom >= ye))
86           item->member.para.nFlags &= ~MEPF_REPAINT;
87       }
88     }
89     item = item->member.para.next_para;
90   }
91   if (c.pt.y + editor->nTotalLength < c.rcView.bottom)
92   {
93     /* Fill space after the end of the text. */
94     RECT rc;
95     rc.top = c.pt.y + editor->nTotalLength;
96     rc.left = c.rcView.left;
97     rc.bottom = c.rcView.bottom;
98     rc.right = c.rcView.right;
99
100     if (bOnlyNew)
101     {
102       /* Only erase region drawn from previous call to ME_PaintContent */
103       if (editor->nTotalLength < editor->nLastTotalLength)
104         rc.bottom = c.pt.y + editor->nLastTotalLength;
105       else
106         SetRectEmpty(&rc);
107     }
108
109     IntersectRect(&rc, &rc, rcUpdate);
110
111     if (!IsRectEmpty(&rc))
112       FillRect(hDC, &rc, c.editor->hbrBackground);
113   }
114   if (editor->nTotalLength != editor->nLastTotalLength ||
115       editor->nTotalWidth != editor->nLastTotalWidth)
116     ME_SendRequestResize(editor, FALSE);
117   editor->nLastTotalLength = editor->nTotalLength;
118   editor->nLastTotalWidth = editor->nTotalWidth;
119   ME_DestroyContext(&c, NULL);
120
121   SelectClipRgn(hDC, oldRgn);
122   if (oldRgn)
123     DeleteObject(oldRgn);
124 }
125
126 void ME_Repaint(ME_TextEditor *editor)
127 {
128   if (ME_WrapMarkedParagraphs(editor))
129   {
130     ME_UpdateScrollBar(editor);
131     FIXME("ME_Repaint had to call ME_WrapMarkedParagraphs\n");
132   }
133   if (!IsWindowVisible(editor->hWnd))
134     return;
135   if (!editor->bEmulateVersion10 || (editor->nEventMask & ENM_UPDATE))
136     ME_SendOldNotify(editor, EN_UPDATE);
137   UpdateWindow(editor->hWnd);
138 }
139
140 void ME_UpdateRepaint(ME_TextEditor *editor)
141 {
142   /* Should be called whenever the contents of the control have changed */
143   ME_Cursor *pCursor;
144   BOOL wrappedParagraphs;
145
146   wrappedParagraphs = ME_WrapMarkedParagraphs(editor);
147   if (wrappedParagraphs)
148     ME_UpdateScrollBar(editor);
149
150   /* Ensure that the cursor is visible */
151   pCursor = &editor->pCursors[0];
152   ME_EnsureVisible(editor, pCursor);
153
154   /* send EN_CHANGE if the event mask asks for it */
155   if(editor->nEventMask & ENM_CHANGE)
156   {
157     editor->nEventMask &= ~ENM_CHANGE;
158     ME_SendOldNotify(editor, EN_CHANGE);
159     editor->nEventMask |= ENM_CHANGE;
160   }
161   ME_Repaint(editor);
162   ME_SendSelChange(editor);
163 }
164
165 void
166 ME_RewrapRepaint(ME_TextEditor *editor)
167 {
168   /* RewrapRepaint should be called whenever the control has changed in
169    * looks, but not content. Like resizing. */
170   
171   ME_MarkAllForWrapping(editor);
172   ME_WrapMarkedParagraphs(editor);
173   ME_UpdateScrollBar(editor);
174   ME_Repaint(editor);
175 }
176
177 int ME_twips2pointsX(ME_Context *c, int x)
178 {
179   if (c->editor->nZoomNumerator == 0)
180     return x * c->dpi.cx / 1440;
181   else
182     return x * c->dpi.cx * c->editor->nZoomNumerator / 1440 / c->editor->nZoomDenominator;
183 }
184
185 int ME_twips2pointsY(ME_Context *c, int y)
186 {
187   if (c->editor->nZoomNumerator == 0)
188     return y * c->dpi.cy / 1440;
189   else
190     return y * c->dpi.cy * c->editor->nZoomNumerator / 1440 / c->editor->nZoomDenominator;
191 }
192
193 static void ME_HighlightSpace(ME_Context *c, int x, int y, LPCWSTR szText,
194                               int nChars, ME_Style *s, int width,
195                               int nSelFrom, int nSelTo, int ymin, int cy)
196 {
197   HDC hDC = c->hDC;
198   HGDIOBJ hOldFont = NULL;
199   SIZE sz;
200   int selWidth;
201   /* Only highlight if there is a selection in the run and when
202    * EM_HIDESELECTION is not being used to hide the selection. */
203   if (nSelFrom >= nChars || nSelTo < 0 || nSelFrom >= nSelTo
204       || c->editor->bHideSelection)
205     return;
206   hOldFont = ME_SelectStyleFont(c, s);
207   if (width <= 0)
208   {
209     GetTextExtentPoint32W(hDC, szText, nChars, &sz);
210     width = sz.cx;
211   }
212   if (nSelFrom < 0) nSelFrom = 0;
213   if (nSelTo > nChars) nSelTo = nChars;
214   GetTextExtentPoint32W(hDC, szText, nSelFrom, &sz);
215   x += sz.cx;
216   if (nSelTo != nChars)
217   {
218     GetTextExtentPoint32W(hDC, szText+nSelFrom, nSelTo-nSelFrom, &sz);
219     selWidth = sz.cx;
220   } else {
221     selWidth = width - sz.cx;
222   }
223   ME_UnselectStyleFont(c, s, hOldFont);
224
225   if (c->editor->bEmulateVersion10)
226     PatBlt(hDC, x, ymin, selWidth, cy, DSTINVERT);
227   else
228   {
229     RECT rect;
230     HBRUSH hBrush;
231     rect.left = x;
232     rect.top = ymin;
233     rect.right = x + selWidth;
234     rect.bottom = ymin + cy;
235     hBrush = CreateSolidBrush(GetSysColor(COLOR_HIGHLIGHT));
236     FillRect(hDC, &rect, hBrush);
237     DeleteObject(hBrush);
238   }
239 }
240
241 static void ME_DrawTextWithStyle(ME_Context *c, int x, int y, LPCWSTR szText,
242                                  int nChars, ME_Style *s, int width,
243                                  int nSelFrom, int nSelTo, int ymin, int cy)
244 {
245   HDC hDC = c->hDC;
246   HGDIOBJ hOldFont;
247   COLORREF rgbOld;
248   int yOffset = 0, yTwipsOffset = 0;
249   SIZE          sz;
250   COLORREF      rgb;
251   HPEN hPen = NULL, hOldPen = NULL;
252   BOOL bHighlightedText = (nSelFrom < nChars && nSelTo >= 0
253                            && nSelFrom < nSelTo && !c->editor->bHideSelection);
254   int xSelStart = x, xSelEnd = x;
255   int *lpDx = NULL;
256   /* lpDx is only needed for tabs to make sure the underline done automatically
257    * by the font extends to the end of the tab. Tabs are always stored as
258    * a single character run, so we can handle this case separately, since
259    * otherwise lpDx would need to specify the lengths of each character. */
260   if (width && nChars == 1)
261       lpDx = &width; /* Make sure underline for tab extends across tab space */
262
263   hOldFont = ME_SelectStyleFont(c, s);
264   if ((s->fmt.dwMask & s->fmt.dwEffects) & CFM_OFFSET) {
265     yTwipsOffset = s->fmt.yOffset;
266   }
267   if ((s->fmt.dwMask & s->fmt.dwEffects) & (CFM_SUPERSCRIPT | CFM_SUBSCRIPT)) {
268     if (s->fmt.dwEffects & CFE_SUPERSCRIPT) yTwipsOffset = s->fmt.yHeight/3;
269     if (s->fmt.dwEffects & CFE_SUBSCRIPT) yTwipsOffset = -s->fmt.yHeight/12;
270   }
271   if (yTwipsOffset)
272     yOffset = ME_twips2pointsY(c, yTwipsOffset);
273
274   if ((s->fmt.dwMask & CFM_LINK) && (s->fmt.dwEffects & CFE_LINK))
275     rgb = RGB(0,0,255);
276   else if ((s->fmt.dwMask & CFM_COLOR) && (s->fmt.dwEffects & CFE_AUTOCOLOR))
277     rgb = GetSysColor(COLOR_WINDOWTEXT);
278   else
279     rgb = s->fmt.crTextColor;
280
281   /* Determine the area that is selected in the run. */
282   GetTextExtentPoint32W(hDC, szText, nChars, &sz);
283   /* Treat width as an optional parameter.  We can get the width from the
284    * text extent of the string if it isn't specified. */
285   if (!width) width = sz.cx;
286   if (bHighlightedText)
287   {
288     if (nSelFrom <= 0)
289     {
290       nSelFrom = 0;
291     }
292     else
293     {
294       GetTextExtentPoint32W(hDC, szText, nSelFrom, &sz);
295       xSelStart = x + sz.cx;
296     }
297     if (nSelTo >= nChars)
298     {
299       nSelTo = nChars;
300       xSelEnd = x + width;
301     }
302     else
303     {
304       GetTextExtentPoint32W(hDC, szText+nSelFrom, nSelTo-nSelFrom, &sz);
305       xSelEnd = xSelStart + sz.cx;
306     }
307   }
308
309   /* Choose the pen type for underlining the text. */
310   if (s->fmt.dwMask & CFM_UNDERLINETYPE)
311   {
312     switch (s->fmt.bUnderlineType)
313     {
314     case CFU_UNDERLINE:
315     case CFU_UNDERLINEWORD: /* native seems to map it to simple underline (MSDN) */
316     case CFU_UNDERLINEDOUBLE: /* native seems to map it to simple underline (MSDN) */
317       hPen = CreatePen(PS_SOLID, 1, rgb);
318       break;
319     case CFU_UNDERLINEDOTTED:
320       hPen = CreatePen(PS_DOT, 1, rgb);
321       break;
322     default:
323       WINE_FIXME("Unknown underline type (%u)\n", s->fmt.bUnderlineType);
324       /* fall through */
325     case CFU_CF1UNDERLINE: /* this type is supported in the font, do nothing */
326     case CFU_UNDERLINENONE:
327       hPen = NULL;
328       break;
329     }
330     if (hPen)
331     {
332       hOldPen = SelectObject(hDC, hPen);
333     }
334   }
335
336   rgbOld = SetTextColor(hDC, rgb);
337   if (bHighlightedText && !c->editor->bEmulateVersion10)
338   {
339     COLORREF rgbBackOld;
340     RECT dim;
341     /* FIXME: should use textmetrics info for Descent info */
342     if (hPen)
343       MoveToEx(hDC, x, y - yOffset + 1, NULL);
344     if (xSelStart > x)
345     {
346       ExtTextOutW(hDC, x, y-yOffset, 0, NULL, szText, nSelFrom, NULL);
347       if (hPen)
348         LineTo(hDC, xSelStart, y - yOffset + 1);
349     }
350     dim.top = ymin;
351     dim.bottom = ymin + cy;
352     dim.left = xSelStart;
353     dim.right = xSelEnd;
354     SetTextColor(hDC, GetSysColor(COLOR_HIGHLIGHTTEXT));
355     rgbBackOld = SetBkColor(hDC, GetSysColor(COLOR_HIGHLIGHT));
356     ExtTextOutW(hDC, xSelStart, y-yOffset, ETO_OPAQUE, &dim,
357                 szText+nSelFrom, nSelTo-nSelFrom, lpDx);
358     if (hPen)
359       LineTo(hDC, xSelEnd, y - yOffset + 1);
360     SetBkColor(hDC, rgbBackOld);
361     if (xSelEnd < x + width)
362     {
363       SetTextColor(hDC, rgb);
364       ExtTextOutW(hDC, xSelEnd, y-yOffset, 0, NULL, szText+nSelTo,
365                   nChars-nSelTo, NULL);
366       if (hPen)
367         LineTo(hDC, x + width, y - yOffset + 1);
368     }
369   }
370   else
371   {
372     ExtTextOutW(hDC, x, y-yOffset, 0, NULL, szText, nChars, lpDx);
373
374     /* FIXME: should use textmetrics info for Descent info */
375     if (hPen)
376     {
377       MoveToEx(hDC, x, y - yOffset + 1, NULL);
378       LineTo(hDC, x + width, y - yOffset + 1);
379     }
380
381     if (bHighlightedText) /* v1.0 inverts the selection */
382     {
383       PatBlt(hDC, xSelStart, ymin, xSelEnd-xSelStart, cy, DSTINVERT);
384     }
385   }
386
387   if (hPen)
388   {
389     SelectObject(hDC, hOldPen);
390     DeleteObject(hPen);
391   }
392   SetTextColor(hDC, rgbOld);
393   ME_UnselectStyleFont(c, s, hOldFont);
394 }
395
396 static void ME_DebugWrite(HDC hDC, const POINT *pt, LPCWSTR szText) {
397   int align = SetTextAlign(hDC, TA_LEFT|TA_TOP);
398   HGDIOBJ hFont = SelectObject(hDC, GetStockObject(DEFAULT_GUI_FONT));
399   COLORREF color = SetTextColor(hDC, RGB(128,128,128));
400   TextOutW(hDC, pt->x, pt->y, szText, lstrlenW(szText));
401   SelectObject(hDC, hFont);
402   SetTextAlign(hDC, align);
403   SetTextColor(hDC, color);
404 }
405
406 static void ME_DrawRun(ME_Context *c, int x, int y, ME_DisplayItem *rundi, ME_Paragraph *para) 
407 {
408   ME_Run *run = &rundi->member.run;
409   ME_DisplayItem *start;
410   int runofs = run->nCharOfs+para->nCharOfs;
411   int nSelFrom, nSelTo;
412   const WCHAR wszSpace[] = {' ', 0};
413   
414   if (run->nFlags & MERF_HIDDEN)
415     return;
416
417   start = ME_FindItemBack(rundi, diStartRow);
418   ME_GetSelection(c->editor, &nSelFrom, &nSelTo);
419
420   /* Draw selected end-of-paragraph mark */
421   /* you can always comment it out if you need visible paragraph marks */
422   if (run->nFlags & MERF_ENDPARA)
423   {
424     if (runofs >= nSelFrom && runofs < nSelTo)
425     {
426       ME_HighlightSpace(c, x, y, wszSpace, 1, run->style, 0, 0, 1,
427                         c->pt.y + para->pt.y + start->member.row.pt.y,
428                         start->member.row.nHeight);
429     }
430     return;
431   }
432
433   if (run->nFlags & (MERF_TAB | MERF_ENDCELL))
434   {
435     /* wszSpace is used instead of the tab character because otherwise
436      * an unwanted symbol can be inserted instead. */
437     ME_DrawTextWithStyle(c, x, y, wszSpace, 1, run->style, run->nWidth,
438                          nSelFrom-runofs, nSelTo-runofs,
439                          c->pt.y + para->pt.y + start->member.row.pt.y,
440                          start->member.row.nHeight);
441     return;
442   }
443
444   if (run->nFlags & MERF_GRAPHICS)
445     ME_DrawOLE(c, x, y, run, para, (runofs >= nSelFrom) && (runofs < nSelTo));
446   else
447   {
448     if (c->editor->cPasswordMask)
449     {
450       ME_String *szMasked = ME_MakeStringR(c->editor->cPasswordMask,ME_StrVLen(run->strText));
451       ME_DrawTextWithStyle(c, x, y,
452         szMasked->szData, ME_StrVLen(szMasked), run->style, run->nWidth,
453         nSelFrom-runofs,nSelTo-runofs,
454         c->pt.y + para->pt.y + start->member.row.pt.y,
455         start->member.row.nHeight);
456       ME_DestroyString(szMasked);
457     }
458     else
459       ME_DrawTextWithStyle(c, x, y,
460         run->strText->szData, ME_StrVLen(run->strText), run->style, run->nWidth,
461         nSelFrom-runofs,nSelTo-runofs,
462         c->pt.y + para->pt.y + start->member.row.pt.y,
463         start->member.row.nHeight);
464   }
465 }
466
467 static const struct {unsigned width_num : 4, width_den : 4, pen_style : 4, dble : 1;} border_details[] = {
468   /* none */            {0, 1, PS_SOLID, FALSE},
469   /* 3/4 */             {3, 4, PS_SOLID, FALSE},
470   /* 1 1/2 */           {3, 2, PS_SOLID, FALSE},
471   /* 2 1/4 */           {9, 4, PS_SOLID, FALSE},
472   /* 3 */               {3, 1, PS_SOLID, FALSE},
473   /* 4 1/2 */           {9, 2, PS_SOLID, FALSE},
474   /* 6 */               {6, 1, PS_SOLID, FALSE},
475   /* 3/4 double */      {3, 4, PS_SOLID, TRUE},
476   /* 1 1/2 double */    {3, 2, PS_SOLID, TRUE},
477   /* 2 1/4 double */    {9, 4, PS_SOLID, TRUE},
478   /* 3/4 gray */        {3, 4, PS_DOT /* FIXME */, FALSE},
479   /* 1 1/2 dashed */    {3, 2, PS_DASH, FALSE},
480 };
481
482 static const COLORREF pen_colors[16] = {
483   /* Black */           RGB(0x00, 0x00, 0x00),  /* Blue */            RGB(0x00, 0x00, 0xFF),
484   /* Cyan */            RGB(0x00, 0xFF, 0xFF),  /* Green */           RGB(0x00, 0xFF, 0x00),
485   /* Magenta */         RGB(0xFF, 0x00, 0xFF),  /* Red */             RGB(0xFF, 0x00, 0x00),
486   /* Yellow */          RGB(0xFF, 0xFF, 0x00),  /* White */           RGB(0xFF, 0xFF, 0xFF),
487   /* Dark blue */       RGB(0x00, 0x00, 0x80),  /* Dark cyan */       RGB(0x00, 0x80, 0x80),
488   /* Dark green */      RGB(0x00, 0x80, 0x80),  /* Dark magenta */    RGB(0x80, 0x00, 0x80),
489   /* Dark red */        RGB(0x80, 0x00, 0x00),  /* Dark yellow */     RGB(0x80, 0x80, 0x00),
490   /* Dark gray */       RGB(0x80, 0x80, 0x80),  /* Light gray */      RGB(0xc0, 0xc0, 0xc0),
491 };
492
493 static int ME_GetBorderPenWidth(ME_TextEditor* editor, int idx)
494 {
495   int width;
496
497   if (editor->nZoomNumerator == 0)
498   {
499       width = border_details[idx].width_num + border_details[idx].width_den / 2;
500       width /= border_details[idx].width_den;
501   }
502   else
503   {
504       width = border_details[idx].width_num * editor->nZoomNumerator;
505       width += border_details[idx].width_den * editor->nZoomNumerator / 2;
506       width /= border_details[idx].width_den * editor->nZoomDenominator;
507   }
508   return width;
509 }
510
511 int  ME_GetParaBorderWidth(ME_TextEditor* editor, int flags)
512 {
513   int idx = (flags >> 8) & 0xF;
514   int width;
515
516   if (idx >= sizeof(border_details) / sizeof(border_details[0]))
517   {
518       FIXME("Unsupported border value %d\n", idx);
519       return 0;
520   }
521   width = ME_GetBorderPenWidth(editor, idx);
522   if (border_details[idx].dble) width = width * 2 + 1;
523   return width;
524 }
525
526 int  ME_GetParaLineSpace(ME_Context* c, ME_Paragraph* para)
527 {
528   int   sp = 0, ls = 0;
529   if (!(para->pFmt->dwMask & PFM_LINESPACING)) return 0;
530
531   /* FIXME: how to compute simply the line space in ls ??? */
532   /* FIXME: does line spacing include the line itself ??? */
533   switch (para->pFmt->bLineSpacingRule)
534   {
535   case 0:       sp = ls; break;
536   case 1:       sp = (3 * ls) / 2; break;
537   case 2:       sp = 2 * ls; break;
538   case 3:       sp = ME_twips2pointsY(c, para->pFmt->dyLineSpacing); if (sp < ls) sp = ls; break;
539   case 4:       sp = ME_twips2pointsY(c, para->pFmt->dyLineSpacing); break;
540   case 5:       sp = para->pFmt->dyLineSpacing / 20; break;
541   default: FIXME("Unsupported spacing rule value %d\n", para->pFmt->bLineSpacingRule);
542   }
543   if (c->editor->nZoomNumerator == 0)
544     return sp;
545   else
546     return sp * c->editor->nZoomNumerator / c->editor->nZoomDenominator;
547 }
548
549 static void ME_DrawParaDecoration(ME_Context* c, ME_Paragraph* para, int y, RECT* bounds)
550 {
551   int           idx, border_width, top_border, bottom_border;
552   RECT          rc;
553   BOOL          hasParaBorder;
554
555   SetRectEmpty(bounds);
556   if (!(para->pFmt->dwMask & (PFM_BORDER | PFM_SPACEBEFORE | PFM_SPACEAFTER))) return;
557
558   border_width = top_border = bottom_border = 0;
559   idx = (para->pFmt->wBorders >> 8) & 0xF;
560   hasParaBorder = (!(c->editor->bEmulateVersion10 &&
561                      para->pFmt->dwMask & PFM_TABLE &&
562                      para->pFmt->wEffects & PFE_TABLE) &&
563                    (para->pFmt->dwMask & PFM_BORDER) &&
564                     idx != 0 &&
565                     (para->pFmt->wBorders & 0xF));
566   if (hasParaBorder)
567   {
568     /* FIXME: wBorders is not stored as MSDN says in v1.0 - 4.1 of richedit
569      * controls. It actually stores the paragraph or row border style. Although
570      * the value isn't used for drawing, it is used for streaming out rich text.
571      *
572      * wBorders stores the border style for each side (top, left, bottom, right)
573      * using nibble (4 bits) to store each border style.  The rich text format
574      * control words, and their associated value are the following:
575      *   \brdrdash       0
576      *   \brdrdashsm     1
577      *   \brdrdb         2
578      *   \brdrdot        3
579      *   \brdrhair       4
580      *   \brdrs          5
581      *   \brdrth         6
582      *   \brdrtriple     7
583      *
584      * The order of the sides stored actually differs from v1.0 to 3.0 and v4.1.
585      * The mask corresponding to each side for the version are the following:
586      *     mask       v1.0-3.0    v4.1
587      *     0x000F     top         left
588      *     0x00F0     left        top
589      *     0x0F00     bottom      right
590      *     0xF000     right       bottom
591      */
592     if (para->pFmt->wBorders & 0x00B0)
593       FIXME("Unsupported border flags %x\n", para->pFmt->wBorders);
594     border_width = ME_GetParaBorderWidth(c->editor, para->pFmt->wBorders);
595     if (para->pFmt->wBorders & 4)       top_border = border_width;
596     if (para->pFmt->wBorders & 8)       bottom_border = border_width;
597   }
598
599   if (para->pFmt->dwMask & PFM_SPACEBEFORE)
600   {
601     rc.left = c->rcView.left;
602     rc.right = c->rcView.right;
603     rc.top = y;
604     bounds->top = ME_twips2pointsY(c, para->pFmt->dySpaceBefore);
605     rc.bottom = y + bounds->top + top_border;
606     FillRect(c->hDC, &rc, c->editor->hbrBackground);
607   }
608
609   if (para->pFmt->dwMask & PFM_SPACEAFTER)
610   {
611     rc.left = c->rcView.left;
612     rc.right = c->rcView.right;
613     rc.bottom = y + para->nHeight;
614     bounds->bottom = ME_twips2pointsY(c, para->pFmt->dySpaceAfter);
615     rc.top = rc.bottom - bounds->bottom - bottom_border;
616     FillRect(c->hDC, &rc, c->editor->hbrBackground);
617   }
618
619   /* Native richedit doesn't support paragraph borders in v1.0 - 4.1,
620    * but might support it in later versions. */
621   if (hasParaBorder) {
622     int         pen_width, rightEdge;
623     COLORREF    pencr;
624     HPEN        pen = NULL, oldpen = NULL;
625     POINT       pt;
626
627     if (para->pFmt->wBorders & 64) /* autocolor */
628       pencr = GetSysColor(COLOR_WINDOWTEXT);
629     else
630       pencr = pen_colors[(para->pFmt->wBorders >> 12) & 0xF];
631
632     rightEdge = c->pt.x + max(c->editor->sizeWindow.cx,
633                               c->editor->nTotalWidth);
634
635     pen_width = ME_GetBorderPenWidth(c->editor, idx);
636     pen = CreatePen(border_details[idx].pen_style, pen_width, pencr);
637     oldpen = SelectObject(c->hDC, pen);
638     MoveToEx(c->hDC, 0, 0, &pt);
639
640     /* before & after spaces are not included in border */
641
642     /* helper to draw the double lines in case of corner */
643 #define DD(x)   ((para->pFmt->wBorders & (x)) ? (pen_width + 1) : 0)
644
645     if (para->pFmt->wBorders & 1)
646     {
647       MoveToEx(c->hDC, c->pt.x, y + bounds->top, NULL);
648       LineTo(c->hDC, c->pt.x, y + para->nHeight - bounds->bottom);
649       if (border_details[idx].dble) {
650         rc.left = c->pt.x + 1;
651         rc.right = rc.left + border_width;
652         rc.top = y + bounds->top;
653         rc.bottom = y + para->nHeight - bounds->bottom;
654         FillRect(c->hDC, &rc, c->editor->hbrBackground);
655         MoveToEx(c->hDC, c->pt.x + pen_width + 1, y + bounds->top + DD(4), NULL);
656         LineTo(c->hDC, c->pt.x + pen_width + 1, y + para->nHeight - bounds->bottom - DD(8));
657       }
658       bounds->left += border_width;
659     }
660     if (para->pFmt->wBorders & 2)
661     {
662       MoveToEx(c->hDC, rightEdge - 1, y + bounds->top, NULL);
663       LineTo(c->hDC, rightEdge - 1, y + para->nHeight - bounds->bottom);
664       if (border_details[idx].dble) {
665         rc.left = rightEdge - pen_width - 1;
666         rc.right = rc.left + pen_width;
667         rc.top = y + bounds->top;
668         rc.bottom = y + para->nHeight - bounds->bottom;
669         FillRect(c->hDC, &rc, c->editor->hbrBackground);
670         MoveToEx(c->hDC, rightEdge - 1 - pen_width - 1, y + bounds->top + DD(4), NULL);
671         LineTo(c->hDC, rightEdge - 1 - pen_width - 1, y + para->nHeight - bounds->bottom - DD(8));
672       }
673       bounds->right += border_width;
674     }
675     if (para->pFmt->wBorders & 4)
676     {
677       MoveToEx(c->hDC, c->pt.x, y + bounds->top, NULL);
678       LineTo(c->hDC, rightEdge, y + bounds->top);
679       if (border_details[idx].dble) {
680         MoveToEx(c->hDC, c->pt.x + DD(1), y + bounds->top + pen_width + 1, NULL);
681         LineTo(c->hDC, rightEdge - DD(2), y + bounds->top + pen_width + 1);
682       }
683       bounds->top += border_width;
684     }
685     if (para->pFmt->wBorders & 8)
686     {
687       MoveToEx(c->hDC, c->pt.x, y + para->nHeight - bounds->bottom - 1, NULL);
688       LineTo(c->hDC, rightEdge, y + para->nHeight - bounds->bottom - 1);
689       if (border_details[idx].dble) {
690         MoveToEx(c->hDC, c->pt.x + DD(1), y + para->nHeight - bounds->bottom - 1 - pen_width - 1, NULL);
691         LineTo(c->hDC, rightEdge - DD(2), y + para->nHeight - bounds->bottom - 1 - pen_width - 1);
692       }
693       bounds->bottom += border_width;
694     }
695 #undef DD
696
697     MoveToEx(c->hDC, pt.x, pt.y, NULL);
698     SelectObject(c->hDC, oldpen);
699     DeleteObject(pen);
700   }
701 }
702
703 static void ME_DrawTableBorders(ME_Context *c, ME_DisplayItem *paragraph)
704 {
705   ME_Paragraph *para = &paragraph->member.para;
706   if (!c->editor->bEmulateVersion10) /* v4.1 */
707   {
708     if (para->pCell)
709     {
710       RECT rc;
711       ME_Cell *cell = &para->pCell->member.cell;
712       ME_DisplayItem *paraAfterRow;
713       HPEN pen, oldPen;
714       LOGBRUSH logBrush;
715       HBRUSH brush;
716       COLORREF color;
717       POINT oldPt;
718       int width;
719       BOOL atTop = (para->pCell != para->prev_para->member.para.pCell);
720       BOOL atBottom = (para->pCell != para->next_para->member.para.pCell);
721       int top = c->pt.y + (atTop ? cell->pt.y : para->pt.y);
722       int bottom = (atBottom ?
723                     c->pt.y + cell->pt.y + cell->nHeight :
724                     top + para->nHeight + (atTop ? cell->yTextOffset : 0));
725       rc.left = c->pt.x + cell->pt.x;
726       rc.right = rc.left + cell->nWidth;
727       if (atTop) {
728         /* Erase gap before text if not all borders are the same height. */
729         width = max(ME_twips2pointsY(c, cell->border.top.width), 1);
730         rc.top = top + width;
731         width = cell->yTextOffset - width;
732         rc.bottom = rc.top + width;
733         if (width) {
734           FillRect(c->hDC, &rc, c->editor->hbrBackground);
735         }
736       }
737       /* Draw cell borders.
738        * The order borders are draw in is left, top, bottom, right in order
739        * to be consistent with native richedit.  This is noticeable from the
740        * overlap of borders of different colours. */
741       if (!(para->nFlags & MEPF_ROWEND)) {
742         rc.top = top;
743         rc.bottom = bottom;
744         if (cell->border.left.width > 0)
745         {
746           color = cell->border.left.colorRef;
747           width = max(ME_twips2pointsX(c, cell->border.left.width), 1);
748         } else {
749           color = RGB(192,192,192);
750           width = 1;
751         }
752         logBrush.lbStyle = BS_SOLID;
753         logBrush.lbColor = color;
754         logBrush.lbHatch = 0;
755         pen = ExtCreatePen(PS_GEOMETRIC|PS_SOLID|PS_ENDCAP_FLAT|PS_JOIN_MITER,
756                            width, &logBrush, 0, NULL);
757         oldPen = SelectObject(c->hDC, pen);
758         MoveToEx(c->hDC, rc.left, rc.top, &oldPt);
759         LineTo(c->hDC, rc.left, rc.bottom);
760         SelectObject(c->hDC, oldPen);
761         DeleteObject(pen);
762         MoveToEx(c->hDC, oldPt.x, oldPt.y, NULL);
763       }
764
765       if (atTop) {
766         if (cell->border.top.width > 0)
767         {
768           brush = CreateSolidBrush(cell->border.top.colorRef);
769           width = max(ME_twips2pointsY(c, cell->border.top.width), 1);
770         } else {
771           brush = GetStockObject(LTGRAY_BRUSH);
772           width = 1;
773         }
774         rc.top = top;
775         rc.bottom = rc.top + width;
776         FillRect(c->hDC, &rc, brush);
777         if (cell->border.top.width > 0)
778           DeleteObject(brush);
779       }
780
781       /* Draw the bottom border if at the last paragraph in the cell, and when
782        * in the last row of the table. */
783       if (atBottom) {
784         int oldLeft = rc.left;
785         width = max(ME_twips2pointsY(c, cell->border.bottom.width), 1);
786         paraAfterRow = ME_GetTableRowEnd(paragraph)->member.para.next_para;
787         if (paraAfterRow->member.para.nFlags & MEPF_ROWSTART) {
788           ME_DisplayItem *nextEndCell;
789           nextEndCell = ME_FindItemBack(ME_GetTableRowEnd(paraAfterRow), diCell);
790           assert(nextEndCell && !nextEndCell->member.cell.next_cell);
791           rc.left = c->pt.x + nextEndCell->member.cell.pt.x;
792           /* FIXME: Native draws FROM the bottom of the table rather than
793            * TO the bottom of the table in this case, but just doing so here
794            * will cause the next row to erase the border. */
795           /*
796           rc.top = bottom;
797           rc.bottom = rc.top + width;
798            */
799         }
800         if (rc.left < rc.right) {
801           if (cell->border.bottom.width > 0) {
802             brush = CreateSolidBrush(cell->border.bottom.colorRef);
803           } else {
804             brush = GetStockObject(LTGRAY_BRUSH);
805           }
806           rc.bottom = bottom;
807           rc.top = rc.bottom - width;
808           FillRect(c->hDC, &rc, brush);
809           if (cell->border.bottom.width > 0)
810             DeleteObject(brush);
811         }
812         rc.left = oldLeft;
813       }
814
815       /* Right border only drawn if at the end of the table row. */
816       if (!cell->next_cell->member.cell.next_cell &&
817           !(para->nFlags & MEPF_ROWSTART))
818       {
819         rc.top = top;
820         rc.bottom = bottom;
821         if (cell->border.right.width > 0) {
822           color = cell->border.right.colorRef;
823           width = max(ME_twips2pointsX(c, cell->border.right.width), 1);
824         } else {
825           color = RGB(192,192,192);
826           width = 1;
827         }
828         logBrush.lbStyle = BS_SOLID;
829         logBrush.lbColor = color;
830         logBrush.lbHatch = 0;
831         pen = ExtCreatePen(PS_GEOMETRIC|PS_SOLID|PS_ENDCAP_FLAT|PS_JOIN_MITER,
832                            width, &logBrush, 0, NULL);
833         oldPen = SelectObject(c->hDC, pen);
834         MoveToEx(c->hDC, rc.right - 1, rc.top, &oldPt);
835         LineTo(c->hDC, rc.right - 1, rc.bottom);
836         SelectObject(c->hDC, oldPen);
837         DeleteObject(pen);
838         MoveToEx(c->hDC, oldPt.x, oldPt.y, NULL);
839       }
840     }
841   } else { /* v1.0 - 3.0 */
842     /* Draw simple table border */
843     if (para->pFmt->dwMask & PFM_TABLE && para->pFmt->wEffects & PFE_TABLE) {
844       HPEN pen = NULL, oldpen = NULL;
845       int i, firstX, startX, endX, rowY, rowBottom, nHeight;
846       POINT oldPt;
847       PARAFORMAT2 *pNextFmt;
848
849       pen = CreatePen(PS_SOLID, 0, para->border.top.colorRef);
850       oldpen = SelectObject(c->hDC, pen);
851
852       /* Find the start relative to the text */
853       firstX = c->pt.x + ME_FindItemFwd(paragraph, diRun)->member.run.pt.x;
854       /* Go back by the horizontal gap, which is stored in dxOffset */
855       firstX -= ME_twips2pointsX(c, para->pFmt->dxOffset);
856       /* The left edge, stored in dxStartIndent affected just the first edge */
857       startX = firstX - ME_twips2pointsX(c, para->pFmt->dxStartIndent);
858       rowY = c->pt.y + para->pt.y;
859       if (para->pFmt->dwMask & PFM_SPACEBEFORE)
860         rowY += ME_twips2pointsY(c, para->pFmt->dySpaceBefore);
861       nHeight = ME_FindItemFwd(paragraph, diStartRow)->member.row.nHeight;
862       rowBottom = rowY + nHeight;
863
864       /* Draw horizontal lines */
865       MoveToEx(c->hDC, firstX, rowY, &oldPt);
866       i = para->pFmt->cTabCount - 1;
867       endX = startX + ME_twips2pointsX(c, para->pFmt->rgxTabs[i] & 0x00ffffff) + 1;
868       LineTo(c->hDC, endX, rowY);
869       pNextFmt = para->next_para->member.para.pFmt;
870       /* The bottom of the row only needs to be drawn if the next row is
871        * not a table. */
872       if (!(pNextFmt && pNextFmt->dwMask & PFM_TABLE && pNextFmt->wEffects &&
873             para->nRows == 1))
874       {
875         /* Decrement rowBottom to draw the bottom line within the row, and
876          * to not draw over this line when drawing the vertical lines. */
877         rowBottom--;
878         MoveToEx(c->hDC, firstX, rowBottom, NULL);
879         LineTo(c->hDC, endX, rowBottom);
880       }
881
882       /* Draw vertical lines */
883       MoveToEx(c->hDC, firstX, rowY, NULL);
884       LineTo(c->hDC, firstX, rowBottom);
885       for (i = 0; i < para->pFmt->cTabCount; i++)
886       {
887         int rightBoundary = para->pFmt->rgxTabs[i] & 0x00ffffff;
888         endX = startX + ME_twips2pointsX(c, rightBoundary);
889         MoveToEx(c->hDC, endX, rowY, NULL);
890         LineTo(c->hDC, endX, rowBottom);
891       }
892
893       MoveToEx(c->hDC, oldPt.x, oldPt.y, NULL);
894       SelectObject(c->hDC, oldpen);
895       DeleteObject(pen);
896     }
897   }
898 }
899
900 static void ME_DrawParagraph(ME_Context *c, ME_DisplayItem *paragraph)
901 {
902   int align = SetTextAlign(c->hDC, TA_BASELINE);
903   ME_DisplayItem *p;
904   ME_Run *run;
905   ME_Paragraph *para = NULL;
906   RECT rc, bounds;
907   int y;
908   int height = 0, baseline = 0, no=0;
909   BOOL visible = FALSE;
910
911   rc.left = c->pt.x;
912   rc.right = c->rcView.right;
913
914   assert(paragraph);
915   para = &paragraph->member.para;
916   y = c->pt.y + para->pt.y;
917   if (para->pCell)
918   {
919     ME_Cell *cell = &para->pCell->member.cell;
920     rc.left = c->pt.x + cell->pt.x;
921     rc.right = rc.left + cell->nWidth;
922   }
923   if (para->nFlags & MEPF_ROWSTART) {
924     ME_Cell *cell = &para->next_para->member.para.pCell->member.cell;
925     rc.right = c->pt.x + cell->pt.x;
926   } else if (para->nFlags & MEPF_ROWEND) {
927     ME_Cell *cell = &para->prev_para->member.para.pCell->member.cell;
928     rc.left = c->pt.x + cell->pt.x + cell->nWidth;
929   }
930   ME_DrawParaDecoration(c, para, y, &bounds);
931   y += bounds.top;
932   if (bounds.left || bounds.right) {
933     rc.left = max(rc.left, c->pt.x + bounds.left);
934     rc.right = min(rc.right, c->pt.x - bounds.right
935                              + max(c->editor->sizeWindow.cx,
936                                    c->editor->nTotalWidth));
937   }
938
939   for (p = paragraph->next; p != para->next_para; p = p->next)
940   {
941     switch(p->type) {
942       case diParagraph:
943         assert(FALSE);
944         break;
945       case diStartRow:
946         y += height;
947         rc.top = y;
948         if (para->nFlags & (MEPF_ROWSTART|MEPF_ROWEND)) {
949           rc.bottom = y + para->nHeight;
950         } else {
951           rc.bottom = y + p->member.row.nHeight;
952         }
953         visible = RectVisible(c->hDC, &rc);
954         if (visible) {
955           FillRect(c->hDC, &rc, c->editor->hbrBackground);
956         }
957         if (bounds.right)
958         {
959           /* If scrolled to the right past the end of the text, then
960            * there may be space to the right of the paragraph border. */
961           RECT rcAfterBrdr = rc;
962           rcAfterBrdr.left = rc.right + bounds.right;
963           rcAfterBrdr.right = c->rcView.right;
964           if (RectVisible(c->hDC, &rcAfterBrdr))
965             FillRect(c->hDC, &rcAfterBrdr, c->editor->hbrBackground);
966         }
967         if (me_debug)
968         {
969           const WCHAR wszRowDebug[] = {'r','o','w','[','%','d',']',0};
970           WCHAR buf[128];
971           POINT pt = c->pt;
972           wsprintfW(buf, wszRowDebug, no);
973           pt.y = 12+y;
974           ME_DebugWrite(c->hDC, &pt, buf);
975         }
976
977         height = p->member.row.nHeight;
978         baseline = p->member.row.nBaseline;
979         break;
980       case diRun:
981         assert(para);
982         run = &p->member.run;
983         if (visible && me_debug) {
984           RECT rc;
985           rc.left = c->pt.x + run->pt.x;
986           rc.right = rc.left + run->nWidth;
987           rc.top = c->pt.y + para->pt.y + run->pt.y;
988           rc.bottom = rc.bottom + height;
989           TRACE("rc = (%d, %d, %d, %d)\n", rc.left, rc.top, rc.right, rc.bottom);
990           if (run->nFlags & MERF_SKIPPED)
991             DrawFocusRect(c->hDC, &rc);
992           else
993             FrameRect(c->hDC, &rc, GetSysColorBrush(COLOR_GRAYTEXT));
994         }
995         if (visible)
996           ME_DrawRun(c, c->pt.x + run->pt.x,
997                      c->pt.y + para->pt.y + run->pt.y + baseline, p, para);
998         if (me_debug)
999         {
1000           /* I'm using %ls, hope wsprintfW is not going to use wrong (4-byte) WCHAR version */
1001           const WCHAR wszRunDebug[] = {'[','%','d',':','%','x',']',' ','%','l','s',0};
1002           WCHAR buf[2560];
1003           POINT pt;
1004           pt.x = c->pt.x + run->pt.x;
1005           pt.y = c->pt.y + para->pt.y + run->pt.y;
1006           wsprintfW(buf, wszRunDebug, no, p->member.run.nFlags, p->member.run.strText->szData);
1007           ME_DebugWrite(c->hDC, &pt, buf);
1008         }
1009         break;
1010       case diCell:
1011         /* Clear any space at the bottom of the cell after the text. */
1012         if (para->nFlags & (MEPF_ROWSTART|MEPF_ROWEND))
1013           break;
1014         y += height;
1015         rc.top = c->pt.y + para->pt.y + para->nHeight;
1016         rc.bottom = c->pt.y + p->member.cell.pt.y + p->member.cell.nHeight;
1017         if (RectVisible(c->hDC, &rc))
1018         {
1019           FillRect(c->hDC, &rc, c->editor->hbrBackground);
1020         }
1021         break;
1022       default:
1023         break;
1024     }
1025     no++;
1026   }
1027
1028   ME_DrawTableBorders(c, paragraph);
1029
1030   SetTextAlign(c->hDC, align);
1031 }
1032
1033 void ME_ScrollAbs(ME_TextEditor *editor, int x, int y)
1034 {
1035   LONG winStyle;
1036   BOOL bScrollBarIsVisible, bScrollBarWillBeVisible;
1037   int scrollX = 0, scrollY = 0;
1038
1039   if (editor->horz_si.nPos != x) {
1040     x = min(x, editor->horz_si.nMax);
1041     x = max(x, editor->horz_si.nMin);
1042     SetScrollPos(editor->hWnd, SB_HORZ, x, TRUE);
1043     scrollX = editor->horz_si.nPos - x;
1044     editor->horz_si.nPos = x;
1045   }
1046
1047   if (editor->vert_si.nPos != y) {
1048     y = min(y, editor->vert_si.nMax - (int)editor->vert_si.nPage);
1049     y = max(y, editor->vert_si.nMin);
1050     SetScrollPos(editor->hWnd, SB_VERT, y, TRUE);
1051     scrollY = editor->vert_si.nPos - y;
1052     editor->vert_si.nPos = y;
1053   }
1054
1055   if (abs(scrollX) > editor->sizeWindow.cx ||
1056       abs(scrollY) > editor->sizeWindow.cy)
1057     InvalidateRect(editor->hWnd, NULL, TRUE);
1058   else
1059     ScrollWindowEx(editor->hWnd, scrollX, scrollY, &editor->rcFormat,
1060                    &editor->rcFormat, NULL, NULL, SW_INVALIDATE);
1061   ME_Repaint(editor);
1062
1063   winStyle = GetWindowLongW(editor->hWnd, GWL_STYLE);
1064   bScrollBarIsVisible = (winStyle & WS_HSCROLL) != 0;
1065   bScrollBarWillBeVisible = (editor->nTotalWidth > editor->sizeWindow.cx)
1066                             || (editor->styleFlags & ES_DISABLENOSCROLL);
1067   if (bScrollBarIsVisible != bScrollBarWillBeVisible)
1068     ShowScrollBar(editor->hWnd, SB_HORZ, bScrollBarWillBeVisible);
1069
1070   bScrollBarIsVisible = (winStyle & WS_VSCROLL) != 0;
1071   bScrollBarWillBeVisible = (editor->nTotalLength > editor->sizeWindow.cy)
1072                             || (editor->styleFlags & ES_DISABLENOSCROLL);
1073   if (bScrollBarIsVisible != bScrollBarWillBeVisible)
1074     ShowScrollBar(editor->hWnd, SB_VERT, bScrollBarWillBeVisible);
1075
1076   ME_UpdateScrollBar(editor);
1077 }
1078
1079 void ME_HScrollAbs(ME_TextEditor *editor, int x)
1080 {
1081   ME_ScrollAbs(editor, x, editor->vert_si.nPos);
1082 }
1083
1084 void ME_VScrollAbs(ME_TextEditor *editor, int y)
1085 {
1086   ME_ScrollAbs(editor, editor->horz_si.nPos, y);
1087 }
1088
1089 void ME_ScrollUp(ME_TextEditor *editor, int cy)
1090 {
1091   ME_VScrollAbs(editor, editor->vert_si.nPos - cy);
1092 }
1093
1094 void ME_ScrollDown(ME_TextEditor *editor, int cy)
1095 {
1096   ME_VScrollAbs(editor, editor->vert_si.nPos + cy);
1097 }
1098
1099 void ME_ScrollLeft(ME_TextEditor *editor, int cx)
1100 {
1101   ME_HScrollAbs(editor, editor->horz_si.nPos - cx);
1102 }
1103
1104 void ME_ScrollRight(ME_TextEditor *editor, int cx)
1105 {
1106   ME_HScrollAbs(editor, editor->horz_si.nPos + cx);
1107 }
1108
1109 void ME_UpdateScrollBar(ME_TextEditor *editor)
1110 {
1111   /* Note that this is the only function that should ever call
1112    * SetScrollInfo with SIF_PAGE or SIF_RANGE. */
1113
1114   SCROLLINFO si;
1115   BOOL bScrollBarWasVisible, bScrollBarWillBeVisible;
1116
1117   if (ME_WrapMarkedParagraphs(editor))
1118     FIXME("ME_UpdateScrollBar had to call ME_WrapMarkedParagraphs\n");
1119
1120   si.cbSize = sizeof(si);
1121   si.fMask = SIF_PAGE | SIF_RANGE | SIF_POS;
1122   if (editor->styleFlags & ES_DISABLENOSCROLL)
1123     si.fMask |= SIF_DISABLENOSCROLL;
1124
1125   /* Update horizontal scrollbar */
1126   bScrollBarWasVisible = editor->horz_si.nMax > editor->horz_si.nPage;
1127   bScrollBarWillBeVisible = editor->nTotalWidth > editor->sizeWindow.cx;
1128   if (editor->horz_si.nPos && !bScrollBarWillBeVisible)
1129   {
1130     ME_HScrollAbs(editor, 0);
1131     /* ME_HScrollAbs will call this function,
1132      * so nothing else needs to be done here. */
1133     return;
1134   }
1135
1136   si.nMin = 0;
1137   si.nMax = editor->nTotalWidth;
1138   si.nPos = editor->horz_si.nPos;
1139   si.nPage = editor->sizeWindow.cx;
1140
1141   if (si.nMin != editor->horz_si.nMin ||
1142       si.nMax != editor->horz_si.nMax ||
1143       si.nPage != editor->horz_si.nPage)
1144   {
1145     TRACE("min=%d max=%d page=%d\n", si.nMin, si.nMax, si.nPage);
1146     editor->horz_si.nMin = si.nMin;
1147     editor->horz_si.nMax = si.nMax;
1148     editor->horz_si.nPage = si.nPage;
1149     if (bScrollBarWillBeVisible || bScrollBarWasVisible)
1150       SetScrollInfo(editor->hWnd, SB_HORZ, &si, TRUE);
1151   }
1152
1153   if (si.fMask & SIF_DISABLENOSCROLL)
1154     bScrollBarWillBeVisible = TRUE;
1155
1156   if (bScrollBarWasVisible != bScrollBarWillBeVisible)
1157     ShowScrollBar(editor->hWnd, SB_HORZ, bScrollBarWillBeVisible);
1158
1159   /* Update vertical scrollbar */
1160   bScrollBarWasVisible = editor->vert_si.nMax > editor->vert_si.nPage;
1161   bScrollBarWillBeVisible = editor->nTotalLength > editor->sizeWindow.cy;
1162
1163   if (editor->vert_si.nPos && !bScrollBarWillBeVisible)
1164   {
1165     ME_VScrollAbs(editor, 0);
1166     /* ME_VScrollAbs will call this function,
1167      * so nothing else needs to be done here. */
1168     return;
1169   }
1170
1171   si.nMax = editor->nTotalLength;
1172   si.nPos = editor->vert_si.nPos;
1173   si.nPage = editor->sizeWindow.cy;
1174
1175   if (si.nMin != editor->vert_si.nMin ||
1176       si.nMax != editor->vert_si.nMax ||
1177       si.nPage != editor->vert_si.nPage)
1178   {
1179     TRACE("min=%d max=%d page=%d\n", si.nMin, si.nMax, si.nPage);
1180     editor->vert_si.nMin = si.nMin;
1181     editor->vert_si.nMax = si.nMax;
1182     editor->vert_si.nPage = si.nPage;
1183     if (bScrollBarWillBeVisible || bScrollBarWasVisible)
1184       SetScrollInfo(editor->hWnd, SB_VERT, &si, TRUE);
1185   }
1186
1187   if (si.fMask & SIF_DISABLENOSCROLL)
1188     bScrollBarWillBeVisible = TRUE;
1189
1190   if (bScrollBarWasVisible != bScrollBarWillBeVisible)
1191     ShowScrollBar(editor->hWnd, SB_VERT, bScrollBarWillBeVisible);
1192 }
1193
1194 void ME_EnsureVisible(ME_TextEditor *editor, ME_Cursor *pCursor)
1195 {
1196   ME_Run *pRun = &pCursor->pRun->member.run;
1197   ME_DisplayItem *pRow = ME_FindItemBack(pCursor->pRun, diStartRow);
1198   ME_DisplayItem *pPara = ME_FindItemBack(pCursor->pRun, diParagraph);
1199   int x, y, yheight;
1200
1201   assert(pRow);
1202   assert(pPara);
1203
1204   x = pRun->pt.x + ME_PointFromChar(editor, pRun, pCursor->nOffset);
1205   if (x > editor->horz_si.nPos + editor->sizeWindow.cx)
1206     x = x + 1 - editor->sizeWindow.cx;
1207   else if (x > editor->horz_si.nPos)
1208     x = editor->horz_si.nPos;
1209
1210   y = pPara->member.para.pt.y + pRow->member.row.pt.y;
1211   yheight = pRow->member.row.nHeight;
1212
1213   if (y < editor->vert_si.nPos)
1214     ME_ScrollAbs(editor, x, y);
1215   else if (y + yheight > editor->vert_si.nPos + editor->sizeWindow.cy)
1216     ME_ScrollAbs(editor, x, y + yheight - editor->sizeWindow.cy);
1217   else if (x != editor->horz_si.nPos)
1218     ME_ScrollAbs(editor, x, editor->vert_si.nPos);
1219 }
1220
1221
1222 void
1223 ME_InvalidateFromOfs(ME_TextEditor *editor, int nCharOfs)
1224 {
1225   RECT rc;
1226   int x, y, height;
1227   ME_Cursor tmp;
1228
1229   ME_RunOfsFromCharOfs(editor, nCharOfs, &tmp.pRun, &tmp.nOffset);
1230   ME_GetCursorCoordinates(editor, &tmp, &x, &y, &height);
1231
1232   rc.left = 0;
1233   rc.top = y;
1234   rc.bottom = y + height;
1235   rc.right = editor->rcFormat.right;
1236   InvalidateRect(editor->hWnd, &rc, FALSE);
1237 }
1238
1239
1240 void
1241 ME_InvalidateSelection(ME_TextEditor *editor)
1242 {
1243   ME_DisplayItem *para1, *para2;
1244   int nStart, nEnd;
1245   int len = ME_GetTextLength(editor);
1246
1247   ME_GetSelection(editor, &nStart, &nEnd);
1248   /* if both old and new selection are 0-char (= caret only), then
1249   there's no (inverted) area to be repainted, neither old nor new */
1250   if (nStart == nEnd && editor->nLastSelStart == editor->nLastSelEnd)
1251     return;
1252   ME_WrapMarkedParagraphs(editor);
1253   ME_GetSelectionParas(editor, &para1, &para2);
1254   assert(para1->type == diParagraph);
1255   assert(para2->type == diParagraph);
1256   /* last selection markers aren't always updated, which means
1257   they can point past the end of the document */ 
1258   if (editor->nLastSelStart > len || editor->nLastSelEnd > len) {
1259     ME_MarkForPainting(editor,
1260         ME_FindItemFwd(editor->pBuffer->pFirst, diParagraph),
1261         ME_FindItemFwd(editor->pBuffer->pFirst, diTextEnd));
1262   } else {
1263     /* if the start part of selection is being expanded or contracted... */
1264     if (nStart < editor->nLastSelStart) {
1265       ME_MarkForPainting(editor, para1, ME_FindItemFwd(editor->pLastSelStartPara, diParagraphOrEnd));
1266     } else
1267     if (nStart > editor->nLastSelStart) {
1268       ME_MarkForPainting(editor, editor->pLastSelStartPara, ME_FindItemFwd(para1, diParagraphOrEnd));
1269     }
1270
1271     /* if the end part of selection is being contracted or expanded... */
1272     if (nEnd < editor->nLastSelEnd) {
1273       ME_MarkForPainting(editor, para2, ME_FindItemFwd(editor->pLastSelEndPara, diParagraphOrEnd));
1274     } else
1275     if (nEnd > editor->nLastSelEnd) {
1276       ME_MarkForPainting(editor, editor->pLastSelEndPara, ME_FindItemFwd(para2, diParagraphOrEnd));
1277     }
1278   }
1279
1280   ME_InvalidateMarkedParagraphs(editor);
1281   /* remember the last invalidated position */
1282   ME_GetSelection(editor, &editor->nLastSelStart, &editor->nLastSelEnd);
1283   ME_GetSelectionParas(editor, &editor->pLastSelStartPara, &editor->pLastSelEndPara);
1284   assert(editor->pLastSelStartPara->type == diParagraph);
1285   assert(editor->pLastSelEndPara->type == diParagraph);
1286 }
1287
1288 void
1289 ME_QueueInvalidateFromCursor(ME_TextEditor *editor, int nCursor)
1290 {
1291   editor->nInvalidOfs = ME_GetCursorOfs(editor, nCursor);
1292 }
1293
1294
1295 BOOL
1296 ME_SetZoom(ME_TextEditor *editor, int numerator, int denominator)
1297 {
1298   /* TODO: Zoom images and objects */
1299
1300   if (numerator == 0 && denominator == 0)
1301   {
1302     editor->nZoomNumerator = editor->nZoomDenominator = 0;
1303     return TRUE;
1304   }
1305   if (numerator <= 0 || denominator <= 0)
1306     return FALSE;
1307   if (numerator * 64 <= denominator || numerator / denominator >= 64)
1308     return FALSE;
1309
1310   editor->nZoomNumerator = numerator;
1311   editor->nZoomDenominator = denominator;
1312
1313   ME_RewrapRepaint(editor);
1314   return TRUE;
1315 }