2 * RichEdit - functions dealing with editor object
4 * Copyright 2004 by Krzysztof Foltman
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.
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.
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
22 API implementation status:
24 Messages (ANSI versions not done yet)
25 - EM_AUTOURLDETECT 2.0
41 - EM_GETCHARFORMAT (partly done)
43 - EM_GETFIRSTVISIBLELINE
44 - EM_GETIMECOLOR 1.0asian
45 - EM_GETIMECOMPMODE 2.0
46 - EM_GETIMEOPTIONS 1.0asian
48 - EM_GETLANGOPTIONS 2.0
51 - EM_GETLINECOUNT returns number of rows, not of paragraphs
56 - EM_GETPUNCTUATION 1.0asian
60 + EM_GETSELTEXT (ANSI&Unicode)
63 ? + EM_GETTEXTRANGE (ANSI&Unicode)
66 - EM_GETWORDBREAKPROCEX
67 - EM_GETWORDWRAPMODE 1.0asian
78 + EM_REPLACESEL (proper style?) ANSI&Unicode
83 - EM_SETCHARFORMAT (partly done, no ANSI)
84 + EM_SETEVENTMASK (few notifications supported)
85 - EM_SETIMECOLOR 1.0asian
86 - EM_SETIMEOPTIONS 1.0asian
87 - EM_SETLANGOPTIONS 2.0
89 + EM_SETMODIFY (not sure if implementation is correct)
93 - EM_SETPUNCTUATION 1.0asian
94 + EM_SETREADONLY no beep on modification attempt
96 - EM_SETRECTNP (EM_SETRECT without repainting) - not supported in RICHEDIT
100 - EM_SETUNDOLIMIT 2.0
101 - EM_SETWORDBREAKPROC
102 - EM_SETWORDBREAKPROCEX
103 - EM_SETWORDWRAPMODE 1.0asian
104 - EM_STOPGROUPTYPING 2.0
112 + WM_GETDLGCODE (the current implementation is incomplete)
113 + WM_GETTEXT (ANSI&Unicode)
114 + WM_GETTEXTLENGTH (ANSI version sucks)
117 + WM_SETTEXT (resets undo stack !) (proper style?) ANSI&Unicode
119 - WM_STYLECHANGED (things like read-only flag)
124 * EN_CHANGE (sent from the wrong place)
141 * EN_UPDATE (sent from the wrong place)
149 - ES_DISABLENOSCROLL (scrollbar is always visible)
150 - ES_EX_NOCALLOLEINIT
152 - ES_MULTILINE (currently single line controls aren't supported)
154 - ES_READONLY (I'm not sure if beeping is the proper behaviour)
160 - ES_WANTRETURN (don't know how to do WM_GETDLGCODE part)
167 * RICHED20 TODO (incomplete):
170 * - add remaining CHARFORMAT/PARAFORMAT fields
171 * - right/center align should strip spaces from the beginning
172 * - more advanced navigation (Ctrl-arrows, PageUp/PageDn)
174 * - pictures (not just smiling faces that lack API support ;-) )
176 * - calculate heights of pictures (half-done)
177 * - EM_STREAMIN/EM_STREAMOUT
178 * - horizontal scrolling (not even started)
179 * - fix scrollbars and refresh (it sucks bigtime)
180 * - hysteresis during wrapping (related to scrollbars appearing/disappearing)
181 * - should remember maximum row width for wrap hysteresis
183 * - how to implement EM_FORMATRANGE and EM_DISPLAYBAND ? (Mission Impossible)
184 * - italic cursor with italic fonts
186 * - most notifications aren't sent at all (the most important ones are)
187 * - when should EN_SELCHANGE be sent after text change ? (before/after EN_UPDATE?)
188 * - WM_SETTEXT may use wrong style (but I'm 80% sure it's OK)
189 * - EM_GETCHARFORMAT with SCF_SELECTION may not behave 100% like in original (but very close)
190 * - bugs in end-of-text handling (the gray bar) could get me in jail ;-)
191 * - determination of row size
192 * - end-of-paragraph marks should be of reasonable size
194 * Bugs that are probably fixed, but not so easy to verify:
195 * - EN_UPDATE/EN_CHANGE are handled very incorrectly (should be OK now)
196 * - undo for ME_JoinParagraphs doesn't store paragraph format ? (it does)
197 * - check/fix artificial EOL logic (bCursorAtEnd, hardly logical)
198 * - caret shouldn't be displayed when selection isn't empty
199 * - check refcounting in style management functions (looks perfect now, but no bugs is suspicious)
200 * - undo for setting default format (done, might be buggy)
201 * - styles might be not released properly (looks like they work like charm, but who knows?
209 #define NO_SHLWAPI_STREAM
214 WINE_DEFAULT_DEBUG_CHANNEL(richedit
);
217 HANDLE me_heap
= NULL
;
219 ME_TextBuffer
*ME_MakeText() {
221 ME_TextBuffer
*buf
= ALLOC_OBJ(ME_TextBuffer
);
223 ME_DisplayItem
*p1
= ME_MakeDI(diTextStart
);
224 ME_DisplayItem
*p2
= ME_MakeDI(diTextEnd
);
230 p1
->member
.para
.next_para
= p2
;
231 p2
->member
.para
.prev_para
= p1
;
232 p2
->member
.para
.nCharOfs
= 0;
236 buf
->pCharStyle
= NULL
;
241 #define STREAMIN_BUFFER_SIZE 4096 /* M$ compatibility */
243 static LRESULT
ME_StreamInText(ME_TextEditor
*editor
, DWORD dwFormat
, EDITSTREAM
*stream
, ME_Style
*style
)
245 BYTE buffer
[STREAMIN_BUFFER_SIZE
+1];
246 WCHAR wszText
[STREAMIN_BUFFER_SIZE
+1];
248 TRACE("%08lx %p\n", dwFormat
, stream
);
252 long nDataSize
= 0, nWideChars
= 0;
253 stream
->dwError
= stream
->pfnCallback(stream
->dwCookie
,
254 (dwFormat
& SF_UNICODE
? (BYTE
*)wszText
: buffer
),
255 STREAMIN_BUFFER_SIZE
, &nDataSize
);
262 if (!(dwFormat
& SF_UNICODE
))
264 /* FIXME? this is doomed to fail on true MBCS like UTF-8, luckily they're unlikely to be used as CP_ACP */
265 nWideChars
= MultiByteToWideChar(CP_ACP
, 0, buffer
, nDataSize
, wszText
, STREAMIN_BUFFER_SIZE
);
268 nWideChars
= nDataSize
>>1;
269 ME_InsertTextFromCursor(editor
, 0, wszText
, nWideChars
, style
);
270 if (nDataSize
<STREAMIN_BUFFER_SIZE
)
273 ME_CommitUndo(editor
);
278 void ME_RTFCharAttrHook(RTF_Info
*info
)
281 fmt
.cbSize
= sizeof(fmt
);
284 switch(info
->rtfMinor
)
287 /* FIXME add more flags once they're implemented */
288 fmt
.dwMask
= CFM_BOLD
| CFM_ITALIC
| CFM_UNDERLINE
| CFM_STRIKEOUT
| CFM_COLOR
| CFM_BACKCOLOR
| CFM_SIZE
| CFM_WEIGHT
;
289 fmt
.dwEffects
= CFE_AUTOCOLOR
| CFE_AUTOBACKCOLOR
;
290 fmt
.yHeight
= 12*20; /* 12pt */
294 fmt
.dwMask
= CFM_BOLD
;
295 fmt
.dwEffects
= info
->rtfParam
? fmt
.dwMask
: 0;
298 fmt
.dwMask
= CFM_ITALIC
;
299 fmt
.dwEffects
= info
->rtfParam
? fmt
.dwMask
: 0;
302 fmt
.dwMask
= CFM_UNDERLINE
;
303 fmt
.dwEffects
= info
->rtfParam
? fmt
.dwMask
: 0;
306 fmt
.dwMask
= CFM_STRIKEOUT
;
307 fmt
.dwEffects
= info
->rtfParam
? fmt
.dwMask
: 0;
310 fmt
.dwMask
= CFM_BACKCOLOR
;
312 if (info
->rtfParam
== 0)
313 fmt
.dwEffects
= CFE_AUTOBACKCOLOR
;
314 else if (info
->rtfParam
!= rtfNoParam
)
316 RTFColor
*c
= RTFGetColor(info
, info
->rtfParam
);
317 fmt
.crTextColor
= (c
->rtfCBlue
<<16)|(c
->rtfCGreen
<<8)|(c
->rtfCRed
);
321 fmt
.dwMask
= CFM_COLOR
;
323 if (info
->rtfParam
== 0)
324 fmt
.dwEffects
= CFE_AUTOCOLOR
;
325 else if (info
->rtfParam
!= rtfNoParam
)
327 RTFColor
*c
= RTFGetColor(info
, info
->rtfParam
);
328 fmt
.crTextColor
= (c
->rtfCBlue
<<16)|(c
->rtfCGreen
<<8)|(c
->rtfCRed
);
332 if (info
->rtfParam
!= rtfNoParam
)
334 RTFFont
*f
= RTFGetFont(info
, info
->rtfParam
);
337 MultiByteToWideChar(CP_ACP
, 0, f
->rtfFName
, -1, fmt
.szFaceName
, sizeof(fmt
.szFaceName
)/sizeof(WCHAR
));
338 fmt
.szFaceName
[sizeof(fmt
.szFaceName
)/sizeof(WCHAR
)-1] = '\0';
339 fmt
.dwMask
= CFM_FACE
;
344 fmt
.dwMask
= CFM_SIZE
;
345 if (info
->rtfParam
!= rtfNoParam
)
346 fmt
.yHeight
= info
->rtfParam
*10;
351 RTFFlushOutputBuffer(info
);
352 /* FIXME too slow ? how come ? */
353 style2
= ME_ApplyStyle(info
->style
, &fmt
);
354 ME_ReleaseStyle(info
->style
);
355 info
->style
= style2
;
359 void ME_RTFParAttrHook(RTF_Info
*info
)
362 fmt
.cbSize
= sizeof(fmt
);
365 switch(info
->rtfMinor
)
367 case rtfParDef
: /* I'm not 100% sure what does it do, but I guess it restores default paragraph attributes */
368 fmt
.dwMask
= PFM_ALIGNMENT
;
369 fmt
.wAlignment
= PFA_LEFT
;
373 fmt
.dwMask
= PFM_ALIGNMENT
;
374 fmt
.wAlignment
= PFA_LEFT
;
377 fmt
.dwMask
= PFM_ALIGNMENT
;
378 fmt
.wAlignment
= PFA_RIGHT
;
381 fmt
.dwMask
= PFM_ALIGNMENT
;
382 fmt
.wAlignment
= PFA_CENTER
;
386 RTFFlushOutputBuffer(info
);
387 /* FIXME too slow ? how come ?*/
388 ME_SetSelectionParaFormat(info
->editor
, &fmt
);
392 void ME_RTFReadHook(RTF_Info
*info
) {
393 switch(info
->rtfClass
)
396 switch(info
->rtfMajor
)
399 if (info
->stackTop
< maxStack
) {
400 memcpy(&info
->stack
[info
->stackTop
].fmt
, &info
->style
->fmt
, sizeof(CHARFORMAT2W
));
401 info
->stack
[info
->stackTop
].codePage
= info
->codePage
;
402 info
->stack
[info
->stackTop
].unicodeLength
= info
->unicodeLength
;
409 RTFFlushOutputBuffer(info
);
411 /* FIXME too slow ? how come ? */
412 s
= ME_ApplyStyle(info
->style
, &info
->stack
[info
->stackTop
].fmt
);
413 ME_ReleaseStyle(info
->style
);
415 info
->codePage
= info
->stack
[info
->stackTop
].codePage
;
416 info
->unicodeLength
= info
->stack
[info
->stackTop
].unicodeLength
;
422 switch(info
->rtfMajor
)
425 ME_RTFCharAttrHook(info
);
428 ME_RTFParAttrHook(info
);
435 static LRESULT
ME_StreamIn(ME_TextEditor
*editor
, DWORD format
, EDITSTREAM
*stream
)
439 int from
, to
, to2
, nUndoMode
;
441 int nEventMask
= editor
->nEventMask
;
443 TRACE("%p %p\n", stream
, editor
->hWnd
);
444 editor
->nEventMask
= 0;
446 ME_GetSelection(editor
, &from
, &to
);
447 if (format
& SFF_SELECTION
) {
448 style
= ME_GetSelectionInsertStyle(editor
);
450 ME_InternalDeleteText(editor
, from
, to
-from
);
453 style
= editor
->pBuffer
->pDefaultStyle
;
454 ME_AddRefStyle(style
);
455 SendMessageA(editor
->hWnd
, EM_SETSEL
, 0, 0);
456 ME_InternalDeleteText(editor
, 0, ME_GetTextLength(editor
));
458 ME_ClearTempStyle(editor
);
459 /* FIXME restore default paragraph formatting ! */
462 nUndoMode
= editor
->nUndoMode
;
463 editor
->nUndoMode
= umIgnore
;
464 if (format
& SF_RTF
) {
465 /* setup the RTF parser */
466 memset(&parser
, 0, sizeof parser
);
467 RTFSetEditStream(&parser
, stream
);
468 parser
.rtfFormat
= format
&(SF_TEXT
|SF_RTF
);
469 parser
.hwndEdit
= editor
->hWnd
;
470 parser
.editor
= editor
;
471 parser
.style
= style
;
474 RTFSetReadHook(&parser
, ME_RTFReadHook
);
479 RTFFlushOutputBuffer(&parser
);
482 style
= parser
.style
;
484 else if (format
& SF_TEXT
)
485 ME_StreamInText(editor
, format
, stream
, style
);
487 ERR("EM_STREAMIN without SF_TEXT or SF_RTF\n");
488 ME_GetSelection(editor
, &to
, &to2
);
489 /* put the cursor at the top */
490 if (!(format
& SFF_SELECTION
))
491 SendMessageA(editor
->hWnd
, EM_SETSEL
, 0, 0);
494 /* FIXME where to put cursor now ? */
497 editor
->nUndoMode
= nUndoMode
;
498 pUI
= ME_AddUndoItem(editor
, diUndoDeleteRun
, NULL
);
499 TRACE("from %d to %d\n", from
, to
);
500 if (pUI
&& from
< to
)
505 ME_CommitUndo(editor
);
506 ME_ReleaseStyle(style
);
507 editor
->nEventMask
= nEventMask
;
508 InvalidateRect(editor
->hWnd
, NULL
, TRUE
);
509 ME_UpdateRepaint(editor
);
510 if (!(format
& SFF_SELECTION
)) {
511 ME_ClearTempStyle(editor
);
513 ME_MoveCaret(editor
);
514 ME_SendSelChange(editor
);
521 ME_FindItemAtOffset(ME_TextEditor
*editor
, ME_DIType nItemType
, int nOffset
, int *nItemOffset
)
523 ME_DisplayItem
*item
= ME_FindItemFwd(editor
->pBuffer
->pFirst
, diParagraph
);
525 while (item
&& item
->member
.para
.next_para
->member
.para
.nCharOfs
<= nOffset
)
526 item
= ME_FindItemFwd(item
, diParagraph
);
531 nOffset
-= item
->member
.para
.nCharOfs
;
532 if (nItemType
== diParagraph
) {
534 *nItemOffset
= nOffset
;
539 item
= ME_FindItemFwd(item
, diRun
);
540 } while (item
&& (item
->member
.run
.nCharOfs
+ ME_StrLen(item
->member
.run
.strText
) <= nOffset
));
542 nOffset
-= item
->member
.run
.nCharOfs
;
544 *nItemOffset
= nOffset
;
550 ME_TextEditor
*ME_MakeEditor(HWND hWnd
) {
551 ME_TextEditor
*ed
= ALLOC_OBJ(ME_TextEditor
);
555 ed
->pBuffer
= ME_MakeText();
557 ME_MakeFirstParagraph(hDC
, ed
->pBuffer
);
558 ReleaseDC(hWnd
, hDC
);
559 ed
->bCaretShown
= FALSE
;
561 ed
->pCursors
= ALLOC_N_OBJ(ME_Cursor
, ed
->nCursors
);
562 ed
->pCursors
[0].pRun
= ME_FindItemFwd(ed
->pBuffer
->pFirst
, diRun
);
563 ed
->pCursors
[0].nOffset
= 0;
564 ed
->pCursors
[1].pRun
= ME_FindItemFwd(ed
->pBuffer
->pFirst
, diRun
);
565 ed
->pCursors
[1].nOffset
= 0;
566 ed
->nLastTotalLength
= ed
->nTotalLength
= 0;
570 ed
->rgbBackColor
= -1;
571 ed
->bCaretAtEnd
= FALSE
;
574 ed
->pUndoStack
= ed
->pRedoStack
= NULL
;
575 ed
->nUndoMode
= umAddToUndo
;
577 ed
->nLastSelStart
= ed
->nLastSelEnd
= 0;
578 for (i
=0; i
<HFONT_CACHE_SIZE
; i
++)
580 ed
->pFontCache
[i
].nRefs
= 0;
581 ed
->pFontCache
[i
].nAge
= 0;
582 ed
->pFontCache
[i
].hFont
= NULL
;
584 ME_CheckCharOffsets(ed
);
588 typedef struct tagME_GlobalDestStruct
592 } ME_GlobalDestStruct
;
594 static DWORD CALLBACK
ME_AppendToHGLOBAL(DWORD_PTR dwCookie
, LPBYTE lpBuff
, LONG cb
, LONG
*pcb
)
596 ME_GlobalDestStruct
*pData
= (ME_GlobalDestStruct
*)dwCookie
;
600 nMaxSize
= GlobalSize(pData
->hData
);
601 if (pData
->nLength
+cb
+1 >= cb
)
603 /* round up to 2^17 */
604 int nNewSize
= (((nMaxSize
+cb
+1)|0x1FFFF)+1) & 0xFFFE0000;
605 pData
->hData
= GlobalReAlloc(pData
->hData
, nNewSize
, 0);
607 pDest
= (BYTE
*)GlobalLock(pData
->hData
);
608 memcpy(pDest
+ pData
->nLength
, lpBuff
, cb
);
609 pData
->nLength
+= cb
;
610 pDest
[pData
->nLength
] = '\0';
611 GlobalUnlock(pData
->hData
);
617 static DWORD CALLBACK
ME_ReadFromHGLOBALUnicode(DWORD_PTR dwCookie
, LPBYTE lpBuff
, LONG cb
, LONG
*pcb
)
619 ME_GlobalDestStruct
*pData
= (ME_GlobalDestStruct
*)dwCookie
;
624 pDest
= (WORD
*)lpBuff
;
625 pSrc
= (WORD
*)GlobalLock(pData
->hData
);
626 for (i
= 0; i
<cb
&& pSrc
[pData
->nLength
+i
]; i
++) {
627 pDest
[i
] = pSrc
[pData
->nLength
+i
];
631 GlobalUnlock(pData
->hData
);
635 static DWORD CALLBACK
ME_ReadFromHGLOBALRTF(DWORD_PTR dwCookie
, LPBYTE lpBuff
, LONG cb
, LONG
*pcb
)
637 ME_GlobalDestStruct
*pData
= (ME_GlobalDestStruct
*)dwCookie
;
642 pSrc
= (BYTE
*)GlobalLock(pData
->hData
);
643 for (i
= 0; i
<cb
&& pSrc
[pData
->nLength
+i
]; i
++) {
644 pDest
[i
] = pSrc
[pData
->nLength
+i
];
648 GlobalUnlock(pData
->hData
);
652 void ME_DestroyEditor(ME_TextEditor
*editor
)
654 ME_DisplayItem
*pFirst
= editor
->pBuffer
->pFirst
;
655 ME_DisplayItem
*p
= pFirst
, *pNext
= NULL
;
658 ME_ClearTempStyle(editor
);
659 ME_EmptyUndoStack(editor
);
662 ME_DestroyDisplayItem(p
);
665 ME_ReleaseStyle(editor
->pBuffer
->pDefaultStyle
);
666 for (i
=0; i
<HFONT_CACHE_SIZE
; i
++)
668 if (editor
->pFontCache
[i
].hFont
)
669 DeleteObject(editor
->pFontCache
[i
].hFont
);
675 #define UNSUPPORTED_MSG(e) \
677 FIXME(#e ": stub\n"); \
678 return DefWindowProcW(hWnd, msg, wParam, lParam);
680 /******************************************************************
681 * RichEditANSIWndProc (RICHED20.10)
683 LRESULT WINAPI
RichEditANSIWndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
) {
687 ME_TextEditor
*editor
= (ME_TextEditor
*)GetWindowLongW(hWnd
, 0);
688 TRACE("msg %d %08x %08lx\n", msg
, wParam
, lParam
);
691 UNSUPPORTED_MSG(EM_AUTOURLDETECT
)
692 UNSUPPORTED_MSG(EM_CANPASTE
)
693 UNSUPPORTED_MSG(EM_CHARFROMPOS
)
694 UNSUPPORTED_MSG(EM_DISPLAYBAND
)
695 UNSUPPORTED_MSG(EM_EXLIMITTEXT
)
696 UNSUPPORTED_MSG(EM_EXLINEFROMCHAR
)
697 UNSUPPORTED_MSG(EM_FINDTEXT
)
698 UNSUPPORTED_MSG(EM_FINDTEXTEX
)
699 UNSUPPORTED_MSG(EM_FINDWORDBREAK
)
700 UNSUPPORTED_MSG(EM_FMTLINES
)
701 UNSUPPORTED_MSG(EM_FORMATRANGE
)
702 UNSUPPORTED_MSG(EM_GETFIRSTVISIBLELINE
)
703 UNSUPPORTED_MSG(EM_GETIMECOMPMODE
)
704 /* UNSUPPORTED_MSG(EM_GETIMESTATUS) missing in Wine headers */
705 UNSUPPORTED_MSG(EM_GETLANGOPTIONS
)
706 UNSUPPORTED_MSG(EM_GETLIMITTEXT
)
707 UNSUPPORTED_MSG(EM_GETLINE
)
708 UNSUPPORTED_MSG(EM_GETLINECOUNT
)
709 /* UNSUPPORTED_MSG(EM_GETOLEINTERFACE) separate stub */
710 UNSUPPORTED_MSG(EM_GETOPTIONS
)
711 UNSUPPORTED_MSG(EM_GETRECT
)
712 UNSUPPORTED_MSG(EM_GETREDONAME
)
713 UNSUPPORTED_MSG(EM_GETTEXTMODE
)
714 UNSUPPORTED_MSG(EM_GETUNDONAME
)
715 UNSUPPORTED_MSG(EM_GETWORDBREAKPROC
)
716 UNSUPPORTED_MSG(EM_GETWORDBREAKPROCEX
)
717 UNSUPPORTED_MSG(EM_HIDESELECTION
)
718 UNSUPPORTED_MSG(EM_LIMITTEXT
) /* also known as EM_SETLIMITTEXT */
719 UNSUPPORTED_MSG(EM_LINEFROMCHAR
)
720 UNSUPPORTED_MSG(EM_LINEINDEX
)
721 UNSUPPORTED_MSG(EM_LINELENGTH
)
722 UNSUPPORTED_MSG(EM_LINESCROLL
)
723 UNSUPPORTED_MSG(EM_PASTESPECIAL
)
724 /* UNSUPPORTED_MSG(EM_POSFROMCHARS) missing in Wine headers */
725 UNSUPPORTED_MSG(EM_REQUESTRESIZE
)
726 UNSUPPORTED_MSG(EM_SCROLL
)
727 UNSUPPORTED_MSG(EM_SCROLLCARET
)
728 UNSUPPORTED_MSG(EM_SELECTIONTYPE
)
729 UNSUPPORTED_MSG(EM_SETLANGOPTIONS
)
730 UNSUPPORTED_MSG(EM_SETOLECALLBACK
)
731 UNSUPPORTED_MSG(EM_SETOPTIONS
)
732 UNSUPPORTED_MSG(EM_SETRECT
)
733 UNSUPPORTED_MSG(EM_SETRECTNP
)
734 UNSUPPORTED_MSG(EM_SETTARGETDEVICE
)
735 UNSUPPORTED_MSG(EM_SETTEXTMODE
)
736 UNSUPPORTED_MSG(EM_SETUNDOLIMIT
)
737 UNSUPPORTED_MSG(EM_SETWORDBREAKPROC
)
738 UNSUPPORTED_MSG(EM_SETWORDBREAKPROCEX
)
739 UNSUPPORTED_MSG(WM_SETFONT
)
740 UNSUPPORTED_MSG(WM_STYLECHANGING
)
741 UNSUPPORTED_MSG(WM_STYLECHANGED
)
742 /* UNSUPPORTED_MSG(WM_UNICHAR) FIXME missing in Wine headers */
744 /* Messages specific to Richedit controls */
747 return ME_StreamIn(editor
, wParam
, (EDITSTREAM
*)lParam
);
749 return ME_StreamOut(editor
, wParam
, (EDITSTREAM
*)lParam
);
752 UINT code
= DLGC_WANTCHARS
|DLGC_WANTARROWS
;
753 if (GetWindowLongW(hWnd
, GWL_STYLE
)&ES_WANTRETURN
)
754 code
|= 0; /* FIXME what can we do here ? ask for messages and censor them ? */
759 CREATESTRUCTW
*pcs
= (CREATESTRUCTW
*)lParam
;
760 editor
= ME_MakeEditor(hWnd
);
761 SetWindowLongW(hWnd
, 0, (long)editor
);
762 pcs
= 0; /* ignore */
765 case EM_EMPTYUNDOBUFFER
:
766 ME_EmptyUndoStack(editor
);
770 ME_GetSelection(editor
, (int *)wParam
, (int *)lParam
);
771 if (!((wParam
|lParam
) & 0xFFFF0000))
772 return (lParam
<<16)|wParam
;
777 CHARRANGE
*pRange
= (CHARRANGE
*)lParam
;
778 ME_GetSelection(editor
, (int *)&pRange
->cpMin
, (int *)&pRange
->cpMax
);
782 return editor
->pUndoStack
!= NULL
;
784 return editor
->pRedoStack
!= NULL
;
793 ME_SetSelection(editor
, wParam
, lParam
);
795 ME_SendSelChange(editor
);
800 CHARRANGE
*pRange
= (CHARRANGE
*)lParam
;
801 ME_SetSelection(editor
, pRange
->cpMin
, pRange
->cpMax
);
804 ME_SendSelChange(editor
);
807 case EM_SETBKGNDCOLOR
:
809 LRESULT lColor
= ME_GetBackColor(editor
);
811 editor
->rgbBackColor
= -1;
813 editor
->rgbBackColor
= lParam
;
814 InvalidateRect(hWnd
, NULL
, TRUE
);
819 return editor
->nModifyStep
== 0 ? 0 : 1;
823 editor
->nModifyStep
= 0x80000000;
825 editor
->nModifyStep
= 0;
831 long nStyle
= GetWindowLongW(hWnd
, GWL_STYLE
);
833 nStyle
|= ES_READONLY
;
835 nStyle
&= ~ES_READONLY
;
836 SetWindowLongW(hWnd
, GWL_STYLE
, nStyle
);
840 case EM_SETEVENTMASK
:
841 editor
->nEventMask
= lParam
;
843 case EM_GETEVENTMASK
:
844 return editor
->nEventMask
;
845 case EM_SETCHARFORMAT
:
847 CHARFORMAT2W buf
, *p
;
848 BOOL bRepaint
= TRUE
;
849 p
= ME_ToCF2W(&buf
, (CHARFORMAT2W
*)lParam
);
851 ME_SetDefaultCharFormat(editor
, p
);
852 else if (wParam
== (SCF_WORD
| SCF_SELECTION
))
853 FIXME("word selection not supported\n");
854 else if (wParam
== SCF_ALL
)
855 ME_SetCharFormat(editor
, 0, ME_GetTextLength(editor
), p
);
858 ME_GetSelection(editor
, &from
, &to
);
859 bRepaint
= (from
!= to
);
860 ME_SetSelectionCharFormat(editor
, p
);
862 ME_CommitUndo(editor
);
864 ME_UpdateRepaint(editor
);
867 case EM_GETCHARFORMAT
:
870 tmp
.cbSize
= sizeof(tmp
);
872 ME_GetDefaultCharFormat(editor
, &tmp
);
874 ME_GetSelectionCharFormat(editor
, &tmp
);
875 ME_CopyToCFAny((CHARFORMAT2W
*)lParam
, &tmp
);
878 case EM_SETPARAFORMAT
:
879 ME_SetSelectionParaFormat(editor
, (PARAFORMAT2
*)lParam
);
880 ME_UpdateRepaint(editor
);
881 ME_CommitUndo(editor
);
883 case EM_GETPARAFORMAT
:
884 ME_GetSelectionParaFormat(editor
, (PARAFORMAT2
*)lParam
);
889 ME_GetSelection(editor
, &from
, &to
);
890 ME_InternalDeleteText(editor
, from
, to
-from
);
891 ME_CommitUndo(editor
);
892 ME_UpdateRepaint(editor
);
899 LPWSTR wszText
= ME_ToUnicode(hWnd
, (void *)lParam
);
900 size_t len
= lstrlenW(wszText
);
901 TRACE("EM_REPLACESEL - %s\n", debugstr_w(wszText
));
903 ME_GetSelection(editor
, &from
, &to
);
904 style
= ME_GetSelectionInsertStyle(editor
);
905 ME_InternalDeleteText(editor
, from
, to
-from
);
906 ME_InsertTextFromCursor(editor
, 0, wszText
, len
, style
);
907 ME_ReleaseStyle(style
);
908 ME_EndToUnicode(hWnd
, wszText
);
909 /* drop temporary style if line end */
910 /* FIXME question: does abc\n mean: put abc, clear temp style, put \n? (would require a change) */
911 if (len
>0 && wszText
[len
-1] == '\n')
912 ME_ClearTempStyle(editor
);
914 ME_CommitUndo(editor
);
916 ME_EmptyUndoStack(editor
);
917 ME_UpdateRepaint(editor
);
922 LPWSTR wszText
= ME_ToUnicode(hWnd
, (void *)lParam
);
923 TRACE("WM_SETTEXT - %s\n", (char *)(wszText
)); /* debugstr_w() */
924 ME_InternalDeleteText(editor
, 0, ME_GetTextLength(editor
));
925 /* uses default style! */
926 ME_InsertTextFromCursor(editor
, 0, wszText
, -1, editor
->pBuffer
->pDefaultStyle
);
927 ME_EndToUnicode(hWnd
, wszText
);
928 ME_CommitUndo(editor
);
929 ME_EmptyUndoStack(editor
);
930 ME_UpdateRepaint(editor
);
937 ME_GlobalDestStruct gds
;
938 UINT nRTFFormat
= RegisterClipboardFormatA("Rich Text Format");
941 if (!OpenClipboard(hWnd
))
943 if (IsClipboardFormatAvailable(nRTFFormat
))
944 cf
= nRTFFormat
, dwFormat
= SF_RTF
;
945 else if (IsClipboardFormatAvailable(CF_UNICODETEXT
))
946 cf
= CF_UNICODETEXT
, dwFormat
= SF_TEXT
|SF_UNICODE
;
950 gds
.hData
= GetClipboardData(cf
);
952 es
.dwCookie
= (DWORD
)&gds
;
953 es
.pfnCallback
= dwFormat
== SF_RTF
? ME_ReadFromHGLOBALRTF
: ME_ReadFromHGLOBALUnicode
;
954 SendMessageW(hWnd
, EM_STREAMIN
, dwFormat
|SFF_SELECTION
, (LPARAM
)&es
);
966 ME_GlobalDestStruct gds
;
968 if (!OpenClipboard(hWnd
))
972 ME_GetSelection(editor
, &from
, &to
);
973 pars
= ME_CountParagraphsBetween(editor
, from
, to
);
974 hData
= GlobalAlloc(GMEM_MOVEABLE
, sizeof(WCHAR
)*(to
-from
+pars
+1));
975 data
= (WCHAR
*)GlobalLock(hData
);
976 ME_GetTextW(editor
, data
, from
, to
-from
, TRUE
);
979 gds
.hData
= GlobalAlloc(GMEM_MOVEABLE
, 0);
981 es
.dwCookie
= (DWORD
)&gds
;
982 es
.pfnCallback
= ME_AppendToHGLOBAL
;
983 SendMessageW(hWnd
, EM_STREAMOUT
, SFF_SELECTION
|SF_RTF
, (LPARAM
)&es
);
984 GlobalReAlloc(gds
.hData
, gds
.nLength
+1, 0);
986 SetClipboardData(CF_UNICODETEXT
, hData
);
987 SetClipboardData(RegisterClipboardFormatA("Rich Text Format"), gds
.hData
);
992 ME_InternalDeleteText(editor
, from
, to
-from
);
993 ME_CommitUndo(editor
);
994 ME_UpdateRepaint(editor
);
998 case WM_GETTEXTLENGTH
:
999 return ME_GetTextLength(editor
);
1002 TEXTRANGEW tr
; /* W and A differ only by rng->lpstrText */
1004 tr
.chrg
.cpMax
= wParam
-1;
1005 tr
.lpstrText
= (WCHAR
*)lParam
;
1006 return RichEditANSIWndProc(hWnd
, EM_GETTEXTRANGE
, 0, (LPARAM
)&tr
);
1011 TEXTRANGEW tr
; /* W and A differ only by rng->lpstrText */
1012 ME_GetSelection(editor
, &from
, &to
);
1013 tr
.chrg
.cpMin
= from
;
1015 tr
.lpstrText
= (WCHAR
*)lParam
;
1016 return RichEditANSIWndProc(hWnd
, EM_GETTEXTRANGE
, 0, (LPARAM
)&tr
);
1018 case EM_GETTEXTRANGE
:
1020 TEXTRANGEW
*rng
= (TEXTRANGEW
*)lParam
;
1021 if (IsWindowUnicode(hWnd
))
1022 return ME_GetTextW(editor
, rng
->lpstrText
, rng
->chrg
.cpMin
, rng
->chrg
.cpMax
-rng
->chrg
.cpMin
, FALSE
);
1025 int nLen
= rng
->chrg
.cpMax
-rng
->chrg
.cpMin
;
1026 WCHAR
*p
= ALLOC_N_OBJ(WCHAR
, nLen
+1);
1027 int nChars
= ME_GetTextW(editor
, p
, rng
->chrg
.cpMin
, nLen
, FALSE
);
1028 /* FIXME this is a potential security hole (buffer overrun)
1029 if you know more about wchar->mbyte conversion please explain
1031 WideCharToMultiByte(CP_ACP
, 0, p
, nChars
+1, (char *)rng
->lpstrText
, nLen
+1, NULL
, NULL
);
1035 return ME_GetTextW(editor
, rng
->lpstrText
, rng
->chrg
.cpMin
, rng
->chrg
.cpMax
-rng
->chrg
.cpMin
, FALSE
);
1038 ME_CommitUndo(editor
);
1039 ME_WrapMarkedParagraphs(editor
);
1040 ME_MoveCaret(editor
);
1043 ME_DestroyEditor(editor
);
1044 SetWindowLongW(hWnd
, 0, 0);
1046 case WM_LBUTTONDOWN
:
1048 ME_LButtonDown(editor
, (short)LOWORD(lParam
), (short)HIWORD(lParam
));
1052 if (GetCapture() == hWnd
)
1053 ME_MouseMove(editor
, (short)LOWORD(lParam
), (short)HIWORD(lParam
));
1056 if (GetCapture() == hWnd
)
1060 hDC
= BeginPaint(hWnd
, &ps
);
1061 ME_PaintContent(editor
, hDC
, FALSE
, &ps
.rcPaint
);
1062 EndPaint(hWnd
, &ps
);
1065 ME_ShowCaret(editor
);
1066 ME_SendOldNotify(editor
, EN_SETFOCUS
);
1069 ME_HideCaret(editor
);
1070 ME_SendOldNotify(editor
, EN_KILLFOCUS
);
1074 HDC hDC
= (HDC
)wParam
;
1076 COLORREF rgbBG
= ME_GetBackColor(editor
);
1077 if (GetUpdateRect(hWnd
,&rc
,TRUE
))
1079 HBRUSH hbr
= CreateSolidBrush(rgbBG
);
1080 FillRect(hDC
, &rc
, hbr
);
1086 TRACE("editor wnd command = %d\n", LOWORD(wParam
));
1089 if (ME_ArrowKey(editor
, LOWORD(wParam
), GetKeyState(VK_CONTROL
)<0)) {
1090 ME_CommitUndo(editor
);
1091 ME_EnsureVisible(editor
, editor
->pCursors
[0].pRun
);
1093 ME_MoveCaret(editor
);
1097 if (GetKeyState(VK_CONTROL
)<0)
1099 if (LOWORD(wParam
)=='W')
1103 ME_GetSelectionCharFormat(editor
, &chf
);
1104 ME_DumpStyleToBuf(&chf
, buf
);
1105 MessageBoxA(NULL
, buf
, "Style dump", MB_OK
);
1107 if (LOWORD(wParam
)=='Q')
1109 ME_CheckCharOffsets(editor
);
1116 if (GetWindowLongW(editor
->hWnd
, GWL_STYLE
) & ES_READONLY
) {
1117 MessageBeep(MB_ICONERROR
);
1118 return 0; /* FIXME really 0 ? */
1120 wstr
= LOWORD(wParam
);
1121 if (((unsigned)wstr
)>=' ' || wstr
=='\r') {
1122 /* FIXME maybe it would make sense to call EM_REPLACESEL instead ? */
1123 ME_Style
*style
= ME_GetInsertStyle(editor
, 0);
1124 ME_SaveTempStyle(editor
);
1125 ME_InsertTextFromCursor(editor
, 0, &wstr
, 1, style
);
1126 ME_ReleaseStyle(style
);
1127 ME_CommitUndo(editor
);
1128 ME_UpdateRepaint(editor
);
1134 si
.cbSize
= sizeof(SCROLLINFO
);
1135 si
.fMask
= SIF_PAGE
|SIF_POS
|SIF_RANGE
|SIF_TRACKPOS
;
1136 GetScrollInfo(hWnd
, SB_VERT
, &si
);
1137 switch(LOWORD(wParam
)) {
1139 SetScrollPos(hWnd
, SB_VERT
, si
.nTrackPos
, FALSE
);
1140 ScrollWindow(hWnd
, 0, si
.nPos
-si
.nTrackPos
, NULL
, NULL
);
1141 /* InvalidateRect(hWnd, NULL, TRUE); */
1149 ME_MarkAllForWrapping(editor
);
1150 ME_WrapMarkedParagraphs(editor
);
1151 ME_UpdateScrollBar(editor
);
1153 return DefWindowProcW(hWnd
, msg
, wParam
, lParam
);
1155 case EM_GETOLEINTERFACE
:
1157 LPVOID
*ppvObj
= (LPVOID
*) lParam
;
1158 FIXME("EM_GETOLEINTERFACE %p: stub\n", ppvObj
);
1159 return CreateIRichEditOle(ppvObj
);
1163 return DefWindowProcW(hWnd
, msg
, wParam
, lParam
);
1168 /******************************************************************
1169 * RichEdit10ANSIWndProc (RICHED20.9)
1171 LRESULT WINAPI
RichEdit10ANSIWndProc(HWND hWnd
, UINT msg
, WPARAM wParam
, LPARAM lParam
)
1173 /* FIXME: this is NOT the same as 2.0 version */
1174 return RichEditANSIWndProc(hWnd
, msg
, wParam
, lParam
);
1177 void ME_SendOldNotify(ME_TextEditor
*editor
, int nCode
)
1179 HWND hWnd
= editor
->hWnd
;
1180 SendMessageA(GetParent(hWnd
), WM_COMMAND
, (nCode
<<16)|GetWindowLongW(hWnd
, GWLP_ID
), (LPARAM
)hWnd
);
1183 int ME_CountParagraphsBetween(ME_TextEditor
*editor
, int from
, int to
)
1185 ME_DisplayItem
*item
= ME_FindItemFwd(editor
->pBuffer
->pFirst
, diParagraph
);
1188 while(item
&& item
->member
.para
.next_para
->member
.para
.nCharOfs
<= from
)
1189 item
= item
->member
.para
.next_para
;
1192 while(item
&& item
->member
.para
.next_para
->member
.para
.nCharOfs
<= to
) {
1193 item
= item
->member
.para
.next_para
;
1200 int ME_GetTextW(ME_TextEditor
*editor
, WCHAR
*buffer
, int nStart
, int nChars
, int bCRLF
)
1202 ME_DisplayItem
*item
= ME_FindItemAtOffset(editor
, diRun
, nStart
, &nStart
);
1213 int nLen
= ME_StrLen(item
->member
.run
.strText
) - nStart
;
1216 CopyMemory(buffer
, item
->member
.run
.strText
->szData
+ nStart
, sizeof(WCHAR
)*nLen
);
1223 item
= ME_FindItemFwd(item
, diRun
);
1226 while(nChars
&& item
)
1228 int nLen
= ME_StrLen(item
->member
.run
.strText
);
1232 if (item
->member
.run
.nFlags
& MERF_ENDPARA
)
1242 CopyMemory(buffer
, item
->member
.run
.strText
->szData
, sizeof(WCHAR
)*nLen
);
1252 item
= ME_FindItemFwd(item
, diRun
);
1258 static WCHAR wszClassName
[] = {'R', 'i', 'c', 'h', 'E', 'd', 'i', 't', '2', '0', 'W', 0};
1259 static WCHAR wszClassName50
[] = {'R', 'i', 'c', 'h', 'E', 'd', 'i', 't', '5', '0', 'W', 0};
1261 void ME_RegisterEditorClass(HINSTANCE hInstance
)
1267 wcW
.style
= CS_HREDRAW
| CS_VREDRAW
;
1268 wcW
.lpfnWndProc
= RichEditANSIWndProc
;
1271 wcW
.hInstance
= NULL
; /* hInstance would register DLL-local class */
1273 wcW
.hCursor
= LoadCursorW(NULL
, MAKEINTRESOURCEW(IDC_IBEAM
));
1274 wcW
.hbrBackground
= (HBRUSH
)GetStockObject(NULL_BRUSH
);
1275 wcW
.lpszMenuName
= NULL
;
1276 wcW
.lpszClassName
= wszClassName
;
1277 bResult
= RegisterClassW(&wcW
);
1279 wcW
.lpszClassName
= wszClassName50
;
1280 bResult
= RegisterClassW(&wcW
);
1283 wcA
.style
= CS_HREDRAW
| CS_VREDRAW
;
1284 wcA
.lpfnWndProc
= RichEditANSIWndProc
;
1287 wcA
.hInstance
= NULL
; /* hInstance would register DLL-local class */
1289 wcA
.hCursor
= LoadCursorW(NULL
, MAKEINTRESOURCEW(IDC_IBEAM
));
1290 wcA
.hbrBackground
= (HBRUSH
)GetStockObject(NULL_BRUSH
);
1291 wcA
.lpszMenuName
= NULL
;
1292 wcA
.lpszClassName
= "RichEdit20A";
1293 bResult
= RegisterClassA(&wcA
);
1295 wcA
.lpszClassName
= "RichEdit50A";
1296 bResult
= RegisterClassA(&wcA
);
1300 BOOL WINAPI
DllMain(HINSTANCE hinstDLL
, DWORD fdwReason
, LPVOID lpvReserved
)
1305 case DLL_PROCESS_ATTACH
:
1306 DisableThreadLibraryCalls(hinstDLL
);
1307 me_heap
= HeapCreate (0, 0x10000, 0);
1308 ME_RegisterEditorClass(hinstDLL
);
1311 case DLL_PROCESS_DETACH
:
1312 UnregisterClassW(wszClassName
, 0);
1313 UnregisterClassW(wszClassName50
, 0);
1314 UnregisterClassA("RichEdit20A", 0);
1315 UnregisterClassA("RichEdit50A", 0);
1316 HeapDestroy (me_heap
);
1323 /******************************************************************
1324 * CreateTextServices (RICHED20.4)
1326 * FIXME should be ITextHost instead of void*
1328 HRESULT WINAPI
CreateTextServices(IUnknown
*punkOuter
, void *pITextHost
,
1332 /* FIXME should support aggregation */
1334 return CLASS_E_NOAGGREGATION
;
1336 return E_FAIL
; /* E_NOTIMPL isn't allowed by MSDN */
1339 /******************************************************************
1340 * REExtendedRegisterClass (RICHED20.8)
1342 * FIXME undocumented
1344 void WINAPI
REExtendedRegisterClass(void)