wined3d: Default to GLSL. This is safe because we now have proper ps2.0/vs2.0 detection.
[wine] / dlls / riched20 / tests / editor.c
1 /*
2 * Unit test suite for rich edit control
3 *
4 * Copyright 2006 Google (Thomas Kho)
5 * Copyright 2007 Matt Finnicum
6 * Copyright 2007 Dmitry Timoshkov
7 *
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 */
22
23 #include <stdarg.h>
24 #include <assert.h>
25 #include <windef.h>
26 #include <winbase.h>
27 #include <wingdi.h>
28 #include <winuser.h>
29 #include <winnls.h>
30 #include <ole2.h>
31 #include <richedit.h>
32 #include <time.h>
33 #include <wine/test.h>
34
35 static HMODULE hmoduleRichEdit;
36
37 static HWND new_window(LPCTSTR lpClassName, DWORD dwStyle, HWND parent) {
38   HWND hwnd;
39   hwnd = CreateWindow(lpClassName, NULL, dwStyle|WS_POPUP|WS_HSCROLL|WS_VSCROLL
40                       |WS_VISIBLE, 0, 0, 200, 60, parent, NULL,
41                       hmoduleRichEdit, NULL);
42   ok(hwnd != NULL, "class: %s, error: %d\n", lpClassName, (int) GetLastError());
43   return hwnd;
44 }
45
46 static HWND new_richedit(HWND parent) {
47   return new_window(RICHEDIT_CLASS, ES_MULTILINE, parent);
48 }
49
50 static const char haystack[] = "WINEWine wineWine wine WineWine";
51                              /* ^0        ^10       ^20       ^30 */
52
53 struct find_s {
54   int start;
55   int end;
56   const char *needle;
57   int flags;
58   int expected_loc;
59   int _todo_wine;
60 };
61
62
63 struct find_s find_tests[] = {
64   /* Find in empty text */
65   {0, -1, "foo", FR_DOWN, -1, 0},
66   {0, -1, "foo", 0, -1, 0},
67   {0, -1, "", FR_DOWN, -1, 0},
68   {20, 5, "foo", FR_DOWN, -1, 0},
69   {5, 20, "foo", FR_DOWN, -1, 0}
70 };
71
72 struct find_s find_tests2[] = {
73   /* No-result find */
74   {0, -1, "foo", FR_DOWN | FR_MATCHCASE, -1, 0},
75   {5, 20, "WINE", FR_DOWN | FR_MATCHCASE, -1, 0},
76
77   /* Subsequent finds */
78   {0, -1, "Wine", FR_DOWN | FR_MATCHCASE, 4, 0},
79   {5, 31, "Wine", FR_DOWN | FR_MATCHCASE, 13, 0},
80   {14, 31, "Wine", FR_DOWN | FR_MATCHCASE, 23, 0},
81   {24, 31, "Wine", FR_DOWN | FR_MATCHCASE, 27, 0},
82
83   /* Find backwards */
84   {19, 20, "Wine", FR_MATCHCASE, 13, 0},
85   {10, 20, "Wine", FR_MATCHCASE, 4, 0},
86   {20, 10, "Wine", FR_MATCHCASE, 13, 0},
87
88   /* Case-insensitive */
89   {1, 31, "wInE", FR_DOWN, 4, 0},
90   {1, 31, "Wine", FR_DOWN, 4, 0},
91
92   /* High-to-low ranges */
93   {20, 5, "Wine", FR_DOWN, -1, 0},
94   {2, 1, "Wine", FR_DOWN, -1, 0},
95   {30, 29, "Wine", FR_DOWN, -1, 0},
96   {20, 5, "Wine", 0, 13, 0},
97
98   /* Find nothing */
99   {5, 10, "", FR_DOWN, -1, 0},
100   {10, 5, "", FR_DOWN, -1, 0},
101   {0, -1, "", FR_DOWN, -1, 0},
102   {10, 5, "", 0, -1, 0},
103
104   /* Whole-word search */
105   {0, -1, "wine", FR_DOWN | FR_WHOLEWORD, 18, 0},
106   {0, -1, "win", FR_DOWN | FR_WHOLEWORD, -1, 0},
107   {13, -1, "wine", FR_DOWN | FR_WHOLEWORD, 18, 0},
108   {0, -1, "winewine", FR_DOWN | FR_WHOLEWORD, 0, 0},
109   {10, -1, "winewine", FR_DOWN | FR_WHOLEWORD, 23, 0},
110   {11, -1, "winewine", FR_WHOLEWORD, 0, 0},
111   {31, -1, "winewine", FR_WHOLEWORD, 23, 0},
112   
113   /* Bad ranges */
114   {5, 200, "XXX", FR_DOWN, -1, 0},
115   {-20, 20, "Wine", FR_DOWN, -1, 0},
116   {-20, 20, "Wine", FR_DOWN, -1, 0},
117   {-15, -20, "Wine", FR_DOWN, -1, 0},
118   {1<<12, 1<<13, "Wine", FR_DOWN, -1, 0},
119
120   /* Check the case noted in bug 4479 where matches at end aren't recognized */
121   {23, 31, "Wine", FR_DOWN | FR_MATCHCASE, 23, 0},
122   {27, 31, "Wine", FR_DOWN | FR_MATCHCASE, 27, 0},
123   {27, 32, "Wine", FR_DOWN | FR_MATCHCASE, 27, 0},
124   {13, 31, "WineWine", FR_DOWN | FR_MATCHCASE, 23, 0},
125   {13, 32, "WineWine", FR_DOWN | FR_MATCHCASE, 23, 0},
126
127   /* The backwards case of bug 4479; bounds look right
128    * Fails because backward find is wrong */
129   {19, 20, "WINE", FR_MATCHCASE, 0, 0},
130   {0, 20, "WINE", FR_MATCHCASE, -1, 0}
131 };
132
133 static void check_EM_FINDTEXT(HWND hwnd, const char *name, struct find_s *f, int id) {
134   int findloc;
135   FINDTEXT ft;
136   memset(&ft, 0, sizeof(ft));
137   ft.chrg.cpMin = f->start;
138   ft.chrg.cpMax = f->end;
139   ft.lpstrText = f->needle;
140   findloc = SendMessage(hwnd, EM_FINDTEXT, f->flags, (LPARAM) &ft);
141   ok(findloc == f->expected_loc,
142      "EM_FINDTEXT(%s,%d) '%s' in range(%d,%d), flags %08x, got start at %d\n",
143      name, id, f->needle, f->start, f->end, f->flags, findloc);
144 }
145
146 static void check_EM_FINDTEXTEX(HWND hwnd, const char *name, struct find_s *f,
147     int id) {
148   int findloc;
149   FINDTEXTEX ft;
150   memset(&ft, 0, sizeof(ft));
151   ft.chrg.cpMin = f->start;
152   ft.chrg.cpMax = f->end;
153   ft.lpstrText = f->needle;
154   findloc = SendMessage(hwnd, EM_FINDTEXTEX, f->flags, (LPARAM) &ft);
155   ok(findloc == f->expected_loc,
156       "EM_FINDTEXTEX(%s,%d) '%s' in range(%d,%d), flags %08x, start at %d\n",
157       name, id, f->needle, f->start, f->end, f->flags, findloc);
158   ok(ft.chrgText.cpMin == f->expected_loc,
159       "EM_FINDTEXTEX(%s,%d) '%s' in range(%d,%d), flags %08x, start at %d\n",
160       name, id, f->needle, f->start, f->end, f->flags, ft.chrgText.cpMin);
161   ok(ft.chrgText.cpMax == ((f->expected_loc == -1) ? -1
162         : f->expected_loc + strlen(f->needle)),
163       "EM_FINDTEXTEX(%s,%d) '%s' in range(%d,%d), flags %08x, end at %d\n",
164       name, id, f->needle, f->start, f->end, f->flags, ft.chrgText.cpMax);
165 }
166
167 static void run_tests_EM_FINDTEXT(HWND hwnd, const char *name, struct find_s *find,
168     int num_tests)
169 {
170   int i;
171
172   for (i = 0; i < num_tests; i++) {
173     if (find[i]._todo_wine) {
174       todo_wine {
175         check_EM_FINDTEXT(hwnd, name, &find[i], i);
176         check_EM_FINDTEXTEX(hwnd, name, &find[i], i);
177       }
178     } else {
179         check_EM_FINDTEXT(hwnd, name, &find[i], i);
180         check_EM_FINDTEXTEX(hwnd, name, &find[i], i);
181     }
182   }
183 }
184
185 static void test_EM_FINDTEXT(void)
186 {
187   HWND hwndRichEdit = new_richedit(NULL);
188
189   /* Empty rich edit control */
190   run_tests_EM_FINDTEXT(hwndRichEdit, "1", find_tests,
191       sizeof(find_tests)/sizeof(struct find_s));
192
193   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) haystack);
194
195   /* Haystack text */
196   run_tests_EM_FINDTEXT(hwndRichEdit, "2", find_tests2,
197       sizeof(find_tests2)/sizeof(struct find_s));
198
199   DestroyWindow(hwndRichEdit);
200 }
201
202 static const struct getline_s {
203   int line;
204   size_t buffer_len;
205   const char *text;
206 } gl[] = {
207   {0, 10, "foo bar\r"},
208   {1, 10, "\r"},
209   {2, 10, "bar\r"},
210   {3, 10, "\r"},
211
212   /* Buffer smaller than line length */
213   {0, 2, "foo bar\r"},
214   {0, 1, "foo bar\r"},
215   {0, 0, "foo bar\r"}
216 };
217
218 static void test_EM_GETLINE(void)
219 {
220   int i;
221   HWND hwndRichEdit = new_richedit(NULL);
222   static const int nBuf = 1024;
223   char dest[1024], origdest[1024];
224   const char text[] = "foo bar\n"
225       "\n"
226       "bar\n";
227
228   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text);
229
230   memset(origdest, 0xBB, nBuf);
231   for (i = 0; i < sizeof(gl)/sizeof(struct getline_s); i++)
232   {
233     int nCopied;
234     int expected_nCopied = min(gl[i].buffer_len, strlen(gl[i].text));
235     int expected_bytes_written = min(gl[i].buffer_len, strlen(gl[i].text) + 1);
236     memset(dest, 0xBB, nBuf);
237     *(WORD *) dest = gl[i].buffer_len;
238
239     /* EM_GETLINE appends a "\r\0" to the end of the line
240      * nCopied counts up to and including the '\r' */
241     nCopied = SendMessage(hwndRichEdit, EM_GETLINE, gl[i].line, (LPARAM) dest);
242     ok(nCopied == expected_nCopied, "%d: %d!=%d\n", i, nCopied,
243        expected_nCopied);
244     /* two special cases since a parameter is passed via dest */
245     if (gl[i].buffer_len == 0)
246       ok(!dest[0] && !dest[1] && !strncmp(dest+2, origdest+2, nBuf-2),
247          "buffer_len=0\n");
248     else if (gl[i].buffer_len == 1)
249       ok(dest[0] == gl[i].text[0] && !dest[1] &&
250          !strncmp(dest+2, origdest+2, nBuf-2), "buffer_len=1\n");
251     else
252     {
253       ok(!strncmp(dest, gl[i].text, expected_bytes_written),
254          "%d: expected_bytes_written=%d\n", i, expected_bytes_written);
255       ok(!strncmp(dest + expected_bytes_written, origdest
256                   + expected_bytes_written, nBuf - expected_bytes_written),
257          "%d: expected_bytes_written=%d\n", i, expected_bytes_written);
258     }
259   }
260
261   DestroyWindow(hwndRichEdit);
262 }
263
264 static int get_scroll_pos_y(HWND hwnd)
265 {
266   POINT p = {-1, -1};
267   SendMessage(hwnd, EM_GETSCROLLPOS, 0, (LPARAM) &p);
268   ok(p.x != -1 && p.y != -1, "p.x:%d p.y:%d\n", p.x, p.y);
269   return p.y;
270 }
271
272 static void move_cursor(HWND hwnd, long charindex)
273 {
274   CHARRANGE cr;
275   cr.cpMax = charindex;
276   cr.cpMin = charindex;
277   SendMessage(hwnd, EM_EXSETSEL, 0, (LPARAM) &cr);
278 }
279
280 static void line_scroll(HWND hwnd, int amount)
281 {
282   SendMessage(hwnd, EM_LINESCROLL, 0, amount);
283 }
284
285 static void test_EM_SCROLLCARET(void)
286 {
287   int prevY, curY;
288   HWND hwndRichEdit = new_richedit(NULL);
289   const char text[] = "aa\n"
290       "this is a long line of text that should be longer than the "
291       "control's width\n"
292       "cc\n"
293       "dd\n"
294       "ee\n"
295       "ff\n"
296       "gg\n"
297       "hh\n";
298
299   /* Can't verify this */
300   SendMessage(hwndRichEdit, EM_SCROLLCARET, 0, 0);
301
302   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text);
303
304   /* Caret above visible window */
305   line_scroll(hwndRichEdit, 3);
306   prevY = get_scroll_pos_y(hwndRichEdit);
307   SendMessage(hwndRichEdit, EM_SCROLLCARET, 0, 0);
308   curY = get_scroll_pos_y(hwndRichEdit);
309   ok(prevY != curY, "%d == %d\n", prevY, curY);
310
311   /* Caret below visible window */
312   move_cursor(hwndRichEdit, sizeof(text) - 1);
313   line_scroll(hwndRichEdit, -3);
314   prevY = get_scroll_pos_y(hwndRichEdit);
315   SendMessage(hwndRichEdit, EM_SCROLLCARET, 0, 0);
316   curY = get_scroll_pos_y(hwndRichEdit);
317   ok(prevY != curY, "%d == %d\n", prevY, curY);
318
319   /* Caret in visible window */
320   move_cursor(hwndRichEdit, sizeof(text) - 2);
321   prevY = get_scroll_pos_y(hwndRichEdit);
322   SendMessage(hwndRichEdit, EM_SCROLLCARET, 0, 0);
323   curY = get_scroll_pos_y(hwndRichEdit);
324   ok(prevY == curY, "%d != %d\n", prevY, curY);
325
326   /* Caret still in visible window */
327   line_scroll(hwndRichEdit, -1);
328   prevY = get_scroll_pos_y(hwndRichEdit);
329   SendMessage(hwndRichEdit, EM_SCROLLCARET, 0, 0);
330   curY = get_scroll_pos_y(hwndRichEdit);
331   ok(prevY == curY, "%d != %d\n", prevY, curY);
332
333   DestroyWindow(hwndRichEdit);
334 }
335
336 static void test_EM_SETCHARFORMAT(void)
337 {
338   HWND hwndRichEdit = new_richedit(NULL);
339   CHARFORMAT2 cf2;
340   int rc = 0;
341
342   /* Invalid flags, CHARFORMAT2 structure blanked out */
343   memset(&cf2, 0, sizeof(cf2));
344   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) 0xfffffff0,
345              (LPARAM) &cf2);
346   ok(rc == 0, "EM_SETCHARFORMAT returned %d instead of 0\n", rc);
347
348   /* A valid flag, CHARFORMAT2 structure blanked out */
349   memset(&cf2, 0, sizeof(cf2));
350   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_DEFAULT,
351              (LPARAM) &cf2);
352   ok(rc == 0, "EM_SETCHARFORMAT returned %d instead of 0\n", rc);
353
354   /* A valid flag, CHARFORMAT2 structure blanked out */
355   memset(&cf2, 0, sizeof(cf2));
356   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_SELECTION,
357              (LPARAM) &cf2);
358   ok(rc == 0, "EM_SETCHARFORMAT returned %d instead of 0\n", rc);
359
360   /* A valid flag, CHARFORMAT2 structure blanked out */
361   memset(&cf2, 0, sizeof(cf2));
362   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_WORD,
363              (LPARAM) &cf2);
364   ok(rc == 0, "EM_SETCHARFORMAT returned %d instead of 0\n", rc);
365
366   /* A valid flag, CHARFORMAT2 structure blanked out */
367   memset(&cf2, 0, sizeof(cf2));
368   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_ALL,
369              (LPARAM) &cf2);
370   ok(rc == 0, "EM_SETCHARFORMAT returned %d instead of 0\n", rc);
371
372   /* Invalid flags, CHARFORMAT2 structure minimally filled */
373   memset(&cf2, 0, sizeof(cf2));
374   cf2.cbSize = sizeof(CHARFORMAT2);
375   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) 0xfffffff0,
376              (LPARAM) &cf2);
377   ok(rc == 1, "EM_SETCHARFORMAT returned %d instead of 1\n", rc);
378
379   /* A valid flag, CHARFORMAT2 structure minimally filled */
380   memset(&cf2, 0, sizeof(cf2));
381   cf2.cbSize = sizeof(CHARFORMAT2);
382   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_DEFAULT,
383              (LPARAM) &cf2);
384   ok(rc == 1, "EM_SETCHARFORMAT returned %d instead of 1\n", rc);
385
386   /* A valid flag, CHARFORMAT2 structure minimally filled */
387   memset(&cf2, 0, sizeof(cf2));
388   cf2.cbSize = sizeof(CHARFORMAT2);
389   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_SELECTION,
390              (LPARAM) &cf2);
391   ok(rc == 1, "EM_SETCHARFORMAT returned %d instead of 1\n", rc);
392
393   /* A valid flag, CHARFORMAT2 structure minimally filled */
394   memset(&cf2, 0, sizeof(cf2));
395   cf2.cbSize = sizeof(CHARFORMAT2);
396   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_WORD,
397              (LPARAM) &cf2);
398   ok(rc == 1, "EM_SETCHARFORMAT returned %d instead of 1\n", rc);
399
400   /* A valid flag, CHARFORMAT2 structure minimally filled */
401   memset(&cf2, 0, sizeof(cf2));
402   cf2.cbSize = sizeof(CHARFORMAT2);
403   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_ALL,
404              (LPARAM) &cf2);
405   ok(rc == 1, "EM_SETCHARFORMAT returned %d instead of 1\n", rc);
406
407   DestroyWindow(hwndRichEdit);
408 }
409
410 static void test_EM_SETTEXTMODE(void)
411 {
412   HWND hwndRichEdit = new_richedit(NULL);
413   CHARFORMAT2 cf2, cf2test;
414   CHARRANGE cr;
415   int rc = 0;
416
417   /*Test that EM_SETTEXTMODE fails if text exists within the control*/
418   /*Insert text into the control*/
419
420   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "wine");
421
422   /*Attempt to change the control to plain text mode*/
423   rc = SendMessage(hwndRichEdit, EM_SETTEXTMODE, (WPARAM) TM_PLAINTEXT, 0);
424   ok(rc != 0, "EM_SETTEXTMODE: changed text mode in control containing text - returned: %d\n", rc);
425
426   /*Test that EM_SETTEXTMODE does not allow rich edit text to be pasted.
427   If rich text is pasted, it should have the same formatting as the rest
428   of the text in the control*/
429
430   /*Italicize the text
431   *NOTE: If the default text was already italicized, the test will simply
432   reverse; in other words, it will copy a regular "wine" into a plain
433   text window that uses an italicized format*/
434   cf2.cbSize = sizeof(CHARFORMAT2);
435   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_DEFAULT,
436              (LPARAM) &cf2);
437
438   cf2.dwMask = CFM_ITALIC | cf2.dwMask;
439   cf2.dwEffects = CFE_ITALIC ^ cf2.dwEffects;
440
441   /*EM_SETCHARFORMAT is not yet fully implemented for all WPARAMs in wine;
442   however, SCF_ALL has been implemented*/
443   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_ALL, (LPARAM) &cf2);
444   ok(rc == 1, "EM_SETCHARFORMAT returned %d instead of 1\n", rc);
445   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "wine");
446
447   /*Select the string "wine"*/
448   cr.cpMin = 0;
449   cr.cpMax = 4;
450   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
451
452   /*Copy the italicized "wine" to the clipboard*/
453   SendMessage(hwndRichEdit, WM_COPY, 0, 0);
454
455   /*Reset the formatting to default*/
456   cf2.dwEffects = CFE_ITALIC^cf2.dwEffects;
457   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_ALL, (LPARAM) &cf2);
458   ok(rc == 1, "EM_SETCHARFORMAT returned %d instead of 1\n", rc);
459
460   /*Clear the text in the control*/
461   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "");
462
463   /*Switch to Plain Text Mode*/
464   rc = SendMessage(hwndRichEdit, EM_SETTEXTMODE, (WPARAM) TM_PLAINTEXT, 0);
465   ok(rc == 0, "EM_SETTEXTMODE: unable to switch to plain text mode with empty control:  returned: %d\n", rc);
466
467   /*Input "wine" again in normal format*/
468   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "wine");
469
470   /*Paste the italicized "wine" into the control*/
471   SendMessage(hwndRichEdit, WM_PASTE, 0, 0);
472
473   /*Select a character from the first "wine" string*/
474   cr.cpMin = 2;
475   cr.cpMax = 3;
476   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
477
478   /*Retrieve its formatting*/
479   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_SELECTION,
480               (LPARAM) &cf2);
481
482   /*Select a character from the second "wine" string*/
483   cr.cpMin = 5;
484   cr.cpMax = 6;
485   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
486
487   /*Retrieve its formatting*/
488   cf2test.cbSize = sizeof(CHARFORMAT2);
489   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_SELECTION,
490                (LPARAM) &cf2test);
491
492   /*Compare the two formattings*/
493     ok((cf2.dwMask == cf2test.dwMask) && (cf2.dwEffects == cf2test.dwEffects),
494       "two formats found in plain text mode - cf2.dwEffects: %x cf2test.dwEffects: %x\n",
495        cf2.dwEffects, cf2test.dwEffects);
496   /*Test TM_RICHTEXT by: switching back to Rich Text mode
497                          printing "wine" in the current format(normal)
498                          pasting "wine" from the clipboard(italicized)
499                          comparing the two formats(should differ)*/
500
501   /*Attempt to switch with text in control*/
502   rc = SendMessage(hwndRichEdit, EM_SETTEXTMODE, (WPARAM) TM_RICHTEXT, 0);
503   ok(rc != 0, "EM_SETTEXTMODE: changed from plain text to rich text with text in control - returned: %d\n", rc);
504
505   /*Clear control*/
506   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "");
507
508   /*Switch into Rich Text mode*/
509   rc = SendMessage(hwndRichEdit, EM_SETTEXTMODE, (WPARAM) TM_RICHTEXT, 0);
510   ok(rc == 0, "EM_SETTEXTMODE: unable to change to rich text with empty control - returned: %d\n", rc);
511
512   /*Print "wine" in normal formatting into the control*/
513   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "wine");
514
515   /*Paste italicized "wine" into the control*/
516   SendMessage(hwndRichEdit, WM_PASTE, 0, 0);
517
518   /*Select text from the first "wine" string*/
519   cr.cpMin = 1;
520   cr.cpMax = 3;
521   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
522
523   /*Retrieve its formatting*/
524   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_SELECTION,
525                 (LPARAM) &cf2);
526
527   /*Select text from the second "wine" string*/
528   cr.cpMin = 6;
529   cr.cpMax = 7;
530   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
531
532   /*Retrieve its formatting*/
533   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_SELECTION,
534                 (LPARAM) &cf2test);
535
536   /*Test that the two formattings are not the same*/
537   todo_wine ok((cf2.dwMask == cf2test.dwMask) && (cf2.dwEffects != cf2test.dwEffects),
538       "expected different formats - cf2.dwMask: %x, cf2test.dwMask: %x, cf2.dwEffects: %x, cf2test.dwEffects: %x\n",
539       cf2.dwMask, cf2test.dwMask, cf2.dwEffects, cf2test.dwEffects);
540
541   DestroyWindow(hwndRichEdit);
542 }
543
544 static void test_TM_PLAINTEXT(void)
545 {
546   /*Tests plain text properties*/
547
548   HWND hwndRichEdit = new_richedit(NULL);
549   CHARFORMAT2 cf2, cf2test;
550   CHARRANGE cr;
551   int rc = 0;
552
553   /*Switch to plain text mode*/
554
555   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "");
556   SendMessage(hwndRichEdit, EM_SETTEXTMODE, TM_PLAINTEXT, 0);
557
558   /*Fill control with text*/
559
560   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "Is Wine an emulator? No it's not");
561
562   /*Select some text and bold it*/
563
564   cr.cpMin = 10;
565   cr.cpMax = 20;
566   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
567   cf2.cbSize = sizeof(CHARFORMAT2);
568   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_DEFAULT,
569               (LPARAM) &cf2);
570
571   cf2.dwMask = CFM_BOLD | cf2.dwMask;
572   cf2.dwEffects = CFE_BOLD ^ cf2.dwEffects;
573
574   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_SELECTION, (LPARAM) &cf2);
575   ok(rc == 0, "EM_SETCHARFORMAT returned %d instead of 0\n", rc);
576
577   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_WORD | SCF_SELECTION, (LPARAM) &cf2);
578   ok(rc == 0, "EM_SETCHARFORMAT returned %d instead of 0\n", rc);
579
580   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_ALL, (LPARAM)&cf2);
581   ok(rc == 1, "EM_SETCHARFORMAT returned %d instead of 1\n", rc);
582
583   /*Get the formatting of those characters*/
584
585   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_SELECTION, (LPARAM) &cf2);
586
587   /*Get the formatting of some other characters*/
588   cf2test.cbSize = sizeof(CHARFORMAT2);
589   cr.cpMin = 21;
590   cr.cpMax = 30;
591   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
592   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_SELECTION, (LPARAM) &cf2test);
593
594   /*Test that they are the same as plain text allows only one formatting*/
595
596   ok((cf2.dwMask == cf2test.dwMask) && (cf2.dwEffects == cf2test.dwEffects),
597      "two selections' formats differ - cf2.dwMask: %x, cf2test.dwMask %x, cf2.dwEffects: %x, cf2test.dwEffects: %x\n",
598      cf2.dwMask, cf2test.dwMask, cf2.dwEffects, cf2test.dwEffects);
599   
600   /*Fill the control with a "wine" string, which when inserted will be bold*/
601
602   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "wine");
603
604   /*Copy the bolded "wine" string*/
605
606   cr.cpMin = 0;
607   cr.cpMax = 4;
608   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
609   SendMessage(hwndRichEdit, WM_COPY, 0, 0);
610
611   /*Swap back to rich text*/
612
613   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "");
614   SendMessage(hwndRichEdit, EM_SETTEXTMODE, (WPARAM) TM_RICHTEXT, 0);
615
616   /*Set the default formatting to bold italics*/
617
618   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_DEFAULT, (LPARAM) &cf2);
619   cf2.dwMask |= CFM_ITALIC;
620   cf2.dwEffects ^= CFE_ITALIC;
621   rc = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_ALL, (LPARAM) &cf2);
622   ok(rc == 1, "EM_SETCHARFORMAT returned %d instead of 1\n", rc);
623
624   /*Set the text in the control to "wine", which will be bold and italicized*/
625
626   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "wine");
627
628   /*Paste the plain text "wine" string, which should take the insert
629    formatting, which at the moment is bold italics*/
630
631   SendMessage(hwndRichEdit, WM_PASTE, 0, 0);
632
633   /*Select the first "wine" string and retrieve its formatting*/
634
635   cr.cpMin = 1;
636   cr.cpMax = 3;
637   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
638   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_SELECTION, (LPARAM) &cf2);
639
640   /*Select the second "wine" string and retrieve its formatting*/
641
642   cr.cpMin = 5;
643   cr.cpMax = 7;
644   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
645   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_SELECTION, (LPARAM) &cf2test);
646
647   /*Compare the two formattings. They should be the same.*/
648
649   ok((cf2.dwMask == cf2test.dwMask) && (cf2.dwEffects == cf2test.dwEffects),
650      "Copied text retained formatting - cf2.dwMask: %x, cf2test.dwMask: %x, cf2.dwEffects: %x, cf2test.dwEffects: %x\n",
651      cf2.dwMask, cf2test.dwMask, cf2.dwEffects, cf2test.dwEffects);
652   DestroyWindow(hwndRichEdit);
653 }
654
655 static void test_WM_GETTEXT(void)
656 {
657     HWND hwndRichEdit = new_richedit(NULL);
658     static const char text[] = "Hello. My name is RichEdit!";
659     char buffer[1024] = {0};
660     int result;
661
662     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text);
663     SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
664     result = strcmp(buffer,text);
665     ok(result == 0, 
666         "WM_GETTEXT: settext and gettext differ. strcmp: %d\n", result);
667     DestroyWindow(hwndRichEdit);
668 }
669
670 /* FIXME: need to test unimplemented options and robustly test wparam */
671 static void test_EM_SETOPTIONS(void)
672 {
673     HWND hwndRichEdit = new_richedit(NULL);
674     static const char text[] = "Hello. My name is RichEdit!";
675     char buffer[1024] = {0};
676
677     /* NEGATIVE TESTING - NO OPTIONS SET */
678     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text);
679     SendMessage(hwndRichEdit, EM_SETOPTIONS, ECOOP_SET, 0);
680
681     /* testing no readonly by sending 'a' to the control*/
682     SetFocus(hwndRichEdit);
683     SendMessage(hwndRichEdit, WM_CHAR, 'a', 0x1E0001);
684     SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
685     ok(buffer[0]=='a', 
686        "EM_SETOPTIONS: Text not changed! s1:%s s2:%s\n", text, buffer);
687     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text);
688
689     /* READONLY - sending 'a' to the control */
690     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text);
691     SendMessage(hwndRichEdit, EM_SETOPTIONS, ECOOP_SET, ECO_READONLY);
692     SetFocus(hwndRichEdit);
693     SendMessage(hwndRichEdit, WM_CHAR, 'a', 0x1E0001);
694     SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
695     ok(buffer[0]==text[0], 
696        "EM_SETOPTIONS: Text changed! s1:%s s2:%s\n", text, buffer); 
697
698     DestroyWindow(hwndRichEdit);
699 }
700
701 static void check_CFE_LINK_rcvd(HWND hwnd, int is_url)
702 {
703   CHARFORMAT2W text_format;
704   int link_present = 0;
705   text_format.cbSize = sizeof(text_format);
706   SendMessage(hwnd, EM_SETSEL, 0, 0);
707   SendMessage(hwnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM) &text_format);
708   link_present = text_format.dwEffects & CFE_LINK;
709   if (is_url) 
710   { /* control text is url; should get CFE_LINK */
711         ok(0 != link_present, "URL Case: CFE_LINK not set.\n");
712   }
713   else 
714   {
715     ok(0 == link_present, "Non-URL Case: CFE_LINK set.\n");
716   }
717 }
718
719 static HWND new_static_wnd(HWND parent) {
720   return new_window("Static", 0, parent);
721 }
722
723 static void test_EM_AUTOURLDETECT(void)
724 {
725   struct urls_s {
726     const char *text;
727     int is_url;
728   } urls[12] = {
729     {"winehq.org", 0},
730     {"http://www.winehq.org", 1},
731     {"http//winehq.org", 0},
732     {"ww.winehq.org", 0},
733     {"www.winehq.org", 1},
734     {"ftp://192.168.1.1", 1},
735     {"ftp//192.168.1.1", 0},
736     {"mailto:your@email.com", 1},    
737     {"prospero:prosperoserver", 1},
738     {"telnet:test", 1},
739     {"news:newserver", 1},
740     {"wais:waisserver", 1}  
741   };
742
743   int i;
744   int urlRet=-1;
745   HWND hwndRichEdit, parent;
746
747   parent = new_static_wnd(NULL);
748   hwndRichEdit = new_richedit(parent);
749   /* Try and pass EM_AUTOURLDETECT some test wParam values */
750   urlRet=SendMessage(hwndRichEdit, EM_AUTOURLDETECT, FALSE, 0);
751   ok(urlRet==0, "Good wParam: urlRet is: %d\n", urlRet);
752   urlRet=SendMessage(hwndRichEdit, EM_AUTOURLDETECT, 1, 0);
753   ok(urlRet==0, "Good wParam2: urlRet is: %d\n", urlRet);
754   /* Windows returns -2147024809 (0x80070057) on bad wParam values */
755   urlRet=SendMessage(hwndRichEdit, EM_AUTOURLDETECT, 8, 0);
756   ok(urlRet==E_INVALIDARG, "Bad wParam: urlRet is: %d\n", urlRet);
757   urlRet=SendMessage(hwndRichEdit, EM_AUTOURLDETECT, (WPARAM)"h", (LPARAM)"h");
758   ok(urlRet==E_INVALIDARG, "Bad wParam2: urlRet is: %d\n", urlRet);
759   /* for each url, check the text to see if CFE_LINK effect is present */
760   for (i = 0; i < sizeof(urls)/sizeof(struct urls_s); i++) {
761     SendMessage(hwndRichEdit, EM_AUTOURLDETECT, FALSE, 0);
762     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) urls[i].text);
763     SendMessage(hwndRichEdit, WM_CHAR, 0, 0);
764     check_CFE_LINK_rcvd(hwndRichEdit, 0);
765     SendMessage(hwndRichEdit, EM_AUTOURLDETECT, TRUE, 0);
766     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) urls[i].text);
767     SendMessage(hwndRichEdit, WM_CHAR, 0, 0);
768     check_CFE_LINK_rcvd(hwndRichEdit, urls[i].is_url);
769   }
770   DestroyWindow(hwndRichEdit);
771   DestroyWindow(parent);
772 }
773
774 static void test_EM_SCROLL(void)
775 {
776   int i, j;
777   int r; /* return value */
778   int expr; /* expected return value */
779   HWND hwndRichEdit = new_richedit(NULL);
780   int y_before, y_after; /* units of lines of text */
781
782   /* test a richedit box containing a single line of text */
783   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "a");/* one line of text */
784   expr = 0x00010000;
785   for (i = 0; i < 4; i++) {
786     static const int cmd[4] = { SB_PAGEDOWN, SB_PAGEUP, SB_LINEDOWN, SB_LINEUP };
787
788     r = SendMessage(hwndRichEdit, EM_SCROLL, cmd[i], 0);
789     y_after = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
790     ok(expr == r, "EM_SCROLL improper return value returned (i == %d). "
791        "Got 0x%08x, expected 0x%08x\n", i, r, expr);
792     ok(y_after == 0, "EM_SCROLL improper scroll. scrolled to line %d, not 1 "
793        "(i == %d)\n", y_after, i);
794   }
795
796   /*
797    * test a richedit box that will scroll. There are two general
798    * cases: the case without any long lines and the case with a long
799    * line.
800    */
801   for (i = 0; i < 2; i++) { /* iterate through different bodies of text */
802     if (i == 0)
803       SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "a\nb\nc\nd\ne");
804     else
805       SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)
806                   "a LONG LINE LONG LINE LONG LINE LONG LINE LONG LINE "
807                   "LONG LINE LONG LINE LONG LINE LONG LINE LONG LINE "
808                   "LONG LINE \nb\nc\nd\ne");
809     for (j = 0; j < 12; j++) /* reset scrol position to top */
810       SendMessage(hwndRichEdit, EM_SCROLL, SB_PAGEUP, 0);
811
812     /* get first visible line */
813     y_before = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
814     r = SendMessage(hwndRichEdit, EM_SCROLL, SB_PAGEDOWN, 0); /* page down */
815
816     /* get new current first visible line */
817     y_after = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
818
819     ok(((r & 0xffffff00) == 0x00010000) &&
820        ((r & 0x000000ff) != 0x00000000),
821        "EM_SCROLL page down didn't scroll by a small positive number of "
822        "lines (r == 0x%08x)\n", r);
823     ok(y_after > y_before, "EM_SCROLL page down not functioning "
824        "(line %d scrolled to line %d\n", y_before, y_after);
825
826     y_before = y_after;
827     
828     r = SendMessage(hwndRichEdit, EM_SCROLL, SB_PAGEUP, 0); /* page up */
829     y_after = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
830     ok(((r & 0xffffff00) == 0x0001ff00),
831        "EM_SCROLL page up didn't scroll by a small negative number of lines "
832        "(r == 0x%08x)\n", r);
833     ok(y_after < y_before, "EM_SCROLL page up not functioning (line "
834        "%d scrolled to line %d\n", y_before, y_after);
835     
836     y_before = y_after;
837
838     r = SendMessage(hwndRichEdit, EM_SCROLL, SB_LINEDOWN, 0); /* line down */
839
840     y_after = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
841
842     ok(r == 0x00010001, "EM_SCROLL line down didn't scroll by one line "
843        "(r == 0x%08x)\n", r);
844     ok(y_after -1 == y_before, "EM_SCROLL line down didn't go down by "
845        "1 line (%d scrolled to %d)\n", y_before, y_after);
846
847     y_before = y_after;
848
849     r = SendMessage(hwndRichEdit, EM_SCROLL, SB_LINEUP, 0); /* line up */
850
851     y_after = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
852
853     ok(r == 0x0001ffff, "EM_SCROLL line up didn't scroll by one line "
854        "(r == 0x%08x)\n", r);
855     ok(y_after +1 == y_before, "EM_SCROLL line up didn't go up by 1 "
856        "line (%d scrolled to %d)\n", y_before, y_after);
857
858     y_before = y_after;
859
860     r = SendMessage(hwndRichEdit, EM_SCROLL,
861                     SB_LINEUP, 0); /* lineup beyond top */
862
863     y_after = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
864
865     ok(r == 0x00010000,
866        "EM_SCROLL line up returned indicating movement (0x%08x)\n", r);
867     ok(y_before == y_after,
868        "EM_SCROLL line up beyond top worked (%d)\n", y_after);
869
870     y_before = y_after;
871
872     r = SendMessage(hwndRichEdit, EM_SCROLL,
873                     SB_PAGEUP, 0);/*page up beyond top */
874
875     y_after = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
876
877     ok(r == 0x00010000,
878        "EM_SCROLL page up returned indicating movement (0x%08x)\n", r);
879     ok(y_before == y_after,
880        "EM_SCROLL page up beyond top worked (%d)\n", y_after);
881
882     for (j = 0; j < 12; j++) /* page down all the way to the bottom */
883       SendMessage(hwndRichEdit, EM_SCROLL, SB_PAGEDOWN, 0);
884     y_before = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
885     r = SendMessage(hwndRichEdit, EM_SCROLL,
886                     SB_PAGEDOWN, 0); /* page down beyond bot */
887     y_after = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
888
889     ok(r == 0x00010000,
890        "EM_SCROLL page down returned indicating movement (0x%08x)\n", r);
891     ok(y_before == y_after,
892        "EM_SCROLL page down beyond bottom worked (%d -> %d)\n",
893        y_before, y_after);
894
895     y_before = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
896     SendMessage(hwndRichEdit, EM_SCROLL,
897                 SB_LINEDOWN, 0); /* line down beyond bot */
898     y_after = SendMessage(hwndRichEdit, EM_GETFIRSTVISIBLELINE, 0, 0);
899     
900     ok(r == 0x00010000,
901        "EM_SCROLL line down returned indicating movement (0x%08x)\n", r);
902     ok(y_before == y_after,
903        "EM_SCROLL line down beyond bottom worked (%d -> %d)\n",
904        y_before, y_after);
905   }
906   DestroyWindow(hwndRichEdit);
907 }
908
909 static void test_EM_SETUNDOLIMIT(void)
910 {
911   /* cases we test for:
912    * default behaviour - limiting at 100 undo's 
913    * undo disabled - setting a limit of 0
914    * undo limited -  undo limit set to some to some number, like 2
915    * bad input - sending a negative number should default to 100 undo's */
916  
917   HWND hwndRichEdit = new_richedit(NULL);
918   CHARRANGE cr;
919   int i;
920   int result;
921   
922   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "x");
923   cr.cpMin = 0;
924   cr.cpMax = 1;
925   SendMessage(hwndRichEdit, WM_COPY, 0, 0);
926     /*Load "x" into the clipboard. Paste is an easy, undo'able operation.
927       also, multiple pastes don't combine like WM_CHAR would */
928   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
929
930   /* first case - check the default */
931   SendMessage(hwndRichEdit,EM_EMPTYUNDOBUFFER, 0,0); 
932   for (i=0; i<101; i++) /* Put 101 undo's on the stack */
933     SendMessage(hwndRichEdit, WM_PASTE, 0, 0); 
934   for (i=0; i<100; i++) /* Undo 100 of them */
935     SendMessage(hwndRichEdit, WM_UNDO, 0, 0); 
936   ok(!SendMessage(hwndRichEdit, EM_CANUNDO, 0, 0),
937      "EM_SETUNDOLIMIT allowed more than a hundred undo's by default.\n");
938
939   /* second case - cannot undo */
940   SendMessage(hwndRichEdit,EM_EMPTYUNDOBUFFER, 0, 0); 
941   SendMessage(hwndRichEdit, EM_SETUNDOLIMIT, 0, 0); 
942   SendMessage(hwndRichEdit,
943               WM_PASTE, 0, 0); /* Try to put something in the undo stack */
944   ok(!SendMessage(hwndRichEdit, EM_CANUNDO, 0, 0),
945      "EM_SETUNDOLIMIT allowed undo with UNDOLIMIT set to 0\n");
946
947   /* third case - set it to an arbitrary number */
948   SendMessage(hwndRichEdit,EM_EMPTYUNDOBUFFER, 0, 0); 
949   SendMessage(hwndRichEdit, EM_SETUNDOLIMIT, 2, 0); 
950   SendMessage(hwndRichEdit, WM_PASTE, 0, 0);
951   SendMessage(hwndRichEdit, WM_PASTE, 0, 0);
952   SendMessage(hwndRichEdit, WM_PASTE, 0, 0); 
953   /* If SETUNDOLIMIT is working, there should only be two undo's after this */
954   ok(SendMessage(hwndRichEdit, EM_CANUNDO, 0,0),
955      "EM_SETUNDOLIMIT didn't allow the first undo with UNDOLIMIT set to 2\n");
956   SendMessage(hwndRichEdit, WM_UNDO, 0, 0);
957   ok(SendMessage(hwndRichEdit, EM_CANUNDO, 0, 0),
958      "EM_SETUNDOLIMIT didn't allow a second undo with UNDOLIMIT set to 2\n");
959   SendMessage(hwndRichEdit, WM_UNDO, 0, 0); 
960   ok(!SendMessage(hwndRichEdit, EM_CANUNDO, 0, 0),
961      "EM_SETUNDOLIMIT allowed a third undo with UNDOLIMIT set to 2\n");
962   
963   /* fourth case - setting negative numbers should default to 100 undos */
964   SendMessage(hwndRichEdit,EM_EMPTYUNDOBUFFER, 0,0); 
965   result = SendMessage(hwndRichEdit, EM_SETUNDOLIMIT, -1, 0);
966   ok (result == 100, 
967       "EM_SETUNDOLIMIT returned %d when set to -1, instead of 100\n",result);
968       
969   DestroyWindow(hwndRichEdit);
970 }
971
972 static void test_ES_PASSWORD(void)
973 {
974   /* This isn't hugely testable, so we're just going to run it through its paces */
975
976   HWND hwndRichEdit = new_richedit(NULL);
977   WCHAR result;
978
979   /* First, check the default of a regular control */
980   result = SendMessage(hwndRichEdit, EM_GETPASSWORDCHAR, 0, 0);
981   ok (result == 0,
982         "EM_GETPASSWORDCHAR returned %c by default, instead of NULL\n",result);
983
984   /* Now, set it to something normal */
985   SendMessage(hwndRichEdit, EM_SETPASSWORDCHAR, 'x', 0);
986   result = SendMessage(hwndRichEdit, EM_GETPASSWORDCHAR, 0, 0);
987   ok (result == 120,
988         "EM_GETPASSWORDCHAR returned %c (%d) when set to 'x', instead of x (120)\n",result,result);
989
990   /* Now, set it to something odd */
991   SendMessage(hwndRichEdit, EM_SETPASSWORDCHAR, (WCHAR)1234, 0);
992   result = SendMessage(hwndRichEdit, EM_GETPASSWORDCHAR, 0, 0);
993   ok (result == 1234,
994         "EM_GETPASSWORDCHAR returned %c (%d) when set to 'x', instead of x (120)\n",result,result);
995   DestroyWindow(hwndRichEdit);
996 }
997
998 static void test_WM_SETTEXT()
999 {
1000   HWND hwndRichEdit = new_richedit(NULL);
1001   const char * TestItem1 = "TestSomeText";
1002   const char * TestItem2 = "TestSomeText\r";
1003   const char * TestItem2_after = "TestSomeText\r\n";
1004   const char * TestItem3 = "TestSomeText\rSomeMoreText\r";
1005   const char * TestItem3_after = "TestSomeText\r\nSomeMoreText\r\n";
1006   const char * TestItem4 = "TestSomeText\n\nTestSomeText";
1007   const char * TestItem4_after = "TestSomeText\r\n\r\nTestSomeText";
1008   const char * TestItem5 = "TestSomeText\r\r\nTestSomeText";
1009   const char * TestItem5_after = "TestSomeText TestSomeText";
1010   const char * TestItem6 = "TestSomeText\r\r\n\rTestSomeText";
1011   const char * TestItem6_after = "TestSomeText \r\nTestSomeText";
1012   const char * TestItem7 = "TestSomeText\r\n\r\r\n\rTestSomeText";
1013   const char * TestItem7_after = "TestSomeText\r\n \r\nTestSomeText";
1014   char buf[1024] = {0};
1015   LRESULT result;
1016
1017   /* This test attempts to show that WM_SETTEXT on a riched20 control causes
1018      any solitary \r to be converted to \r\n on return. Properly paired
1019      \r\n are not affected. It also shows that the special sequence \r\r\n
1020      gets converted to a single space.
1021    */
1022
1023 #define TEST_SETTEXT(a, b) \
1024   result = SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) a); \
1025   ok (result == 1, "WM_SETTEXT returned %ld instead of 1\n", result); \
1026   result = SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buf); \
1027   ok (result == strlen(buf), \
1028         "WM_GETTEXT returned %ld instead of expected %u\n", \
1029         result, strlen(buf)); \
1030   result = strcmp(b, buf); \
1031   ok(result == 0, \
1032         "WM_SETTEXT round trip: strcmp = %ld\n", result);
1033
1034   TEST_SETTEXT(TestItem1, TestItem1)
1035   TEST_SETTEXT(TestItem2, TestItem2_after)
1036   TEST_SETTEXT(TestItem3, TestItem3_after)
1037   TEST_SETTEXT(TestItem3_after, TestItem3_after)
1038   TEST_SETTEXT(TestItem4, TestItem4_after)
1039   TEST_SETTEXT(TestItem5, TestItem5_after)
1040   TEST_SETTEXT(TestItem6, TestItem6_after)
1041   TEST_SETTEXT(TestItem7, TestItem7_after)
1042
1043 #undef TEST_SETTEXT
1044   DestroyWindow(hwndRichEdit);
1045 }
1046
1047 static void test_EM_SETTEXTEX(void)
1048 {
1049   HWND hwndRichEdit = new_richedit(NULL);
1050   SETTEXTEX setText;
1051   GETTEXTEX getText;
1052   WCHAR TestItem1[] = {'T', 'e', 's', 't', 
1053                        'S', 'o', 'm', 'e', 
1054                        'T', 'e', 'x', 't', 0}; 
1055   WCHAR TestItem2[] = {'T', 'e', 's', 't',
1056                        'S', 'o', 'm', 'e',
1057                        'T', 'e', 'x', 't',
1058                       '\r', 0};
1059   const char * TestItem2_after = "TestSomeText\r\n";
1060   WCHAR TestItem3[] = {'T', 'e', 's', 't',
1061                        'S', 'o', 'm', 'e',
1062                        'T', 'e', 'x', 't',
1063                       '\r','\n','\r','\n', 0};
1064   WCHAR TestItem3alt[] = {'T', 'e', 's', 't',
1065                        'S', 'o', 'm', 'e',
1066                        'T', 'e', 'x', 't',
1067                        '\n','\n', 0};
1068   WCHAR TestItem3_after[] = {'T', 'e', 's', 't',
1069                        'S', 'o', 'm', 'e',
1070                        'T', 'e', 'x', 't',
1071                        '\r','\r', 0};
1072   WCHAR TestItem4[] = {'T', 'e', 's', 't',
1073                        'S', 'o', 'm', 'e',
1074                        'T', 'e', 'x', 't',
1075                       '\r','\r','\n','\r',
1076                       '\n', 0};
1077   WCHAR TestItem4_after[] = {'T', 'e', 's', 't',
1078                        'S', 'o', 'm', 'e',
1079                        'T', 'e', 'x', 't',
1080                        ' ','\r', 0};
1081 #define MAX_BUF_LEN 1024
1082   WCHAR buf[MAX_BUF_LEN];
1083   int result;
1084   CHARRANGE cr;
1085
1086   setText.codepage = 1200;  /* no constant for unicode */
1087   getText.codepage = 1200;  /* no constant for unicode */
1088   getText.cb = MAX_BUF_LEN;
1089   getText.flags = GT_DEFAULT;
1090   getText.lpDefaultChar = NULL;
1091   getText.lpUsedDefaultChar = NULL;
1092
1093   setText.flags = 0;
1094   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM) TestItem1);
1095   SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buf);
1096   ok(lstrcmpW(buf, TestItem1) == 0,
1097       "EM_GETTEXTEX results not what was set by EM_SETTEXTEX\n");
1098
1099   /* Unlike WM_SETTEXT/WM_GETTEXT pair, EM_SETTEXTEX/EM_GETTEXTEX does not
1100      convert \r to \r\n on return
1101    */
1102   setText.codepage = 1200;  /* no constant for unicode */
1103   getText.codepage = 1200;  /* no constant for unicode */
1104   getText.cb = MAX_BUF_LEN;
1105   getText.flags = GT_DEFAULT;
1106   getText.lpDefaultChar = NULL;
1107   getText.lpUsedDefaultChar = NULL;
1108   setText.flags = 0;
1109   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM) TestItem2);
1110   SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buf);
1111   ok(lstrcmpW(buf, TestItem2) == 0,
1112       "EM_GETTEXTEX results not what was set by EM_SETTEXTEX\n");
1113
1114   /* However, WM_GETTEXT *does* see \r\n where EM_GETTEXTEX would see \r */
1115   SendMessage(hwndRichEdit, WM_GETTEXT, MAX_BUF_LEN, (LPARAM)buf);
1116   ok(strcmp((const char *)buf, TestItem2_after) == 0,
1117       "WM_GETTEXT did *not* see \\r converted to \\r\\n pairs.\n");
1118
1119   /* \r\n pairs get changed into \r */
1120   setText.codepage = 1200;  /* no constant for unicode */
1121   getText.codepage = 1200;  /* no constant for unicode */
1122   getText.cb = MAX_BUF_LEN;
1123   getText.flags = GT_DEFAULT;
1124   getText.lpDefaultChar = NULL;
1125   getText.lpUsedDefaultChar = NULL;
1126   setText.flags = 0;
1127   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM) TestItem3);
1128   SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buf);
1129   ok(lstrcmpW(buf, TestItem3_after) == 0,
1130       "EM_SETTEXTEX did not convert properly\n");
1131
1132   /* \n also gets changed to \r */
1133   setText.codepage = 1200;  /* no constant for unicode */
1134   getText.codepage = 1200;  /* no constant for unicode */
1135   getText.cb = MAX_BUF_LEN;
1136   getText.flags = GT_DEFAULT;
1137   getText.lpDefaultChar = NULL;
1138   getText.lpUsedDefaultChar = NULL;
1139   setText.flags = 0;
1140   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM) TestItem3alt);
1141   SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buf);
1142   ok(lstrcmpW(buf, TestItem3_after) == 0,
1143       "EM_SETTEXTEX did not convert properly\n");
1144
1145   /* \r\r\n gets changed into single space */
1146   setText.codepage = 1200;  /* no constant for unicode */
1147   getText.codepage = 1200;  /* no constant for unicode */
1148   getText.cb = MAX_BUF_LEN;
1149   getText.flags = GT_DEFAULT;
1150   getText.lpDefaultChar = NULL;
1151   getText.lpUsedDefaultChar = NULL;
1152   setText.flags = 0;
1153   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM) TestItem4);
1154   SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buf);
1155   ok(lstrcmpW(buf, TestItem4_after) == 0,
1156       "EM_SETTEXTEX did not convert properly\n");
1157
1158   result = SendMessage(hwndRichEdit, EM_SETTEXTEX, 
1159                        (WPARAM)&setText, (LPARAM) NULL);
1160   SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buf);
1161   
1162   ok (result == 1, 
1163       "EM_SETTEXTEX returned %d, instead of 1\n",result);
1164   ok(lstrlenW(buf) == 0,
1165       "EM_SETTEXTEX with NULL lParam should clear rich edit.\n");
1166   
1167   /* put some text back */
1168   setText.flags = 0;
1169   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM) TestItem1);
1170   /* select some text */
1171   cr.cpMax = 1;
1172   cr.cpMin = 3;
1173   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
1174   /* replace current selection */
1175   setText.flags = ST_SELECTION;
1176   result = SendMessage(hwndRichEdit, EM_SETTEXTEX, 
1177                        (WPARAM)&setText, (LPARAM) NULL);
1178   ok(result == 0,
1179       "EM_SETTEXTEX with NULL lParam to replace selection"
1180       " with no text should return 0. Got %i\n",
1181       result);
1182   
1183   /* put some text back */
1184   setText.flags = 0;
1185   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM) TestItem1);
1186   /* select some text */
1187   cr.cpMax = 1;
1188   cr.cpMin = 3;
1189   SendMessage(hwndRichEdit, EM_EXSETSEL, 0, (LPARAM) &cr);
1190   /* replace current selection */
1191   setText.flags = ST_SELECTION;
1192   result = SendMessage(hwndRichEdit, EM_SETTEXTEX,
1193                        (WPARAM)&setText, (LPARAM) TestItem1);
1194   /* get text */
1195   SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buf);
1196   ok(result == lstrlenW(TestItem1),
1197       "EM_SETTEXTEX with NULL lParam to replace selection"
1198       " with no text should return 0. Got %i\n",
1199       result);
1200   ok(lstrlenW(buf) == 22,
1201       "EM_SETTEXTEX to replace selection with more text failed: %i.\n",
1202       lstrlenW(buf) );
1203
1204   DestroyWindow(hwndRichEdit);
1205 }
1206
1207 static void test_EM_LIMITTEXT(void)
1208 {
1209   int ret;
1210
1211   HWND hwndRichEdit = new_richedit(NULL);
1212
1213   /* The main purpose of this test is to demonstrate that the nonsense in MSDN
1214    * about setting the length to -1 for multiline edit controls doesn't happen.
1215    */
1216
1217   /* Don't check default gettextlimit case. That's done in other tests */
1218
1219   /* Set textlimit to 100 */
1220   SendMessage (hwndRichEdit, EM_LIMITTEXT, 100, 0);
1221   ret = SendMessage (hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1222   ok (ret == 100,
1223       "EM_LIMITTEXT: set to 100, returned: %d, expected: 100\n", ret);
1224
1225   /* Set textlimit to 0 */
1226   SendMessage (hwndRichEdit, EM_LIMITTEXT, 0, 0);
1227   ret = SendMessage (hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1228   ok (ret == 65536,
1229       "EM_LIMITTEXT: set to 0, returned: %d, expected: 65536\n", ret);
1230
1231   /* Set textlimit to -1 */
1232   SendMessage (hwndRichEdit, EM_LIMITTEXT, -1, 0);
1233   ret = SendMessage (hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1234   ok (ret == -1,
1235       "EM_LIMITTEXT: set to -1, returned: %d, expected: -1\n", ret);
1236
1237   /* Set textlimit to -2 */
1238   SendMessage (hwndRichEdit, EM_LIMITTEXT, -2, 0);
1239   ret = SendMessage (hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1240   ok (ret == -2,
1241       "EM_LIMITTEXT: set to -2, returned: %d, expected: -2\n", ret);
1242
1243   DestroyWindow (hwndRichEdit);
1244 }
1245
1246
1247 static void test_EM_EXLIMITTEXT(void)
1248 {
1249   int i, selBegin, selEnd, len1, len2;
1250   int result;
1251   char text[1024 + 1];
1252   char buffer[1024 + 1];
1253   int textlimit = 0; /* multiple of 100 */
1254   HWND hwndRichEdit = new_richedit(NULL);
1255   
1256   i = SendMessage(hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1257   ok(32767 == i, "EM_EXLIMITTEXT: expected: %d, actual: %d\n", 32767, i); /* default */
1258   
1259   textlimit = 256000;
1260   SendMessage(hwndRichEdit, EM_EXLIMITTEXT, 0, textlimit);
1261   i = SendMessage(hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1262   /* set higher */
1263   ok(textlimit == i, "EM_EXLIMITTEXT: expected: %d, actual: %d\n", textlimit, i);
1264   
1265   textlimit = 1000;
1266   SendMessage(hwndRichEdit, EM_EXLIMITTEXT, 0, textlimit);
1267   i = SendMessage(hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1268   /* set lower */
1269   ok(textlimit == i, "EM_EXLIMITTEXT: expected: %d, actual: %d\n", textlimit, i);
1270  
1271   SendMessage(hwndRichEdit, EM_EXLIMITTEXT, 0, 0);
1272   i = SendMessage(hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1273   /* default for WParam = 0 */
1274   ok(65536 == i, "EM_EXLIMITTEXT: expected: %d, actual: %d\n", 65536, i);
1275  
1276   textlimit = sizeof(text)-1;
1277   memset(text, 'W', textlimit);
1278   text[sizeof(text)-1] = 0;
1279   SendMessage(hwndRichEdit, EM_EXLIMITTEXT, 0, textlimit);
1280   /* maxed out text */
1281   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text);
1282   
1283   SendMessage(hwndRichEdit, EM_SETSEL, 0, -1);  /* select everything */
1284   SendMessage(hwndRichEdit, EM_GETSEL, (WPARAM)&selBegin, (LPARAM)&selEnd);
1285   len1 = selEnd - selBegin;
1286   
1287   SendMessage(hwndRichEdit, WM_KEYDOWN, VK_BACK, 1);
1288   SendMessage(hwndRichEdit, WM_CHAR, VK_BACK, 1);
1289   SendMessage(hwndRichEdit, WM_KEYUP, VK_BACK, 1);
1290   SendMessage(hwndRichEdit, EM_SETSEL, 0, -1);
1291   SendMessage(hwndRichEdit, EM_GETSEL, (WPARAM)&selBegin, (LPARAM)&selEnd);
1292   len2 = selEnd - selBegin;
1293   
1294   ok(len1 != len2,
1295     "EM_EXLIMITTEXT: Change Expected\nOld Length: %d, New Length: %d, Limit: %d\n",
1296     len1,len2,i);
1297   
1298   SendMessage(hwndRichEdit, WM_KEYDOWN, 'A', 1);
1299   SendMessage(hwndRichEdit, WM_CHAR, 'A', 1);
1300   SendMessage(hwndRichEdit, WM_KEYUP, 'A', 1);
1301   SendMessage(hwndRichEdit, EM_SETSEL, 0, -1);
1302   SendMessage(hwndRichEdit, EM_GETSEL, (WPARAM)&selBegin, (LPARAM)&selEnd);
1303   len1 = selEnd - selBegin;
1304   
1305   ok(len1 != len2,
1306     "EM_EXLIMITTEXT: Change Expected\nOld Length: %d, New Length: %d, Limit: %d\n",
1307     len1,len2,i);
1308   
1309   SendMessage(hwndRichEdit, WM_KEYDOWN, 'A', 1);
1310   SendMessage(hwndRichEdit, WM_CHAR, 'A', 1);
1311   SendMessage(hwndRichEdit, WM_KEYUP, 'A', 1);  /* full; should be no effect */
1312   SendMessage(hwndRichEdit, EM_SETSEL, 0, -1);
1313   SendMessage(hwndRichEdit, EM_GETSEL, (WPARAM)&selBegin, (LPARAM)&selEnd);
1314   len2 = selEnd - selBegin;
1315   
1316   ok(len1 == len2, 
1317     "EM_EXLIMITTEXT: No Change Expected\nOld Length: %d, New Length: %d, Limit: %d\n",
1318     len1,len2,i);
1319
1320   /* set text up to the limit, select all the text, then add a char */
1321   textlimit = 5;
1322   memset(text, 'W', textlimit);
1323   text[textlimit] = 0;
1324   SendMessage(hwndRichEdit, EM_EXLIMITTEXT, 0, textlimit);
1325   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text);
1326   SendMessage(hwndRichEdit, EM_SETSEL, 0, -1);
1327   SendMessage(hwndRichEdit, WM_CHAR, 'A', 1);
1328   SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1329   result = strcmp(buffer, "A");
1330   ok(0 == result, "got string = \"%s\"\n", buffer);
1331
1332   /* WM_SETTEXT not limited */
1333   textlimit = 10;
1334   memset(text, 'W', textlimit);
1335   text[textlimit] = 0;
1336   SendMessage(hwndRichEdit, EM_EXLIMITTEXT, 0, textlimit-5);
1337   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text);
1338   SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1339   i = strlen(buffer);
1340   ok(10 == i, "expected 10 chars\n");
1341   i = SendMessage(hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1342   ok(10 == i, "EM_EXLIMITTEXT: expected: %d, actual: %d\n", 10, i);
1343
1344   /* try inserting more text at end */
1345   i = SendMessage(hwndRichEdit, WM_CHAR, 'A', 0);
1346   ok(0 == i, "WM_CHAR wasn't processed\n");
1347   SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1348   i = strlen(buffer);
1349   ok(10 == i, "expected 10 chars, got %i\n", i);
1350   i = SendMessage(hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1351   ok(10 == i, "EM_EXLIMITTEXT: expected: %d, actual: %d\n", 10, i);
1352
1353   /* try inserting text at beginning */
1354   SendMessage(hwndRichEdit, EM_SETSEL, 0, 0);
1355   i = SendMessage(hwndRichEdit, WM_CHAR, 'A', 0);
1356   ok(0 == i, "WM_CHAR wasn't processed\n");
1357   SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1358   i = strlen(buffer);
1359   ok(10 == i, "expected 10 chars, got %i\n", i);
1360   i = SendMessage(hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1361   ok(10 == i, "EM_EXLIMITTEXT: expected: %d, actual: %d\n", 10, i);
1362
1363   /* WM_CHAR is limited */
1364   textlimit = 1;
1365   SendMessage(hwndRichEdit, EM_EXLIMITTEXT, 0, textlimit);
1366   SendMessage(hwndRichEdit, EM_SETSEL, 0, -1);  /* select everything */
1367   i = SendMessage(hwndRichEdit, WM_CHAR, 'A', 0);
1368   ok(0 == i, "WM_CHAR wasn't processed\n");
1369   i = SendMessage(hwndRichEdit, WM_CHAR, 'A', 0);
1370   ok(0 == i, "WM_CHAR wasn't processed\n");
1371   SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1372   i = strlen(buffer);
1373   ok(1 == i, "expected 1 chars, got %i instead\n", i);
1374
1375   DestroyWindow(hwndRichEdit);
1376 }
1377
1378 static void test_EM_GETLIMITTEXT(void)
1379 {
1380   int i;
1381   HWND hwndRichEdit = new_richedit(NULL);
1382
1383   i = SendMessage(hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1384   ok(32767 == i, "expected: %d, actual: %d\n", 32767, i); /* default value */
1385
1386   SendMessage(hwndRichEdit, EM_EXLIMITTEXT, 0, 50000);
1387   i = SendMessage(hwndRichEdit, EM_GETLIMITTEXT, 0, 0);
1388   ok(50000 == i, "expected: %d, actual: %d\n", 50000, i);
1389
1390   DestroyWindow(hwndRichEdit);
1391 }
1392
1393 static void test_WM_SETFONT(void)
1394 {
1395   /* There is no invalid input or error conditions for this function.
1396    * NULL wParam and lParam just fall back to their default values 
1397    * It should be noted that even if you use a gibberish name for your fonts
1398    * here, it will still work because the name is stored. They will display as
1399    * System, but will report their name to be whatever they were created as */
1400   
1401   HWND hwndRichEdit = new_richedit(NULL);
1402   HFONT testFont1 = CreateFontA (0,0,0,0,FW_LIGHT, 0, 0, 0, ANSI_CHARSET, 
1403     OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY, DEFAULT_PITCH | 
1404     FF_DONTCARE, "Marlett");
1405   HFONT testFont2 = CreateFontA (0,0,0,0,FW_LIGHT, 0, 0, 0, ANSI_CHARSET, 
1406     OUT_TT_PRECIS, CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY, DEFAULT_PITCH | 
1407     FF_DONTCARE, "MS Sans Serif");
1408   HFONT testFont3 = CreateFontA (0,0,0,0,FW_LIGHT, 0, 0, 0, ANSI_CHARSET, 
1409     OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY, DEFAULT_PITCH | 
1410     FF_DONTCARE, "Courier");
1411   LOGFONTA sentLogFont;
1412   CHARFORMAT2A returnedCF2A;
1413   
1414   returnedCF2A.cbSize = sizeof(returnedCF2A);
1415   
1416   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "x");
1417   SendMessage(hwndRichEdit, WM_SETFONT, (WPARAM)testFont1,(LPARAM) MAKELONG((WORD) TRUE, 0));
1418   SendMessage(hwndRichEdit, EM_GETCHARFORMAT,   SCF_DEFAULT,  (LPARAM) &returnedCF2A);
1419
1420   GetObjectA(testFont1, sizeof(LOGFONTA), &sentLogFont);
1421   ok (!strcmp(sentLogFont.lfFaceName,returnedCF2A.szFaceName),
1422     "EM_GETCHARFOMAT: Returned wrong font on test 1. Sent: %s, Returned: %s\n",
1423     sentLogFont.lfFaceName,returnedCF2A.szFaceName);
1424
1425   SendMessage(hwndRichEdit, WM_SETFONT, (WPARAM)testFont2,(LPARAM) MAKELONG((WORD) TRUE, 0));
1426   SendMessage(hwndRichEdit, EM_GETCHARFORMAT,   SCF_DEFAULT,  (LPARAM) &returnedCF2A);
1427   GetObjectA(testFont2, sizeof(LOGFONTA), &sentLogFont);
1428   ok (!strcmp(sentLogFont.lfFaceName,returnedCF2A.szFaceName),
1429     "EM_GETCHARFOMAT: Returned wrong font on test 2. Sent: %s, Returned: %s\n",
1430     sentLogFont.lfFaceName,returnedCF2A.szFaceName);
1431     
1432   SendMessage(hwndRichEdit, WM_SETFONT, (WPARAM)testFont3,(LPARAM) MAKELONG((WORD) TRUE, 0));
1433   SendMessage(hwndRichEdit, EM_GETCHARFORMAT,   SCF_DEFAULT,  (LPARAM) &returnedCF2A);
1434   GetObjectA(testFont3, sizeof(LOGFONTA), &sentLogFont);
1435   ok (!strcmp(sentLogFont.lfFaceName,returnedCF2A.szFaceName),
1436     "EM_GETCHARFOMAT: Returned wrong font on test 3. Sent: %s, Returned: %s\n",
1437     sentLogFont.lfFaceName,returnedCF2A.szFaceName);
1438    
1439   /* This last test is special since we send in NULL. We clear the variables
1440    * and just compare to "System" instead of the sent in font name. */
1441   ZeroMemory(&returnedCF2A,sizeof(returnedCF2A));
1442   ZeroMemory(&sentLogFont,sizeof(sentLogFont));
1443   returnedCF2A.cbSize = sizeof(returnedCF2A);
1444   
1445   SendMessage(hwndRichEdit, WM_SETFONT, (WPARAM)NULL,(LPARAM) MAKELONG((WORD) TRUE, 0));
1446   SendMessage(hwndRichEdit, EM_GETCHARFORMAT,   SCF_DEFAULT,  (LPARAM) &returnedCF2A);
1447   GetObjectA(NULL, sizeof(LOGFONTA), &sentLogFont);
1448   ok (!strcmp("System",returnedCF2A.szFaceName),
1449     "EM_GETCHARFOMAT: Returned wrong font on test 4. Sent: NULL, Returned: %s. Expected \"System\".\n",returnedCF2A.szFaceName);
1450   
1451   DestroyWindow(hwndRichEdit);
1452 }
1453
1454
1455 static DWORD CALLBACK test_EM_GETMODIFY_esCallback(DWORD_PTR dwCookie,
1456                                          LPBYTE pbBuff,
1457                                          LONG cb,
1458                                          LONG *pcb)
1459 {
1460   const char** str = (const char**)dwCookie;
1461   int size = strlen(*str);
1462   if(size > 3)  /* let's make it peice-meal for fun */
1463     size = 3;
1464   *pcb = cb;
1465   if (*pcb > size) {
1466     *pcb = size;
1467   }
1468   if (*pcb > 0) {
1469     memcpy(pbBuff, *str, *pcb);
1470     *str += *pcb;
1471   }
1472   return 0;
1473 }
1474
1475 static void test_EM_GETMODIFY(void)
1476 {
1477   HWND hwndRichEdit = new_richedit(NULL);
1478   LRESULT result;
1479   SETTEXTEX setText;
1480   WCHAR TestItem1[] = {'T', 'e', 's', 't', 
1481                        'S', 'o', 'm', 'e', 
1482                        'T', 'e', 'x', 't', 0}; 
1483   WCHAR TestItem2[] = {'T', 'e', 's', 't', 
1484                        'S', 'o', 'm', 'e', 
1485                        'O', 't', 'h', 'e', 'r',
1486                        'T', 'e', 'x', 't', 0}; 
1487   const char* streamText = "hello world";
1488   CHARFORMAT2 cf2;
1489   PARAFORMAT2 pf2;
1490   EDITSTREAM es;
1491   
1492   HFONT testFont = CreateFontA (0,0,0,0,FW_LIGHT, 0, 0, 0, ANSI_CHARSET, 
1493     OUT_DEFAULT_PRECIS, CLIP_DEFAULT_PRECIS, DEFAULT_QUALITY, DEFAULT_PITCH | 
1494     FF_DONTCARE, "Courier");
1495   
1496   setText.codepage = 1200;  /* no constant for unicode */
1497   setText.flags = ST_KEEPUNDO;
1498   
1499
1500   /* modify flag shouldn't be set when richedit is first created */
1501   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1502   ok (result == 0, 
1503       "EM_GETMODIFY returned non-zero, instead of zero on create\n");
1504   
1505   /* setting modify flag should actually set it */
1506   SendMessage(hwndRichEdit, EM_SETMODIFY, TRUE, 0);
1507   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1508   ok (result != 0, 
1509       "EM_GETMODIFY returned zero, instead of non-zero on EM_SETMODIFY\n");
1510   
1511   /* clearing modify flag should actually clear it */
1512   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1513   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1514   ok (result == 0, 
1515       "EM_GETMODIFY returned non-zero, instead of zero on EM_SETMODIFY\n");
1516  
1517   /* setting font doesn't change modify flag */
1518   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1519   SendMessage(hwndRichEdit, WM_SETFONT, (WPARAM)testFont,(LPARAM) MAKELONG((WORD) TRUE, 0));
1520   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1521   ok (result == 0,
1522       "EM_GETMODIFY returned non-zero, instead of zero on setting font\n");
1523
1524   /* setting text should set modify flag */
1525   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1526   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM)TestItem1);
1527   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1528   ok (result != 0,
1529       "EM_GETMODIFY returned zero, instead of non-zero on setting text\n");
1530   
1531   /* undo previous text doesn't reset modify flag */
1532   SendMessage(hwndRichEdit, WM_UNDO, 0, 0);
1533   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1534   ok (result != 0,
1535       "EM_GETMODIFY returned zero, instead of non-zero on undo after setting text\n");
1536   
1537   /* set text with no flag to keep undo stack should not set modify flag */
1538   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1539   setText.flags = 0;
1540   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM)TestItem1);
1541   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1542   ok (result == 0,
1543       "EM_GETMODIFY returned non-zero, instead of zero when setting text while not keeping undo stack\n");
1544   
1545   /* WM_SETTEXT doesn't modify */
1546   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1547   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)TestItem2);
1548   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1549   todo_wine {
1550   ok (result == 0,
1551       "EM_GETMODIFY returned non-zero for WM_SETTEXT\n");
1552   }
1553   
1554   /* clear the text */
1555   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1556   SendMessage(hwndRichEdit, WM_CLEAR, 0, 0);
1557   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1558   ok (result == 0,
1559       "EM_GETMODIFY returned non-zero, instead of zero for WM_CLEAR\n");
1560   
1561   /* replace text */
1562   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1563   SendMessage(hwndRichEdit, EM_SETTEXTEX, (WPARAM)&setText, (LPARAM)TestItem1);
1564   SendMessage(hwndRichEdit, EM_SETSEL, 0, 2);
1565   SendMessage(hwndRichEdit, EM_REPLACESEL, TRUE, (LPARAM)TestItem2);
1566   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1567   ok (result != 0,
1568       "EM_GETMODIFY returned zero, instead of non-zero when replacing text\n");
1569   
1570   /* copy/paste text 1 */
1571   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1572   SendMessage(hwndRichEdit, EM_SETSEL, 0, 2);
1573   SendMessage(hwndRichEdit, WM_COPY, 0, 0);
1574   SendMessage(hwndRichEdit, WM_PASTE, 0, 0);
1575   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1576   ok (result != 0,
1577       "EM_GETMODIFY returned zero, instead of non-zero when pasting identical text\n");
1578   
1579   /* copy/paste text 2 */
1580   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1581   SendMessage(hwndRichEdit, EM_SETSEL, 0, 2);
1582   SendMessage(hwndRichEdit, WM_COPY, 0, 0);
1583   SendMessage(hwndRichEdit, EM_SETSEL, 0, 3);
1584   SendMessage(hwndRichEdit, WM_PASTE, 0, 0);
1585   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1586   ok (result != 0,
1587       "EM_GETMODIFY returned zero, instead of non-zero when pasting different text\n");
1588   
1589   /* press char */
1590   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1591   SendMessage(hwndRichEdit, EM_SETSEL, 0, 1);
1592   SendMessage(hwndRichEdit, WM_CHAR, 'A', 0);
1593   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1594   ok (result != 0,
1595       "EM_GETMODIFY returned zero, instead of non-zero for WM_CHAR\n");
1596
1597   /* press del */
1598   SendMessage(hwndRichEdit, WM_CHAR, 'A', 0);
1599   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1600   SendMessage(hwndRichEdit, WM_KEYDOWN, VK_BACK, 0);
1601   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1602   ok (result != 0,
1603       "EM_GETMODIFY returned zero, instead of non-zero for backspace\n");
1604   
1605   /* set char format */
1606   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1607   cf2.cbSize = sizeof(CHARFORMAT2);
1608   SendMessage(hwndRichEdit, EM_GETCHARFORMAT, (WPARAM) SCF_DEFAULT,
1609              (LPARAM) &cf2);
1610   cf2.dwMask = CFM_ITALIC | cf2.dwMask;
1611   cf2.dwEffects = CFE_ITALIC ^ cf2.dwEffects;
1612   SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_ALL, (LPARAM) &cf2);
1613   result = SendMessage(hwndRichEdit, EM_SETCHARFORMAT, (WPARAM) SCF_ALL, (LPARAM) &cf2);
1614   ok(result == 1, "EM_SETCHARFORMAT returned %ld instead of 1\n", result);
1615   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1616   ok (result != 0,
1617       "EM_GETMODIFY returned zero, instead of non-zero for EM_SETCHARFORMAT\n");
1618   
1619   /* set para format */
1620   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1621   pf2.cbSize = sizeof(PARAFORMAT2);
1622   SendMessage(hwndRichEdit, EM_GETPARAFORMAT, 0,
1623              (LPARAM) &pf2);
1624   pf2.dwMask = PFM_ALIGNMENT | pf2.dwMask;
1625   pf2.wAlignment = PFA_RIGHT;
1626   SendMessage(hwndRichEdit, EM_SETPARAFORMAT, 0, (LPARAM) &pf2);
1627   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1628   ok (result == 0,
1629       "EM_GETMODIFY returned zero, instead of non-zero for EM_SETPARAFORMAT\n");
1630
1631   /* EM_STREAM */
1632   SendMessage(hwndRichEdit, EM_SETMODIFY, FALSE, 0);
1633   es.dwCookie = (DWORD_PTR)&streamText;
1634   es.dwError = 0;
1635   es.pfnCallback = test_EM_GETMODIFY_esCallback;
1636   SendMessage(hwndRichEdit, EM_STREAMIN, 
1637               (WPARAM)(SF_TEXT), (LPARAM)&es);
1638   result = SendMessage(hwndRichEdit, EM_GETMODIFY, 0, 0);
1639   ok (result != 0,
1640       "EM_GETMODIFY returned zero, instead of non-zero for EM_STREAM\n");
1641
1642   DestroyWindow(hwndRichEdit);
1643 }
1644
1645 struct exsetsel_s {
1646   long min;
1647   long max;
1648   long expected_retval;
1649   int expected_getsel_start;
1650   int expected_getsel_end;
1651   int _exsetsel_todo_wine;
1652   int _getsel_todo_wine;
1653 };
1654
1655 const struct exsetsel_s exsetsel_tests[] = {
1656   /* sanity tests */
1657   {5, 10, 10, 5, 10, 0, 0},
1658   {15, 17, 17, 15, 17, 0, 0},
1659   /* test cpMax > strlen() */
1660   {0, 100, 18, 0, 18, 0, 1},
1661   /* test cpMin == cpMax */
1662   {5, 5, 5, 5, 5, 0, 0},
1663   /* test cpMin < 0 && cpMax >= 0 (bug 4462) */
1664   {-1, 0, 5, 5, 5, 0, 0},
1665   {-1, 17, 5, 5, 5, 0, 0},
1666   {-1, 18, 5, 5, 5, 0, 0},
1667   /* test cpMin < 0 && cpMax < 0 */
1668   {-1, -1, 17, 17, 17, 0, 0},
1669   {-4, -5, 17, 17, 17, 0, 0},
1670   /* test cMin >=0 && cpMax < 0 (bug 6814) */
1671   {0, -1, 18, 0, 18, 0, 1},
1672   {17, -5, 18, 17, 18, 0, 1},
1673   {18, -3, 17, 17, 17, 0, 0},
1674   /* test if cpMin > cpMax */
1675   {15, 19, 18, 15, 18, 0, 1},
1676   {19, 15, 18, 15, 18, 0, 1}
1677 };
1678
1679 static void check_EM_EXSETSEL(HWND hwnd, const struct exsetsel_s *setsel, int id) {
1680     CHARRANGE cr;
1681     long result;
1682     int start, end;
1683
1684     cr.cpMin = setsel->min;
1685     cr.cpMax = setsel->max;
1686     result = SendMessage(hwnd, EM_EXSETSEL, 0, (LPARAM) &cr);
1687
1688     if (setsel->_exsetsel_todo_wine) {
1689         todo_wine {
1690             ok(result == setsel->expected_retval, "EM_EXSETSEL(%d): expected: %ld actual: %ld\n", id, setsel->expected_retval, result);
1691         }
1692     } else {
1693         ok(result == setsel->expected_retval, "EM_EXSETSEL(%d): expected: %ld actual: %ld\n", id, setsel->expected_retval, result);
1694     }
1695
1696     SendMessage(hwnd, EM_GETSEL, (WPARAM) &start, (LPARAM) &end);
1697
1698     if (setsel->_getsel_todo_wine) {
1699         todo_wine {
1700             ok(start == setsel->expected_getsel_start && end == setsel->expected_getsel_end, "EM_EXSETSEL(%d): expected (%d,%d) actual:(%d,%d)\n", id, setsel->expected_getsel_start, setsel->expected_getsel_end, start, end);
1701         }
1702     } else {
1703         ok(start == setsel->expected_getsel_start && end == setsel->expected_getsel_end, "EM_EXSETSEL(%d): expected (%d,%d) actual:(%d,%d)\n", id, setsel->expected_getsel_start, setsel->expected_getsel_end, start, end);
1704     }
1705 }
1706
1707 static void test_EM_EXSETSEL(void)
1708 {
1709     HWND hwndRichEdit = new_richedit(NULL);
1710     int i;
1711     const int num_tests = sizeof(exsetsel_tests)/sizeof(struct exsetsel_s);
1712
1713     /* sending some text to the window */
1714     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "testing selection");
1715     /*                                                 01234567890123456*/
1716     /*                                                          10      */
1717
1718     for (i = 0; i < num_tests; i++) {
1719         check_EM_EXSETSEL(hwndRichEdit, &exsetsel_tests[i], i);
1720     }
1721
1722     DestroyWindow(hwndRichEdit);
1723 }
1724
1725 static void test_EM_REPLACESEL(void)
1726 {
1727     HWND hwndRichEdit = new_richedit(NULL);
1728     char buffer[1024] = {0};
1729     int r;
1730     GETTEXTEX getText;
1731     CHARRANGE cr;
1732
1733     /* sending some text to the window */
1734     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) "testing selection");
1735     /*                                                 01234567890123456*/
1736     /*                                                          10      */
1737
1738     /* FIXME add more tests */
1739     SendMessage(hwndRichEdit, EM_SETSEL, 7, 17);
1740     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) NULL);
1741     ok(0 == r, "EM_REPLACESEL returned %d, expected 0\n", r);
1742     SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1743     r = strcmp(buffer, "testing");
1744     ok(0 == r, "expected %d, got %d\n", 0, r);
1745
1746     DestroyWindow(hwndRichEdit);
1747
1748     hwndRichEdit = new_richedit(NULL);
1749
1750     /* Test behavior with carriage returns and newlines */
1751     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1752     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "RichEdit1");
1753     ok(9 == r, "EM_REPLACESEL returned %d, expected 9\n", r);
1754     SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1755     r = strcmp(buffer, "RichEdit1");
1756     ok(0 == r, "expected %d, got %d\n", 0, r);
1757     getText.cb = 1024;
1758     getText.codepage = CP_ACP;
1759     getText.flags = GT_DEFAULT;
1760     getText.lpDefaultChar = NULL;
1761     getText.lpUsedDefaultChar = NULL;
1762     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1763     ok(strcmp(buffer, "RichEdit1") == 0,
1764       "EM_GETTEXTEX results not what was set by EM_REPLACESEL\n");
1765
1766     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1767     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "RichEdit1\r");
1768     ok(10 == r, "EM_REPLACESEL returned %d, expected 10\n", r);
1769     SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1770     r = strcmp(buffer, "RichEdit1\r\n");
1771     ok(0 == r, "expected %d, got %d\n", 0, r);
1772     getText.cb = 1024;
1773     getText.codepage = CP_ACP;
1774     getText.flags = GT_DEFAULT;
1775     getText.lpDefaultChar = NULL;
1776     getText.lpUsedDefaultChar = NULL;
1777     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1778     ok(strcmp(buffer, "RichEdit1\r") == 0,
1779       "EM_GETTEXTEX returned incorrect string\n");
1780
1781     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1782     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "RichEdit1\r\n");
1783     ok(11 == r, "EM_REPLACESEL returned %d, expected 11\n", r);
1784
1785     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1786     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1787     ok(cr.cpMin == 10, "EM_EXGETSEL returned cpMin=%d, expected 10\n", cr.cpMin);
1788     ok(cr.cpMax == 10, "EM_EXGETSEL returned cpMax=%d, expected 10\n", cr.cpMax);
1789
1790     SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1791     r = strcmp(buffer, "RichEdit1\r\n");
1792     ok(0 == r, "expected %d, got %d\n", 0, r);
1793     getText.cb = 1024;
1794     getText.codepage = CP_ACP;
1795     getText.flags = GT_DEFAULT;
1796     getText.lpDefaultChar = NULL;
1797     getText.lpUsedDefaultChar = NULL;
1798     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1799     ok(strcmp(buffer, "RichEdit1\r") == 0,
1800       "EM_GETTEXTEX returned incorrect string\n");
1801
1802     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1803     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1804     ok(cr.cpMin == 10, "EM_EXGETSEL returned cpMin=%d, expected 10\n", cr.cpMin);
1805     ok(cr.cpMax == 10, "EM_EXGETSEL returned cpMax=%d, expected 10\n", cr.cpMax);
1806
1807     /* The following tests show that richedit should handle the special \r\r\n
1808        sequence by turning it into a single space on insertion. However,
1809        EM_REPLACESEL returns the number of characters in the original string.
1810      */
1811
1812     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1813     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "\r\r");
1814     ok(2 == r, "EM_REPLACESEL returned %d, expected 4\n", r);
1815     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1816     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1817     ok(cr.cpMin == 2, "EM_EXGETSEL returned cpMin=%d, expected 2\n", cr.cpMin);
1818     ok(cr.cpMax == 2, "EM_EXGETSEL returned cpMax=%d, expected 2\n", cr.cpMax);
1819
1820     /* Test the actual string */
1821     getText.cb = 1024;
1822     getText.codepage = CP_ACP;
1823     getText.flags = GT_DEFAULT;
1824     getText.lpDefaultChar = NULL;
1825     getText.lpUsedDefaultChar = NULL;
1826     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1827     ok(strcmp(buffer, "\r\r") == 0,
1828       "EM_GETTEXTEX returned incorrect string\n");
1829
1830     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1831     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "\r\r\n");
1832     ok(3 == r, "EM_REPLACESEL returned %d, expected 3\n", r);
1833     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1834     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1835     ok(cr.cpMin == 1, "EM_EXGETSEL returned cpMin=%d, expected 1\n", cr.cpMin);
1836     ok(cr.cpMax == 1, "EM_EXGETSEL returned cpMax=%d, expected 1\n", cr.cpMax);
1837
1838     /* Test the actual string */
1839     getText.cb = 1024;
1840     getText.codepage = CP_ACP;
1841     getText.flags = GT_DEFAULT;
1842     getText.lpDefaultChar = NULL;
1843     getText.lpUsedDefaultChar = NULL;
1844     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1845     ok(strcmp(buffer, " ") == 0,
1846       "EM_GETTEXTEX returned incorrect string\n");
1847
1848     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1849     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "\r\r\r\r\r\n\r\r\r");
1850     ok(9 == r, "EM_REPLACESEL returned %d, expected 9\n", r);
1851     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1852     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1853     ok(cr.cpMin == 7, "EM_EXGETSEL returned cpMin=%d, expected 7\n", cr.cpMin);
1854     ok(cr.cpMax == 7, "EM_EXGETSEL returned cpMax=%d, expected 7\n", cr.cpMax);
1855
1856     /* Test the actual string */
1857     getText.cb = 1024;
1858     getText.codepage = CP_ACP;
1859     getText.flags = GT_DEFAULT;
1860     getText.lpDefaultChar = NULL;
1861     getText.lpUsedDefaultChar = NULL;
1862     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1863     ok(strcmp(buffer, "\r\r\r \r\r\r") == 0,
1864       "EM_GETTEXTEX returned incorrect string\n");
1865
1866     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1867     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "\r\r\n\r\n");
1868     ok(5 == r, "EM_REPLACESEL returned %d, expected 5\n", r);
1869     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1870     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1871     ok(cr.cpMin == 2, "EM_EXGETSEL returned cpMin=%d, expected 2\n", cr.cpMin);
1872     ok(cr.cpMax == 2, "EM_EXGETSEL returned cpMax=%d, expected 2\n", cr.cpMax);
1873
1874     /* Test the actual string */
1875     getText.cb = 1024;
1876     getText.codepage = CP_ACP;
1877     getText.flags = GT_DEFAULT;
1878     getText.lpDefaultChar = NULL;
1879     getText.lpUsedDefaultChar = NULL;
1880     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1881     ok(strcmp(buffer, " \r") == 0,
1882       "EM_GETTEXTEX returned incorrect string\n");
1883
1884     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1885     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "\r\r\n\r\r");
1886     ok(5 == r, "EM_REPLACESEL returned %d, expected 5\n", r);
1887     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1888     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1889     ok(cr.cpMin == 3, "EM_EXGETSEL returned cpMin=%d, expected 3\n", cr.cpMin);
1890     ok(cr.cpMax == 3, "EM_EXGETSEL returned cpMax=%d, expected 3\n", cr.cpMax);
1891
1892     /* Test the actual string */
1893     getText.cb = 1024;
1894     getText.codepage = CP_ACP;
1895     getText.flags = GT_DEFAULT;
1896     getText.lpDefaultChar = NULL;
1897     getText.lpUsedDefaultChar = NULL;
1898     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1899     ok(strcmp(buffer, " \r\r") == 0,
1900       "EM_GETTEXTEX returned incorrect string\n");
1901
1902     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1903     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "\rX\r\n\r\r");
1904     ok(6 == r, "EM_REPLACESEL returned %d, expected 5\n", r);
1905     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1906     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1907     ok(cr.cpMin == 5, "EM_EXGETSEL returned cpMin=%d, expected 5\n", cr.cpMin);
1908     ok(cr.cpMax == 5, "EM_EXGETSEL returned cpMax=%d, expected 5\n", cr.cpMax);
1909
1910     /* Test the actual string */
1911     getText.cb = 1024;
1912     getText.codepage = CP_ACP;
1913     getText.flags = GT_DEFAULT;
1914     getText.lpDefaultChar = NULL;
1915     getText.lpUsedDefaultChar = NULL;
1916     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1917     ok(strcmp(buffer, "\rX\r\r\r") == 0,
1918       "EM_GETTEXTEX returned incorrect string\n");
1919
1920     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1921     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "\n\n");
1922     ok(2 == r, "EM_REPLACESEL returned %d, expected 2\n", r);
1923     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1924     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1925     ok(cr.cpMin == 2, "EM_EXGETSEL returned cpMin=%d, expected 2\n", cr.cpMin);
1926     ok(cr.cpMax == 2, "EM_EXGETSEL returned cpMax=%d, expected 2\n", cr.cpMax);
1927
1928     /* Test the actual string */
1929     getText.cb = 1024;
1930     getText.codepage = CP_ACP;
1931     getText.flags = GT_DEFAULT;
1932     getText.lpDefaultChar = NULL;
1933     getText.lpUsedDefaultChar = NULL;
1934     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1935     ok(strcmp(buffer, "\r\r") == 0,
1936       "EM_GETTEXTEX returned incorrect string\n");
1937
1938     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM)NULL);
1939     r = SendMessage(hwndRichEdit, EM_REPLACESEL, 0, (LPARAM) "\n\n\n\n\r\r\r\r\n");
1940     ok(9 == r, "EM_REPLACESEL returned %d, expected 9\n", r);
1941     r = SendMessage(hwndRichEdit, EM_EXGETSEL, 0, (LPARAM)&cr);
1942     ok(0 == r, "EM_EXGETSEL returned %d, expected 0\n", r);
1943     ok(cr.cpMin == 7, "EM_EXGETSEL returned cpMin=%d, expected 7\n", cr.cpMin);
1944     ok(cr.cpMax == 7, "EM_EXGETSEL returned cpMax=%d, expected 7\n", cr.cpMax);
1945
1946     /* Test the actual string */
1947     getText.cb = 1024;
1948     getText.codepage = CP_ACP;
1949     getText.flags = GT_DEFAULT;
1950     getText.lpDefaultChar = NULL;
1951     getText.lpUsedDefaultChar = NULL;
1952     SendMessage(hwndRichEdit, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM) buffer);
1953     ok(strcmp(buffer, "\r\r\r\r\r\r ") == 0,
1954       "EM_GETTEXTEX returned incorrect string\n");
1955
1956     DestroyWindow(hwndRichEdit);
1957 }
1958
1959 static void test_WM_PASTE(void)
1960 {
1961     int result;
1962     char buffer[1024] = {0};
1963     const char* text1 = "testing paste\r";
1964     const char* text1_after = "testing paste\r\n";
1965     const char* text2 = "testing paste\r\rtesting paste";
1966     const char* text3 = "testing paste\r\npaste\r\ntesting paste";
1967     HWND hwndRichEdit = new_richedit(NULL);
1968
1969     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text1);
1970     SendMessage(hwndRichEdit, EM_SETSEL, 0, 14);
1971     SendMessage(hwndRichEdit, WM_CHAR, 3, 0);  /* ctrl-c */
1972     SendMessage(hwndRichEdit, EM_SETSEL, 14, 14);
1973     SendMessage(hwndRichEdit, WM_CHAR, 22, 0);  /* ctrl-v */
1974     SendMessage(hwndRichEdit, WM_CHAR, 26, 0);  /* ctrl-z */
1975     SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1976     result = strcmp(text1_after, buffer);
1977     ok(result == 0,
1978         "test paste: strcmp = %i\n", result);
1979
1980     SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) text2);
1981     SendMessage(hwndRichEdit, EM_SETSEL, 8, 13);
1982     SendMessage(hwndRichEdit, WM_CHAR, 3, 0);  /* ctrl-c */
1983     SendMessage(hwndRichEdit, EM_SETSEL, 14, 14);
1984     SendMessage(hwndRichEdit, WM_CHAR, 22, 0);  /* ctrl-v */
1985     SendMessage(hwndRichEdit, WM_CHAR, 26, 0);  /* ctrl-z */
1986     SendMessage(hwndRichEdit, WM_CHAR, 25, 0);  /* ctrl-y */
1987     SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
1988     result = strcmp(buffer,text3);
1989     ok(result == 0,
1990         "test paste: strcmp = %i\n", result);
1991
1992     DestroyWindow(hwndRichEdit);
1993 }
1994
1995 static void test_EM_FORMATRANGE(void)
1996 {
1997   int r;
1998   FORMATRANGE fr;
1999   HDC hdc;
2000   HWND hwndRichEdit = new_richedit(NULL);
2001
2002   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) haystack);
2003
2004   hdc = GetDC(hwndRichEdit);
2005   ok(hdc != NULL, "Could not get HDC\n");
2006
2007   fr.hdc = fr.hdcTarget = hdc;
2008   fr.rc.top = fr.rcPage.top = fr.rc.left = fr.rcPage.left = 0;
2009   fr.rc.right = fr.rcPage.right = GetDeviceCaps(hdc, HORZRES);
2010   fr.rc.bottom = fr.rcPage.bottom = GetDeviceCaps(hdc, VERTRES);
2011   fr.chrg.cpMin = 0;
2012   fr.chrg.cpMax = 20;
2013
2014   r = SendMessage(hwndRichEdit, EM_FORMATRANGE, TRUE, (LPARAM) NULL);
2015   todo_wine {
2016     ok(r == 31, "EM_FORMATRANGE expect %d, got %d\n", 31, r);
2017   }
2018
2019   r = SendMessage(hwndRichEdit, EM_FORMATRANGE, TRUE, (LPARAM) &fr);
2020   todo_wine {
2021     ok(r == 20, "EM_FORMATRANGE expect %d, got %d\n", 20, r);
2022   }
2023
2024   fr.chrg.cpMin = 0;
2025   fr.chrg.cpMax = 10;
2026
2027   r = SendMessage(hwndRichEdit, EM_FORMATRANGE, TRUE, (LPARAM) &fr);
2028   todo_wine {
2029     ok(r == 10, "EM_FORMATRANGE expect %d, got %d\n", 10, r);
2030   }
2031
2032   r = SendMessage(hwndRichEdit, EM_FORMATRANGE, TRUE, (LPARAM) NULL);
2033   todo_wine {
2034     ok(r == 31, "EM_FORMATRANGE expect %d, got %d\n", 31, r);
2035   }
2036
2037   DestroyWindow(hwndRichEdit);
2038 }
2039
2040 static int nCallbackCount = 0;
2041
2042 static DWORD CALLBACK EditStreamCallback(DWORD_PTR dwCookie, LPBYTE pbBuff,
2043                                  LONG cb, LONG* pcb)
2044 {
2045   const char text[] = {'t','e','s','t'};
2046
2047   if (sizeof(text) <= cb)
2048   {
2049     if ((int)dwCookie != nCallbackCount)
2050     {
2051       *pcb = 0;
2052       return 0;
2053     }
2054
2055     memcpy (pbBuff, text, sizeof(text));
2056     *pcb = sizeof(text);
2057
2058     nCallbackCount++;
2059
2060     return 0;
2061   }
2062   else
2063     return 1; /* indicates callback failed */
2064 }
2065
2066 static void test_EM_StreamIn_Undo(void)
2067 {
2068   /* The purpose of this test is to determine when a EM_StreamIn should be
2069    * undoable. This is important because WM_PASTE currently uses StreamIn and
2070    * pasting should always be undoable but streaming isn't always.
2071    *
2072    * cases to test:
2073    * StreamIn plain text without SFF_SELECTION.
2074    * StreamIn plain text with SFF_SELECTION set but a zero-length selection
2075    * StreamIn plain text with SFF_SELECTION and a valid, normal selection
2076    * StreamIn plain text with SFF_SELECTION and a backwards-selection (from>to)
2077    * Feel free to add tests for other text modes or StreamIn things.
2078    */
2079
2080
2081   HWND hwndRichEdit = new_richedit(NULL);
2082   LRESULT result;
2083   EDITSTREAM es;
2084   char buffer[1024] = {0};
2085   const char randomtext[] = "Some text";
2086
2087   es.pfnCallback = (EDITSTREAMCALLBACK) EditStreamCallback;
2088
2089   /* StreamIn, no SFF_SELECTION */
2090   es.dwCookie = nCallbackCount;
2091   SendMessage(hwndRichEdit,EM_EMPTYUNDOBUFFER, 0,0);
2092   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) randomtext);
2093   SendMessage(hwndRichEdit, EM_SETSEL,0,0);
2094   SendMessage(hwndRichEdit, EM_STREAMIN, (WPARAM)SF_TEXT, (LPARAM)&es);
2095   SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
2096   result = strcmp (buffer,"test");
2097   ok (result  == 0,
2098       "EM_STREAMIN: Test 1 set wrong text: Result: %s\n",buffer);
2099
2100   result = SendMessage(hwndRichEdit, EM_CANUNDO, 0, 0);
2101   ok (result == FALSE,
2102       "EM_STREAMIN without SFF_SELECTION wrongly allows undo\n");
2103
2104   /* StreamIn, SFF_SELECTION, but nothing selected */
2105   es.dwCookie = nCallbackCount;
2106   SendMessage(hwndRichEdit,EM_EMPTYUNDOBUFFER, 0,0);
2107   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) randomtext);
2108   SendMessage(hwndRichEdit, EM_SETSEL,0,0);
2109   SendMessage(hwndRichEdit, EM_STREAMIN,
2110               (WPARAM)(SF_TEXT|SFF_SELECTION), (LPARAM)&es);
2111   SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
2112   result = strcmp (buffer,"testSome text");
2113   ok (result  == 0,
2114       "EM_STREAMIN: Test 2 set wrong text: Result: %s\n",buffer);
2115
2116   result = SendMessage(hwndRichEdit, EM_CANUNDO, 0, 0);
2117   ok (result == TRUE,
2118      "EM_STREAMIN with SFF_SELECTION but no selection set "
2119       "should create an undo\n");
2120
2121   /* StreamIn, SFF_SELECTION, with a selection */
2122   es.dwCookie = nCallbackCount;
2123   SendMessage(hwndRichEdit,EM_EMPTYUNDOBUFFER, 0,0);
2124   SendMessage(hwndRichEdit, WM_SETTEXT, 0, (LPARAM) randomtext);
2125   SendMessage(hwndRichEdit, EM_SETSEL,4,5);
2126   SendMessage(hwndRichEdit, EM_STREAMIN,
2127               (WPARAM)(SF_TEXT|SFF_SELECTION), (LPARAM)&es);
2128   SendMessage(hwndRichEdit, WM_GETTEXT, 1024, (LPARAM) buffer);
2129   result = strcmp (buffer,"Sometesttext");
2130   ok (result  == 0,
2131       "EM_STREAMIN: Test 2 set wrong text: Result: %s\n",buffer);
2132
2133   result = SendMessage(hwndRichEdit, EM_CANUNDO, 0, 0);
2134   ok (result == TRUE,
2135       "EM_STREAMIN with SFF_SELECTION and selection set "
2136       "should create an undo\n");
2137
2138 }
2139
2140 static BOOL is_em_settextex_supported(HWND hwnd)
2141 {
2142     SETTEXTEX stex = { ST_DEFAULT, CP_ACP };
2143     return SendMessageA(hwnd, EM_SETTEXTEX, (WPARAM)&stex, 0) != 0;
2144 }
2145
2146 static void test_unicode_conversions(void)
2147 {
2148     static const WCHAR tW[] = {'t',0};
2149     static const WCHAR teW[] = {'t','e',0};
2150     static const WCHAR textW[] = {'t','e','s','t',0};
2151     static const char textA[] = "test";
2152     char bufA[64];
2153     WCHAR bufW[64];
2154     HWND hwnd;
2155     int is_win9x, em_settextex_supported, ret;
2156
2157     is_win9x = GetVersion() & 0x80000000;
2158
2159 #define set_textA(hwnd, wm_set_text, txt) \
2160     do { \
2161         SETTEXTEX stex = { ST_DEFAULT, CP_ACP }; \
2162         WPARAM wparam = (wm_set_text == WM_SETTEXT) ? 0 : (WPARAM)&stex; \
2163         assert(wm_set_text == WM_SETTEXT || wm_set_text == EM_SETTEXTEX); \
2164         ret = SendMessageA(hwnd, wm_set_text, wparam, (LPARAM)txt); \
2165         ok(ret, "SendMessageA(%02x) error %u\n", wm_set_text, GetLastError()); \
2166     } while(0)
2167 #define expect_textA(hwnd, wm_get_text, txt) \
2168     do { \
2169         GETTEXTEX gtex = { 64, GT_DEFAULT, CP_ACP, NULL, NULL }; \
2170         WPARAM wparam = (wm_get_text == WM_GETTEXT) ? 64 : (WPARAM)&gtex; \
2171         assert(wm_get_text == WM_GETTEXT || wm_get_text == EM_GETTEXTEX); \
2172         memset(bufA, 0xAA, sizeof(bufA)); \
2173         ret = SendMessageA(hwnd, wm_get_text, wparam, (LPARAM)bufA); \
2174         ok(ret, "SendMessageA(%02x) error %u\n", wm_get_text, GetLastError()); \
2175         ret = lstrcmpA(bufA, txt); \
2176         ok(!ret, "%02x: strings do not match: expected %s got %s\n", wm_get_text, txt, bufA); \
2177     } while(0)
2178
2179 #define set_textW(hwnd, wm_set_text, txt) \
2180     do { \
2181         SETTEXTEX stex = { ST_DEFAULT, 1200 }; \
2182         WPARAM wparam = (wm_set_text == WM_SETTEXT) ? 0 : (WPARAM)&stex; \
2183         assert(wm_set_text == WM_SETTEXT || wm_set_text == EM_SETTEXTEX); \
2184         ret = SendMessageW(hwnd, wm_set_text, wparam, (LPARAM)txt); \
2185         ok(ret, "SendMessageW(%02x) error %u\n", wm_set_text, GetLastError()); \
2186     } while(0)
2187 #define expect_textW(hwnd, wm_get_text, txt) \
2188     do { \
2189         GETTEXTEX gtex = { 64, GT_DEFAULT, 1200, NULL, NULL }; \
2190         WPARAM wparam = (wm_get_text == WM_GETTEXT) ? 64 : (WPARAM)&gtex; \
2191         assert(wm_get_text == WM_GETTEXT || wm_get_text == EM_GETTEXTEX); \
2192         memset(bufW, 0xAA, sizeof(bufW)); \
2193         if (is_win9x) \
2194         { \
2195             assert(wm_get_text == EM_GETTEXTEX); \
2196             ret = SendMessageA(hwnd, wm_get_text, wparam, (LPARAM)bufW); \
2197             ok(ret, "SendMessageA(%02x) error %u\n", wm_get_text, GetLastError()); \
2198         } \
2199         else \
2200         { \
2201             ret = SendMessageW(hwnd, wm_get_text, wparam, (LPARAM)bufW); \
2202             ok(ret, "SendMessageW(%02x) error %u\n", wm_get_text, GetLastError()); \
2203         } \
2204         ret = lstrcmpW(bufW, txt); \
2205         ok(!ret, "%02x: strings do not match: expected[0] %x got[0] %x\n", wm_get_text, txt[0], bufW[0]); \
2206     } while(0)
2207 #define expect_empty(hwnd, wm_get_text) \
2208     do { \
2209         GETTEXTEX gtex = { 64, GT_DEFAULT, CP_ACP, NULL, NULL }; \
2210         WPARAM wparam = (wm_get_text == WM_GETTEXT) ? 64 : (WPARAM)&gtex; \
2211         assert(wm_get_text == WM_GETTEXT || wm_get_text == EM_GETTEXTEX); \
2212         memset(bufA, 0xAA, sizeof(bufA)); \
2213         ret = SendMessageA(hwnd, wm_get_text, wparam, (LPARAM)bufA); \
2214         ok(!ret, "empty richedit should return 0, got %d\n", ret); \
2215         ok(!*bufA, "empty richedit should return empty string, got %s\n", bufA); \
2216     } while(0)
2217
2218     hwnd = CreateWindowExA(0, "RichEdit20W", NULL, WS_POPUP,
2219                            0, 0, 200, 60, 0, 0, 0, 0);
2220     ok(hwnd != 0, "CreateWindowExA error %u\n", GetLastError());
2221
2222     ret = IsWindowUnicode(hwnd);
2223     if (is_win9x)
2224         ok(!ret, "RichEdit20W should NOT be unicode under Win9x\n");
2225     else
2226         ok(ret, "RichEdit20W should be unicode under NT\n");
2227
2228     /* EM_SETTEXTEX is supported starting from version 3.0 */
2229     em_settextex_supported = is_em_settextex_supported(hwnd);
2230     trace("EM_SETTEXTEX is %ssupported on this platform\n",
2231           em_settextex_supported ? "" : "NOT ");
2232
2233     expect_empty(hwnd, WM_GETTEXT);
2234     expect_empty(hwnd, EM_GETTEXTEX);
2235
2236     ret = SendMessageA(hwnd, WM_CHAR, (WPARAM)textW[0], 0);
2237     ok(!ret, "SendMessageA(WM_CHAR) should return 0, got %d\n", ret);
2238     expect_textA(hwnd, WM_GETTEXT, "t");
2239     expect_textA(hwnd, EM_GETTEXTEX, "t");
2240     expect_textW(hwnd, EM_GETTEXTEX, tW);
2241
2242     ret = SendMessageA(hwnd, WM_CHAR, (WPARAM)textA[1], 0);
2243     ok(!ret, "SendMessageA(WM_CHAR) should return 0, got %d\n", ret);
2244     expect_textA(hwnd, WM_GETTEXT, "te");
2245     expect_textA(hwnd, EM_GETTEXTEX, "te");
2246     expect_textW(hwnd, EM_GETTEXTEX, teW);
2247
2248     set_textA(hwnd, WM_SETTEXT, NULL);
2249     expect_empty(hwnd, WM_GETTEXT);
2250     expect_empty(hwnd, EM_GETTEXTEX);
2251
2252     if (is_win9x)
2253         set_textA(hwnd, WM_SETTEXT, textW);
2254     else
2255         set_textA(hwnd, WM_SETTEXT, textA);
2256     expect_textA(hwnd, WM_GETTEXT, textA);
2257     expect_textA(hwnd, EM_GETTEXTEX, textA);
2258     expect_textW(hwnd, EM_GETTEXTEX, textW);
2259
2260     if (em_settextex_supported)
2261     {
2262         set_textA(hwnd, EM_SETTEXTEX, textA);
2263         expect_textA(hwnd, WM_GETTEXT, textA);
2264         expect_textA(hwnd, EM_GETTEXTEX, textA);
2265         expect_textW(hwnd, EM_GETTEXTEX, textW);
2266     }
2267
2268     if (!is_win9x)
2269     {
2270         set_textW(hwnd, WM_SETTEXT, textW);
2271         expect_textW(hwnd, WM_GETTEXT, textW);
2272         expect_textA(hwnd, WM_GETTEXT, textA);
2273         expect_textW(hwnd, EM_GETTEXTEX, textW);
2274         expect_textA(hwnd, EM_GETTEXTEX, textA);
2275
2276         if (em_settextex_supported)
2277         {
2278             set_textW(hwnd, EM_SETTEXTEX, textW);
2279             expect_textW(hwnd, WM_GETTEXT, textW);
2280             expect_textA(hwnd, WM_GETTEXT, textA);
2281             expect_textW(hwnd, EM_GETTEXTEX, textW);
2282             expect_textA(hwnd, EM_GETTEXTEX, textA);
2283         }
2284     }
2285     DestroyWindow(hwnd);
2286
2287     hwnd = CreateWindowExA(0, "RichEdit20A", NULL, WS_POPUP,
2288                            0, 0, 200, 60, 0, 0, 0, 0);
2289     ok(hwnd != 0, "CreateWindowExA error %u\n", GetLastError());
2290
2291     ret = IsWindowUnicode(hwnd);
2292     ok(!ret, "RichEdit20A should NOT be unicode\n");
2293
2294     set_textA(hwnd, WM_SETTEXT, textA);
2295     expect_textA(hwnd, WM_GETTEXT, textA);
2296     expect_textA(hwnd, EM_GETTEXTEX, textA);
2297     expect_textW(hwnd, EM_GETTEXTEX, textW);
2298
2299     if (em_settextex_supported)
2300     {
2301         set_textA(hwnd, EM_SETTEXTEX, textA);
2302         expect_textA(hwnd, WM_GETTEXT, textA);
2303         expect_textA(hwnd, EM_GETTEXTEX, textA);
2304         expect_textW(hwnd, EM_GETTEXTEX, textW);
2305     }
2306
2307     if (!is_win9x)
2308     {
2309         set_textW(hwnd, WM_SETTEXT, textW);
2310         expect_textW(hwnd, WM_GETTEXT, textW);
2311         expect_textA(hwnd, WM_GETTEXT, textA);
2312         expect_textW(hwnd, EM_GETTEXTEX, textW);
2313         expect_textA(hwnd, EM_GETTEXTEX, textA);
2314
2315         if (em_settextex_supported)
2316         {
2317             set_textW(hwnd, EM_SETTEXTEX, textW);
2318             expect_textW(hwnd, WM_GETTEXT, textW);
2319             expect_textA(hwnd, WM_GETTEXT, textA);
2320             expect_textW(hwnd, EM_GETTEXTEX, textW);
2321             expect_textA(hwnd, EM_GETTEXTEX, textA);
2322         }
2323     }
2324     DestroyWindow(hwnd);
2325 }
2326
2327 static void test_WM_CHAR(void)
2328 {
2329     HWND hwnd;
2330     int ret;
2331     const char * char_list = "abc\rabc\r";
2332     const char * expected_content_single = "abcabc";
2333     const char * expected_content_multi = "abc\r\nabc\r\n";
2334     char buffer[64] = {0};
2335     const char * p;
2336
2337     /* single-line control must IGNORE carriage returns */
2338     hwnd = CreateWindowExA(0, "RichEdit20W", NULL, WS_POPUP,
2339                            0, 0, 200, 60, 0, 0, 0, 0);
2340     ok(hwnd != 0, "CreateWindowExA error %u\n", GetLastError());
2341
2342     p = char_list;
2343     while (*p != '\0') {
2344         SendMessageA(hwnd, WM_KEYDOWN, *p, 1);
2345         ret = SendMessageA(hwnd, WM_CHAR, *p, 1);
2346         ok(ret == 0, "WM_CHAR('%c') ret=%d\n", *p, ret);
2347         SendMessageA(hwnd, WM_KEYUP, *p, 1);
2348         p++;
2349     }
2350
2351     SendMessage(hwnd, WM_GETTEXT, sizeof(buffer), (LPARAM)buffer);
2352     ret = strcmp(buffer, expected_content_single);
2353     ok(ret == 0, "WM_GETTEXT recovered incorrect string!\n");
2354
2355     DestroyWindow(hwnd);
2356
2357     /* multi-line control inserts CR normally */
2358     hwnd = CreateWindowExA(0, "RichEdit20W", NULL, WS_POPUP|ES_MULTILINE,
2359                            0, 0, 200, 60, 0, 0, 0, 0);
2360     ok(hwnd != 0, "CreateWindowExA error %u\n", GetLastError());
2361
2362     p = char_list;
2363     while (*p != '\0') {
2364         SendMessageA(hwnd, WM_KEYDOWN, *p, 1);
2365         ret = SendMessageA(hwnd, WM_CHAR, *p, 1);
2366         ok(ret == 0, "WM_CHAR('%c') ret=%d\n", *p, ret);
2367         SendMessageA(hwnd, WM_KEYUP, *p, 1);
2368         p++;
2369     }
2370
2371     SendMessage(hwnd, WM_GETTEXT, sizeof(buffer), (LPARAM)buffer);
2372     ret = strcmp(buffer, expected_content_multi);
2373     ok(ret == 0, "WM_GETTEXT recovered incorrect string!\n");
2374
2375     DestroyWindow(hwnd);
2376 }
2377
2378 static void test_EM_GETTEXTLENGTHEX(void)
2379 {
2380     HWND hwnd;
2381     GETTEXTLENGTHEX gtl;
2382     int ret;
2383     const char * test_string = "a\nb\n\n\r\n";
2384     const char * test_string_after = "a";
2385     char buffer[64] = {0};
2386
2387     /* single line */
2388     hwnd = CreateWindowExA(0, "RichEdit20W", NULL, WS_POPUP,
2389                            0, 0, 200, 60, 0, 0, 0, 0);
2390     ok(hwnd != 0, "CreateWindowExA error %u\n", GetLastError());
2391
2392     gtl.flags = GTL_NUMCHARS | GTL_PRECISE | GTL_USECRLF;
2393     gtl.codepage = CP_ACP;
2394     ret = SendMessageA(hwnd, EM_GETTEXTLENGTHEX, (WPARAM)&gtl, 0);
2395     ok(ret == 0, "ret %d\n",ret);
2396
2397     gtl.flags = GTL_NUMCHARS | GTL_PRECISE;
2398     gtl.codepage = CP_ACP;
2399     ret = SendMessageA(hwnd, EM_GETTEXTLENGTHEX, (WPARAM)&gtl, 0);
2400     ok(ret == 0, "ret %d\n",ret);
2401
2402     SendMessage(hwnd, WM_SETTEXT, 0, (LPARAM) test_string);
2403
2404     gtl.flags = GTL_NUMCHARS | GTL_PRECISE | GTL_USECRLF;
2405     gtl.codepage = CP_ACP;
2406     ret = SendMessageA(hwnd, EM_GETTEXTLENGTHEX, (WPARAM)&gtl, 0);
2407     ok(ret == 1, "ret %d\n",ret);
2408
2409     gtl.flags = GTL_NUMCHARS | GTL_PRECISE;
2410     gtl.codepage = CP_ACP;
2411     ret = SendMessageA(hwnd, EM_GETTEXTLENGTHEX, (WPARAM)&gtl, 0);
2412     ok(ret == 1, "ret %d\n",ret);
2413
2414     SendMessage(hwnd, WM_GETTEXT, sizeof(buffer), (LPARAM)buffer);
2415     ret = strcmp(buffer, test_string_after);
2416     ok(ret == 0, "WM_GETTEXT recovered incorrect string!\n");
2417
2418     DestroyWindow(hwnd);
2419
2420     /* multi line */
2421     hwnd = CreateWindowExA(0, "RichEdit20W", NULL, WS_POPUP | ES_MULTILINE,
2422                            0, 0, 200, 60, 0, 0, 0, 0);
2423     ok(hwnd != 0, "CreateWindowExA error %u\n", GetLastError());
2424
2425     gtl.flags = GTL_NUMCHARS | GTL_PRECISE | GTL_USECRLF;
2426     gtl.codepage = CP_ACP;
2427     ret = SendMessageA(hwnd, EM_GETTEXTLENGTHEX, (WPARAM)&gtl, 0);
2428     todo_wine ok(ret == 0, "ret %d\n",ret);
2429
2430     gtl.flags = GTL_NUMCHARS | GTL_PRECISE;
2431     gtl.codepage = CP_ACP;
2432     ret = SendMessageA(hwnd, EM_GETTEXTLENGTHEX, (WPARAM)&gtl, 0);
2433     ok(ret == 0, "ret %d\n",ret);
2434
2435     SendMessage(hwnd, WM_SETTEXT, 0, (LPARAM) test_string);
2436
2437     gtl.flags = GTL_NUMCHARS | GTL_PRECISE | GTL_USECRLF;
2438     gtl.codepage = CP_ACP;
2439     ret = SendMessageA(hwnd, EM_GETTEXTLENGTHEX, (WPARAM)&gtl, 0);
2440     todo_wine ok(ret == 10, "ret %d\n",ret);
2441
2442     gtl.flags = GTL_NUMCHARS | GTL_PRECISE;
2443     gtl.codepage = CP_ACP;
2444     ret = SendMessageA(hwnd, EM_GETTEXTLENGTHEX, (WPARAM)&gtl, 0);
2445     ok(ret == 6, "ret %d\n",ret);
2446
2447     DestroyWindow(hwnd);
2448 }
2449
2450
2451 /* globals that parent and child access when checking event masks & notifications */
2452 static HWND eventMaskEditHwnd = 0;
2453 static int queriedEventMask;
2454 static int watchForEventMask = 0;
2455
2456 /* parent proc that queries the edit's event mask when it gets a WM_COMMAND */
2457 static LRESULT WINAPI ParentMsgCheckProcA(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
2458 {
2459     if(message == WM_COMMAND && (watchForEventMask & (wParam >> 16)))
2460     {
2461       queriedEventMask = SendMessage(eventMaskEditHwnd, EM_GETEVENTMASK, 0, 0);
2462     }
2463     return DefWindowProcA(hwnd, message, wParam, lParam);
2464 }
2465
2466 /* test event masks in combination with WM_COMMAND */
2467 static void test_eventMask(void)
2468 {
2469     HWND parent;
2470     int ret;
2471     WNDCLASSA cls;
2472     const char text[] = "foo bar\n";
2473     int eventMask;
2474
2475     /* register class to capture WM_COMMAND */
2476     cls.style = 0;
2477     cls.lpfnWndProc = ParentMsgCheckProcA;
2478     cls.cbClsExtra = 0;
2479     cls.cbWndExtra = 0;
2480     cls.hInstance = GetModuleHandleA(0);
2481     cls.hIcon = 0;
2482     cls.hCursor = LoadCursorA(0, (LPSTR)IDC_ARROW);
2483     cls.hbrBackground = GetStockObject(WHITE_BRUSH);
2484     cls.lpszMenuName = NULL;
2485     cls.lpszClassName = "EventMaskParentClass";
2486     if(!RegisterClassA(&cls)) assert(0);
2487
2488     parent = CreateWindow(cls.lpszClassName, NULL, WS_POPUP|WS_VISIBLE,
2489                           0, 0, 200, 60, NULL, NULL, NULL, NULL);
2490     ok (parent != 0, "Failed to create parent window\n");
2491
2492     eventMaskEditHwnd = new_richedit(parent);
2493     ok(eventMaskEditHwnd != 0, "Failed to create edit window\n");
2494
2495     eventMask = ENM_CHANGE | ENM_UPDATE;
2496     ret = SendMessage(eventMaskEditHwnd, EM_SETEVENTMASK, 0, (LPARAM) eventMask);
2497     ok(ret == ENM_NONE, "wrong event mask\n");
2498     ret = SendMessage(eventMaskEditHwnd, EM_GETEVENTMASK, 0, 0);
2499     ok(ret == eventMask, "failed to set event mask\n");
2500
2501     /* check what happens when we ask for EN_CHANGE and send WM_SETTEXT */
2502     queriedEventMask = 0;  /* initialize to something other than we expect */
2503     watchForEventMask = EN_CHANGE;
2504     ret = SendMessage(eventMaskEditHwnd, WM_SETTEXT, 0, (LPARAM) text);
2505     ok(ret == TRUE, "failed to set text\n");
2506     /* richedit should mask off ENM_CHANGE when it sends an EN_CHANGE
2507        notification in response to WM_SETTEXT */
2508     ok(queriedEventMask == (eventMask & ~ENM_CHANGE),
2509             "wrong event mask (0x%x) during WM_COMMAND\n", queriedEventMask);
2510
2511 }
2512
2513
2514 START_TEST( editor )
2515 {
2516   MSG msg;
2517   time_t end;
2518
2519   /* Must explicitly LoadLibrary(). The test has no references to functions in
2520    * RICHED20.DLL, so the linker doesn't actually link to it. */
2521   hmoduleRichEdit = LoadLibrary("RICHED20.DLL");
2522   ok(hmoduleRichEdit != NULL, "error: %d\n", (int) GetLastError());
2523
2524   test_WM_CHAR();
2525   test_EM_FINDTEXT();
2526   test_EM_GETLINE();
2527   test_EM_SCROLLCARET();
2528   test_EM_SCROLL();
2529   test_WM_SETTEXT();
2530   test_EM_SETCHARFORMAT();
2531   test_EM_SETTEXTMODE();
2532   test_TM_PLAINTEXT();
2533   test_EM_SETOPTIONS();
2534   test_WM_GETTEXT();
2535   test_EM_AUTOURLDETECT();
2536   test_EM_SETUNDOLIMIT();
2537   test_ES_PASSWORD();
2538   test_EM_SETTEXTEX();
2539   test_EM_LIMITTEXT();
2540   test_EM_EXLIMITTEXT();
2541   test_EM_GETLIMITTEXT();
2542   test_WM_SETFONT();
2543   test_EM_GETMODIFY();
2544   test_EM_EXSETSEL();
2545   test_WM_PASTE();
2546   test_EM_StreamIn_Undo();
2547   test_EM_FORMATRANGE();
2548   test_unicode_conversions();
2549   test_EM_GETTEXTLENGTHEX();
2550   test_EM_REPLACESEL();
2551   test_eventMask();
2552
2553   /* Set the environment variable WINETEST_RICHED20 to keep windows
2554    * responsive and open for 30 seconds. This is useful for debugging.
2555    *
2556    * The message pump uses PeekMessage() to empty the queue and then sleeps for
2557    * 50ms before retrying the queue. */
2558   end = time(NULL) + 30;
2559   if (getenv( "WINETEST_RICHED20" )) {
2560     while (time(NULL) < end) {
2561       if (PeekMessage(&msg, NULL, 0, 0, PM_REMOVE)) {
2562         TranslateMessage(&msg);
2563         DispatchMessage(&msg);
2564       } else {
2565         Sleep(50);
2566       }
2567     }
2568   }
2569
2570   OleFlushClipboard();
2571   ok(FreeLibrary(hmoduleRichEdit) != 0, "error: %d\n", (int) GetLastError());
2572 }