wordpad: Only allow one find/replace window.
[wine] / programs / wordpad / wordpad.c
1 /*
2  * Wordpad implementation
3  *
4  * Copyright 2004 by Krzysztof Foltman
5  * Copyright 2007-2008 by Alexander N. Sørnes <alex@thehandofagony.com>
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #define WIN32_LEAN_AND_MEAN
23 #define _WIN32_IE 0x0400
24
25 #include <stdarg.h>
26 #include <stdlib.h>
27 #include <ctype.h>
28 #include <stdio.h>
29 #include <assert.h>
30
31 #include <windows.h>
32 #include <richedit.h>
33 #include <commctrl.h>
34 #include <commdlg.h>
35 #include <shellapi.h>
36 #include <math.h>
37 #include <errno.h>
38
39 #include "wine/unicode.h"
40 #include "wordpad.h"
41
42 #ifdef NONAMELESSUNION
43 # define U(x)  (x).u
44 # define U2(x) (x).u2
45 # define U3(x) (x).u3
46 #else
47 # define U(x)  (x)
48 # define U2(x) (x)
49 # define U3(x) (x)
50 #endif
51
52 /* use LoadString */
53 static const WCHAR wszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
54
55 static const WCHAR wszMainWndClass[] = {'W','O','R','D','P','A','D','T','O','P',0};
56
57 static const WCHAR stringFormat[] = {'%','2','d','\0'};
58
59 static HWND hMainWnd;
60 static HWND hEditorWnd;
61 static HWND hFindWnd;
62 static HMENU hPopupMenu;
63
64 static UINT ID_FINDMSGSTRING;
65
66 static DWORD wordWrap[2];
67 static DWORD barState[2];
68 static WPARAM fileFormat = SF_RTF;
69
70 static WCHAR wszFileName[MAX_PATH];
71 static WCHAR wszFilter[MAX_STRING_LEN*4+6*3+5];
72 static WCHAR wszDefaultFileName[MAX_STRING_LEN];
73 static WCHAR wszSaveChanges[MAX_STRING_LEN];
74 static WCHAR units_cmW[MAX_STRING_LEN];
75
76 static char units_cmA[MAX_STRING_LEN];
77
78 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam );
79
80 /* Load string resources */
81 static void DoLoadStrings(void)
82 {
83     LPWSTR p = wszFilter;
84     static const WCHAR files_rtf[] = {'*','.','r','t','f','\0'};
85     static const WCHAR files_txt[] = {'*','.','t','x','t','\0'};
86     static const WCHAR files_all[] = {'*','.','*','\0'};
87
88     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
89
90     LoadStringW(hInstance, STRING_RICHTEXT_FILES_RTF, p, MAX_STRING_LEN);
91     p += lstrlenW(p) + 1;
92     lstrcpyW(p, files_rtf);
93     p += lstrlenW(p) + 1;
94     LoadStringW(hInstance, STRING_TEXT_FILES_TXT, p, MAX_STRING_LEN);
95     p += lstrlenW(p) + 1;
96     lstrcpyW(p, files_txt);
97     p += lstrlenW(p) + 1;
98     LoadStringW(hInstance, STRING_TEXT_FILES_UNICODE_TXT, p, MAX_STRING_LEN);
99     p += lstrlenW(p) + 1;
100     lstrcpyW(p, files_txt);
101     p += lstrlenW(p) + 1;
102     LoadStringW(hInstance, STRING_ALL_FILES, p, MAX_STRING_LEN);
103     p += lstrlenW(p) + 1;
104     lstrcpyW(p, files_all);
105     p += lstrlenW(p) + 1;
106     *p = '\0';
107
108     p = wszDefaultFileName;
109     LoadStringW(hInstance, STRING_DEFAULT_FILENAME, p, MAX_STRING_LEN);
110
111     p = wszSaveChanges;
112     LoadStringW(hInstance, STRING_PROMPT_SAVE_CHANGES, p, MAX_STRING_LEN);
113
114     LoadStringA(hInstance, STRING_UNITS_CM, units_cmA, MAX_STRING_LEN);
115     LoadStringW(hInstance, STRING_UNITS_CM, units_cmW, MAX_STRING_LEN);
116 }
117
118 /* Show a message box with resource strings */
119 static int MessageBoxWithResStringW(HWND hWnd, LPCWSTR lpText, LPCWSTR lpCaption, UINT uType)
120 {
121     MSGBOXPARAMSW params;
122
123     params.cbSize             = sizeof(params);
124     params.hwndOwner          = hWnd;
125     params.hInstance          = GetModuleHandleW(0);
126     params.lpszText           = lpText;
127     params.lpszCaption        = lpCaption;
128     params.dwStyle            = uType;
129     params.lpszIcon           = NULL;
130     params.dwContextHelpId    = 0;
131     params.lpfnMsgBoxCallback = NULL;
132     params.dwLanguageId       = 0;
133     return MessageBoxIndirectW(&params);
134 }
135
136
137 static void AddButton(HWND hwndToolBar, int nImage, int nCommand)
138 {
139     TBBUTTON button;
140
141     ZeroMemory(&button, sizeof(button));
142     button.iBitmap = nImage;
143     button.idCommand = nCommand;
144     button.fsState = TBSTATE_ENABLED;
145     button.fsStyle = TBSTYLE_BUTTON;
146     button.dwData = 0;
147     button.iString = -1;
148     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
149 }
150
151 static void AddSeparator(HWND hwndToolBar)
152 {
153     TBBUTTON button;
154
155     ZeroMemory(&button, sizeof(button));
156     button.iBitmap = -1;
157     button.idCommand = 0;
158     button.fsState = 0;
159     button.fsStyle = TBSTYLE_SEP;
160     button.dwData = 0;
161     button.iString = -1;
162     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
163 }
164
165 static DWORD CALLBACK stream_in(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
166 {
167     HANDLE hFile = (HANDLE)cookie;
168     DWORD read;
169
170     if(!ReadFile(hFile, buffer, cb, &read, 0))
171         return 1;
172
173     *pcb = read;
174
175     return 0;
176 }
177
178 static DWORD CALLBACK stream_out(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
179 {
180     DWORD written;
181     int ret;
182     HANDLE hFile = (HANDLE)cookie;
183
184     ret = WriteFile(hFile, buffer, cb, &written, 0);
185
186     if(!ret || (cb != written))
187         return 1;
188
189     *pcb = cb;
190
191     return 0;
192 }
193
194 LPWSTR file_basename(LPWSTR path)
195 {
196     LPWSTR pos = path + lstrlenW(path);
197
198     while(pos > path)
199     {
200         if(*pos == '\\' || *pos == '/')
201         {
202             pos++;
203             break;
204         }
205         pos--;
206     }
207     return pos;
208 }
209
210 static void set_caption(LPCWSTR wszNewFileName)
211 {
212     static const WCHAR wszSeparator[] = {' ','-',' '};
213     WCHAR *wszCaption;
214     SIZE_T length = 0;
215
216     if(!wszNewFileName)
217         wszNewFileName = wszDefaultFileName;
218     else
219         wszNewFileName = file_basename((LPWSTR)wszNewFileName);
220
221     wszCaption = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
222                 lstrlenW(wszNewFileName)*sizeof(WCHAR)+sizeof(wszSeparator)+sizeof(wszAppTitle));
223
224     if(!wszCaption)
225         return;
226
227     memcpy(wszCaption, wszNewFileName, lstrlenW(wszNewFileName)*sizeof(WCHAR));
228     length += lstrlenW(wszNewFileName);
229     memcpy(wszCaption + length, wszSeparator, sizeof(wszSeparator));
230     length += sizeof(wszSeparator) / sizeof(WCHAR);
231     memcpy(wszCaption + length, wszAppTitle, sizeof(wszAppTitle));
232
233     SetWindowTextW(hMainWnd, wszCaption);
234
235     HeapFree(GetProcessHeap(), 0, wszCaption);
236 }
237
238 static BOOL validate_endptr(LPCSTR endptr, BOOL units)
239 {
240     if(!endptr)
241         return FALSE;
242     if(!*endptr)
243         return TRUE;
244
245     while(*endptr == ' ')
246         endptr++;
247
248     if(!units)
249         return *endptr == '\0';
250
251     /* FIXME: Allow other units and convert between them */
252     if(!lstrcmpA(endptr, units_cmA))
253         endptr += 2;
254
255     return *endptr == '\0';
256 }
257
258 static BOOL number_from_string(LPCWSTR string, float *num, BOOL units)
259 {
260     double ret;
261     char buffer[MAX_STRING_LEN];
262     char *endptr = buffer;
263
264     WideCharToMultiByte(CP_ACP, 0, string, -1, buffer, MAX_STRING_LEN, NULL, NULL);
265     *num = 0;
266     errno = 0;
267     ret = strtod(buffer, &endptr);
268
269     if((ret == 0 && errno != 0) || endptr == buffer || !validate_endptr(endptr, units))
270     {
271         return FALSE;
272     } else
273     {
274         *num = (float)ret;
275         return TRUE;
276     }
277 }
278
279 static void set_size(float size)
280 {
281     CHARFORMAT2W fmt;
282
283     ZeroMemory(&fmt, sizeof(fmt));
284     fmt.cbSize = sizeof(fmt);
285     fmt.dwMask = CFM_SIZE;
286     fmt.yHeight = (int)(size * 20.0);
287     SendMessageW(hEditorWnd, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
288 }
289
290 static void on_sizelist_modified(HWND hwndSizeList, LPWSTR wszNewFontSize)
291 {
292     WCHAR sizeBuffer[MAX_STRING_LEN];
293     CHARFORMAT2W format;
294
295     ZeroMemory(&format, sizeof(format));
296     format.cbSize = sizeof(format);
297     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&format);
298
299     wsprintfW(sizeBuffer, stringFormat, format.yHeight / 20);
300     if(lstrcmpW(sizeBuffer, wszNewFontSize))
301     {
302         float size = 0;
303         if(number_from_string(wszNewFontSize, &size, FALSE)
304            && size > 0)
305         {
306             set_size(size);
307         } else
308         {
309             SetWindowTextW(hwndSizeList, sizeBuffer);
310             MessageBoxWithResStringW(hMainWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
311                         wszAppTitle, MB_OK | MB_ICONINFORMATION);
312         }
313     }
314 }
315
316 static void add_size(HWND hSizeListWnd, unsigned size)
317 {
318     WCHAR buffer[3];
319     COMBOBOXEXITEMW cbItem;
320     cbItem.mask = CBEIF_TEXT;
321     cbItem.iItem = -1;
322
323     wsprintfW(buffer, stringFormat, size);
324     cbItem.pszText = buffer;
325     SendMessageW(hSizeListWnd, CBEM_INSERTITEMW, 0, (LPARAM)&cbItem);
326 }
327
328 static void populate_size_list(HWND hSizeListWnd)
329 {
330     HWND hReBarWnd = GetDlgItem(hMainWnd, IDC_REBAR);
331     HWND hFontListWnd = GetDlgItem(hReBarWnd, IDC_FONTLIST);
332     COMBOBOXEXITEMW cbFontItem;
333     CHARFORMAT2W fmt;
334     HWND hListEditWnd = (HWND)SendMessageW(hSizeListWnd, CBEM_GETEDITCONTROL, 0, 0);
335     HDC hdc = GetDC(hMainWnd);
336     static const unsigned choices[] = {8,9,10,11,12,14,16,18,20,22,24,26,28,36,48,72};
337     WCHAR buffer[3];
338     size_t i;
339     DWORD fontStyle;
340
341     ZeroMemory(&fmt, sizeof(fmt));
342     fmt.cbSize = sizeof(fmt);
343     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
344
345     cbFontItem.mask = CBEIF_LPARAM;
346     cbFontItem.iItem = SendMessageW(hFontListWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)fmt.szFaceName);
347     SendMessageW(hFontListWnd, CBEM_GETITEMW, 0, (LPARAM)&cbFontItem);
348
349     fontStyle = (DWORD)LOWORD(cbFontItem.lParam);
350
351     SendMessageW(hSizeListWnd, CB_RESETCONTENT, 0, 0);
352
353     if((fontStyle & RASTER_FONTTYPE) && cbFontItem.iItem)
354     {
355         add_size(hSizeListWnd, (BYTE)MulDiv(HIWORD(cbFontItem.lParam), 72,
356                                GetDeviceCaps(hdc, LOGPIXELSY)));
357     } else
358     {
359         for(i = 0; i < sizeof(choices)/sizeof(choices[0]); i++)
360             add_size(hSizeListWnd, choices[i]);
361     }
362
363     wsprintfW(buffer, stringFormat, fmt.yHeight / 20);
364     SendMessageW(hListEditWnd, WM_SETTEXT, 0, (LPARAM)buffer);
365 }
366
367 static void update_size_list(void)
368 {
369     HWND hReBar = GetDlgItem(hMainWnd, IDC_REBAR);
370     HWND hwndSizeList = GetDlgItem(hReBar, IDC_SIZELIST);
371     HWND hwndSizeListEdit = (HWND)SendMessageW(hwndSizeList, CBEM_GETEDITCONTROL, 0, 0);
372     WCHAR fontSize[MAX_STRING_LEN], sizeBuffer[MAX_STRING_LEN];
373     CHARFORMAT2W fmt;
374
375     ZeroMemory(&fmt, sizeof(fmt));
376     fmt.cbSize = sizeof(fmt);
377
378     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
379
380     SendMessageW(hwndSizeListEdit, WM_GETTEXT, MAX_PATH, (LPARAM)fontSize);
381     wsprintfW(sizeBuffer, stringFormat, fmt.yHeight / 20);
382
383     if(lstrcmpW(fontSize, sizeBuffer))
384         SendMessageW(hwndSizeListEdit, WM_SETTEXT, 0, (LPARAM)sizeBuffer);
385 }
386
387 static void update_font_list(void)
388 {
389     HWND hReBar = GetDlgItem(hMainWnd, IDC_REBAR);
390     HWND hFontList = GetDlgItem(hReBar, IDC_FONTLIST);
391     HWND hFontListEdit = (HWND)SendMessageW(hFontList, CBEM_GETEDITCONTROL, 0, 0);
392     WCHAR fontName[MAX_STRING_LEN];
393     CHARFORMAT2W fmt;
394
395     ZeroMemory(&fmt, sizeof(fmt));
396     fmt.cbSize = sizeof(fmt);
397
398     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
399     if (!SendMessageW(hFontListEdit, WM_GETTEXT, MAX_PATH, (LPARAM)fontName)) return;
400
401     if(lstrcmpW(fontName, fmt.szFaceName))
402     {
403         SendMessageW(hFontListEdit, WM_SETTEXT, 0, (LPARAM)fmt.szFaceName);
404         populate_size_list(GetDlgItem(hReBar, IDC_SIZELIST));
405     } else
406     {
407         update_size_list();
408     }
409 }
410
411 static void clear_formatting(void)
412 {
413     PARAFORMAT2 pf;
414
415     pf.cbSize = sizeof(pf);
416     pf.dwMask = PFM_ALIGNMENT;
417     pf.wAlignment = PFA_LEFT;
418     SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
419 }
420
421 static int fileformat_number(WPARAM format)
422 {
423     int number = 0;
424
425     if(format == SF_TEXT)
426     {
427         number = 1;
428     } else if (format == (SF_TEXT | SF_UNICODE))
429     {
430         number = 2;
431     }
432     return number;
433 }
434
435 static WPARAM fileformat_flags(int format)
436 {
437     WPARAM flags[] = { SF_RTF , SF_TEXT , SF_TEXT | SF_UNICODE };
438
439     return flags[format];
440 }
441
442 static void set_font(LPCWSTR wszFaceName)
443 {
444     HWND hReBarWnd = GetDlgItem(hMainWnd, IDC_REBAR);
445     HWND hSizeListWnd = GetDlgItem(hReBarWnd, IDC_SIZELIST);
446     HWND hFontListWnd = GetDlgItem(hReBarWnd, IDC_FONTLIST);
447     HWND hFontListEditWnd = (HWND)SendMessageW(hFontListWnd, CBEM_GETEDITCONTROL, 0, 0);
448     CHARFORMAT2W fmt;
449
450     ZeroMemory(&fmt, sizeof(fmt));
451
452     fmt.cbSize = sizeof(fmt);
453     fmt.dwMask = CFM_FACE;
454
455     lstrcpyW(fmt.szFaceName, wszFaceName);
456
457     SendMessageW(hEditorWnd, EM_SETCHARFORMAT,  SCF_SELECTION, (LPARAM)&fmt);
458
459     populate_size_list(hSizeListWnd);
460
461     SendMessageW(hFontListEditWnd, WM_SETTEXT, 0, (LPARAM)wszFaceName);
462 }
463
464 static void set_default_font(void)
465 {
466     static const WCHAR richTextFont[] = {'T','i','m','e','s',' ','N','e','w',' ',
467                                          'R','o','m','a','n',0};
468     static const WCHAR plainTextFont[] = {'C','o','u','r','i','e','r',' ','N','e','w',0};
469     CHARFORMAT2W fmt;
470     LPCWSTR font;
471
472     ZeroMemory(&fmt, sizeof(fmt));
473
474     fmt.cbSize = sizeof(fmt);
475     fmt.dwMask = CFM_FACE | CFM_BOLD | CFM_ITALIC | CFM_UNDERLINE;
476     fmt.dwEffects = 0;
477
478     if(fileFormat & SF_RTF)
479         font = richTextFont;
480     else
481         font = plainTextFont;
482
483     lstrcpyW(fmt.szFaceName, font);
484
485     SendMessageW(hEditorWnd, EM_SETCHARFORMAT,  SCF_DEFAULT, (LPARAM)&fmt);
486 }
487
488 static void on_fontlist_modified(LPWSTR wszNewFaceName)
489 {
490     CHARFORMAT2W format;
491     ZeroMemory(&format, sizeof(format));
492     format.cbSize = sizeof(format);
493     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&format);
494
495     if(lstrcmpW(format.szFaceName, wszNewFaceName))
496         set_font(wszNewFaceName);
497 }
498
499 static void add_font(LPCWSTR fontName, DWORD fontType, HWND hListWnd, const NEWTEXTMETRICEXW *ntmc)
500 {
501     COMBOBOXEXITEMW cbItem;
502     WCHAR buffer[MAX_PATH];
503     int fontHeight = 0;
504
505     cbItem.mask = CBEIF_TEXT;
506     cbItem.pszText = buffer;
507     cbItem.cchTextMax = MAX_STRING_LEN;
508     cbItem.iItem = 0;
509
510     while(SendMessageW(hListWnd, CBEM_GETITEMW, 0, (LPARAM)&cbItem))
511     {
512         if(lstrcmpiW(cbItem.pszText, fontName) <= 0)
513             cbItem.iItem++;
514         else
515             break;
516     }
517     cbItem.pszText = HeapAlloc( GetProcessHeap(), 0, (lstrlenW(fontName) + 1)*sizeof(WCHAR) );
518     lstrcpyW( cbItem.pszText, fontName );
519
520     cbItem.mask |= CBEIF_LPARAM;
521     if(fontType & RASTER_FONTTYPE)
522         fontHeight = ntmc->ntmTm.tmHeight - ntmc->ntmTm.tmInternalLeading;
523
524     cbItem.lParam = MAKELONG(fontType,fontHeight);
525     SendMessageW(hListWnd, CBEM_INSERTITEMW, 0, (LPARAM)&cbItem);
526     HeapFree( GetProcessHeap(), 0, cbItem.pszText );
527 }
528
529 static void dialog_choose_font(void)
530 {
531     CHOOSEFONTW cf;
532     LOGFONTW lf;
533     CHARFORMAT2W fmt;
534     HDC hDC = GetDC(hMainWnd);
535
536     ZeroMemory(&cf, sizeof(cf));
537     cf.lStructSize = sizeof(cf);
538     cf.hwndOwner = hMainWnd;
539     cf.lpLogFont = &lf;
540     cf.Flags = CF_SCREENFONTS | CF_NOSCRIPTSEL | CF_INITTOLOGFONTSTRUCT | CF_EFFECTS;
541
542     ZeroMemory(&fmt, sizeof(fmt));
543     fmt.cbSize = sizeof(fmt);
544
545     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
546     lstrcpyW(cf.lpLogFont->lfFaceName, fmt.szFaceName);
547     cf.lpLogFont->lfItalic = (fmt.dwEffects & CFE_ITALIC) ? TRUE : FALSE;
548     cf.lpLogFont->lfWeight = (fmt.dwEffects & CFE_BOLD) ? FW_BOLD : FW_NORMAL;
549     cf.lpLogFont->lfUnderline = (fmt.dwEffects & CFE_UNDERLINE) ? TRUE : FALSE;
550     cf.lpLogFont->lfStrikeOut = (fmt.dwEffects & CFE_STRIKEOUT) ? TRUE : FALSE;
551     cf.lpLogFont->lfHeight = -MulDiv(fmt.yHeight / 20, GetDeviceCaps(hDC, LOGPIXELSY), 72);
552     cf.rgbColors = fmt.crTextColor;
553
554     if(ChooseFontW(&cf))
555     {
556         ZeroMemory(&fmt, sizeof(fmt));
557         fmt.cbSize = sizeof(fmt);
558         fmt.dwMask = CFM_BOLD | CFM_ITALIC | CFM_SIZE | CFM_UNDERLINE | CFM_STRIKEOUT | CFM_COLOR;
559         fmt.yHeight = cf.iPointSize * 2;
560
561         if(cf.nFontType & BOLD_FONTTYPE)
562             fmt.dwEffects |= CFE_BOLD;
563         if(cf.nFontType & ITALIC_FONTTYPE)
564             fmt.dwEffects |= CFE_ITALIC;
565         if(cf.lpLogFont->lfUnderline == TRUE)
566             fmt.dwEffects |= CFE_UNDERLINE;
567         if(cf.lpLogFont->lfStrikeOut == TRUE)
568             fmt.dwEffects |= CFE_STRIKEOUT;
569
570         fmt.crTextColor = cf.rgbColors;
571
572         SendMessageW(hEditorWnd, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
573         set_font(cf.lpLogFont->lfFaceName);
574     }
575 }
576
577
578 static int CALLBACK enum_font_proc(const LOGFONTW *lpelfe, const TEXTMETRICW *lpntme,
579                             DWORD FontType, LPARAM lParam)
580 {
581     HWND hListWnd = (HWND) lParam;
582
583     if(SendMessageW(hListWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)lpelfe->lfFaceName) == CB_ERR)
584     {
585
586         add_font(lpelfe->lfFaceName, FontType, hListWnd, (const NEWTEXTMETRICEXW*)lpntme);
587     }
588
589     return 1;
590 }
591
592 static void populate_font_list(HWND hListWnd)
593 {
594     HDC hdc = GetDC(hMainWnd);
595     LOGFONTW fontinfo;
596     HWND hListEditWnd = (HWND)SendMessageW(hListWnd, CBEM_GETEDITCONTROL, 0, 0);
597     CHARFORMAT2W fmt;
598
599     fontinfo.lfCharSet = DEFAULT_CHARSET;
600     *fontinfo.lfFaceName = '\0';
601     fontinfo.lfPitchAndFamily = 0;
602
603     EnumFontFamiliesExW(hdc, &fontinfo, enum_font_proc,
604                         (LPARAM)hListWnd, 0);
605
606     ZeroMemory(&fmt, sizeof(fmt));
607     fmt.cbSize = sizeof(fmt);
608     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_DEFAULT, (LPARAM)&fmt);
609     SendMessageW(hListEditWnd, WM_SETTEXT, 0, (LPARAM)fmt.szFaceName);
610 }
611
612 static void update_window(void)
613 {
614     RECT rect;
615
616     GetClientRect(hMainWnd, &rect);
617
618     OnSize(hMainWnd, SIZE_RESTORED, MAKELPARAM(rect.right, rect.bottom));
619 }
620
621 static BOOL is_bar_visible(int bandId)
622 {
623     return barState[reg_formatindex(fileFormat)] & (1 << bandId);
624 }
625
626 static void store_bar_state(int bandId, BOOL show)
627 {
628     int formatIndex = reg_formatindex(fileFormat);
629
630     if(show)
631         barState[formatIndex] |= (1 << bandId);
632     else
633         barState[formatIndex] &= ~(1 << bandId);
634 }
635
636 static void set_toolbar_state(int bandId, BOOL show)
637 {
638     HWND hwndReBar = GetDlgItem(hMainWnd, IDC_REBAR);
639
640     SendMessageW(hwndReBar, RB_SHOWBAND, SendMessageW(hwndReBar, RB_IDTOINDEX, bandId, 0), show);
641
642     if(bandId == BANDID_TOOLBAR)
643     {
644         REBARBANDINFOW rbbinfo;
645         int index = SendMessageW(hwndReBar, RB_IDTOINDEX, BANDID_FONTLIST, 0);
646
647         rbbinfo.cbSize = REBARBANDINFOW_V6_SIZE;
648         rbbinfo.fMask = RBBIM_STYLE;
649
650         SendMessageW(hwndReBar, RB_GETBANDINFO, index, (LPARAM)&rbbinfo);
651
652         if(!show)
653             rbbinfo.fStyle &= ~RBBS_BREAK;
654         else
655             rbbinfo.fStyle |= RBBS_BREAK;
656
657         SendMessageW(hwndReBar, RB_SETBANDINFO, index, (LPARAM)&rbbinfo);
658     }
659
660     if(bandId == BANDID_TOOLBAR || bandId == BANDID_FORMATBAR || bandId == BANDID_RULER)
661         store_bar_state(bandId, show);
662 }
663
664 static void set_statusbar_state(BOOL show)
665 {
666     HWND hStatusWnd = GetDlgItem(hMainWnd, IDC_STATUSBAR);
667
668     ShowWindow(hStatusWnd, show ? SW_SHOW : SW_HIDE);
669     store_bar_state(BANDID_STATUSBAR, show);
670 }
671
672 static void set_bar_states(void)
673 {
674     set_toolbar_state(BANDID_TOOLBAR, is_bar_visible(BANDID_TOOLBAR));
675     set_toolbar_state(BANDID_FONTLIST, is_bar_visible(BANDID_FORMATBAR));
676     set_toolbar_state(BANDID_SIZELIST, is_bar_visible(BANDID_FORMATBAR));
677     set_toolbar_state(BANDID_FORMATBAR, is_bar_visible(BANDID_FORMATBAR));
678     set_toolbar_state(BANDID_RULER, is_bar_visible(BANDID_RULER));
679     set_statusbar_state(is_bar_visible(BANDID_STATUSBAR));
680
681     update_window();
682 }
683
684 static void preview_exit(HWND hMainWnd)
685 {
686     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
687     HMENU hMenu = LoadMenuW(hInstance, MAKEINTRESOURCEW(IDM_MAINMENU));
688     HWND hEditorWnd = GetDlgItem(hMainWnd, IDC_EDITOR);
689
690     set_bar_states();
691     ShowWindow(hEditorWnd, TRUE);
692
693     close_preview(hMainWnd);
694
695     SetMenu(hMainWnd, hMenu);
696     registry_read_filelist(hMainWnd);
697
698     update_window();
699 }
700
701 static void set_fileformat(WPARAM format)
702 {
703     HICON hIcon;
704     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
705     fileFormat = format;
706
707     if(format & SF_TEXT)
708         hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_TXT));
709     else
710         hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_RTF));
711
712     SendMessageW(hMainWnd, WM_SETICON, ICON_BIG, (LPARAM)hIcon);
713
714     set_bar_states();
715     set_default_font();
716     target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
717 }
718
719 static void ShowOpenError(DWORD Code)
720 {
721     LPWSTR Message;
722
723     switch(Code)
724     {
725         case ERROR_ACCESS_DENIED:
726             Message = MAKEINTRESOURCEW(STRING_OPEN_ACCESS_DENIED);
727             break;
728
729         default:
730             Message = MAKEINTRESOURCEW(STRING_OPEN_FAILED);
731     }
732     MessageBoxW(hMainWnd, Message, wszAppTitle, MB_ICONEXCLAMATION | MB_OK);
733 }
734
735 static void DoOpenFile(LPCWSTR szOpenFileName)
736 {
737     HANDLE hFile;
738     EDITSTREAM es;
739     char fileStart[5];
740     DWORD readOut;
741     WPARAM format = SF_TEXT;
742
743     hFile = CreateFileW(szOpenFileName, GENERIC_READ, FILE_SHARE_READ, NULL,
744                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
745     if (hFile == INVALID_HANDLE_VALUE)
746     {
747         ShowOpenError(GetLastError());
748         return;
749     }
750
751     ReadFile(hFile, fileStart, 5, &readOut, NULL);
752     SetFilePointer(hFile, 0, NULL, FILE_BEGIN);
753
754     if(readOut >= 2 && (BYTE)fileStart[0] == 0xff && (BYTE)fileStart[1] == 0xfe)
755     {
756         format = SF_TEXT | SF_UNICODE;
757         SetFilePointer(hFile, 2, NULL, FILE_BEGIN);
758     } else if(readOut >= 5)
759     {
760         static const char header[] = "{\\rtf";
761         static const BYTE STG_magic[] = { 0xd0,0xcf,0x11,0xe0 };
762
763         if(!memcmp(header, fileStart, 5))
764             format = SF_RTF;
765         else if (!memcmp(STG_magic, fileStart, sizeof(STG_magic)))
766         {
767             CloseHandle(hFile);
768             MessageBoxWithResStringW(hMainWnd, MAKEINTRESOURCEW(STRING_OLE_STORAGE_NOT_SUPPORTED),
769                     wszAppTitle, MB_OK | MB_ICONEXCLAMATION);
770             return;
771         }
772     }
773
774     es.dwCookie = (DWORD_PTR)hFile;
775     es.pfnCallback = stream_in;
776
777     clear_formatting();
778     set_fileformat(format);
779     SendMessageW(hEditorWnd, EM_STREAMIN, format, (LPARAM)&es);
780
781     CloseHandle(hFile);
782
783     SetFocus(hEditorWnd);
784
785     set_caption(szOpenFileName);
786
787     lstrcpyW(wszFileName, szOpenFileName);
788     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
789     registry_set_filelist(szOpenFileName, hMainWnd);
790     update_font_list();
791 }
792
793 static void ShowWriteError(DWORD Code)
794 {
795     LPWSTR Message;
796
797     switch(Code)
798     {
799         case ERROR_ACCESS_DENIED:
800             Message = MAKEINTRESOURCEW(STRING_WRITE_ACCESS_DENIED);
801             break;
802
803         default:
804             Message = MAKEINTRESOURCEW(STRING_WRITE_FAILED);
805     }
806     MessageBoxW(hMainWnd, Message, wszAppTitle, MB_ICONEXCLAMATION | MB_OK);
807 }
808
809 static void DoSaveFile(LPCWSTR wszSaveFileName, WPARAM format)
810 {
811     HANDLE hFile;
812     EDITSTREAM stream;
813     LRESULT ret;
814
815     hFile = CreateFileW(wszSaveFileName, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS,
816         FILE_ATTRIBUTE_NORMAL, NULL);
817
818     if(hFile == INVALID_HANDLE_VALUE)
819     {
820         ShowWriteError(GetLastError());
821         return;
822     }
823
824     if(format == (SF_TEXT | SF_UNICODE))
825     {
826         static const BYTE unicode[] = {0xff,0xfe};
827         DWORD writeOut;
828         WriteFile(hFile, &unicode, sizeof(unicode), &writeOut, 0);
829
830         if(writeOut != sizeof(unicode))
831         {
832             CloseHandle(hFile);
833             return;
834         }
835     }
836
837     stream.dwCookie = (DWORD_PTR)hFile;
838     stream.pfnCallback = stream_out;
839
840     ret = SendMessageW(hEditorWnd, EM_STREAMOUT, format, (LPARAM)&stream);
841
842     CloseHandle(hFile);
843
844     SetFocus(hEditorWnd);
845
846     if(!ret)
847     {
848         GETTEXTLENGTHEX gt;
849         gt.flags = GTL_DEFAULT;
850         gt.codepage = 1200;
851
852         if(SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
853             return;
854     }
855
856     lstrcpyW(wszFileName, wszSaveFileName);
857     set_caption(wszFileName);
858     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
859     set_fileformat(format);
860 }
861
862 static void DialogSaveFile(void)
863 {
864     OPENFILENAMEW sfn;
865
866     WCHAR wszFile[MAX_PATH] = {'\0'};
867     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
868
869     ZeroMemory(&sfn, sizeof(sfn));
870
871     sfn.lStructSize = sizeof(sfn);
872     sfn.Flags = OFN_HIDEREADONLY | OFN_PATHMUSTEXIST | OFN_OVERWRITEPROMPT | OFN_ENABLESIZING;
873     sfn.hwndOwner = hMainWnd;
874     sfn.lpstrFilter = wszFilter;
875     sfn.lpstrFile = wszFile;
876     sfn.nMaxFile = MAX_PATH;
877     sfn.lpstrDefExt = wszDefExt;
878     sfn.nFilterIndex = fileformat_number(fileFormat)+1;
879
880     while(GetSaveFileNameW(&sfn))
881     {
882         if(fileformat_flags(sfn.nFilterIndex-1) != SF_RTF)
883         {
884             if(MessageBoxWithResStringW(hMainWnd, MAKEINTRESOURCEW(STRING_SAVE_LOSEFORMATTING),
885                            wszAppTitle, MB_YESNO | MB_ICONEXCLAMATION) != IDYES)
886             {
887                 continue;
888             } else
889             {
890                 DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
891                 break;
892             }
893         } else
894         {
895             DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
896             break;
897         }
898     }
899 }
900
901 static BOOL prompt_save_changes(void)
902 {
903     if(!wszFileName[0])
904     {
905         GETTEXTLENGTHEX gt;
906         gt.flags = GTL_NUMCHARS;
907         gt.codepage = 1200;
908         if(!SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
909             return TRUE;
910     }
911
912     if(!SendMessageW(hEditorWnd, EM_GETMODIFY, 0, 0))
913     {
914         return TRUE;
915     } else
916     {
917         LPWSTR displayFileName;
918         WCHAR *text;
919         int ret;
920
921         if(!wszFileName[0])
922             displayFileName = wszDefaultFileName;
923         else
924             displayFileName = file_basename(wszFileName);
925
926         text = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
927                          (lstrlenW(displayFileName)+lstrlenW(wszSaveChanges))*sizeof(WCHAR));
928
929         if(!text)
930             return FALSE;
931
932         wsprintfW(text, wszSaveChanges, displayFileName);
933
934         ret = MessageBoxW(hMainWnd, text, wszAppTitle, MB_YESNOCANCEL | MB_ICONEXCLAMATION);
935
936         HeapFree(GetProcessHeap(), 0, text);
937
938         switch(ret)
939         {
940             case IDNO:
941                 return TRUE;
942
943             case IDYES:
944                 if(wszFileName[0])
945                     DoSaveFile(wszFileName, fileFormat);
946                 else
947                     DialogSaveFile();
948                 return TRUE;
949
950             default:
951                 return FALSE;
952         }
953     }
954 }
955
956 static void DialogOpenFile(void)
957 {
958     OPENFILENAMEW ofn;
959
960     WCHAR wszFile[MAX_PATH] = {'\0'};
961     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
962
963     ZeroMemory(&ofn, sizeof(ofn));
964
965     ofn.lStructSize = sizeof(ofn);
966     ofn.Flags = OFN_HIDEREADONLY | OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST | OFN_ENABLESIZING;
967     ofn.hwndOwner = hMainWnd;
968     ofn.lpstrFilter = wszFilter;
969     ofn.lpstrFile = wszFile;
970     ofn.nMaxFile = MAX_PATH;
971     ofn.lpstrDefExt = wszDefExt;
972     ofn.nFilterIndex = fileformat_number(fileFormat)+1;
973
974     if(GetOpenFileNameW(&ofn))
975     {
976         if(prompt_save_changes())
977             DoOpenFile(ofn.lpstrFile);
978     }
979 }
980
981 static void dialog_about(void)
982 {
983     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
984     HICON icon = LoadImageW(hInstance, MAKEINTRESOURCEW(IDI_WORDPAD), IMAGE_ICON, 48, 48, LR_SHARED);
985     ShellAboutW(hMainWnd, wszAppTitle, 0, icon);
986 }
987
988 static INT_PTR CALLBACK formatopts_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
989 {
990     switch(message)
991     {
992         case WM_INITDIALOG:
993             {
994                 LPPROPSHEETPAGEW ps = (LPPROPSHEETPAGEW)lParam;
995                 int wrap = -1;
996                 char id[4];
997                 HWND hIdWnd = GetDlgItem(hWnd, IDC_PAGEFMT_ID);
998
999                 sprintf(id, "%d\n", (int)ps->lParam);
1000                 SetWindowTextA(hIdWnd, id);
1001                 if(wordWrap[ps->lParam] == ID_WORDWRAP_NONE)
1002                     wrap = IDC_PAGEFMT_WN;
1003                 else if(wordWrap[ps->lParam] == ID_WORDWRAP_WINDOW)
1004                     wrap = IDC_PAGEFMT_WW;
1005                 else if(wordWrap[ps->lParam] == ID_WORDWRAP_MARGIN)
1006                     wrap = IDC_PAGEFMT_WM;
1007
1008                 if(wrap != -1)
1009                     CheckRadioButton(hWnd, IDC_PAGEFMT_WN,
1010                                      IDC_PAGEFMT_WM, wrap);
1011
1012                 if(barState[ps->lParam] & (1 << BANDID_TOOLBAR))
1013                     CheckDlgButton(hWnd, IDC_PAGEFMT_TB, TRUE);
1014                 if(barState[ps->lParam] & (1 << BANDID_FORMATBAR))
1015                     CheckDlgButton(hWnd, IDC_PAGEFMT_FB, TRUE);
1016                 if(barState[ps->lParam] & (1 << BANDID_RULER))
1017                     CheckDlgButton(hWnd, IDC_PAGEFMT_RU, TRUE);
1018                 if(barState[ps->lParam] & (1 << BANDID_STATUSBAR))
1019                     CheckDlgButton(hWnd, IDC_PAGEFMT_SB, TRUE);
1020             }
1021             break;
1022
1023         case WM_COMMAND:
1024             switch(LOWORD(wParam))
1025             {
1026                 case IDC_PAGEFMT_WN:
1027                 case IDC_PAGEFMT_WW:
1028                 case IDC_PAGEFMT_WM:
1029                     CheckRadioButton(hWnd, IDC_PAGEFMT_WN, IDC_PAGEFMT_WM,
1030                                      LOWORD(wParam));
1031                     break;
1032
1033                 case IDC_PAGEFMT_TB:
1034                 case IDC_PAGEFMT_FB:
1035                 case IDC_PAGEFMT_RU:
1036                 case IDC_PAGEFMT_SB:
1037                     CheckDlgButton(hWnd, LOWORD(wParam),
1038                                    !IsDlgButtonChecked(hWnd, LOWORD(wParam)));
1039                     break;
1040             }
1041             break;
1042         case WM_NOTIFY:
1043             {
1044                 LPNMHDR header = (LPNMHDR)lParam;
1045                 if(header->code == PSN_APPLY)
1046                 {
1047                     HWND hIdWnd = GetDlgItem(hWnd, IDC_PAGEFMT_ID);
1048                     char sid[4];
1049                     int id;
1050
1051                     GetWindowTextA(hIdWnd, sid, 4);
1052                     id = atoi(sid);
1053                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_WN))
1054                         wordWrap[id] = ID_WORDWRAP_NONE;
1055                     else if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_WW))
1056                         wordWrap[id] = ID_WORDWRAP_WINDOW;
1057                     else if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_WM))
1058                         wordWrap[id] = ID_WORDWRAP_MARGIN;
1059
1060                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_TB))
1061                         barState[id] |= (1 << BANDID_TOOLBAR);
1062                     else
1063                         barState[id] &= ~(1 << BANDID_TOOLBAR);
1064
1065                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_FB))
1066                         barState[id] |= (1 << BANDID_FORMATBAR);
1067                     else
1068                         barState[id] &= ~(1 << BANDID_FORMATBAR);
1069
1070                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_RU))
1071                         barState[id] |= (1 << BANDID_RULER);
1072                     else
1073                         barState[id] &= ~(1 << BANDID_RULER);
1074
1075                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_SB))
1076                         barState[id] |= (1 << BANDID_STATUSBAR);
1077                     else
1078                         barState[id] &= ~(1 << BANDID_STATUSBAR);
1079                 }
1080             }
1081             break;
1082     }
1083     return FALSE;
1084 }
1085
1086 static void dialog_viewproperties(void)
1087 {
1088     PROPSHEETPAGEW psp[2];
1089     PROPSHEETHEADERW psh;
1090     size_t i;
1091     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
1092     LPCPROPSHEETPAGEW ppsp = (LPCPROPSHEETPAGEW)&psp;
1093
1094     psp[0].dwSize = sizeof(PROPSHEETPAGEW);
1095     psp[0].dwFlags = PSP_USETITLE;
1096     U(psp[0]).pszTemplate = MAKEINTRESOURCEW(IDD_FORMATOPTS);
1097     psp[0].pfnDlgProc = formatopts_proc;
1098     psp[0].hInstance = hInstance;
1099     psp[0].lParam = reg_formatindex(SF_TEXT);
1100     psp[0].pfnCallback = NULL;
1101     psp[0].pszTitle = MAKEINTRESOURCEW(STRING_VIEWPROPS_TEXT);
1102     for(i = 1; i < sizeof(psp)/sizeof(psp[0]); i++)
1103     {
1104         psp[i].dwSize = psp[0].dwSize;
1105         psp[i].dwFlags = psp[0].dwFlags;
1106         U(psp[i]).pszTemplate = U(psp[0]).pszTemplate;
1107         psp[i].pfnDlgProc = psp[0].pfnDlgProc;
1108         psp[i].hInstance = psp[0].hInstance;
1109         psp[i].lParam = reg_formatindex(SF_RTF);
1110         psp[i].pfnCallback = psp[0].pfnCallback;
1111         psp[i].pszTitle = MAKEINTRESOURCEW(STRING_VIEWPROPS_RICHTEXT);
1112     }
1113
1114     psh.dwSize = sizeof(psh);
1115     psh.dwFlags = PSH_USEICONID | PSH_PROPSHEETPAGE | PSH_NOAPPLYNOW;
1116     psh.hwndParent = hMainWnd;
1117     psh.hInstance = hInstance;
1118     psh.pszCaption = MAKEINTRESOURCEW(STRING_VIEWPROPS_TITLE);
1119     psh.nPages = sizeof(psp)/sizeof(psp[0]);
1120     U3(psh).ppsp = ppsp;
1121     U(psh).pszIcon = MAKEINTRESOURCEW(IDI_WORDPAD);
1122
1123     if(fileFormat & SF_RTF)
1124         U2(psh).nStartPage = 1;
1125     else
1126         U2(psh).nStartPage = 0;
1127     PropertySheetW(&psh);
1128     set_bar_states();
1129     target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
1130 }
1131
1132 static void HandleCommandLine(LPWSTR cmdline)
1133 {
1134     WCHAR delimiter;
1135     int opt_print = 0;
1136
1137     /* skip white space */
1138     while (*cmdline == ' ') cmdline++;
1139
1140     /* skip executable name */
1141     delimiter = (*cmdline == '"' ? '"' : ' ');
1142
1143     if (*cmdline == delimiter) cmdline++;
1144     while (*cmdline && *cmdline != delimiter) cmdline++;
1145     if (*cmdline == delimiter) cmdline++;
1146
1147     while (*cmdline)
1148     {
1149         while (isspace(*cmdline)) cmdline++;
1150
1151         if (*cmdline == '-' || *cmdline == '/')
1152         {
1153             if (!cmdline[2] || isspace(cmdline[2]))
1154             {
1155                 switch (cmdline[1])
1156                 {
1157                 case 'P':
1158                 case 'p':
1159                     opt_print = 1;
1160                     cmdline += 2;
1161                     continue;
1162                 }
1163             }
1164             /* a filename starting by / */
1165         }
1166         break;
1167     }
1168
1169     if (*cmdline)
1170     {
1171         /* file name is passed on the command line */
1172         if (cmdline[0] == '"')
1173         {
1174             cmdline++;
1175             cmdline[lstrlenW(cmdline) - 1] = 0;
1176         }
1177         DoOpenFile(cmdline);
1178         InvalidateRect(hMainWnd, NULL, FALSE);
1179     }
1180
1181     if (opt_print)
1182         MessageBoxWithResStringW(hMainWnd, MAKEINTRESOURCEW(STRING_PRINTING_NOT_IMPLEMENTED), wszAppTitle, MB_OK);
1183 }
1184
1185 static LRESULT handle_findmsg(LPFINDREPLACEW pFr)
1186 {
1187     if(pFr->Flags & FR_DIALOGTERM)
1188     {
1189         hFindWnd = 0;
1190         pFr->Flags = FR_FINDNEXT;
1191         return 0;
1192     }
1193
1194     if(pFr->Flags & FR_FINDNEXT || pFr->Flags & FR_REPLACE || pFr->Flags & FR_REPLACEALL)
1195     {
1196         DWORD flags = FR_DOWN;
1197         FINDTEXTW ft;
1198         static CHARRANGE cr;
1199         LRESULT end, ret;
1200         GETTEXTLENGTHEX gt;
1201         LRESULT length;
1202         int startPos;
1203         HMENU hMenu = GetMenu(hMainWnd);
1204         MENUITEMINFOW mi;
1205
1206         mi.cbSize = sizeof(mi);
1207         mi.fMask = MIIM_DATA;
1208         mi.dwItemData = 1;
1209         SetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
1210
1211         gt.flags = GTL_NUMCHARS;
1212         gt.codepage = 1200;
1213
1214         length = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
1215
1216         if(pFr->lCustData == -1)
1217         {
1218             SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&startPos, (LPARAM)&end);
1219             cr.cpMin = startPos;
1220             pFr->lCustData = startPos;
1221             cr.cpMax = length;
1222             if(cr.cpMin == length)
1223                 cr.cpMin = 0;
1224         } else
1225         {
1226             startPos = pFr->lCustData;
1227         }
1228
1229         if(cr.cpMax > length)
1230         {
1231             startPos = 0;
1232             cr.cpMin = 0;
1233             cr.cpMax = length;
1234         }
1235
1236         ft.chrg = cr;
1237         ft.lpstrText = pFr->lpstrFindWhat;
1238
1239         if(pFr->Flags & FR_MATCHCASE)
1240             flags |= FR_MATCHCASE;
1241         if(pFr->Flags & FR_WHOLEWORD)
1242             flags |= FR_WHOLEWORD;
1243
1244         ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
1245
1246         if(ret == -1)
1247         {
1248             if(cr.cpMax == length && cr.cpMax != startPos)
1249             {
1250                 ft.chrg.cpMin = cr.cpMin = 0;
1251                 ft.chrg.cpMax = cr.cpMax = startPos;
1252
1253                 ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
1254             }
1255         }
1256
1257         if(ret == -1)
1258         {
1259             pFr->lCustData = -1;
1260             MessageBoxWithResStringW(hMainWnd, MAKEINTRESOURCEW(STRING_SEARCH_FINISHED), wszAppTitle,
1261                         MB_OK | MB_ICONASTERISK);
1262         } else
1263         {
1264             end = ret + lstrlenW(pFr->lpstrFindWhat);
1265             cr.cpMin = end;
1266             SendMessageW(hEditorWnd, EM_SETSEL, (WPARAM)ret, (LPARAM)end);
1267             SendMessageW(hEditorWnd, EM_SCROLLCARET, 0, 0);
1268
1269             if(pFr->Flags & FR_REPLACE || pFr->Flags & FR_REPLACEALL)
1270                 SendMessageW(hEditorWnd, EM_REPLACESEL, TRUE, (LPARAM)pFr->lpstrReplaceWith);
1271
1272             if(pFr->Flags & FR_REPLACEALL)
1273                 handle_findmsg(pFr);
1274         }
1275     }
1276
1277     return 0;
1278 }
1279
1280 static void dialog_find(LPFINDREPLACEW fr, BOOL replace)
1281 {
1282     static WCHAR findBuffer[MAX_STRING_LEN];
1283
1284     /* Allow only one search/replace dialog to open */
1285     if(hFindWnd != NULL)
1286     {
1287         SetActiveWindow(hFindWnd);
1288         return;
1289     }
1290
1291     ZeroMemory(fr, sizeof(FINDREPLACEW));
1292     fr->lStructSize = sizeof(FINDREPLACEW);
1293     fr->hwndOwner = hMainWnd;
1294     fr->Flags = FR_HIDEUPDOWN;
1295     fr->lpstrFindWhat = findBuffer;
1296     fr->lCustData = -1;
1297     fr->wFindWhatLen = MAX_STRING_LEN*sizeof(WCHAR);
1298
1299     if(replace)
1300         hFindWnd = ReplaceTextW(fr);
1301     else
1302         hFindWnd = FindTextW(fr);
1303 }
1304
1305 static int current_units_to_twips(float number)
1306 {
1307     int twips = (int)(number * 1000.0 / (float)CENTMM_PER_INCH *  (float)TWIPS_PER_INCH);
1308     return twips;
1309 }
1310
1311 static void append_current_units(LPWSTR buffer)
1312 {
1313     static const WCHAR space[] = {' ', 0};
1314     lstrcatW(buffer, space);
1315     lstrcatW(buffer, units_cmW);
1316 }
1317
1318 static void number_with_units(LPWSTR buffer, int number)
1319 {
1320     static const WCHAR fmt[] = {'%','.','2','f',' ','%','s','\0'};
1321     float converted = (float)number / (float)TWIPS_PER_INCH *(float)CENTMM_PER_INCH / 1000.0;
1322
1323     sprintfW(buffer, fmt, converted, units_cmW);
1324 }
1325
1326 static BOOL get_comboexlist_selection(HWND hComboEx, LPWSTR wszBuffer, UINT bufferLength)
1327 {
1328     COMBOBOXEXITEMW cbItem;
1329     COMBOBOXINFO cbInfo;
1330     HWND hCombo, hList;
1331     int idx, result;
1332
1333     hCombo = (HWND)SendMessage(hComboEx, CBEM_GETCOMBOCONTROL, 0, 0);
1334     if (!hCombo)
1335         return FALSE;
1336     cbInfo.cbSize = sizeof(COMBOBOXINFO);
1337     result = SendMessage(hCombo, CB_GETCOMBOBOXINFO, 0, (LPARAM)&cbInfo);
1338     if (!result)
1339         return FALSE;
1340     hList = cbInfo.hwndList;
1341     idx = SendMessage(hList, LB_GETCURSEL, 0, 0);
1342     if (idx < 0)
1343         return FALSE;
1344
1345     ZeroMemory(&cbItem, sizeof(cbItem));
1346     cbItem.mask = CBEIF_TEXT;
1347     cbItem.iItem = idx;
1348     cbItem.pszText = wszBuffer;
1349     cbItem.cchTextMax = bufferLength-1;
1350     result = SendMessageW(hComboEx, CBEM_GETITEMW, 0, (LPARAM)&cbItem);
1351
1352     return result != 0;
1353 }
1354
1355 static INT_PTR CALLBACK datetime_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1356 {
1357     switch(message)
1358     {
1359         case WM_INITDIALOG:
1360             {
1361                 WCHAR buffer[MAX_STRING_LEN];
1362                 SYSTEMTIME st;
1363                 HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
1364                 GetLocalTime(&st);
1365
1366                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_SHORTDATE, &st, 0, (LPWSTR)&buffer,
1367                                MAX_STRING_LEN);
1368                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1369                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &st, 0, (LPWSTR)&buffer,
1370                                MAX_STRING_LEN);
1371                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1372                 GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &st, 0, (LPWSTR)&buffer, MAX_STRING_LEN);
1373                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1374
1375                 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
1376             }
1377             break;
1378
1379         case WM_COMMAND:
1380             switch(LOWORD(wParam))
1381             {
1382                 case IDC_DATETIME:
1383                     if (HIWORD(wParam) != LBN_DBLCLK)
1384                         break;
1385                     /* Fall through */
1386
1387                 case IDOK:
1388                     {
1389                         LRESULT index;
1390                         HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
1391
1392                         index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
1393
1394                         if(index != LB_ERR)
1395                         {
1396                             WCHAR buffer[MAX_STRING_LEN];
1397                             SendMessageW(hListWnd, LB_GETTEXT, index, (LPARAM)&buffer);
1398                             SendMessageW(hEditorWnd, EM_REPLACESEL, TRUE, (LPARAM)&buffer);
1399                         }
1400                     }
1401                     /* Fall through */
1402
1403                 case IDCANCEL:
1404                     EndDialog(hWnd, wParam);
1405                     return TRUE;
1406             }
1407     }
1408     return FALSE;
1409 }
1410
1411 static INT_PTR CALLBACK newfile_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1412 {
1413     switch(message)
1414     {
1415         case WM_INITDIALOG:
1416             {
1417                 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
1418                 WCHAR buffer[MAX_STRING_LEN];
1419                 HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
1420
1421                 LoadStringW(hInstance, STRING_NEWFILE_RICHTEXT, buffer, MAX_STRING_LEN);
1422                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1423                 LoadStringW(hInstance, STRING_NEWFILE_TXT, buffer, MAX_STRING_LEN);
1424                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1425                 LoadStringW(hInstance, STRING_NEWFILE_TXT_UNICODE, buffer, MAX_STRING_LEN);
1426                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1427
1428                 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
1429             }
1430             break;
1431
1432         case WM_COMMAND:
1433             switch(LOWORD(wParam))
1434             {
1435                 case IDOK:
1436                     {
1437                         LRESULT index;
1438                         HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
1439                         index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
1440
1441                         if(index != LB_ERR)
1442                             EndDialog(hWnd, MAKELONG(fileformat_flags(index),0));
1443                     }
1444                     return TRUE;
1445
1446                 case IDCANCEL:
1447                     EndDialog(hWnd, MAKELONG(ID_NEWFILE_ABORT,0));
1448                     return TRUE;
1449             }
1450     }
1451     return FALSE;
1452 }
1453
1454 static INT_PTR CALLBACK paraformat_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1455 {
1456     static const WORD ALIGNMENT_VALUES[] = {PFA_LEFT, PFA_RIGHT, PFA_CENTER};
1457
1458     switch(message)
1459     {
1460         case WM_INITDIALOG:
1461             {
1462                 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd,
1463                                                                   GWLP_HINSTANCE);
1464                 WCHAR buffer[MAX_STRING_LEN];
1465                 HWND hListWnd = GetDlgItem(hWnd, IDC_PARA_ALIGN);
1466                 HWND hLeftWnd = GetDlgItem(hWnd, IDC_PARA_LEFT);
1467                 HWND hRightWnd = GetDlgItem(hWnd, IDC_PARA_RIGHT);
1468                 HWND hFirstWnd = GetDlgItem(hWnd, IDC_PARA_FIRST);
1469                 PARAFORMAT2 pf;
1470                 int index = 0;
1471
1472                 LoadStringW(hInstance, STRING_ALIGN_LEFT, buffer,
1473                             MAX_STRING_LEN);
1474                 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
1475                 LoadStringW(hInstance, STRING_ALIGN_RIGHT, buffer,
1476                             MAX_STRING_LEN);
1477                 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
1478                 LoadStringW(hInstance, STRING_ALIGN_CENTER, buffer,
1479                             MAX_STRING_LEN);
1480                 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
1481
1482                 pf.cbSize = sizeof(pf);
1483                 pf.dwMask = PFM_ALIGNMENT | PFM_OFFSET | PFM_RIGHTINDENT |
1484                             PFM_STARTINDENT;
1485                 SendMessageW(hEditorWnd, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1486
1487                 if(pf.wAlignment == PFA_RIGHT)
1488                     index ++;
1489                 else if(pf.wAlignment == PFA_CENTER)
1490                     index += 2;
1491
1492                 SendMessageW(hListWnd, CB_SETCURSEL, index, 0);
1493
1494                 number_with_units(buffer, pf.dxStartIndent + pf.dxOffset);
1495                 SetWindowTextW(hLeftWnd, buffer);
1496                 number_with_units(buffer, pf.dxRightIndent);
1497                 SetWindowTextW(hRightWnd, buffer);
1498                 number_with_units(buffer, -pf.dxOffset);
1499                 SetWindowTextW(hFirstWnd, buffer);
1500             }
1501             break;
1502
1503         case WM_COMMAND:
1504             switch(LOWORD(wParam))
1505             {
1506                 case IDOK:
1507                     {
1508                         HWND hListWnd = GetDlgItem(hWnd, IDC_PARA_ALIGN);
1509                         HWND hLeftWnd = GetDlgItem(hWnd, IDC_PARA_LEFT);
1510                         HWND hRightWnd = GetDlgItem(hWnd, IDC_PARA_RIGHT);
1511                         HWND hFirstWnd = GetDlgItem(hWnd, IDC_PARA_FIRST);
1512                         WCHAR buffer[MAX_STRING_LEN];
1513                         int index;
1514                         float num;
1515                         int ret = 0;
1516                         PARAFORMAT pf;
1517
1518                         index = SendMessageW(hListWnd, CB_GETCURSEL, 0, 0);
1519                         pf.wAlignment = ALIGNMENT_VALUES[index];
1520
1521                         GetWindowTextW(hLeftWnd, buffer, MAX_STRING_LEN);
1522                         if(number_from_string(buffer, &num, TRUE))
1523                             ret++;
1524                         pf.dxOffset = current_units_to_twips(num);
1525                         GetWindowTextW(hRightWnd, buffer, MAX_STRING_LEN);
1526                         if(number_from_string(buffer, &num, TRUE))
1527                             ret++;
1528                         pf.dxRightIndent = current_units_to_twips(num);
1529                         GetWindowTextW(hFirstWnd, buffer, MAX_STRING_LEN);
1530                         if(number_from_string(buffer, &num, TRUE))
1531                             ret++;
1532                         pf.dxStartIndent = current_units_to_twips(num);
1533
1534                         if(ret != 3)
1535                         {
1536                             MessageBoxWithResStringW(hMainWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
1537                                         wszAppTitle, MB_OK | MB_ICONASTERISK);
1538                             return FALSE;
1539                         } else
1540                         {
1541                             if (pf.dxOffset + pf.dxStartIndent < 0
1542                                 && pf.dxStartIndent < 0)
1543                             {
1544                                 /* The first line is before the left edge, so
1545                                  * make sure it is at the left edge. */
1546                                 pf.dxOffset = -pf.dxStartIndent;
1547                             } else if (pf.dxOffset < 0) {
1548                                 /* The second and following lines are before
1549                                  * the left edge, so set it to be at the left
1550                                  * edge, and adjust the first line since it
1551                                  * is relative to it. */
1552                                 pf.dxStartIndent = max(pf.dxStartIndent + pf.dxOffset, 0);
1553                                 pf.dxOffset = 0;
1554                             }
1555                             /* Internally the dxStartIndent is the absolute
1556                              * offset for the first line and dxOffset is
1557                              * to it value as opposed how it is displayed with
1558                              * the first line being the relative value.
1559                              * These two lines make the adjustments. */
1560                             pf.dxStartIndent = pf.dxStartIndent + pf.dxOffset;
1561                             pf.dxOffset = pf.dxOffset - pf.dxStartIndent;
1562
1563                             pf.cbSize = sizeof(pf);
1564                             pf.dwMask = PFM_ALIGNMENT | PFM_OFFSET | PFM_RIGHTINDENT |
1565                                         PFM_STARTINDENT;
1566                             SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
1567                         }
1568                     }
1569                     /* Fall through */
1570
1571                 case IDCANCEL:
1572                     EndDialog(hWnd, wParam);
1573                     return TRUE;
1574             }
1575     }
1576     return FALSE;
1577 }
1578
1579 static INT_PTR CALLBACK tabstops_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1580 {
1581     switch(message)
1582     {
1583         case WM_INITDIALOG:
1584             {
1585                 HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1586                 PARAFORMAT pf;
1587                 WCHAR buffer[MAX_STRING_LEN];
1588                 int i;
1589
1590                 pf.cbSize = sizeof(pf);
1591                 pf.dwMask = PFM_TABSTOPS;
1592                 SendMessageW(hEditorWnd, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1593                 SendMessageW(hTabWnd, CB_LIMITTEXT, MAX_STRING_LEN-1, 0);
1594
1595                 for(i = 0; i < pf.cTabCount; i++)
1596                 {
1597                     number_with_units(buffer, pf.rgxTabs[i]);
1598                     SendMessageW(hTabWnd, CB_ADDSTRING, 0, (LPARAM)&buffer);
1599                 }
1600                 SetFocus(hTabWnd);
1601             }
1602             break;
1603
1604         case WM_COMMAND:
1605             switch(LOWORD(wParam))
1606             {
1607                 case IDC_TABSTOPS:
1608                     {
1609                         HWND hTabWnd = (HWND)lParam;
1610                         HWND hAddWnd = GetDlgItem(hWnd, ID_TAB_ADD);
1611                         HWND hDelWnd = GetDlgItem(hWnd, ID_TAB_DEL);
1612                         HWND hEmptyWnd = GetDlgItem(hWnd, ID_TAB_EMPTY);
1613
1614                         if(GetWindowTextLengthW(hTabWnd))
1615                             EnableWindow(hAddWnd, TRUE);
1616                         else
1617                             EnableWindow(hAddWnd, FALSE);
1618
1619                         if(SendMessageW(hTabWnd, CB_GETCOUNT, 0, 0))
1620                         {
1621                             EnableWindow(hEmptyWnd, TRUE);
1622
1623                             if(SendMessageW(hTabWnd, CB_GETCURSEL, 0, 0) == CB_ERR)
1624                                 EnableWindow(hDelWnd, FALSE);
1625                             else
1626                                 EnableWindow(hDelWnd, TRUE);
1627                         } else
1628                         {
1629                             EnableWindow(hEmptyWnd, FALSE);
1630                         }
1631                     }
1632                     break;
1633
1634                 case ID_TAB_ADD:
1635                     {
1636                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1637                         WCHAR buffer[MAX_STRING_LEN];
1638
1639                         GetWindowTextW(hTabWnd, buffer, MAX_STRING_LEN);
1640                         append_current_units(buffer);
1641
1642                         if(SendMessageW(hTabWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)&buffer) == CB_ERR)
1643                         {
1644                             float number = 0;
1645                             int item_count = SendMessage(hTabWnd, CB_GETCOUNT, 0, 0);
1646
1647                             if(!number_from_string(buffer, &number, TRUE))
1648                             {
1649                                 MessageBoxWithResStringW(hWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
1650                                              wszAppTitle, MB_OK | MB_ICONINFORMATION);
1651                             } else if (item_count >= MAX_TAB_STOPS) {
1652                                 MessageBoxWithResStringW(hWnd, MAKEINTRESOURCEW(STRING_MAX_TAB_STOPS),
1653                                              wszAppTitle, MB_OK | MB_ICONINFORMATION);
1654                             } else {
1655                                 int i;
1656                                 float next_number = -1;
1657                                 int next_number_in_twips = -1;
1658                                 int insert_number = current_units_to_twips(number);
1659
1660                                 /* linear search for position to insert the string */
1661                                 for(i = 0; i < item_count; i++)
1662                                 {
1663                                     SendMessageW(hTabWnd, CB_GETLBTEXT, i, (LPARAM)&buffer);
1664                                     number_from_string(buffer, &next_number, TRUE);
1665                                     next_number_in_twips = current_units_to_twips(next_number);
1666                                     if (insert_number <= next_number_in_twips)
1667                                         break;
1668                                 }
1669                                 if (insert_number != next_number_in_twips)
1670                                 {
1671                                     number_with_units(buffer, insert_number);
1672                                     SendMessageW(hTabWnd, CB_INSERTSTRING, i, (LPARAM)&buffer);
1673                                     SetWindowTextW(hTabWnd, 0);
1674                                 }
1675                             }
1676                         }
1677                         SetFocus(hTabWnd);
1678                     }
1679                     break;
1680
1681                 case ID_TAB_DEL:
1682                     {
1683                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1684                         LRESULT ret;
1685                         ret = SendMessageW(hTabWnd, CB_GETCURSEL, 0, 0);
1686                         if(ret != CB_ERR)
1687                             SendMessageW(hTabWnd, CB_DELETESTRING, ret, 0);
1688                     }
1689                     break;
1690
1691                 case ID_TAB_EMPTY:
1692                     {
1693                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1694                         SendMessageW(hTabWnd, CB_RESETCONTENT, 0, 0);
1695                         SetFocus(hTabWnd);
1696                     }
1697                     break;
1698
1699                 case IDOK:
1700                     {
1701                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1702                         int i;
1703                         WCHAR buffer[MAX_STRING_LEN];
1704                         PARAFORMAT pf;
1705                         float number;
1706
1707                         pf.cbSize = sizeof(pf);
1708                         pf.dwMask = PFM_TABSTOPS;
1709
1710                         for(i = 0; SendMessageW(hTabWnd, CB_GETLBTEXT, i,
1711                                                 (LPARAM)&buffer) != CB_ERR &&
1712                                                         i < MAX_TAB_STOPS; i++)
1713                         {
1714                             number_from_string(buffer, &number, TRUE);
1715                             pf.rgxTabs[i] = current_units_to_twips(number);
1716                         }
1717                         pf.cTabCount = i;
1718                         SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
1719                     }
1720                     /* Fall through */
1721                 case IDCANCEL:
1722                     EndDialog(hWnd, wParam);
1723                     return TRUE;
1724             }
1725     }
1726     return FALSE;
1727 }
1728
1729 static int context_menu(LPARAM lParam)
1730 {
1731     int x = (int)(short)LOWORD(lParam);
1732     int y = (int)(short)HIWORD(lParam);
1733     HMENU hPop = GetSubMenu(hPopupMenu, 0);
1734
1735     if(x == -1)
1736     {
1737         int from = 0, to = 0;
1738         POINTL pt;
1739         SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
1740         SendMessageW(hEditorWnd, EM_POSFROMCHAR, (WPARAM)&pt, (LPARAM)to);
1741         ClientToScreen(hEditorWnd, (POINT*)&pt);
1742         x = pt.x;
1743         y = pt.y;
1744     }
1745
1746     TrackPopupMenu(hPop, TPM_LEFTALIGN | TPM_TOPALIGN | TPM_RIGHTBUTTON,
1747                    x, y, 0, hMainWnd, 0);
1748
1749     return 0;
1750 }
1751
1752 static LRESULT OnCreate( HWND hWnd )
1753 {
1754     HWND hToolBarWnd, hFormatBarWnd,  hReBarWnd, hFontListWnd, hSizeListWnd, hRulerWnd;
1755     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
1756     HANDLE hDLL;
1757     TBADDBITMAP ab;
1758     int nStdBitmaps = 0;
1759     REBARINFO rbi;
1760     REBARBANDINFOW rbb;
1761     static const WCHAR wszRichEditDll[] = {'R','I','C','H','E','D','2','0','.','D','L','L','\0'};
1762     static const WCHAR wszRichEditText[] = {'R','i','c','h','E','d','i','t',' ','t','e','x','t','\0'};
1763
1764     CreateStatusWindowW(CCS_NODIVIDER|WS_CHILD|WS_VISIBLE, wszRichEditText, hWnd, IDC_STATUSBAR);
1765
1766     hReBarWnd = CreateWindowExW(WS_EX_TOOLWINDOW, REBARCLASSNAMEW, NULL,
1767       CCS_NODIVIDER|WS_CHILD|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|RBS_VARHEIGHT|CCS_TOP,
1768       CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hWnd, (HMENU)IDC_REBAR, hInstance, NULL);
1769
1770     rbi.cbSize = sizeof(rbi);
1771     rbi.fMask = 0;
1772     rbi.himl = NULL;
1773     if(!SendMessageW(hReBarWnd, RB_SETBARINFO, 0, (LPARAM)&rbi))
1774         return -1;
1775
1776     hToolBarWnd = CreateToolbarEx(hReBarWnd, CCS_NOPARENTALIGN|CCS_NOMOVEY|WS_VISIBLE|WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_BUTTON,
1777       IDC_TOOLBAR,
1778       1, hInstance, IDB_TOOLBAR,
1779       NULL, 0,
1780       24, 24, 16, 16, sizeof(TBBUTTON));
1781
1782     ab.hInst = HINST_COMMCTRL;
1783     ab.nID = IDB_STD_SMALL_COLOR;
1784     nStdBitmaps = SendMessageW(hToolBarWnd, TB_ADDBITMAP, 0, (LPARAM)&ab);
1785
1786     AddButton(hToolBarWnd, nStdBitmaps+STD_FILENEW, ID_FILE_NEW);
1787     AddButton(hToolBarWnd, nStdBitmaps+STD_FILEOPEN, ID_FILE_OPEN);
1788     AddButton(hToolBarWnd, nStdBitmaps+STD_FILESAVE, ID_FILE_SAVE);
1789     AddSeparator(hToolBarWnd);
1790     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINT, ID_PRINT_QUICK);
1791     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINTPRE, ID_PREVIEW);
1792     AddSeparator(hToolBarWnd);
1793     AddButton(hToolBarWnd, nStdBitmaps+STD_FIND, ID_FIND);
1794     AddSeparator(hToolBarWnd);
1795     AddButton(hToolBarWnd, nStdBitmaps+STD_CUT, ID_EDIT_CUT);
1796     AddButton(hToolBarWnd, nStdBitmaps+STD_COPY, ID_EDIT_COPY);
1797     AddButton(hToolBarWnd, nStdBitmaps+STD_PASTE, ID_EDIT_PASTE);
1798     AddButton(hToolBarWnd, nStdBitmaps+STD_UNDO, ID_EDIT_UNDO);
1799     AddButton(hToolBarWnd, nStdBitmaps+STD_REDOW, ID_EDIT_REDO);
1800     AddSeparator(hToolBarWnd);
1801     AddButton(hToolBarWnd, 0, ID_DATETIME);
1802
1803     SendMessageW(hToolBarWnd, TB_AUTOSIZE, 0, 0);
1804
1805     rbb.cbSize = REBARBANDINFOW_V6_SIZE;
1806     rbb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_CHILD | RBBIM_STYLE | RBBIM_ID;
1807     rbb.fStyle = RBBS_CHILDEDGE | RBBS_BREAK | RBBS_NOGRIPPER;
1808     rbb.cx = 0;
1809     rbb.hwndChild = hToolBarWnd;
1810     rbb.cxMinChild = 0;
1811     rbb.cyChild = rbb.cyMinChild = HIWORD(SendMessageW(hToolBarWnd, TB_GETBUTTONSIZE, 0, 0));
1812     rbb.wID = BANDID_TOOLBAR;
1813
1814     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1815
1816     hFontListWnd = CreateWindowExW(0, WC_COMBOBOXEXW, NULL,
1817                       WS_BORDER | WS_VISIBLE | WS_CHILD | CBS_DROPDOWN | CBS_SORT,
1818                       0, 0, 200, 150, hReBarWnd, (HMENU)IDC_FONTLIST, hInstance, NULL);
1819
1820     rbb.hwndChild = hFontListWnd;
1821     rbb.cx = 200;
1822     rbb.wID = BANDID_FONTLIST;
1823
1824     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1825
1826     hSizeListWnd = CreateWindowExW(0, WC_COMBOBOXEXW, NULL,
1827                       WS_BORDER | WS_VISIBLE | WS_CHILD | CBS_DROPDOWN,
1828                       0, 0, 50, 150, hReBarWnd, (HMENU)IDC_SIZELIST, hInstance, NULL);
1829
1830     rbb.hwndChild = hSizeListWnd;
1831     rbb.cx = 50;
1832     rbb.fStyle ^= RBBS_BREAK;
1833     rbb.wID = BANDID_SIZELIST;
1834
1835     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1836
1837     hFormatBarWnd = CreateToolbarEx(hReBarWnd,
1838          CCS_NOPARENTALIGN | CCS_NOMOVEY | WS_VISIBLE | TBSTYLE_TOOLTIPS | TBSTYLE_BUTTON,
1839          IDC_FORMATBAR, 7, hInstance, IDB_FORMATBAR, NULL, 0, 16, 16, 16, 16, sizeof(TBBUTTON));
1840
1841     AddButton(hFormatBarWnd, 0, ID_FORMAT_BOLD);
1842     AddButton(hFormatBarWnd, 1, ID_FORMAT_ITALIC);
1843     AddButton(hFormatBarWnd, 2, ID_FORMAT_UNDERLINE);
1844     AddSeparator(hFormatBarWnd);
1845     AddButton(hFormatBarWnd, 3, ID_ALIGN_LEFT);
1846     AddButton(hFormatBarWnd, 4, ID_ALIGN_CENTER);
1847     AddButton(hFormatBarWnd, 5, ID_ALIGN_RIGHT);
1848     AddSeparator(hFormatBarWnd);
1849     AddButton(hFormatBarWnd, 6, ID_BULLET);
1850
1851     SendMessageW(hFormatBarWnd, TB_AUTOSIZE, 0, 0);
1852
1853     rbb.hwndChild = hFormatBarWnd;
1854     rbb.wID = BANDID_FORMATBAR;
1855
1856     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1857
1858     hRulerWnd = CreateWindowExW(0, WC_STATICW, NULL, WS_VISIBLE | WS_CHILD,
1859                                 0, 0, 200, 10, hReBarWnd,  (HMENU)IDC_RULER, hInstance, NULL);
1860
1861
1862     rbb.hwndChild = hRulerWnd;
1863     rbb.wID = BANDID_RULER;
1864     rbb.fStyle |= RBBS_BREAK;
1865
1866     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1867
1868     hDLL = LoadLibraryW(wszRichEditDll);
1869     if(!hDLL)
1870     {
1871         MessageBoxWithResStringW(hWnd, MAKEINTRESOURCEW(STRING_LOAD_RICHED_FAILED), wszAppTitle,
1872                     MB_OK | MB_ICONEXCLAMATION);
1873         PostQuitMessage(1);
1874     }
1875
1876     hEditorWnd = CreateWindowExW(WS_EX_CLIENTEDGE, RICHEDIT_CLASS20W, NULL,
1877       WS_CHILD|WS_VISIBLE|ES_SELECTIONBAR|ES_MULTILINE|ES_AUTOVSCROLL
1878       |ES_WANTRETURN|WS_VSCROLL|ES_NOHIDESEL|WS_HSCROLL,
1879       0, 0, 1000, 100, hWnd, (HMENU)IDC_EDITOR, hInstance, NULL);
1880
1881     if (!hEditorWnd)
1882     {
1883         fprintf(stderr, "Error code %u\n", GetLastError());
1884         return -1;
1885     }
1886     assert(hEditorWnd);
1887
1888     SetFocus(hEditorWnd);
1889     SendMessageW(hEditorWnd, EM_SETEVENTMASK, 0, ENM_SELCHANGE);
1890
1891     set_default_font();
1892
1893     populate_font_list(hFontListWnd);
1894     populate_size_list(hSizeListWnd);
1895     DoLoadStrings();
1896     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
1897
1898     ID_FINDMSGSTRING = RegisterWindowMessageW(FINDMSGSTRINGW);
1899
1900     registry_read_filelist(hWnd);
1901     registry_read_formatopts_all(barState, wordWrap);
1902     registry_read_options();
1903     DragAcceptFiles(hWnd, TRUE);
1904
1905     return 0;
1906 }
1907
1908 static LRESULT OnUser( HWND hWnd )
1909 {
1910     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1911     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
1912     HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
1913     HWND hwndFormatBar = GetDlgItem(hwndReBar, IDC_FORMATBAR);
1914     int from, to;
1915     CHARFORMAT2W fmt;
1916     PARAFORMAT2 pf;
1917     GETTEXTLENGTHEX gt;
1918
1919     ZeroMemory(&fmt, sizeof(fmt));
1920     fmt.cbSize = sizeof(fmt);
1921
1922     ZeroMemory(&pf, sizeof(pf));
1923     pf.cbSize = sizeof(pf);
1924
1925     gt.flags = GTL_NUMCHARS;
1926     gt.codepage = 1200;
1927
1928     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_FIND,
1929                  SendMessageW(hwndEditor, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0) ? 1 : 0);
1930
1931     SendMessageW(hwndEditor, EM_GETCHARFORMAT, TRUE, (LPARAM)&fmt);
1932
1933     SendMessageW(hwndEditor, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
1934     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_UNDO,
1935       SendMessageW(hwndEditor, EM_CANUNDO, 0, 0));
1936     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_REDO,
1937       SendMessageW(hwndEditor, EM_CANREDO, 0, 0));
1938     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_CUT, from == to ? 0 : 1);
1939     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_COPY, from == to ? 0 : 1);
1940
1941     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_BOLD, (fmt.dwMask & CFM_BOLD) &&
1942             (fmt.dwEffects & CFE_BOLD));
1943     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_BOLD, !(fmt.dwMask & CFM_BOLD));
1944     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_ITALIC, (fmt.dwMask & CFM_ITALIC) &&
1945             (fmt.dwEffects & CFE_ITALIC));
1946     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_ITALIC, !(fmt.dwMask & CFM_ITALIC));
1947     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_UNDERLINE, (fmt.dwMask & CFM_UNDERLINE) &&
1948             (fmt.dwEffects & CFE_UNDERLINE));
1949     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_UNDERLINE, !(fmt.dwMask & CFM_UNDERLINE));
1950
1951     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1952     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_LEFT, (pf.wAlignment == PFA_LEFT));
1953     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_CENTER, (pf.wAlignment == PFA_CENTER));
1954     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_RIGHT, (pf.wAlignment == PFA_RIGHT));
1955
1956     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_BULLET, (pf.wNumbering & PFN_BULLET));
1957     return 0;
1958 }
1959
1960 static LRESULT OnNotify( HWND hWnd, LPARAM lParam)
1961 {
1962     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1963     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
1964     NMHDR *pHdr = (NMHDR *)lParam;
1965     HWND hwndFontList = GetDlgItem(hwndReBar, IDC_FONTLIST);
1966     HWND hwndSizeList = GetDlgItem(hwndReBar, IDC_SIZELIST);
1967
1968     if (pHdr->hwndFrom == hwndFontList || pHdr->hwndFrom == hwndSizeList)
1969     {
1970         if (pHdr->code == CBEN_ENDEDITW)
1971         {
1972             NMCBEENDEDIT *endEdit = (NMCBEENDEDIT *)lParam;
1973             if(pHdr->hwndFrom == hwndFontList)
1974             {
1975                 on_fontlist_modified((LPWSTR)endEdit->szText);
1976             } else if (pHdr->hwndFrom == hwndSizeList)
1977             {
1978                 on_sizelist_modified(hwndFontList,(LPWSTR)endEdit->szText);
1979             }
1980         }
1981         return 0;
1982     }
1983
1984     if (pHdr->hwndFrom != hwndEditor)
1985         return 0;
1986
1987     if (pHdr->code == EN_SELCHANGE)
1988     {
1989         SELCHANGE *pSC = (SELCHANGE *)lParam;
1990         char buf[128];
1991
1992         update_font_list();
1993
1994         sprintf( buf,"selection = %d..%d, line count=%ld",
1995                  pSC->chrg.cpMin, pSC->chrg.cpMax,
1996                 SendMessage(hwndEditor, EM_GETLINECOUNT, 0, 0));
1997         SetWindowTextA(GetDlgItem(hWnd, IDC_STATUSBAR), buf);
1998         SendMessage(hWnd, WM_USER, 0, 0);
1999         return 1;
2000     }
2001     return 0;
2002 }
2003
2004 static LRESULT OnCommand( HWND hWnd, WPARAM wParam, LPARAM lParam)
2005 {
2006     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2007     static FINDREPLACEW findreplace;
2008
2009     if ((HWND)lParam == hwndEditor)
2010         return 0;
2011
2012     switch(LOWORD(wParam))
2013     {
2014
2015     case ID_FILE_EXIT:
2016         PostMessageW(hWnd, WM_CLOSE, 0, 0);
2017         break;
2018
2019     case ID_FILE_NEW:
2020         {
2021             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2022             int ret = DialogBox(hInstance, MAKEINTRESOURCE(IDD_NEWFILE), hWnd,
2023                                 newfile_proc);
2024
2025             if(ret != ID_NEWFILE_ABORT)
2026             {
2027                 if(prompt_save_changes())
2028                 {
2029                     SETTEXTEX st;
2030
2031                     set_caption(NULL);
2032                     wszFileName[0] = '\0';
2033
2034                     clear_formatting();
2035
2036                     st.flags = ST_DEFAULT;
2037                     st.codepage = 1200;
2038                     SendMessageW(hEditorWnd, EM_SETTEXTEX, (WPARAM)&st, 0);
2039
2040                     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
2041                     set_fileformat(ret);
2042                     update_font_list();
2043                 }
2044             }
2045         }
2046         break;
2047
2048     case ID_FILE_OPEN:
2049         DialogOpenFile();
2050         break;
2051
2052     case ID_FILE_SAVE:
2053         if(wszFileName[0])
2054         {
2055             DoSaveFile(wszFileName, fileFormat);
2056             break;
2057         }
2058         /* Fall through */
2059
2060     case ID_FILE_SAVEAS:
2061         DialogSaveFile();
2062         break;
2063
2064     case ID_FILE_RECENT1:
2065     case ID_FILE_RECENT2:
2066     case ID_FILE_RECENT3:
2067     case ID_FILE_RECENT4:
2068         {
2069             HMENU hMenu = GetMenu(hWnd);
2070             MENUITEMINFOW mi;
2071
2072             mi.cbSize = sizeof(MENUITEMINFOW);
2073             mi.fMask = MIIM_DATA;
2074             if(GetMenuItemInfoW(hMenu, LOWORD(wParam), FALSE, &mi))
2075                 DoOpenFile((LPWSTR)mi.dwItemData);
2076         }
2077         break;
2078
2079     case ID_FIND:
2080         dialog_find(&findreplace, FALSE);
2081         break;
2082
2083     case ID_FIND_NEXT:
2084         handle_findmsg(&findreplace);
2085         break;
2086
2087     case ID_REPLACE:
2088         dialog_find(&findreplace, TRUE);
2089         break;
2090
2091     case ID_FONTSETTINGS:
2092         dialog_choose_font();
2093         break;
2094
2095     case ID_PRINT:
2096         dialog_print(hWnd, wszFileName);
2097         target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
2098         break;
2099
2100     case ID_PRINT_QUICK:
2101         print_quick(wszFileName);
2102         target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
2103         break;
2104
2105     case ID_PREVIEW:
2106         {
2107             int index = reg_formatindex(fileFormat);
2108             DWORD tmp = barState[index];
2109             barState[index] = 0;
2110             set_bar_states();
2111             barState[index] = tmp;
2112             ShowWindow(hEditorWnd, FALSE);
2113
2114             init_preview(hWnd, wszFileName);
2115
2116             SetMenu(hWnd, NULL);
2117             InvalidateRect(0, 0, TRUE);
2118         }
2119         break;
2120
2121     case ID_PRINTSETUP:
2122         dialog_printsetup(hWnd);
2123         target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
2124         break;
2125
2126     case ID_FORMAT_BOLD:
2127     case ID_FORMAT_ITALIC:
2128     case ID_FORMAT_UNDERLINE:
2129         {
2130         CHARFORMAT2W fmt;
2131         int effects = CFE_BOLD;
2132
2133         ZeroMemory(&fmt, sizeof(fmt));
2134         fmt.cbSize = sizeof(fmt);
2135         SendMessageW(hwndEditor, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
2136
2137         fmt.dwMask = CFM_BOLD;
2138
2139         if (LOWORD(wParam) == ID_FORMAT_ITALIC)
2140         {
2141             effects = CFE_ITALIC;
2142             fmt.dwMask = CFM_ITALIC;
2143         } else if (LOWORD(wParam) == ID_FORMAT_UNDERLINE)
2144         {
2145             effects = CFE_UNDERLINE;
2146             fmt.dwMask = CFM_UNDERLINE;
2147         }
2148
2149         fmt.dwEffects ^= effects;
2150
2151         SendMessageW(hwndEditor, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
2152         break;
2153         }
2154
2155     case ID_EDIT_CUT:
2156         PostMessageW(hwndEditor, WM_CUT, 0, 0);
2157         break;
2158
2159     case ID_EDIT_COPY:
2160         PostMessageW(hwndEditor, WM_COPY, 0, 0);
2161         break;
2162
2163     case ID_EDIT_PASTE:
2164         PostMessageW(hwndEditor, WM_PASTE, 0, 0);
2165         break;
2166
2167     case ID_EDIT_CLEAR:
2168         PostMessageW(hwndEditor, WM_CLEAR, 0, 0);
2169         break;
2170
2171     case ID_EDIT_SELECTALL:
2172         {
2173         CHARRANGE range = {0, -1};
2174         SendMessageW(hwndEditor, EM_EXSETSEL, 0, (LPARAM)&range);
2175         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2176         return 0;
2177         }
2178
2179     case ID_EDIT_GETTEXT:
2180         {
2181         int nLen = GetWindowTextLengthW(hwndEditor);
2182         LPWSTR data = HeapAlloc( GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR) );
2183         TEXTRANGEW tr;
2184
2185         GetWindowTextW(hwndEditor, data, nLen+1);
2186         MessageBoxW(NULL, data, wszAppTitle, MB_OK);
2187
2188         HeapFree( GetProcessHeap(), 0, data);
2189         data = HeapAlloc(GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR));
2190         tr.chrg.cpMin = 0;
2191         tr.chrg.cpMax = nLen;
2192         tr.lpstrText = data;
2193         SendMessage (hwndEditor, EM_GETTEXTRANGE, 0, (LPARAM)&tr);
2194         MessageBoxW(NULL, data, wszAppTitle, MB_OK);
2195         HeapFree( GetProcessHeap(), 0, data );
2196
2197         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2198         return 0;
2199         }
2200
2201     case ID_EDIT_CHARFORMAT:
2202     case ID_EDIT_DEFCHARFORMAT:
2203         {
2204         CHARFORMAT2W cf;
2205         LRESULT i;
2206         ZeroMemory(&cf, sizeof(cf));
2207         cf.cbSize = sizeof(cf);
2208         cf.dwMask = 0;
2209         i = SendMessageW(hwndEditor, EM_GETCHARFORMAT,
2210                         LOWORD(wParam) == ID_EDIT_CHARFORMAT, (LPARAM)&cf);
2211         return 0;
2212         }
2213
2214     case ID_EDIT_PARAFORMAT:
2215         {
2216         PARAFORMAT2 pf;
2217         ZeroMemory(&pf, sizeof(pf));
2218         pf.cbSize = sizeof(pf);
2219         SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2220         return 0;
2221         }
2222
2223     case ID_EDIT_SELECTIONINFO:
2224         {
2225         CHARRANGE range = {0, -1};
2226         char buf[128];
2227         WCHAR *data = NULL;
2228
2229         SendMessage(hwndEditor, EM_EXGETSEL, 0, (LPARAM)&range);
2230         data = HeapAlloc(GetProcessHeap(), 0, sizeof(*data) * (range.cpMax-range.cpMin+1));
2231         SendMessage(hwndEditor, EM_GETSELTEXT, 0, (LPARAM)data);
2232         sprintf(buf, "Start = %d, End = %d", range.cpMin, range.cpMax);
2233         MessageBoxA(hWnd, buf, "Editor", MB_OK);
2234         MessageBoxW(hWnd, data, wszAppTitle, MB_OK);
2235         HeapFree( GetProcessHeap(), 0, data);
2236         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2237         return 0;
2238         }
2239
2240     case ID_EDIT_READONLY:
2241         {
2242         LONG nStyle = GetWindowLong(hwndEditor, GWL_STYLE);
2243         if (nStyle & ES_READONLY)
2244             SendMessageW(hwndEditor, EM_SETREADONLY, 0, 0);
2245         else
2246             SendMessageW(hwndEditor, EM_SETREADONLY, 1, 0);
2247         return 0;
2248         }
2249
2250     case ID_EDIT_MODIFIED:
2251         if (SendMessageW(hwndEditor, EM_GETMODIFY, 0, 0))
2252             SendMessageW(hwndEditor, EM_SETMODIFY, 0, 0);
2253         else
2254             SendMessageW(hwndEditor, EM_SETMODIFY, 1, 0);
2255         return 0;
2256
2257     case ID_EDIT_UNDO:
2258         SendMessageW(hwndEditor, EM_UNDO, 0, 0);
2259         return 0;
2260
2261     case ID_EDIT_REDO:
2262         SendMessageW(hwndEditor, EM_REDO, 0, 0);
2263         return 0;
2264
2265     case ID_BULLET:
2266         {
2267             PARAFORMAT pf;
2268
2269             pf.cbSize = sizeof(pf);
2270             pf.dwMask = PFM_NUMBERING;
2271             SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2272
2273             pf.dwMask |=  PFM_OFFSET;
2274
2275             if(pf.wNumbering == PFN_BULLET)
2276             {
2277                 pf.wNumbering = 0;
2278                 pf.dxOffset = 0;
2279             } else
2280             {
2281                 pf.wNumbering = PFN_BULLET;
2282                 pf.dxOffset = 720;
2283             }
2284
2285             SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2286         }
2287         break;
2288
2289     case ID_ALIGN_LEFT:
2290     case ID_ALIGN_CENTER:
2291     case ID_ALIGN_RIGHT:
2292         {
2293         PARAFORMAT2 pf;
2294
2295         pf.cbSize = sizeof(pf);
2296         pf.dwMask = PFM_ALIGNMENT;
2297         switch(LOWORD(wParam)) {
2298         case ID_ALIGN_LEFT: pf.wAlignment = PFA_LEFT; break;
2299         case ID_ALIGN_CENTER: pf.wAlignment = PFA_CENTER; break;
2300         case ID_ALIGN_RIGHT: pf.wAlignment = PFA_RIGHT; break;
2301         }
2302         SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2303         break;
2304         }
2305
2306     case ID_BACK_1:
2307         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 1, 0);
2308         break;
2309
2310     case ID_BACK_2:
2311         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 0, RGB(255,255,192));
2312         break;
2313
2314     case ID_TOGGLE_TOOLBAR:
2315         set_toolbar_state(BANDID_TOOLBAR, !is_bar_visible(BANDID_TOOLBAR));
2316         update_window();
2317         break;
2318
2319     case ID_TOGGLE_FORMATBAR:
2320         set_toolbar_state(BANDID_FONTLIST, !is_bar_visible(BANDID_FORMATBAR));
2321         set_toolbar_state(BANDID_SIZELIST, !is_bar_visible(BANDID_FORMATBAR));
2322         set_toolbar_state(BANDID_FORMATBAR, !is_bar_visible(BANDID_FORMATBAR));
2323         update_window();
2324         break;
2325
2326     case ID_TOGGLE_STATUSBAR:
2327         set_statusbar_state(!is_bar_visible(BANDID_STATUSBAR));
2328         update_window();
2329         break;
2330
2331     case ID_TOGGLE_RULER:
2332         set_toolbar_state(BANDID_RULER, !is_bar_visible(BANDID_RULER));
2333         update_window();
2334         break;
2335
2336     case ID_DATETIME:
2337         {
2338         HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2339         DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_DATETIME), hWnd, datetime_proc);
2340         break;
2341         }
2342
2343     case ID_PARAFORMAT:
2344         {
2345             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2346             DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_PARAFORMAT), hWnd,
2347                        paraformat_proc);
2348         }
2349         break;
2350
2351     case ID_TABSTOPS:
2352         {
2353             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2354             DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_TABSTOPS), hWnd, tabstops_proc);
2355         }
2356         break;
2357
2358     case ID_ABOUT:
2359         dialog_about();
2360         break;
2361
2362     case ID_VIEWPROPERTIES:
2363         dialog_viewproperties();
2364         break;
2365
2366     case IDC_FONTLIST:
2367         if (HIWORD(wParam) == CBN_SELENDOK)
2368         {
2369             WCHAR buffer[LF_FACESIZE];
2370             HWND hwndFontList = (HWND)lParam;
2371             get_comboexlist_selection(hwndFontList, buffer, LF_FACESIZE);
2372             on_fontlist_modified(buffer);
2373         }
2374         break;
2375
2376     case IDC_SIZELIST:
2377         if (HIWORD(wParam) == CBN_SELENDOK)
2378         {
2379             WCHAR buffer[MAX_STRING_LEN+1];
2380             HWND hwndSizeList = (HWND)lParam;
2381             get_comboexlist_selection(hwndSizeList, buffer, MAX_STRING_LEN+1);
2382             on_sizelist_modified(hwndSizeList, buffer);
2383         }
2384         break;
2385
2386     default:
2387         SendMessageW(hwndEditor, WM_COMMAND, wParam, lParam);
2388         break;
2389     }
2390     return 0;
2391 }
2392
2393 static LRESULT OnInitPopupMenu( HWND hWnd, WPARAM wParam )
2394 {
2395     HMENU hMenu = (HMENU)wParam;
2396     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2397     HWND hwndStatus = GetDlgItem(hWnd, IDC_STATUSBAR);
2398     PARAFORMAT pf;
2399     int nAlignment = -1;
2400     int selFrom, selTo;
2401     GETTEXTLENGTHEX gt;
2402     LRESULT textLength;
2403     MENUITEMINFOW mi;
2404
2405     SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&selFrom, (LPARAM)&selTo);
2406     EnableMenuItem(hMenu, ID_EDIT_COPY, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
2407     EnableMenuItem(hMenu, ID_EDIT_CUT, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
2408
2409     pf.cbSize = sizeof(PARAFORMAT);
2410     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2411     CheckMenuItem(hMenu, ID_EDIT_READONLY,
2412       MF_BYCOMMAND|(GetWindowLong(hwndEditor, GWL_STYLE)&ES_READONLY ? MF_CHECKED : MF_UNCHECKED));
2413     CheckMenuItem(hMenu, ID_EDIT_MODIFIED,
2414       MF_BYCOMMAND|(SendMessage(hwndEditor, EM_GETMODIFY, 0, 0) ? MF_CHECKED : MF_UNCHECKED));
2415     if (pf.dwMask & PFM_ALIGNMENT)
2416         nAlignment = pf.wAlignment;
2417     CheckMenuItem(hMenu, ID_ALIGN_LEFT, MF_BYCOMMAND|(nAlignment == PFA_LEFT) ?
2418             MF_CHECKED : MF_UNCHECKED);
2419     CheckMenuItem(hMenu, ID_ALIGN_CENTER, MF_BYCOMMAND|(nAlignment == PFA_CENTER) ?
2420             MF_CHECKED : MF_UNCHECKED);
2421     CheckMenuItem(hMenu, ID_ALIGN_RIGHT, MF_BYCOMMAND|(nAlignment == PFA_RIGHT) ?
2422             MF_CHECKED : MF_UNCHECKED);
2423     CheckMenuItem(hMenu, ID_BULLET, MF_BYCOMMAND | ((pf.wNumbering == PFN_BULLET) ?
2424             MF_CHECKED : MF_UNCHECKED));
2425     EnableMenuItem(hMenu, ID_EDIT_UNDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANUNDO, 0, 0)) ?
2426             MF_ENABLED : MF_GRAYED);
2427     EnableMenuItem(hMenu, ID_EDIT_REDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANREDO, 0, 0)) ?
2428             MF_ENABLED : MF_GRAYED);
2429
2430     CheckMenuItem(hMenu, ID_TOGGLE_TOOLBAR, MF_BYCOMMAND|(is_bar_visible(BANDID_TOOLBAR)) ?
2431             MF_CHECKED : MF_UNCHECKED);
2432
2433     CheckMenuItem(hMenu, ID_TOGGLE_FORMATBAR, MF_BYCOMMAND|(is_bar_visible(BANDID_FORMATBAR)) ?
2434             MF_CHECKED : MF_UNCHECKED);
2435
2436     CheckMenuItem(hMenu, ID_TOGGLE_STATUSBAR, MF_BYCOMMAND|IsWindowVisible(hwndStatus) ?
2437             MF_CHECKED : MF_UNCHECKED);
2438
2439     CheckMenuItem(hMenu, ID_TOGGLE_RULER, MF_BYCOMMAND|(is_bar_visible(BANDID_RULER)) ? MF_CHECKED : MF_UNCHECKED);
2440
2441     gt.flags = GTL_NUMCHARS;
2442     gt.codepage = 1200;
2443     textLength = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
2444     EnableMenuItem(hMenu, ID_FIND, MF_BYCOMMAND|(textLength ? MF_ENABLED : MF_GRAYED));
2445
2446     mi.cbSize = sizeof(mi);
2447     mi.fMask = MIIM_DATA;
2448
2449     GetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
2450
2451     EnableMenuItem(hMenu, ID_FIND_NEXT, MF_BYCOMMAND|((textLength && mi.dwItemData) ?
2452                    MF_ENABLED : MF_GRAYED));
2453
2454     EnableMenuItem(hMenu, ID_REPLACE, MF_BYCOMMAND|(textLength ? MF_ENABLED : MF_GRAYED));
2455
2456     return 0;
2457 }
2458
2459 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam )
2460 {
2461     int nStatusSize = 0;
2462     RECT rc;
2463     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2464     HWND hwndStatusBar = GetDlgItem(hWnd, IDC_STATUSBAR);
2465     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
2466     HWND hRulerWnd = GetDlgItem(hWnd, IDC_RULER);
2467     int rebarHeight = 0;
2468
2469     if (hwndStatusBar)
2470     {
2471         SendMessageW(hwndStatusBar, WM_SIZE, 0, 0);
2472         if (IsWindowVisible(hwndStatusBar))
2473         {
2474             GetClientRect(hwndStatusBar, &rc);
2475             nStatusSize = rc.bottom - rc.top;
2476         } else
2477         {
2478             nStatusSize = 0;
2479         }
2480     }
2481     if (hwndReBar)
2482     {
2483         rebarHeight = SendMessageW(hwndReBar, RB_GETBARHEIGHT, 0, 0);
2484
2485         MoveWindow(hwndReBar, 0, 0, LOWORD(lParam), rebarHeight, TRUE);
2486     }
2487     if (hwndEditor)
2488     {
2489         GetClientRect(hWnd, &rc);
2490         MoveWindow(hwndEditor, 0, rebarHeight, rc.right, rc.bottom-nStatusSize-rebarHeight, TRUE);
2491     }
2492
2493     redraw_ruler(hRulerWnd);
2494
2495     return DefWindowProcW(hWnd, WM_SIZE, wParam, lParam);
2496 }
2497
2498 static LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
2499 {
2500     if(msg == ID_FINDMSGSTRING)
2501         return handle_findmsg((LPFINDREPLACEW)lParam);
2502
2503     switch(msg)
2504     {
2505     case WM_CREATE:
2506         return OnCreate( hWnd );
2507
2508     case WM_USER:
2509         return OnUser( hWnd );
2510
2511     case WM_NOTIFY:
2512         return OnNotify( hWnd, lParam );
2513
2514     case WM_COMMAND:
2515         if(preview_isactive())
2516         {
2517             return preview_command( hWnd, wParam );
2518         }
2519
2520         return OnCommand( hWnd, wParam, lParam );
2521
2522     case WM_DESTROY:
2523         PostQuitMessage(0);
2524         break;
2525
2526     case WM_CLOSE:
2527         if(preview_isactive())
2528         {
2529             preview_exit(hWnd);
2530         } else if(prompt_save_changes())
2531         {
2532             registry_set_options(hMainWnd);
2533             registry_set_formatopts_all(barState);
2534             PostQuitMessage(0);
2535         }
2536         break;
2537
2538     case WM_ACTIVATE:
2539         if (LOWORD(wParam))
2540             SetFocus(GetDlgItem(hWnd, IDC_EDITOR));
2541         return 0;
2542
2543     case WM_INITMENUPOPUP:
2544         return OnInitPopupMenu( hWnd, wParam );
2545
2546     case WM_SIZE:
2547         return OnSize( hWnd, wParam, lParam );
2548
2549     case WM_CONTEXTMENU:
2550         if((HWND)wParam == hEditorWnd)
2551             return context_menu(lParam);
2552         else
2553             return DefWindowProcW(hWnd, msg, wParam, lParam);
2554
2555     case WM_DROPFILES:
2556         {
2557             WCHAR file[MAX_PATH];
2558             DragQueryFileW((HDROP)wParam, 0, file, MAX_PATH);
2559             DragFinish((HDROP)wParam);
2560
2561             if(prompt_save_changes())
2562                 DoOpenFile(file);
2563         }
2564         break;
2565     case WM_PAINT:
2566         if(preview_isactive())
2567             return print_preview(hWnd);
2568         else
2569             return DefWindowProcW(hWnd, msg, wParam, lParam);
2570
2571     default:
2572         return DefWindowProcW(hWnd, msg, wParam, lParam);
2573     }
2574
2575     return 0;
2576 }
2577
2578 int CALLBACK WinMain(HINSTANCE hInstance, HINSTANCE hOldInstance, LPSTR szCmdParagraph, int nCmdShow)
2579 {
2580     INITCOMMONCONTROLSEX classes = {8, ICC_BAR_CLASSES|ICC_COOL_CLASSES|ICC_USEREX_CLASSES};
2581     HACCEL hAccel;
2582     WNDCLASSW wc;
2583     MSG msg;
2584     RECT rc;
2585     UINT_PTR hPrevRulerProc;
2586     HWND hRulerWnd;
2587     POINTL EditPoint;
2588     DWORD bMaximized;
2589     static const WCHAR wszAccelTable[] = {'M','A','I','N','A','C','C','E','L',
2590                                           'T','A','B','L','E','\0'};
2591
2592     InitCommonControlsEx(&classes);
2593
2594     hAccel = LoadAcceleratorsW(hInstance, wszAccelTable);
2595
2596     wc.style = CS_HREDRAW | CS_VREDRAW;
2597     wc.lpfnWndProc = WndProc;
2598     wc.cbClsExtra = 0;
2599     wc.cbWndExtra = 4;
2600     wc.hInstance = hInstance;
2601     wc.hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_WORDPAD));
2602     wc.hCursor = LoadCursor(NULL, IDC_IBEAM);
2603     wc.hbrBackground = GetSysColorBrush(COLOR_WINDOW);
2604     wc.lpszMenuName = MAKEINTRESOURCEW(IDM_MAINMENU);
2605     wc.lpszClassName = wszMainWndClass;
2606     RegisterClassW(&wc);
2607
2608     registry_read_winrect(&rc);
2609     hMainWnd = CreateWindowExW(0, wszMainWndClass, wszAppTitle, WS_CLIPCHILDREN|WS_OVERLAPPEDWINDOW,
2610       rc.left, rc.top, rc.right-rc.left, rc.bottom-rc.top, NULL, NULL, hInstance, NULL);
2611     registry_read_maximized(&bMaximized);
2612     if ((nCmdShow == SW_SHOWNORMAL || nCmdShow == SW_SHOWDEFAULT)
2613              && bMaximized)
2614         nCmdShow = SW_SHOWMAXIMIZED;
2615     ShowWindow(hMainWnd, nCmdShow);
2616
2617     set_caption(NULL);
2618     set_bar_states();
2619     set_fileformat(SF_RTF);
2620     hPopupMenu = LoadMenuW(hInstance, MAKEINTRESOURCEW(IDM_POPUP));
2621     get_default_printer_opts();
2622     target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
2623
2624     hRulerWnd = GetDlgItem(GetDlgItem(hMainWnd, IDC_REBAR), IDC_RULER);
2625     SendMessageW(GetDlgItem(hMainWnd, IDC_EDITOR), EM_POSFROMCHAR, (WPARAM)&EditPoint, 0);
2626     hPrevRulerProc = SetWindowLongPtrW(hRulerWnd, GWLP_WNDPROC, (UINT_PTR)ruler_proc);
2627     SendMessageW(hRulerWnd, WM_USER, (WPARAM)&EditPoint, hPrevRulerProc);
2628
2629     HandleCommandLine(GetCommandLineW());
2630
2631     while(GetMessageW(&msg,0,0,0))
2632     {
2633         if (IsDialogMessage(hFindWnd, &msg))
2634             continue;
2635
2636         if (TranslateAcceleratorW(hMainWnd, hAccel, &msg))
2637             continue;
2638         TranslateMessage(&msg);
2639         DispatchMessageW(&msg);
2640         if (!PeekMessageW(&msg, 0, 0, 0, PM_NOREMOVE))
2641             SendMessageW(hMainWnd, WM_USER, 0, 0);
2642     }
2643
2644     return 0;
2645 }