include: winres.h no longer exists in PSDK, fix winresrc.h includes.
[wine] / programs / wordpad / wordpad.c
1 /*
2  * Wordpad implementation
3  *
4  * Copyright 2004 by Krzysztof Foltman
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #define WIN32_LEAN_AND_MEAN
22 #define _WIN32_IE 0x0400
23
24 #define MAX_STRING_LEN 255
25
26 #include <stdarg.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
36 #include "resource.h"
37
38 /* use LoadString */
39 static const WCHAR xszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
40 static const WCHAR xszMainMenu[] = {'M','A','I','N','M','E','N','U',0};
41
42 static const WCHAR wszRichEditClass[] = {'R','I','C','H','E','D','I','T','2','0','W',0};
43 static const WCHAR wszMainWndClass[] = {'W','O','R','D','P','A','D','T','O','P',0};
44 static const WCHAR wszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
45
46 static HWND hMainWnd;
47 static HWND hEditorWnd;
48
49 static WCHAR wszFilter[MAX_STRING_LEN];
50 static WCHAR wszDefaultFileName[MAX_STRING_LEN];
51 static WCHAR wszSaveChanges[MAX_STRING_LEN];
52
53 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam );
54
55 /* Load string resources */
56 static void DoLoadStrings(void)
57 {
58     LPWSTR p = wszFilter;
59     static const WCHAR files_rtf[] = {'*','.','r','t','f','\0'};
60     static const WCHAR files_txt[] = {'*','.','t','x','t','\0'};
61     static const WCHAR files_all[] = {'*','.','*','\0'};
62     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
63
64     LoadStringW(hInstance, STRING_RICHTEXT_FILES_RTF, p, MAX_STRING_LEN);
65     p += lstrlenW(p) + 1;
66     lstrcpyW(p, files_rtf);
67     p += lstrlenW(p) + 1;
68     LoadStringW(hInstance, STRING_TEXT_FILES_TXT, p, MAX_STRING_LEN);
69     p += lstrlenW(p) + 1;
70     lstrcpyW(p, files_txt);
71     p += lstrlenW(p) + 1;
72     LoadStringW(hInstance, STRING_ALL_FILES, p, MAX_STRING_LEN);
73     p += lstrlenW(p) + 1;
74     lstrcpyW(p, files_all);
75     p += lstrlenW(p) + 1;
76     *p = '\0';
77
78     p = wszDefaultFileName;
79     LoadStringW(hInstance, STRING_DEFAULT_FILENAME, p, MAX_STRING_LEN);
80
81     p = wszSaveChanges;
82     LoadStringW(hInstance, STRING_PROMPT_SAVE_CHANGES, p, MAX_STRING_LEN);
83 }
84
85 static void AddButton(HWND hwndToolBar, int nImage, int nCommand)
86 {
87     TBBUTTON button;
88
89     ZeroMemory(&button, sizeof(button));
90     button.iBitmap = nImage;
91     button.idCommand = nCommand;
92     button.fsState = TBSTATE_ENABLED;
93     button.fsStyle = TBSTYLE_BUTTON;
94     button.dwData = 0;
95     button.iString = -1;
96     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
97 }
98
99 static void AddSeparator(HWND hwndToolBar)
100 {
101     TBBUTTON button;
102
103     ZeroMemory(&button, sizeof(button));
104     button.iBitmap = -1;
105     button.idCommand = 0;
106     button.fsState = 0;
107     button.fsStyle = TBSTYLE_SEP;
108     button.dwData = 0;
109     button.iString = -1;
110     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
111 }
112
113 static DWORD CALLBACK stream_in(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
114 {
115     HANDLE hFile = (HANDLE)cookie;
116     DWORD read;
117
118     if(!ReadFile(hFile, buffer, cb, &read, 0))
119         return 1;
120
121     *pcb = read;
122
123     return 0;
124 }
125
126 static DWORD CALLBACK stream_out(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
127 {
128     DWORD written;
129     int ret;
130     HANDLE hFile = (HANDLE)cookie;
131
132     ret = WriteFile(hFile, buffer, cb, &written, 0);
133
134     if(!ret || (cb != written))
135         return 1;
136
137     *pcb = cb;
138
139     return 0;
140 }
141
142 static WCHAR wszFileName[MAX_PATH];
143
144 static void set_caption(LPCWSTR wszNewFileName)
145 {
146     static const WCHAR wszSeparator[] = {' ','-',' '};
147     WCHAR *wszCaption;
148     SIZE_T length = 0;
149
150     if(!wszNewFileName)
151         wszNewFileName = wszDefaultFileName;
152
153     wszCaption = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
154                 lstrlenW(wszNewFileName)*sizeof(WCHAR)+sizeof(wszSeparator)+sizeof(wszAppTitle));
155
156     if(!wszCaption)
157         return;
158
159     memcpy(wszCaption, wszNewFileName, lstrlenW(wszNewFileName)*sizeof(WCHAR));
160     length += lstrlenW(wszNewFileName);
161     memcpy(wszCaption + length, wszSeparator, sizeof(wszSeparator));
162     length += sizeof(wszSeparator) / sizeof(WCHAR);
163     memcpy(wszCaption + length, wszAppTitle, sizeof(wszAppTitle));
164
165     SetWindowTextW(hMainWnd, wszCaption);
166
167     HeapFree(GetProcessHeap(), 0, wszCaption);
168 }
169
170 static void DoOpenFile(LPCWSTR szOpenFileName)
171 {
172     HANDLE hFile;
173     EDITSTREAM es;
174
175     hFile = CreateFileW(szOpenFileName, GENERIC_READ, FILE_SHARE_READ, NULL,
176                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
177     if (hFile == INVALID_HANDLE_VALUE)
178         return;
179
180     es.dwCookie = (DWORD_PTR)hFile;
181     es.pfnCallback = stream_in;
182
183     /* FIXME: Handle different file formats */
184     SendMessageW(hEditorWnd, EM_STREAMIN, SF_RTF, (LPARAM)&es);
185
186     CloseHandle(hFile);
187
188     SetFocus(hEditorWnd);
189
190     set_caption(szOpenFileName);
191
192     lstrcpyW(wszFileName, szOpenFileName);
193     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
194 }
195
196 static void DoSaveFile(LPCWSTR wszSaveFileName)
197 {
198     HANDLE hFile;
199     EDITSTREAM stream;
200     LRESULT ret;
201
202     hFile = CreateFileW(wszSaveFileName, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS,
203         FILE_ATTRIBUTE_NORMAL, NULL);
204
205     if(hFile == INVALID_HANDLE_VALUE)
206         return;
207
208     stream.dwCookie = (DWORD_PTR)hFile;
209     stream.pfnCallback = stream_out;
210
211     /* FIXME: Handle different formats */
212     ret = SendMessageW(hEditorWnd, EM_STREAMOUT, SF_RTF, (LPARAM)&stream);
213
214     CloseHandle(hFile);
215
216     SetFocus(hEditorWnd);
217
218     if(!ret)
219         return;
220
221     lstrcpyW(wszFileName, wszSaveFileName);
222     set_caption(wszFileName);
223     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
224 }
225
226 static void DialogSaveFile(void)
227 {
228     OPENFILENAMEW sfn;
229
230     WCHAR wszFile[MAX_PATH] = {'\0'};
231     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
232
233     ZeroMemory(&sfn, sizeof(sfn));
234
235     sfn.lStructSize = sizeof(sfn);
236     sfn.Flags = OFN_HIDEREADONLY | OFN_PATHMUSTEXIST;
237     sfn.hwndOwner = hMainWnd;
238     sfn.lpstrFilter = wszFilter;
239     sfn.lpstrFile = wszFile;
240     sfn.nMaxFile = MAX_PATH;
241     sfn.lpstrDefExt = wszDefExt;
242
243     if(!GetSaveFileNameW(&sfn))
244         return;
245
246     DoSaveFile(sfn.lpstrFile);
247 }
248
249 static BOOL prompt_save_changes(void)
250 {
251     if(!wszFileName[0])
252     {
253         GETTEXTLENGTHEX gt;
254         gt.flags = GTL_NUMCHARS;
255         gt.codepage = 1200;
256         if(!SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
257             return TRUE;
258     }
259
260     if(!SendMessageW(hEditorWnd, EM_GETMODIFY, 0, 0))
261     {
262         return TRUE;
263     } else
264     {
265         LPWSTR displayFileName;
266         WCHAR *text;
267         int ret;
268
269         if(!wszFileName[0])
270             displayFileName = wszDefaultFileName;
271         else
272             displayFileName = wszFileName;
273
274         text = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
275                          (lstrlenW(displayFileName)+lstrlenW(wszSaveChanges))*sizeof(WCHAR));
276
277         if(!text)
278             return FALSE;
279
280         wsprintfW(text, wszSaveChanges, displayFileName);
281
282         ret = MessageBoxW(hMainWnd, text, wszAppTitle, MB_YESNOCANCEL | MB_ICONEXCLAMATION);
283
284         HeapFree(GetProcessHeap(), 0, text);
285
286         switch(ret)
287         {
288             case IDNO:
289                 return TRUE;
290
291             case IDYES:
292                 if(wszFileName[0])
293                     DoSaveFile(wszFileName);
294                 else
295                     DialogSaveFile();
296                 return TRUE;
297
298             default:
299                 return FALSE;
300         }
301     }
302 }
303
304 static void DialogOpenFile(void)
305 {
306     OPENFILENAMEW ofn;
307
308     WCHAR wszFile[MAX_PATH] = {'\0'};
309     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
310
311     ZeroMemory(&ofn, sizeof(ofn));
312
313     ofn.lStructSize = sizeof(ofn);
314     ofn.Flags = OFN_HIDEREADONLY | OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST;
315     ofn.hwndOwner = hMainWnd;
316     ofn.lpstrFilter = wszFilter;
317     ofn.lpstrFile = wszFile;
318     ofn.nMaxFile = MAX_PATH;
319     ofn.lpstrDefExt = wszDefExt;
320
321     if(GetOpenFileNameW(&ofn))
322     {
323         prompt_save_changes();
324         DoOpenFile(ofn.lpstrFile);
325     }
326 }
327
328 static void HandleCommandLine(LPWSTR cmdline)
329 {
330     WCHAR delimiter;
331     int opt_print = 0;
332
333     /* skip white space */
334     while (*cmdline == ' ') cmdline++;
335
336     /* skip executable name */
337     delimiter = (*cmdline == '"' ? '"' : ' ');
338
339     if (*cmdline == delimiter) cmdline++;
340     while (*cmdline && *cmdline != delimiter) cmdline++;
341     if (*cmdline == delimiter) cmdline++;
342
343     while (*cmdline == ' ' || *cmdline == '-' || *cmdline == '/')
344     {
345         WCHAR option;
346
347         if (*cmdline++ == ' ') continue;
348
349         option = *cmdline;
350         if (option) cmdline++;
351         while (*cmdline == ' ') cmdline++;
352
353         switch (option)
354         {
355             case 'p':
356             case 'P':
357                 opt_print = 1;
358                 break;
359         }
360     }
361
362     if (*cmdline)
363     {
364         /* file name is passed on the command line */
365         if (cmdline[0] == '"')
366         {
367             cmdline++;
368             cmdline[lstrlenW(cmdline) - 1] = 0;
369         }
370         DoOpenFile(cmdline);
371         InvalidateRect(hMainWnd, NULL, FALSE);
372     }
373
374     if (opt_print)
375         MessageBox(hMainWnd, "Printing not implemented", "WordPad", MB_OK);
376 }
377
378 static void DoDefaultFont(void)
379 {
380     static const WCHAR szFaceName[] = {'T','i','m','e','s',' ','N','e','w',' ','R','o','m','a','n',0};
381     CHARFORMAT2W fmt;
382
383     ZeroMemory(&fmt, sizeof(fmt));
384
385     fmt.cbSize = sizeof(fmt);
386     fmt.dwMask = CFM_FACE | CFM_BOLD | CFM_ITALIC | CFM_UNDERLINE;
387     fmt.dwEffects = 0;
388
389     lstrcpyW(fmt.szFaceName, szFaceName);
390
391     SendMessageW(hEditorWnd, EM_SETCHARFORMAT,  SCF_DEFAULT, (LPARAM)&fmt);
392 }
393
394 static void update_window(void)
395 {
396     RECT rect;
397
398     GetWindowRect(hMainWnd, &rect);
399
400     (void) OnSize(hMainWnd, SIZE_RESTORED, MAKELONG(rect.bottom, rect.right));
401 }
402
403 static void toggle_toolbar(int bandId)
404 {
405     HWND hwndReBar = GetDlgItem(hMainWnd, IDC_REBAR);
406     REBARBANDINFOW rbbinfo;
407     BOOL hide = TRUE;
408
409     if(!hwndReBar)
410         return;
411
412     rbbinfo.cbSize = sizeof(rbbinfo);
413     rbbinfo.fMask = RBBIM_STYLE | RBBIM_SIZE;
414
415     SendMessageW(hwndReBar, RB_GETBANDINFO, bandId, (LPARAM)&rbbinfo);
416
417     if(rbbinfo.fStyle & RBBS_HIDDEN)
418         hide = FALSE;
419
420     SendMessageW(hwndReBar, RB_SHOWBAND, bandId, hide ? 0 : 1);
421
422     if(bandId == BANDID_TOOLBAR)
423     {
424         rbbinfo.fMask ^= RBBIM_SIZE;
425
426         SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_FORMATBAR, (LPARAM)&rbbinfo);
427
428         if(hide)
429             rbbinfo.fStyle ^= RBBS_BREAK;
430         else
431             rbbinfo.fStyle |= RBBS_BREAK;
432
433         SendMessageW(hwndReBar, RB_SETBANDINFO, BANDID_FORMATBAR, (LPARAM)&rbbinfo);
434     }
435 }
436
437 BOOL CALLBACK datetime_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
438 {
439     switch(message)
440     {
441         case WM_INITDIALOG:
442             {
443                 WCHAR buffer[MAX_STRING_LEN];
444                 SYSTEMTIME st;
445                 HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
446                 GetLocalTime(&st);
447
448                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_SHORTDATE, &st, 0, (LPWSTR)&buffer,
449                                MAX_STRING_LEN);
450                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
451                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &st, 0, (LPWSTR)&buffer,
452                                MAX_STRING_LEN);
453                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
454                 GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &st, 0, (LPWSTR)&buffer, MAX_STRING_LEN);
455                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
456
457                 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
458             }
459             break;
460
461         case WM_COMMAND:
462             switch(LOWORD(wParam))
463             {
464                 case IDOK:
465                     {
466                         LRESULT index;
467                         HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
468
469                         index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
470
471                         if(index != LB_ERR)
472                         {
473                             WCHAR buffer[MAX_STRING_LEN];
474                             SendMessageW(hListWnd, LB_GETTEXT, index, (LPARAM)&buffer);
475                             SendMessageW(hEditorWnd, EM_REPLACESEL, TRUE, (LPARAM)&buffer);
476                         }
477                     }
478                     /* Fall through */
479
480                 case IDCANCEL:
481                     EndDialog(hWnd, wParam);
482                     return TRUE;
483             }
484     }
485     return FALSE;
486 }
487
488 static LRESULT OnCreate( HWND hWnd, WPARAM wParam, LPARAM lParam)
489 {
490     HWND hToolBarWnd, hFormatBarWnd,  hReBarWnd;
491     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
492     HANDLE hDLL;
493     TBADDBITMAP ab;
494     int nStdBitmaps = 0;
495     REBARINFO rbi;
496     REBARBANDINFOW rbb;
497     static const WCHAR wszRichEditDll[] = {'R','I','C','H','E','D','2','0','.','D','L','L','\0'};
498     static const WCHAR wszRichEditText[] = {'R','i','c','h','E','d','i','t',' ','t','e','x','t','\0'};
499
500     CreateStatusWindowW(CCS_NODIVIDER|WS_CHILD|WS_VISIBLE, wszRichEditText, hWnd, IDC_STATUSBAR);
501
502     hReBarWnd = CreateWindowExW(WS_EX_TOOLWINDOW, REBARCLASSNAMEW, NULL,
503       CCS_NODIVIDER|WS_CHILD|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|RBS_VARHEIGHT|CCS_TOP,
504       CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hWnd, (HMENU)IDC_REBAR, hInstance, NULL);
505
506     rbi.cbSize = sizeof(rbi);
507     rbi.fMask = 0;
508     rbi.himl = NULL;
509     if(!SendMessageW(hReBarWnd, RB_SETBARINFO, 0, (LPARAM)&rbi))
510         return -1;
511
512     hToolBarWnd = CreateToolbarEx(hReBarWnd, CCS_NOPARENTALIGN|CCS_NOMOVEY|WS_VISIBLE|WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_BUTTON,
513       IDC_TOOLBAR,
514       1, hInstance, IDB_TOOLBAR,
515       NULL, 0,
516       24, 24, 16, 16, sizeof(TBBUTTON));
517
518     ab.hInst = HINST_COMMCTRL;
519     ab.nID = IDB_STD_SMALL_COLOR;
520     nStdBitmaps = SendMessageW(hToolBarWnd, TB_ADDBITMAP, 0, (LPARAM)&ab);
521
522     AddButton(hToolBarWnd, nStdBitmaps+STD_FILENEW, ID_FILE_NEW);
523     AddButton(hToolBarWnd, nStdBitmaps+STD_FILEOPEN, ID_FILE_OPEN);
524     AddButton(hToolBarWnd, nStdBitmaps+STD_FILESAVE, ID_FILE_SAVE);
525     AddSeparator(hToolBarWnd);
526     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINT, ID_PRINT);
527     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINTPRE, ID_PREVIEW);
528     AddSeparator(hToolBarWnd);
529     AddButton(hToolBarWnd, nStdBitmaps+STD_FIND, ID_FIND);
530     AddSeparator(hToolBarWnd);
531     AddButton(hToolBarWnd, nStdBitmaps+STD_CUT, ID_EDIT_CUT);
532     AddButton(hToolBarWnd, nStdBitmaps+STD_COPY, ID_EDIT_COPY);
533     AddButton(hToolBarWnd, nStdBitmaps+STD_PASTE, ID_EDIT_PASTE);
534     AddButton(hToolBarWnd, nStdBitmaps+STD_UNDO, ID_EDIT_UNDO);
535     AddButton(hToolBarWnd, nStdBitmaps+STD_REDOW, ID_EDIT_REDO);
536     AddSeparator(hToolBarWnd);
537     AddButton(hToolBarWnd, 0, ID_DATETIME);
538
539     SendMessageW(hToolBarWnd, TB_AUTOSIZE, 0, 0);
540
541     rbb.cbSize = sizeof(rbb);
542     rbb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_CHILD | RBBIM_STYLE;
543     rbb.fStyle = RBBS_CHILDEDGE | RBBS_BREAK | RBBS_NOGRIPPER;
544     rbb.cx = 0;
545     rbb.hwndChild = hToolBarWnd;
546     rbb.cxMinChild = 0;
547     rbb.cyChild = rbb.cyMinChild = HIWORD(SendMessageW(hToolBarWnd, TB_GETBUTTONSIZE, 0, 0));
548
549     SendMessageW(hReBarWnd, RB_INSERTBAND, BANDID_TOOLBAR, (LPARAM)&rbb);
550
551     hFormatBarWnd = CreateToolbarEx(hReBarWnd,
552          CCS_NOPARENTALIGN | CCS_NOMOVEY | WS_VISIBLE | TBSTYLE_TOOLTIPS | TBSTYLE_BUTTON,
553          IDC_FORMATBAR, 6, hInstance, IDB_FORMATBAR, NULL, 0, 24, 24, 16, 16, sizeof(TBBUTTON));
554
555     ab.hInst = HINST_COMMCTRL;
556     ab.nID = IDB_STD_SMALL_COLOR;
557     nStdBitmaps = SendMessageW(hFormatBarWnd, TB_ADDBITMAP, 6, (LPARAM)&ab);
558
559     AddButton(hFormatBarWnd, 0, ID_FORMAT_BOLD);
560     AddButton(hFormatBarWnd, 1, ID_FORMAT_ITALIC);
561     AddButton(hFormatBarWnd, 2, ID_FORMAT_UNDERLINE);
562     AddSeparator(hFormatBarWnd);
563     AddButton(hFormatBarWnd, 3, ID_ALIGN_LEFT);
564     AddButton(hFormatBarWnd, 4, ID_ALIGN_CENTER);
565     AddButton(hFormatBarWnd, 5, ID_ALIGN_RIGHT);
566
567     SendMessageW(hFormatBarWnd, TB_AUTOSIZE, 0, 0);
568
569     rbb.hwndChild = hFormatBarWnd;
570
571     SendMessageW(hReBarWnd, RB_INSERTBAND, BANDID_FORMATBAR, (LPARAM)&rbb);
572
573     hDLL = LoadLibraryW(wszRichEditDll);
574     assert(hDLL);
575
576     hEditorWnd = CreateWindowExW(WS_EX_CLIENTEDGE, wszRichEditClass, NULL,
577       WS_CHILD|WS_VISIBLE|ES_MULTILINE|ES_AUTOVSCROLL|ES_WANTRETURN|WS_VSCROLL,
578       0, 0, 1000, 100, hWnd, (HMENU)IDC_EDITOR, hInstance, NULL);
579
580     if (!hEditorWnd)
581     {
582         fprintf(stderr, "Error code %u\n", GetLastError());
583         return -1;
584     }
585     assert(hEditorWnd);
586
587     SetFocus(hEditorWnd);
588     SendMessageW(hEditorWnd, EM_SETEVENTMASK, 0, ENM_SELCHANGE);
589
590     DoDefaultFont();
591
592     DoLoadStrings();
593     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
594
595     return 0;
596 }
597
598 static LRESULT OnUser( HWND hWnd, WPARAM wParam, LPARAM lParam)
599 {
600     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
601     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
602     HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
603     HWND hwndFormatBar = GetDlgItem(hwndReBar, IDC_FORMATBAR);
604     int from, to;
605     CHARFORMAT2W fmt;
606     PARAFORMAT2 pf;
607
608     ZeroMemory(&fmt, sizeof(fmt));
609     fmt.cbSize = sizeof(fmt);
610
611     ZeroMemory(&pf, sizeof(pf));
612     pf.cbSize = sizeof(pf);
613
614     SendMessageW(hwndEditor, EM_GETCHARFORMAT, TRUE, (LPARAM)&fmt);
615
616     SendMessageW(hwndEditor, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
617     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_UNDO,
618       SendMessageW(hwndEditor, EM_CANUNDO, 0, 0));
619     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_REDO,
620       SendMessageW(hwndEditor, EM_CANREDO, 0, 0));
621     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_CUT, from == to ? 0 : 1);
622     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_COPY, from == to ? 0 : 1);
623
624     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_BOLD, (fmt.dwMask & CFM_BOLD) &&
625             (fmt.dwEffects & CFE_BOLD));
626     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_BOLD, !(fmt.dwMask & CFM_BOLD));
627     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_ITALIC, (fmt.dwMask & CFM_ITALIC) &&
628             (fmt.dwEffects & CFE_ITALIC));
629     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_ITALIC, !(fmt.dwMask & CFM_ITALIC));
630     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_UNDERLINE, (fmt.dwMask & CFM_UNDERLINE) &&
631             (fmt.dwEffects & CFE_UNDERLINE));
632     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_UNDERLINE, !(fmt.dwMask & CFM_UNDERLINE));
633
634     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
635     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_LEFT, (pf.wAlignment == PFA_LEFT));
636     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_CENTER, (pf.wAlignment == PFA_CENTER));
637     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_RIGHT, (pf.wAlignment == PFA_RIGHT));
638
639     return 0;
640 }
641
642 static LRESULT OnNotify( HWND hWnd, WPARAM wParam, LPARAM lParam)
643 {
644     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
645     NMHDR *pHdr = (NMHDR *)lParam;
646
647     if (pHdr->hwndFrom != hwndEditor)
648         return 0;
649
650     if (pHdr->code == EN_SELCHANGE)
651     {
652         SELCHANGE *pSC = (SELCHANGE *)lParam;
653         char buf[128];
654
655         sprintf( buf,"selection = %d..%d, line count=%ld",
656                  pSC->chrg.cpMin, pSC->chrg.cpMax,
657         SendMessage(hwndEditor, EM_GETLINECOUNT, 0, 0));
658         SetWindowText(GetDlgItem(hWnd, IDC_STATUSBAR), buf);
659         SendMessage(hWnd, WM_USER, 0, 0);
660         return 1;
661     }
662     return 0;
663 }
664
665 static LRESULT OnCommand( HWND hWnd, WPARAM wParam, LPARAM lParam)
666 {
667     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
668     HWND hwndStatus = GetDlgItem(hWnd, IDC_STATUSBAR);
669
670     if ((HWND)lParam == hwndEditor)
671         return 0;
672
673     switch(LOWORD(wParam))
674     {
675     case ID_FILE_EXIT:
676         PostMessageW(hWnd, WM_CLOSE, 0, 0);
677         break;
678
679     case ID_FILE_NEW:
680         if(prompt_save_changes())
681         {
682             set_caption(NULL);
683             wszFileName[0] = '\0';
684             SetWindowTextW(hwndEditor, wszFileName);
685             SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
686             /* FIXME: set default format too */
687         }
688         break;
689
690     case ID_FILE_OPEN:
691         DialogOpenFile();
692         break;
693
694     case ID_FILE_SAVE:
695         if(wszFileName[0])
696         {
697             DoSaveFile(wszFileName);
698             break;
699         }
700         /* Fall through */
701
702     case ID_FILE_SAVEAS:
703         DialogSaveFile();
704         break;
705
706     case ID_PRINT:
707     case ID_PREVIEW:
708     case ID_FIND:
709         {
710             static const WCHAR wszNotImplemented[] = {'N','o','t',' ',
711                                                       'i','m','p','l','e','m','e','n','t','e','d','\0'};
712             MessageBoxW(hWnd, wszNotImplemented, wszAppTitle, MB_OK);
713         }
714         break;
715
716     case ID_FORMAT_BOLD:
717     case ID_FORMAT_ITALIC:
718     case ID_FORMAT_UNDERLINE:
719         {
720         CHARFORMAT2W fmt;
721         int mask = CFM_BOLD;
722         if (LOWORD(wParam) == ID_FORMAT_ITALIC) mask = CFM_ITALIC;
723         if (LOWORD(wParam) == ID_FORMAT_UNDERLINE) mask = CFM_UNDERLINE;
724
725         ZeroMemory(&fmt, sizeof(fmt));
726         fmt.cbSize = sizeof(fmt);
727         SendMessageW(hwndEditor, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
728         if (!(fmt.dwMask&mask))
729             fmt.dwEffects |= mask;
730         else
731             fmt.dwEffects ^= mask;
732         fmt.dwMask = mask;
733         SendMessageW(hwndEditor, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
734         break;
735         }
736
737     case ID_EDIT_CUT:
738         PostMessageW(hwndEditor, WM_CUT, 0, 0);
739         break;
740
741     case ID_EDIT_COPY:
742         PostMessageW(hwndEditor, WM_COPY, 0, 0);
743         break;
744
745     case ID_EDIT_PASTE:
746         PostMessageW(hwndEditor, WM_PASTE, 0, 0);
747         break;
748
749     case ID_EDIT_CLEAR:
750         PostMessageW(hwndEditor, WM_CLEAR, 0, 0);
751         break;
752
753     case ID_EDIT_SELECTALL:
754         {
755         CHARRANGE range = {0, -1};
756         SendMessageW(hwndEditor, EM_EXSETSEL, 0, (LPARAM)&range);
757         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
758         return 0;
759         }
760
761     case ID_EDIT_GETTEXT:
762         {
763         int nLen = GetWindowTextLengthW(hwndEditor);
764         LPWSTR data = HeapAlloc( GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR) );
765         TEXTRANGEW tr;
766
767         GetWindowTextW(hwndEditor, data, nLen+1);
768         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
769
770         HeapFree( GetProcessHeap(), 0, data);
771         data = HeapAlloc(GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR));
772         tr.chrg.cpMin = 0;
773         tr.chrg.cpMax = nLen;
774         tr.lpstrText = data;
775         SendMessage (hwndEditor, EM_GETTEXTRANGE, 0, (LPARAM)&tr);
776         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
777         HeapFree( GetProcessHeap(), 0, data );
778
779         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
780         return 0;
781         }
782
783     case ID_EDIT_CHARFORMAT:
784     case ID_EDIT_DEFCHARFORMAT:
785         {
786         CHARFORMAT2W cf;
787         LRESULT i;
788         ZeroMemory(&cf, sizeof(cf));
789         cf.cbSize = sizeof(cf);
790         cf.dwMask = 0;
791         i = SendMessageW(hwndEditor, EM_GETCHARFORMAT,
792                         LOWORD(wParam) == ID_EDIT_CHARFORMAT, (LPARAM)&cf);
793         return 0;
794         }
795
796     case ID_EDIT_PARAFORMAT:
797         {
798         PARAFORMAT2 pf;
799         ZeroMemory(&pf, sizeof(pf));
800         pf.cbSize = sizeof(pf);
801         SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
802         return 0;
803         }
804
805     case ID_EDIT_SELECTIONINFO:
806         {
807         CHARRANGE range = {0, -1};
808         char buf[128];
809         WCHAR *data = NULL;
810
811         SendMessage(hwndEditor, EM_EXGETSEL, 0, (LPARAM)&range);
812         data = HeapAlloc(GetProcessHeap(), 0, sizeof(*data) * (range.cpMax-range.cpMin+1));
813         SendMessage(hwndEditor, EM_GETSELTEXT, 0, (LPARAM)data);
814         sprintf(buf, "Start = %d, End = %d", range.cpMin, range.cpMax);
815         MessageBoxA(hWnd, buf, "Editor", MB_OK);
816         MessageBoxW(hWnd, data, xszAppTitle, MB_OK);
817         HeapFree( GetProcessHeap(), 0, data);
818         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
819         return 0;
820         }
821
822     case ID_EDIT_READONLY:
823         {
824         long nStyle = GetWindowLong(hwndEditor, GWL_STYLE);
825         if (nStyle & ES_READONLY)
826             SendMessageW(hwndEditor, EM_SETREADONLY, 0, 0);
827         else
828             SendMessageW(hwndEditor, EM_SETREADONLY, 1, 0);
829         return 0;
830         }
831
832     case ID_EDIT_MODIFIED:
833         if (SendMessageW(hwndEditor, EM_GETMODIFY, 0, 0))
834             SendMessageW(hwndEditor, EM_SETMODIFY, 0, 0);
835         else
836             SendMessageW(hwndEditor, EM_SETMODIFY, 1, 0);
837         return 0;
838
839     case ID_EDIT_UNDO:
840         SendMessageW(hwndEditor, EM_UNDO, 0, 0);
841         return 0;
842
843     case ID_EDIT_REDO:
844         SendMessageW(hwndEditor, EM_REDO, 0, 0);
845         return 0;
846
847     case ID_ALIGN_LEFT:
848     case ID_ALIGN_CENTER:
849     case ID_ALIGN_RIGHT:
850         {
851         PARAFORMAT2 pf;
852
853         pf.cbSize = sizeof(pf);
854         pf.dwMask = PFM_ALIGNMENT;
855         switch(LOWORD(wParam)) {
856         case ID_ALIGN_LEFT: pf.wAlignment = PFA_LEFT; break;
857         case ID_ALIGN_CENTER: pf.wAlignment = PFA_CENTER; break;
858         case ID_ALIGN_RIGHT: pf.wAlignment = PFA_RIGHT; break;
859         }
860         SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
861         break;
862         }
863
864     case ID_BACK_1:
865         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 1, 0);
866         break;
867
868     case ID_BACK_2:
869         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 0, RGB(255,255,192));
870         break;
871
872     case ID_TOGGLE_TOOLBAR:
873         toggle_toolbar(BANDID_TOOLBAR);
874         update_window();
875         break;
876
877     case ID_TOGGLE_FORMATBAR:
878         toggle_toolbar(BANDID_FORMATBAR);
879         update_window();
880         break;
881
882     case ID_TOGGLE_STATUSBAR:
883         ShowWindow(hwndStatus, IsWindowVisible(hwndStatus) ? SW_HIDE : SW_SHOW);
884         update_window();
885         break;
886
887     case ID_DATETIME:
888         {
889         HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
890         DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_DATETIME), hWnd, (DLGPROC)datetime_proc);
891         break;
892         }
893
894     default:
895         SendMessageW(hwndEditor, WM_COMMAND, wParam, lParam);
896         break;
897     }
898     return 0;
899 }
900
901 static LRESULT OnInitPopupMenu( HWND hWnd, WPARAM wParam, LPARAM lParam )
902 {
903     HMENU hMenu = (HMENU)wParam;
904     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
905     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
906     HWND hwndStatus = GetDlgItem(hWnd, IDC_STATUSBAR);
907     PARAFORMAT pf;
908     int nAlignment = -1;
909     REBARBANDINFOW rbbinfo;
910     int selFrom, selTo;
911
912     SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&selFrom, (LPARAM)&selTo);
913     EnableMenuItem(hMenu, ID_EDIT_COPY, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
914     EnableMenuItem(hMenu, ID_EDIT_CUT, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
915
916     pf.cbSize = sizeof(PARAFORMAT);
917     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
918     CheckMenuItem(hMenu, ID_EDIT_READONLY,
919       MF_BYCOMMAND|(GetWindowLong(hwndEditor, GWL_STYLE)&ES_READONLY ? MF_CHECKED : MF_UNCHECKED));
920     CheckMenuItem(hMenu, ID_EDIT_MODIFIED,
921       MF_BYCOMMAND|(SendMessage(hwndEditor, EM_GETMODIFY, 0, 0) ? MF_CHECKED : MF_UNCHECKED));
922     if (pf.dwMask & PFM_ALIGNMENT)
923         nAlignment = pf.wAlignment;
924     CheckMenuItem(hMenu, ID_ALIGN_LEFT, MF_BYCOMMAND|(nAlignment == PFA_LEFT) ?
925             MF_CHECKED : MF_UNCHECKED);
926     CheckMenuItem(hMenu, ID_ALIGN_CENTER, MF_BYCOMMAND|(nAlignment == PFA_CENTER) ?
927             MF_CHECKED : MF_UNCHECKED);
928     CheckMenuItem(hMenu, ID_ALIGN_RIGHT, MF_BYCOMMAND|(nAlignment == PFA_RIGHT) ?
929             MF_CHECKED : MF_UNCHECKED);
930     EnableMenuItem(hMenu, ID_EDIT_UNDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANUNDO, 0, 0)) ?
931             MF_ENABLED : MF_GRAYED);
932     EnableMenuItem(hMenu, ID_EDIT_REDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANREDO, 0, 0)) ?
933             MF_ENABLED : MF_GRAYED);
934
935     rbbinfo.cbSize = sizeof(rbbinfo);
936     rbbinfo.fMask = RBBIM_STYLE;
937     SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_TOOLBAR, (LPARAM)&rbbinfo);
938
939     CheckMenuItem(hMenu, ID_TOGGLE_TOOLBAR, MF_BYCOMMAND|(rbbinfo.fStyle & RBBS_HIDDEN) ?
940             MF_UNCHECKED : MF_CHECKED);
941
942     SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_FORMATBAR, (LPARAM)&rbbinfo);
943
944     CheckMenuItem(hMenu, ID_TOGGLE_FORMATBAR, MF_BYCOMMAND|(rbbinfo.fStyle & RBBS_HIDDEN) ?
945             MF_UNCHECKED : MF_CHECKED);
946
947     CheckMenuItem(hMenu, ID_TOGGLE_STATUSBAR, MF_BYCOMMAND|IsWindowVisible(hwndStatus) ?
948             MF_CHECKED : MF_UNCHECKED);
949     return 0;
950 }
951
952 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam )
953 {
954     int nStatusSize = 0;
955     RECT rc;
956     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
957     HWND hwndStatusBar = GetDlgItem(hWnd, IDC_STATUSBAR);
958     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
959     int rebarHeight = 0;
960     REBARBANDINFOW rbbinfo;
961     int rebarRows = 2;
962
963     if (hwndStatusBar)
964     {
965         SendMessageW(hwndStatusBar, WM_SIZE, 0, 0);
966         if (IsWindowVisible(hwndStatusBar))
967         {
968             GetClientRect(hwndStatusBar, &rc);
969             nStatusSize = rc.bottom - rc.top;
970         } else
971         {
972             nStatusSize = 0;
973         }
974     }
975     if (hwndReBar)
976     {
977         rbbinfo.cbSize = sizeof(rbbinfo);
978         rbbinfo.fMask = RBBIM_STYLE;
979
980         SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_TOOLBAR, (LPARAM)&rbbinfo);
981         if(rbbinfo.fStyle & RBBS_HIDDEN)
982             rebarRows--;
983
984         SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_FORMATBAR, (LPARAM)&rbbinfo);
985         if(rbbinfo.fStyle & RBBS_HIDDEN)
986             rebarRows--;
987
988         rebarHeight = rebarRows ? SendMessageW(hwndReBar, RB_GETBARHEIGHT, 0, 0) : 0;
989
990         rc.top = rc.left = 0;
991         rc.bottom = rebarHeight;
992         rc.right = LOWORD(lParam);
993         SendMessageW(hwndReBar, RB_SIZETORECT, 0, (LPARAM)&rc);
994     }
995     if (hwndEditor)
996     {
997         GetClientRect(hWnd, &rc);
998         MoveWindow(hwndEditor, 0, rebarHeight, rc.right, rc.bottom-nStatusSize-rebarHeight, TRUE);
999     }
1000
1001     return DefWindowProcW(hWnd, WM_SIZE, wParam, lParam);
1002 }
1003
1004 static LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
1005 {
1006     switch(msg)
1007     {
1008     case WM_CREATE:
1009         return OnCreate( hWnd, wParam, lParam );
1010
1011     case WM_USER:
1012         return OnUser( hWnd, wParam, lParam );
1013
1014     case WM_NOTIFY:
1015         return OnNotify( hWnd, wParam, lParam );
1016
1017     case WM_COMMAND:
1018         return OnCommand( hWnd, wParam, lParam );
1019
1020     case WM_DESTROY:
1021         PostQuitMessage(0);
1022         break;
1023
1024     case WM_CLOSE:
1025         if(prompt_save_changes())
1026             PostQuitMessage(0);
1027         break;
1028
1029     case WM_ACTIVATE:
1030         if (LOWORD(wParam))
1031             SetFocus(GetDlgItem(hWnd, IDC_EDITOR));
1032         return 0;
1033
1034     case WM_INITMENUPOPUP:
1035         return OnInitPopupMenu( hWnd, wParam, lParam );
1036
1037     case WM_SIZE:
1038         return OnSize( hWnd, wParam, lParam );
1039
1040     default:
1041         return DefWindowProcW(hWnd, msg, wParam, lParam);
1042     }
1043
1044     return 0;
1045 }
1046
1047 int CALLBACK WinMain(HINSTANCE hInstance, HINSTANCE hOldInstance, LPSTR szCmdParagraph, int res)
1048 {
1049     INITCOMMONCONTROLSEX classes = {8, ICC_BAR_CLASSES|ICC_COOL_CLASSES};
1050     HACCEL hAccel;
1051     WNDCLASSW wc;
1052     MSG msg;
1053     static const WCHAR wszAccelTable[] = {'M','A','I','N','A','C','C','E','L',
1054                                           'T','A','B','L','E','\0'};
1055
1056     InitCommonControlsEx(&classes);
1057
1058     hAccel = LoadAcceleratorsW(hInstance, wszAccelTable);
1059
1060     wc.style = CS_HREDRAW | CS_VREDRAW;
1061     wc.lpfnWndProc = WndProc;
1062     wc.cbClsExtra = 0;
1063     wc.cbWndExtra = 4;
1064     wc.hInstance = hInstance;
1065     wc.hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_WORDPAD));
1066     wc.hCursor = LoadCursor(NULL, IDC_IBEAM);
1067     wc.hbrBackground = GetSysColorBrush(COLOR_WINDOW);
1068     wc.lpszMenuName = xszMainMenu;
1069     wc.lpszClassName = wszMainWndClass;
1070     RegisterClassW(&wc);
1071
1072     hMainWnd = CreateWindowExW(0, wszMainWndClass, wszAppTitle, WS_OVERLAPPEDWINDOW,
1073       CW_USEDEFAULT, CW_USEDEFAULT, 680, 260, NULL, NULL, hInstance, NULL);
1074     ShowWindow(hMainWnd, SW_SHOWDEFAULT);
1075
1076     set_caption(NULL);
1077
1078     HandleCommandLine(GetCommandLineW());
1079
1080     while(GetMessageW(&msg,0,0,0))
1081     {
1082         if (TranslateAcceleratorW(hMainWnd, hAccel, &msg))
1083             continue;
1084         TranslateMessage(&msg);
1085         DispatchMessageW(&msg);
1086         if (!PeekMessageW(&msg, 0, 0, 0, PM_NOREMOVE))
1087             SendMessageW(hMainWnd, WM_USER, 0, 0);
1088     }
1089
1090     return 0;
1091 }