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