Added EM_GETZOOM and EM_SETZOOM RichEdit message handlers.
[wine] / dlls / riched20 / paint.c
1 /*
2  * RichEdit - painting functions
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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #include "editor.h"
22
23 WINE_DEFAULT_DEBUG_CHANNEL(richedit);
24
25 void ME_PaintContent(ME_TextEditor *editor, HDC hDC, BOOL bOnlyNew, RECT *rcUpdate) {
26   ME_DisplayItem *item;
27   ME_Context c;
28   int yoffset;
29
30   editor->nSequence++;
31   yoffset = ME_GetYScrollPos(editor);
32   ME_InitContext(&c, editor, hDC);
33   SetBkMode(hDC, TRANSPARENT);
34   ME_MoveCaret(editor);
35   item = editor->pBuffer->pFirst->next;
36   c.pt.y -= yoffset;
37   while(item != editor->pBuffer->pLast) {
38     int ye;
39     assert(item->type == diParagraph);
40     ye = c.pt.y + item->member.para.nHeight;
41     if (!bOnlyNew || (item->member.para.nFlags & MEPF_REPAINT))
42     {
43       BOOL bPaint = (rcUpdate == NULL);
44       if (rcUpdate)
45         bPaint = c.pt.y<rcUpdate->bottom && 
46           c.pt.y+item->member.para.nHeight>rcUpdate->top;
47       if (bPaint)
48       {
49         ME_DrawParagraph(&c, item);
50         if (!rcUpdate || (rcUpdate->top<=c.pt.y && rcUpdate->bottom>=ye))
51           item->member.para.nFlags &= ~MEPF_REPAINT;
52       }
53     }
54     c.pt.y = ye;
55     item = item->member.para.next_para;
56   }
57   if (c.pt.y<c.rcView.bottom) {
58     RECT rc;
59     int xs = c.rcView.left, xe = c.rcView.right;
60     int ys = c.pt.y, ye = c.rcView.bottom;
61     
62     if (bOnlyNew)
63     {
64       int y1 = editor->nTotalLength-yoffset, y2 = editor->nLastTotalLength-yoffset;
65       if (y1<y2)
66         ys = y1, ye = y2+1;
67       else
68         ys = ye;
69     }
70     
71     if (rcUpdate && ys!=ye)
72     {
73       xs = rcUpdate->left, xe = rcUpdate->right;
74       if (rcUpdate->top > ys)
75         ys = rcUpdate->top;
76       if (rcUpdate->bottom < ye)
77         ye = rcUpdate->bottom;
78     }
79
80     if (ye>ys) {
81       HBRUSH hbr;
82       hbr = CreateSolidBrush(ME_GetBackColor(c.editor));
83       rc.left = xs;
84       rc.top = ys;
85       rc.right = xe;
86       rc.bottom = ye;
87       FillRect(hDC, &rc, hbr);
88       DeleteObject(hbr);
89     }
90     if (ys == c.pt.y) /* don't overwrite the top bar */
91       ys++;
92   }
93   editor->nLastTotalLength = editor->nTotalLength;
94   ME_DestroyContext(&c);
95 }
96
97 static void ME_MarkParagraphRange(ME_TextEditor *editor, ME_DisplayItem *p1,
98                            ME_DisplayItem *p2, int nFlags)
99 {
100   ME_DisplayItem *p3;  
101   if (p1 == p2)
102   {
103     p1->member.para.nFlags |= nFlags;
104     return;
105   }
106   if (p1->member.para.nCharOfs > p2->member.para.nCharOfs)
107     p3 = p1, p1 = p2, p2 = p3;
108     
109   p1->member.para.nFlags |= nFlags;
110   do {
111     p1 = p1->member.para.next_para;
112     p1->member.para.nFlags |= nFlags;
113   } while (p1 != p2);
114 }
115
116 static void ME_MarkOffsetRange(ME_TextEditor *editor, int from, int to, int nFlags)
117 {
118   ME_Cursor c1, c2;
119   ME_CursorFromCharOfs(editor, from, &c1);
120   ME_CursorFromCharOfs(editor, to, &c2);
121   
122   ME_MarkParagraphRange(editor, ME_GetParagraph(c1.pRun), ME_GetParagraph(c2.pRun), nFlags);
123 }
124
125 static void ME_MarkSelectionForRepaint(ME_TextEditor *editor)
126 {
127   int from, to, from2, to2, end;
128   
129   end = ME_GetTextLength(editor);
130   ME_GetSelection(editor, &from, &to);
131   from2 = editor->nLastSelStart;
132   to2 = editor->nLastSelEnd;
133   if (from<from2) ME_MarkOffsetRange(editor, from, from2, MEPF_REPAINT);
134   if (from>from2) ME_MarkOffsetRange(editor, from2, from, MEPF_REPAINT);
135   if (to<to2) ME_MarkOffsetRange(editor, to, to2, MEPF_REPAINT);
136   if (to>to2) ME_MarkOffsetRange(editor, to2, to, MEPF_REPAINT);
137
138   editor->nLastSelStart = from;
139   editor->nLastSelEnd = to;
140 }
141
142 void ME_Repaint(ME_TextEditor *editor)
143 {
144   ME_Cursor *pCursor = &editor->pCursors[0];
145   ME_DisplayItem *pRun = NULL;
146   int nOffset = -1;
147   HDC hDC;
148   int nCharOfs = ME_CharOfsFromRunOfs(editor, pCursor->pRun, pCursor->nOffset);
149   
150   ME_RunOfsFromCharOfs(editor, nCharOfs, &pRun, &nOffset);
151   assert(pRun == pCursor->pRun);
152   assert(nOffset == pCursor->nOffset);
153   ME_MarkSelectionForRepaint(editor);
154   if (ME_WrapMarkedParagraphs(editor)) {
155     ME_UpdateScrollBar(editor);
156   }
157   hDC = GetDC(editor->hWnd);
158   ME_HideCaret(editor);
159   ME_PaintContent(editor, hDC, TRUE, NULL);
160   ReleaseDC(editor->hWnd, hDC);
161   ME_ShowCaret(editor);
162   ME_EnsureVisible(editor, pCursor->pRun);
163 }
164
165 void ME_UpdateRepaint(ME_TextEditor *editor)
166 {
167 /*
168   InvalidateRect(editor->hWnd, NULL, TRUE);
169   */
170   ME_SendOldNotify(editor, EN_CHANGE);
171   ME_Repaint(editor);
172   ME_SendOldNotify(editor, EN_UPDATE);
173   ME_SendSelChange(editor);
174 }
175
176
177 void
178 ME_RewrapRepaint(ME_TextEditor *editor)
179 {
180   ME_MarkAllForWrapping(editor);
181   ME_WrapMarkedParagraphs(editor);
182   ME_UpdateScrollBar(editor);
183   ME_Repaint(editor);
184 }
185
186
187 static void ME_DrawTextWithStyle(ME_Context *c, int x, int y, LPCWSTR szText, int nChars, 
188   ME_Style *s, int *width, int nSelFrom, int nSelTo, int ymin, int cy) {
189   HDC hDC = c->hDC;
190   HGDIOBJ hOldFont;
191   COLORREF rgbOld, rgbBack;
192   int yOffset = 0, yTwipsOffset = 0;
193   hOldFont = ME_SelectStyleFont(c->editor, hDC, s);
194   rgbBack = ME_GetBackColor(c->editor);
195   if ((s->fmt.dwMask & CFM_COLOR) && (s->fmt.dwEffects & CFE_AUTOCOLOR))
196     rgbOld = SetTextColor(hDC, GetSysColor(COLOR_WINDOWTEXT));
197   else
198     rgbOld = SetTextColor(hDC, s->fmt.crTextColor);
199   if ((s->fmt.dwMask & s->fmt.dwEffects) & CFM_OFFSET) {
200     yTwipsOffset = s->fmt.yOffset;
201   }
202   if ((s->fmt.dwMask & s->fmt.dwEffects) & (CFM_SUPERSCRIPT | CFM_SUBSCRIPT)) {
203     if (s->fmt.dwEffects & CFE_SUPERSCRIPT) yTwipsOffset = s->fmt.yHeight/3;
204     if (s->fmt.dwEffects & CFE_SUBSCRIPT) yTwipsOffset = -s->fmt.yHeight/12;
205   }
206   if (yTwipsOffset)
207   {
208     int numerator = 1;
209     int denominator = 1;
210     
211     if (c->editor->nZoomNumerator)
212     {
213       numerator = c->editor->nZoomNumerator;
214       denominator = c->editor->nZoomDenominator;
215     }
216     yOffset = yTwipsOffset * GetDeviceCaps(hDC, LOGPIXELSY) * numerator / denominator / 1440;
217   }
218   ExtTextOutW(hDC, x, y-yOffset, 0, NULL, szText, nChars, NULL);
219   if (width) {
220     SIZE sz;
221     GetTextExtentPoint32W(hDC, szText, nChars, &sz);
222     *width = sz.cx;
223   }
224   if (nSelFrom < nChars && nSelTo >= 0 && nSelFrom<nSelTo)
225   {
226     SIZE sz;
227     if (nSelFrom < 0) nSelFrom = 0;
228     if (nSelTo > nChars) nSelTo = nChars;
229     GetTextExtentPoint32W(hDC, szText, nSelFrom, &sz);
230     x += sz.cx;
231     GetTextExtentPoint32W(hDC, szText+nSelFrom, nSelTo-nSelFrom, &sz);
232     PatBlt(hDC, x, ymin, sz.cx, cy, DSTINVERT);
233   }
234   SetTextColor(hDC, rgbOld);
235   ME_UnselectStyleFont(c->editor, hDC, s, hOldFont);
236 }
237
238 static void ME_DebugWrite(HDC hDC, POINT *pt, WCHAR *szText) {
239   int align = SetTextAlign(hDC, TA_LEFT|TA_TOP);
240   HGDIOBJ hFont = SelectObject(hDC, GetStockObject(DEFAULT_GUI_FONT));
241   COLORREF color = SetTextColor(hDC, RGB(128,128,128));
242   TextOutW(hDC, pt->x, pt->y, szText, lstrlenW(szText));
243   SelectObject(hDC, hFont);
244   SetTextAlign(hDC, align);
245   SetTextColor(hDC, color);
246 }
247
248 void ME_DrawGraphics(ME_Context *c, int x, int y, ME_Run *run, 
249                      ME_Paragraph *para, BOOL selected) {
250   SIZE sz;
251   int xs, ys, xe, ye, h, ym, width, eyes;
252   ME_GetGraphicsSize(c->editor, run, &sz);
253   xs = run->pt.x;
254   ys = y-sz.cy;
255   xe = xs+sz.cx;
256   ye = y;
257   h = ye-ys;
258   ym = ys+h/4;
259   width = sz.cx;
260   eyes = width/8;
261   /* draw a smiling face :) */
262   Ellipse(c->hDC, xs, ys, xe, ye);
263   Ellipse(c->hDC, xs+width/8, ym, x+width/8+eyes, ym+eyes);
264   Ellipse(c->hDC, xs+7*width/8-eyes, ym, xs+7*width/8, ym+eyes);
265   MoveToEx(c->hDC, xs+width/8, ys+3*h/4-eyes, NULL);
266   LineTo(c->hDC, xs+width/8, ys+3*h/4);
267   LineTo(c->hDC, xs+7*width/8, ys+3*h/4);
268   LineTo(c->hDC, xs+7*width/8, ys+3*h/4-eyes);
269   if (selected)
270   {
271     /* descent is usually (always?) 0 for graphics */
272     PatBlt(c->hDC, x, y-run->nAscent, sz.cx, run->nAscent+run->nDescent, DSTINVERT);    
273   }
274 }
275
276 static void ME_DrawRun(ME_Context *c, int x, int y, ME_DisplayItem *rundi, ME_Paragraph *para) {
277   ME_Run *run = &rundi->member.run;
278   int runofs = run->nCharOfs+para->nCharOfs;
279   
280   /* you can always comment it out if you need visible paragraph marks */
281   if (run->nFlags & (MERF_ENDPARA|MERF_TAB)) 
282     return;
283   if (run->nFlags & MERF_GRAPHICS) {
284     int blfrom, blto;
285     ME_GetSelection(c->editor, &blfrom, &blto);
286     ME_DrawGraphics(c, x, y, run, para, (runofs >= blfrom) && (runofs < blto));
287   } else
288   {
289     int blfrom, blto;
290     ME_DisplayItem *start = ME_FindItemBack(rundi, diStartRow);
291     ME_GetSelection(c->editor, &blfrom, &blto);
292     
293     ME_DrawTextWithStyle(c, x, y, 
294       run->strText->szData, ME_StrVLen(run->strText), run->style, NULL, 
295         blfrom-runofs, blto-runofs, c->pt.y+start->member.row.nYPos, start->member.row.nHeight);
296   }
297 }
298
299 COLORREF ME_GetBackColor(ME_TextEditor *editor)
300 {
301 /* Looks like I was seriously confused
302     return GetSysColor((GetWindowLong(editor->hWnd, GWL_STYLE) & ES_READONLY) ? COLOR_3DFACE: COLOR_WINDOW);
303 */
304   if (editor->rgbBackColor == -1)
305     return GetSysColor(COLOR_WINDOW);
306   else
307     return editor->rgbBackColor;
308 }
309
310 void ME_DrawParagraph(ME_Context *c, ME_DisplayItem *paragraph) {
311   int align = SetTextAlign(c->hDC, TA_BASELINE);
312   ME_DisplayItem *p;
313   ME_Run *run;
314   ME_Paragraph *para = NULL;
315   RECT rc, rcPara;
316   int y = c->pt.y;
317   int height = 0, baseline = 0, no=0, pno = 0;
318   int xs, xe;
319   int visible = 0;
320   int nMargWidth = 0;
321   
322   c->pt.x = c->rcView.left;
323   rcPara.left = c->rcView.left;
324   rcPara.right = c->rcView.right;
325   for (p = paragraph; p!=paragraph->member.para.next_para; p = p->next) {
326     switch(p->type) {
327       case diParagraph:
328         para = &p->member.para;
329         break;
330       case diStartRow:
331         assert(para);
332         nMargWidth = (pno==0?para->nFirstMargin:para->nLeftMargin);
333         xs = c->rcView.left+nMargWidth;
334         xe = c->rcView.right-para->nRightMargin;
335         y += height;
336         rcPara.top = y;
337         rcPara.bottom = y+p->member.row.nHeight;
338         visible = RectVisible(c->hDC, &rcPara);
339         if (visible) {
340           HBRUSH hbr;
341           hbr = CreateSolidBrush(ME_GetBackColor(c->editor));
342           /* left margin */
343           rc.left = c->rcView.left;
344           rc.right = c->rcView.left+nMargWidth;
345           rc.top = y;
346           rc.bottom = y+p->member.row.nHeight;
347           FillRect(c->hDC, &rc, hbr/* c->hbrMargin */);
348           /* right margin */
349           rc.left = xe;
350           rc.right = c->rcView.right;
351           FillRect(c->hDC, &rc, hbr/* c->hbrMargin */);
352           rc.left = c->rcView.left+nMargWidth;
353           rc.right = xe;
354           FillRect(c->hDC, &rc, hbr);
355           DeleteObject(hbr);
356         }
357         if (me_debug)
358         {
359           const WCHAR wszRowDebug[] = {'r','o','w','[','%','d',']',0};
360           WCHAR buf[128];
361           POINT pt = c->pt;
362           wsprintfW(buf, wszRowDebug, no);
363           pt.y = 12+y;
364           ME_DebugWrite(c->hDC, &pt, buf);
365         }
366         
367         height = p->member.row.nHeight;
368         baseline = p->member.row.nBaseline;
369         pno++;
370         break;
371       case diRun:
372         assert(para);
373         run = &p->member.run;
374         if (visible && me_debug) {
375           rc.left = c->rcView.left+run->pt.x;
376           rc.right = c->rcView.left+run->pt.x+run->nWidth;
377           rc.top = c->pt.y+run->pt.y;
378           rc.bottom = c->pt.y+run->pt.y+height;
379           TRACE("rc = (%ld, %ld, %ld, %ld)\n", rc.left, rc.top, rc.right, rc.bottom);
380           if (run->nFlags & MERF_SKIPPED)
381             DrawFocusRect(c->hDC, &rc);
382           else
383             FrameRect(c->hDC, &rc, GetSysColorBrush(COLOR_GRAYTEXT));
384         }
385         if (visible)
386           ME_DrawRun(c, run->pt.x, c->pt.y+run->pt.y+baseline, p, &paragraph->member.para);
387         if (me_debug)
388         {
389           /* I'm using %ls, hope wsprintfW is not going to use wrong (4-byte) WCHAR version */
390           const WCHAR wszRunDebug[] = {'[','%','d',':','%','x',']',' ','%','l','s',0};
391           WCHAR buf[2560];
392           POINT pt;
393           pt.x = run->pt.x;
394           pt.y = c->pt.y + run->pt.y;
395           wsprintfW(buf, wszRunDebug, no, p->member.run.nFlags, p->member.run.strText->szData);
396           ME_DebugWrite(c->hDC, &pt, buf);
397         }
398         /* c->pt.x += p->member.run.nWidth; */
399         break;
400       default:
401         break;
402     }
403     no++;
404   }
405   SetTextAlign(c->hDC, align);
406 }
407
408 void ME_Scroll(ME_TextEditor *editor, int cx, int cy)
409 {
410   SCROLLINFO si;
411   HWND hWnd = editor->hWnd;
412
413   si.cbSize = sizeof(SCROLLINFO);
414   si.fMask = SIF_POS;
415   GetScrollInfo(hWnd, SB_VERT, &si);
416   si.nPos = editor->nScrollPosY -= cy;
417   SetScrollInfo(hWnd, SB_VERT, &si, TRUE);
418   if (abs(cy) > editor->sizeWindow.cy)
419     InvalidateRect(editor->hWnd, NULL, TRUE);
420   else
421     ScrollWindowEx(hWnd, cx, cy, NULL, NULL, NULL, NULL, SW_ERASE|SW_INVALIDATE);
422 }
423
424 void ME_UpdateScrollBar(ME_TextEditor *editor)
425 {
426   HWND hWnd = editor->hWnd;
427   SCROLLINFO si;
428   int nOldLen = editor->nTotalLength;
429   BOOL bScrollY = (editor->nTotalLength > editor->sizeWindow.cy);
430   BOOL bUpdateScrollBars;
431   si.cbSize = sizeof(si);
432   si.fMask = SIF_POS | SIF_RANGE;
433   GetScrollInfo(hWnd, SB_VERT, &si);
434   bUpdateScrollBars = (bScrollY || editor->bScrollY)&& ((si.nMax != nOldLen) || (si.nPage != editor->sizeWindow.cy));
435   
436   if (bScrollY != editor->bScrollY)
437   {
438     si.fMask = SIF_RANGE | SIF_PAGE;
439     si.nMin = 0;
440     si.nPage = editor->sizeWindow.cy;
441     if (bScrollY) {
442       si.nMax = editor->nTotalLength;
443     } else {
444       si.nMax = 0;
445     }
446     SetScrollInfo(hWnd, SB_VERT, &si, FALSE);
447     ME_MarkAllForWrapping(editor);
448     editor->bScrollY = bScrollY;
449     ME_WrapMarkedParagraphs(editor);
450     bUpdateScrollBars = TRUE;
451   }
452   if (bUpdateScrollBars) {
453     int nScroll = 0;
454     si.fMask = SIF_PAGE | SIF_RANGE | SIF_POS;
455     if (editor->nTotalLength > editor->sizeWindow.cy) {
456       si.nMax = editor->nTotalLength;
457       si.nPage = editor->sizeWindow.cy;
458       if (si.nPos > si.nMax-si.nPage) {
459         nScroll = (si.nMax-si.nPage)-si.nPos;
460         si.nPos = si.nMax-si.nPage;
461       }
462     }
463     else {
464       si.nMax = 0;
465       si.nPage = 0;
466       si.nPos = 0;
467     }
468     TRACE("min=%d max=%d page=%d pos=%d shift=%d\n", si.nMin, si.nMax, si.nPage, si.nPos, nScroll);
469     editor->nScrollPosY = si.nPos;
470     SetScrollInfo(hWnd, SB_VERT, &si, TRUE);
471     if (nScroll)
472       ScrollWindow(hWnd, 0, -nScroll, NULL, NULL);
473   }
474 }
475
476 int ME_GetYScrollPos(ME_TextEditor *editor)
477 {
478   return editor->nScrollPosY;
479 }
480
481 void ME_EnsureVisible(ME_TextEditor *editor, ME_DisplayItem *pRun)
482 {
483   ME_DisplayItem *pRow = ME_FindItemBack(pRun, diStartRow);
484   ME_DisplayItem *pPara = ME_FindItemBack(pRun, diParagraph);
485   int y, yrel, yheight, yold;
486   HWND hWnd = editor->hWnd;
487   
488   assert(pRow);
489   assert(pPara);
490   
491   y = pPara->member.para.nYPos+pRow->member.row.nYPos;
492   yheight = pRow->member.row.nHeight;
493   yold = ME_GetYScrollPos(editor);
494   yrel = y - yold;
495   if (yrel < 0) {
496     editor->nScrollPosY = y;
497     SetScrollPos(hWnd, SB_VERT, y, TRUE);
498     ScrollWindow(hWnd, 0, -yrel, NULL, NULL);
499     UpdateWindow(hWnd);
500   } else if (yrel + yheight > editor->sizeWindow.cy) {
501     int newy = y+yheight-editor->sizeWindow.cy;
502     editor->nScrollPosY = newy;
503     SetScrollPos(hWnd, SB_VERT, newy, TRUE);
504     ScrollWindow(hWnd, 0, -(newy-yold), NULL, NULL);
505     UpdateWindow(hWnd);
506   }
507 }
508         
509
510 BOOL
511 ME_SetZoom(ME_TextEditor *editor, int numerator, int denominator)
512 {
513   /* TODO: Zoom images and objects */
514
515   if (numerator != 0)
516   {
517     if (denominator == 0)
518       return FALSE;
519     if (1.0 / 64.0 > (float)numerator / (float)denominator
520         || (float)numerator / (float)denominator > 64.0)
521       return FALSE;
522   }
523   
524   editor->nZoomNumerator = numerator;
525   editor->nZoomDenominator = denominator;
526   
527   ME_RewrapRepaint(editor);
528   return TRUE;
529 }