wordpad: Add context menu.
[wine/hacks.git] / programs / wordpad / wordpad.c
blob8b0ca5a7307081671f8d8537efe1918a8326a4e1
1 /*
2 * Wordpad implementation
4 * Copyright 2004 by Krzysztof Foltman
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 #define WIN32_LEAN_AND_MEAN
22 #define _WIN32_IE 0x0400
24 #define MAX_STRING_LEN 255
26 #include <stdarg.h>
27 #include <ctype.h>
28 #include <stdio.h>
29 #include <assert.h>
31 #include <windows.h>
32 #include <richedit.h>
33 #include <commctrl.h>
34 #include <commdlg.h>
35 #include <shlobj.h>
36 #include <shellapi.h>
37 #include <math.h>
38 #include <errno.h>
40 #include "resource.h"
42 /* use LoadString */
43 static const WCHAR xszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
44 static const WCHAR xszMainMenu[] = {'M','A','I','N','M','E','N','U',0};
46 static const WCHAR wszRichEditClass[] = {'R','I','C','H','E','D','I','T','2','0','W',0};
47 static const WCHAR wszMainWndClass[] = {'W','O','R','D','P','A','D','T','O','P',0};
48 static const WCHAR wszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
50 static const WCHAR key_recentfiles[] = {'R','e','c','e','n','t',' ','f','i','l','e',
51 ' ','l','i','s','t',0};
52 static const WCHAR key_options[] = {'O','p','t','i','o','n','s',0};
53 static const WCHAR key_rtf[] = {'R','T','F',0};
54 static const WCHAR key_text[] = {'T','e','x','t',0};
56 static const WCHAR var_file[] = {'F','i','l','e','%','d',0};
57 static const WCHAR var_framerect[] = {'F','r','a','m','e','R','e','c','t',0};
58 static const WCHAR var_barstate0[] = {'B','a','r','S','t','a','t','e','0',0};
59 static const WCHAR var_pagemargin[] = {'P','a','g','e','M','a','r','g','i','n',0};
61 static HWND hMainWnd;
62 static HWND hEditorWnd;
63 static HWND hFindWnd;
64 static HMENU hPopupMenu;
66 static UINT ID_FINDMSGSTRING;
68 static WCHAR wszFilter[MAX_STRING_LEN*4+6*3+5];
69 static WCHAR wszDefaultFileName[MAX_STRING_LEN];
70 static WCHAR wszSaveChanges[MAX_STRING_LEN];
71 static WCHAR wszPrintFilter[MAX_STRING_LEN*2+6+4+1];
72 static WCHAR units_cmW[MAX_STRING_LEN];
74 static char units_cmA[MAX_STRING_LEN];
76 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam );
78 /* Load string resources */
79 static void DoLoadStrings(void)
81 LPWSTR p = wszFilter;
82 static const WCHAR files_rtf[] = {'*','.','r','t','f','\0'};
83 static const WCHAR files_txt[] = {'*','.','t','x','t','\0'};
84 static const WCHAR files_all[] = {'*','.','*','\0'};
85 static const WCHAR files_prn[] = {'*','.','P','R','N',0};
86 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
88 LoadStringW(hInstance, STRING_RICHTEXT_FILES_RTF, p, MAX_STRING_LEN);
89 p += lstrlenW(p) + 1;
90 lstrcpyW(p, files_rtf);
91 p += lstrlenW(p) + 1;
92 LoadStringW(hInstance, STRING_TEXT_FILES_TXT, p, MAX_STRING_LEN);
93 p += lstrlenW(p) + 1;
94 lstrcpyW(p, files_txt);
95 p += lstrlenW(p) + 1;
96 LoadStringW(hInstance, STRING_TEXT_FILES_UNICODE_TXT, p, MAX_STRING_LEN);
97 p += lstrlenW(p) + 1;
98 lstrcpyW(p, files_txt);
99 p += lstrlenW(p) + 1;
100 LoadStringW(hInstance, STRING_ALL_FILES, p, MAX_STRING_LEN);
101 p += lstrlenW(p) + 1;
102 lstrcpyW(p, files_all);
103 p += lstrlenW(p) + 1;
104 *p = '\0';
106 p = wszPrintFilter;
107 LoadStringW(hInstance, STRING_PRINTER_FILES_PRN, p, MAX_STRING_LEN);
108 p += lstrlenW(p) + 1;
109 lstrcpyW(p, files_prn);
110 p += lstrlenW(p) + 1;
111 LoadStringW(hInstance, STRING_ALL_FILES, p, MAX_STRING_LEN);
112 p += lstrlenW(p) + 1;
113 lstrcpyW(p, files_all);
114 p += lstrlenW(p) + 1;
115 *p = 0;
117 p = wszDefaultFileName;
118 LoadStringW(hInstance, STRING_DEFAULT_FILENAME, p, MAX_STRING_LEN);
120 p = wszSaveChanges;
121 LoadStringW(hInstance, STRING_PROMPT_SAVE_CHANGES, p, MAX_STRING_LEN);
123 LoadStringA(hInstance, STRING_UNITS_CM, units_cmA, MAX_STRING_LEN);
124 LoadStringW(hInstance, STRING_UNITS_CM, units_cmW, MAX_STRING_LEN);
127 static void AddButton(HWND hwndToolBar, int nImage, int nCommand)
129 TBBUTTON button;
131 ZeroMemory(&button, sizeof(button));
132 button.iBitmap = nImage;
133 button.idCommand = nCommand;
134 button.fsState = TBSTATE_ENABLED;
135 button.fsStyle = TBSTYLE_BUTTON;
136 button.dwData = 0;
137 button.iString = -1;
138 SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
141 static void AddSeparator(HWND hwndToolBar)
143 TBBUTTON button;
145 ZeroMemory(&button, sizeof(button));
146 button.iBitmap = -1;
147 button.idCommand = 0;
148 button.fsState = 0;
149 button.fsStyle = TBSTYLE_SEP;
150 button.dwData = 0;
151 button.iString = -1;
152 SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
155 static DWORD CALLBACK stream_in(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
157 HANDLE hFile = (HANDLE)cookie;
158 DWORD read;
160 if(!ReadFile(hFile, buffer, cb, &read, 0))
161 return 1;
163 *pcb = read;
165 return 0;
168 static DWORD CALLBACK stream_out(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
170 DWORD written;
171 int ret;
172 HANDLE hFile = (HANDLE)cookie;
174 ret = WriteFile(hFile, buffer, cb, &written, 0);
176 if(!ret || (cb != written))
177 return 1;
179 *pcb = cb;
181 return 0;
185 static LPWSTR file_basename(LPWSTR path)
187 LPWSTR pos = path + lstrlenW(path);
189 while(pos > path)
191 if(*pos == '\\' || *pos == '/')
193 pos++;
194 break;
196 pos--;
198 return pos;
201 static WCHAR wszFileName[MAX_PATH];
202 static WPARAM fileFormat = SF_RTF;
204 static void set_caption(LPCWSTR wszNewFileName)
206 static const WCHAR wszSeparator[] = {' ','-',' '};
207 WCHAR *wszCaption;
208 SIZE_T length = 0;
210 if(!wszNewFileName)
211 wszNewFileName = wszDefaultFileName;
212 else
213 wszNewFileName = file_basename((LPWSTR)wszNewFileName);
215 wszCaption = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
216 lstrlenW(wszNewFileName)*sizeof(WCHAR)+sizeof(wszSeparator)+sizeof(wszAppTitle));
218 if(!wszCaption)
219 return;
221 memcpy(wszCaption, wszNewFileName, lstrlenW(wszNewFileName)*sizeof(WCHAR));
222 length += lstrlenW(wszNewFileName);
223 memcpy(wszCaption + length, wszSeparator, sizeof(wszSeparator));
224 length += sizeof(wszSeparator) / sizeof(WCHAR);
225 memcpy(wszCaption + length, wszAppTitle, sizeof(wszAppTitle));
227 SetWindowTextW(hMainWnd, wszCaption);
229 HeapFree(GetProcessHeap(), 0, wszCaption);
232 static LRESULT registry_get_handle(HKEY *hKey, LPDWORD action, LPCWSTR subKey)
234 LONG ret;
235 static const WCHAR wszProgramKey[] = {'S','o','f','t','w','a','r','e','\\',
236 'M','i','c','r','o','s','o','f','t','\\',
237 'W','i','n','d','o','w','s','\\',
238 'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
239 'A','p','p','l','e','t','s','\\',
240 'W','o','r','d','p','a','d',0};
241 LPWSTR key = (LPWSTR)wszProgramKey;
243 if(subKey)
245 WCHAR backslash[] = {'\\',0};
246 key = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
247 (lstrlenW(wszProgramKey)+lstrlenW(subKey)+lstrlenW(backslash)+1)
248 *sizeof(WCHAR));
250 if(!key)
251 return 1;
253 lstrcpyW(key, wszProgramKey);
254 lstrcatW(key, backslash);
255 lstrcatW(key, subKey);
258 if(action)
260 ret = RegCreateKeyExW(HKEY_CURRENT_USER, key, 0, NULL, REG_OPTION_NON_VOLATILE,
261 KEY_READ | KEY_WRITE, NULL, hKey, action);
262 } else
264 ret = RegOpenKeyExW(HKEY_CURRENT_USER, key, 0, KEY_READ | KEY_WRITE, hKey);
267 if(subKey)
268 HeapFree(GetProcessHeap(), 0, key);
270 return ret;
273 static RECT margins;
275 static void registry_set_options(void)
277 HKEY hKey;
278 DWORD action;
280 if(registry_get_handle(&hKey, &action, (LPWSTR)key_options) == ERROR_SUCCESS)
282 RECT rc;
284 GetWindowRect(hMainWnd, &rc);
286 RegSetValueExW(hKey, var_framerect, 0, REG_BINARY, (LPBYTE)&rc, sizeof(RECT));
288 RegSetValueExW(hKey, var_pagemargin, 0, REG_BINARY, (LPBYTE)&margins, sizeof(RECT));
292 static RECT registry_read_winrect(void)
294 HKEY hKey;
295 RECT rc;
296 DWORD size = sizeof(RECT);
298 ZeroMemory(&rc, sizeof(RECT));
299 if(registry_get_handle(&hKey, 0, (LPWSTR)key_options) != ERROR_SUCCESS ||
300 RegQueryValueExW(hKey, var_framerect, 0, NULL, (LPBYTE)&rc, &size) !=
301 ERROR_SUCCESS || size != sizeof(RECT))
303 rc.top = 0;
304 rc.left = 0;
305 rc.bottom = 300;
306 rc.right = 600;
309 RegCloseKey(hKey);
310 return rc;
313 static void truncate_path(LPWSTR file, LPWSTR out, LPWSTR pos1, LPWSTR pos2)
315 static const WCHAR dots[] = {'.','.','.',0};
317 *++pos1 = 0;
319 lstrcatW(out, file);
320 lstrcatW(out, dots);
321 lstrcatW(out, pos2);
324 static void format_filelist_filename(LPWSTR file, LPWSTR out)
326 LPWSTR pos_basename;
327 LPWSTR truncpos1, truncpos2;
328 WCHAR myDocs[MAX_STRING_LEN];
330 SHGetFolderPathW(NULL, CSIDL_PERSONAL, NULL, SHGFP_TYPE_CURRENT, (LPWSTR)&myDocs);
331 pos_basename = file_basename(file);
332 truncpos1 = NULL;
333 truncpos2 = NULL;
335 *(pos_basename-1) = 0;
336 if(!lstrcmpiW(file, myDocs) || (lstrlenW(pos_basename) > FILELIST_ENTRY_LENGTH))
338 truncpos1 = pos_basename;
339 *(pos_basename-1) = '\\';
340 } else
342 LPWSTR pos;
343 BOOL morespace = FALSE;
345 *(pos_basename-1) = '\\';
347 for(pos = file; pos < pos_basename; pos++)
349 if(*pos == '\\' || *pos == '/')
351 if(truncpos1)
353 if((pos - file + lstrlenW(pos_basename)) > FILELIST_ENTRY_LENGTH)
354 break;
356 truncpos1 = pos;
357 morespace = TRUE;
358 break;
361 if((pos - file + lstrlenW(pos_basename)) > FILELIST_ENTRY_LENGTH)
362 break;
364 truncpos1 = pos;
368 if(morespace)
370 for(pos = pos_basename; pos >= truncpos1; pos--)
372 if(*pos == '\\' || *pos == '/')
374 if((truncpos1 - file + lstrlenW(pos_basename) + pos_basename - pos) > FILELIST_ENTRY_LENGTH)
375 break;
377 truncpos2 = pos;
383 if(truncpos1 == pos_basename)
384 lstrcatW(out, pos_basename);
385 else if(truncpos1 == truncpos2 || !truncpos2)
386 lstrcatW(out, file);
387 else
388 truncate_path(file, out, truncpos1, truncpos2 ? truncpos2 : (pos_basename-1));
391 static void registry_read_filelist(HWND hMainWnd)
393 HKEY hFileKey;
395 if(registry_get_handle(&hFileKey, 0, key_recentfiles) == ERROR_SUCCESS)
397 WCHAR itemText[MAX_PATH+3], buffer[MAX_PATH];
398 /* The menu item name is not the same as the file name, so we need to store
399 the file name here */
400 static WCHAR file1[MAX_PATH], file2[MAX_PATH], file3[MAX_PATH], file4[MAX_PATH];
401 WCHAR numFormat[] = {'&','%','d',' ',0};
402 LPWSTR pFile[] = {file1, file2, file3, file4};
403 DWORD pathSize = MAX_PATH*sizeof(WCHAR);
404 int i;
405 WCHAR key[6];
406 MENUITEMINFOW mi;
407 HMENU hMenu = GetMenu(hMainWnd);
409 mi.cbSize = sizeof(MENUITEMINFOW);
410 mi.fMask = MIIM_ID | MIIM_DATA | MIIM_STRING | MIIM_FTYPE;
411 mi.fType = MFT_STRING;
412 mi.dwTypeData = itemText;
413 mi.wID = ID_FILE_RECENT1;
415 RemoveMenu(hMenu, ID_FILE_RECENT_SEPARATOR, MF_BYCOMMAND);
416 for(i = 0; i < FILELIST_ENTRIES; i++)
418 wsprintfW(key, var_file, i+1);
419 RemoveMenu(hMenu, ID_FILE_RECENT1+i, MF_BYCOMMAND);
420 if(RegQueryValueExW(hFileKey, (LPWSTR)key, 0, NULL, (LPBYTE)pFile[i], &pathSize)
421 != ERROR_SUCCESS)
422 break;
424 mi.dwItemData = (DWORD)pFile[i];
425 wsprintfW(itemText, numFormat, i+1);
427 lstrcpyW(buffer, pFile[i]);
429 format_filelist_filename(buffer, itemText);
431 InsertMenuItemW(hMenu, ID_FILE_EXIT, FALSE, &mi);
432 mi.wID++;
433 pathSize = MAX_PATH*sizeof(WCHAR);
435 mi.fType = MFT_SEPARATOR;
436 mi.fMask = MIIM_FTYPE | MIIM_ID;
437 InsertMenuItemW(hMenu, ID_FILE_EXIT, FALSE, &mi);
439 RegCloseKey(hFileKey);
443 static void registry_set_filelist(LPCWSTR newFile)
445 HKEY hKey;
446 DWORD action;
448 if(registry_get_handle(&hKey, &action, key_recentfiles) == ERROR_SUCCESS)
450 LPCWSTR pFiles[FILELIST_ENTRIES];
451 int i;
452 HMENU hMenu = GetMenu(hMainWnd);
453 MENUITEMINFOW mi;
454 WCHAR buffer[6];
456 mi.cbSize = sizeof(MENUITEMINFOW);
457 mi.fMask = MIIM_DATA;
459 for(i = 0; i < FILELIST_ENTRIES; i++)
460 pFiles[i] = NULL;
462 for(i = 0; GetMenuItemInfoW(hMenu, ID_FILE_RECENT1+i, FALSE, &mi); i++)
463 pFiles[i] = (LPWSTR)mi.dwItemData;
465 if(lstrcmpiW(newFile, pFiles[0]))
467 for(i = 0; pFiles[i] && i < FILELIST_ENTRIES; i++)
469 if(!lstrcmpiW(pFiles[i], newFile))
471 int j;
472 for(j = 0; pFiles[j] && j < i; j++)
474 pFiles[i-j] = pFiles[i-j-1];
476 pFiles[0] = NULL;
477 break;
481 if(!pFiles[0])
483 pFiles[0] = newFile;
484 } else
486 for(i = 0; pFiles[i] && i < FILELIST_ENTRIES-1; i++)
487 pFiles[FILELIST_ENTRIES-1-i] = pFiles[FILELIST_ENTRIES-2-i];
489 pFiles[0] = newFile;
492 for(i = 0; pFiles[i] && i < FILELIST_ENTRIES; i++)
494 wsprintfW(buffer, var_file, i+1);
495 RegSetValueExW(hKey, (LPWSTR)&buffer, 0, REG_SZ, (LPBYTE)pFiles[i],
496 (lstrlenW(pFiles[i])+1)*sizeof(WCHAR));
500 RegCloseKey(hKey);
501 registry_read_filelist(hMainWnd);
504 static BOOL validate_endptr(LPCSTR endptr, BOOL units)
506 if(!endptr || !*endptr)
507 return TRUE;
509 while(*endptr == ' ')
510 endptr++;
512 if(!units)
513 return *endptr != '\0';
515 /* FIXME: Allow other units and convert between them */
516 if(!lstrcmpA(endptr, units_cmA))
517 endptr += 2;
519 return *endptr != '\0';
522 static BOOL number_from_string(LPCWSTR string, float *num, BOOL units)
524 double ret;
525 char buffer[MAX_STRING_LEN];
526 char *endptr = buffer;
528 WideCharToMultiByte(CP_ACP, 0, string, -1, buffer, MAX_STRING_LEN, NULL, NULL);
529 *num = 0;
530 errno = 0;
531 ret = strtod(buffer, &endptr);
533 if((ret == 0 && errno != 0) || endptr == buffer || validate_endptr(endptr, units))
535 return FALSE;
536 } else
538 *num = (float)ret;
539 return TRUE;
543 static void clear_formatting(void)
545 PARAFORMAT2 pf;
547 pf.cbSize = sizeof(pf);
548 pf.dwMask = PFM_ALIGNMENT;
549 pf.wAlignment = PFA_LEFT;
550 SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
553 static int reg_formatindex(WPARAM format)
555 return (format & SF_TEXT) ? 1 : 0;
558 static int fileformat_number(WPARAM format)
560 int number = 0;
562 if(format == SF_TEXT)
564 number = 1;
565 } else if (format == (SF_TEXT | SF_UNICODE))
567 number = 2;
569 return number;
572 static WPARAM fileformat_flags(int format)
574 WPARAM flags[] = { SF_RTF , SF_TEXT , SF_TEXT | SF_UNICODE };
576 return flags[format];
579 static void set_default_font(void)
581 static const WCHAR richTextFont[] = {'T','i','m','e','s',' ','N','e','w',' ',
582 'R','o','m','a','n',0};
583 static const WCHAR plainTextFont[] = {'C','o','u','r','i','e','r',' ','N','e','w',0};
584 CHARFORMAT2W fmt;
585 LPCWSTR font;
587 ZeroMemory(&fmt, sizeof(fmt));
589 fmt.cbSize = sizeof(fmt);
590 fmt.dwMask = CFM_FACE | CFM_BOLD | CFM_ITALIC | CFM_UNDERLINE;
591 fmt.dwEffects = 0;
593 if(fileFormat & SF_RTF)
594 font = richTextFont;
595 else
596 font = plainTextFont;
598 lstrcpyW(fmt.szFaceName, font);
600 SendMessageW(hEditorWnd, EM_SETCHARFORMAT, SCF_DEFAULT, (LPARAM)&fmt);
603 static void update_window(void)
605 RECT rect;
607 GetWindowRect(hMainWnd, &rect);
609 (void) OnSize(hMainWnd, SIZE_RESTORED, MAKELONG(rect.bottom, rect.right));
612 static DWORD barState[2];
614 static BOOL is_bar_visible(int bandId)
616 return barState[reg_formatindex(fileFormat)] & (1 << bandId);
619 static void store_bar_state(int bandId, BOOL show)
621 int formatIndex = reg_formatindex(fileFormat);
623 if(show)
624 barState[formatIndex] |= (1 << bandId);
625 else
626 barState[formatIndex] &= ~(1 << bandId);
629 static void set_toolbar_state(int bandId, BOOL show)
631 HWND hwndReBar = GetDlgItem(hMainWnd, IDC_REBAR);
633 SendMessageW(hwndReBar, RB_SHOWBAND, SendMessageW(hwndReBar, RB_IDTOINDEX, bandId, 0), show);
635 if(bandId == BANDID_TOOLBAR)
637 REBARBANDINFOW rbbinfo;
638 int index = SendMessageW(hwndReBar, RB_IDTOINDEX, BANDID_FORMATBAR, 0);
640 rbbinfo.cbSize = sizeof(rbbinfo);
641 rbbinfo.fMask = RBBIM_STYLE;
643 SendMessageW(hwndReBar, RB_GETBANDINFO, index, (LPARAM)&rbbinfo);
645 if(!show)
646 rbbinfo.fStyle &= ~RBBS_BREAK;
647 else
648 rbbinfo.fStyle |= RBBS_BREAK;
650 SendMessageW(hwndReBar, RB_SETBANDINFO, index, (LPARAM)&rbbinfo);
653 if(bandId == BANDID_TOOLBAR || bandId == BANDID_FORMATBAR)
654 store_bar_state(bandId, show);
657 static void set_statusbar_state(BOOL show)
659 HWND hStatusWnd = GetDlgItem(hMainWnd, IDC_STATUSBAR);
661 ShowWindow(hStatusWnd, show ? SW_SHOW : SW_HIDE);
662 store_bar_state(BANDID_STATUSBAR, show);
665 static void set_bar_states(void)
667 set_toolbar_state(BANDID_TOOLBAR, is_bar_visible(BANDID_TOOLBAR));
668 set_toolbar_state(BANDID_FORMATBAR, is_bar_visible(BANDID_FORMATBAR));
669 set_statusbar_state(is_bar_visible(BANDID_STATUSBAR));
671 update_window();
674 static void set_fileformat(WPARAM format)
676 fileFormat = format;
678 set_bar_states();
679 set_default_font();
682 static void DoOpenFile(LPCWSTR szOpenFileName)
684 HANDLE hFile;
685 EDITSTREAM es;
686 char fileStart[5];
687 DWORD readOut;
688 WPARAM format = SF_TEXT;
690 hFile = CreateFileW(szOpenFileName, GENERIC_READ, FILE_SHARE_READ, NULL,
691 OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
692 if (hFile == INVALID_HANDLE_VALUE)
693 return;
695 ReadFile(hFile, fileStart, 5, &readOut, NULL);
696 SetFilePointer(hFile, 0, NULL, FILE_BEGIN);
698 if(readOut >= 2 && (BYTE)fileStart[0] == 0xff && (BYTE)fileStart[1] == 0xfe)
700 format = SF_TEXT | SF_UNICODE;
701 SetFilePointer(hFile, 2, NULL, FILE_BEGIN);
702 } else if(readOut >= 5)
704 static const char header[] = "{\\rtf";
705 if(!memcmp(header, fileStart, 5))
706 format = SF_RTF;
709 es.dwCookie = (DWORD_PTR)hFile;
710 es.pfnCallback = stream_in;
712 clear_formatting();
713 set_fileformat(format);
714 SendMessageW(hEditorWnd, EM_STREAMIN, format, (LPARAM)&es);
716 CloseHandle(hFile);
718 SetFocus(hEditorWnd);
720 set_caption(szOpenFileName);
722 lstrcpyW(wszFileName, szOpenFileName);
723 SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
724 registry_set_filelist(szOpenFileName);
725 set_fileformat(format);
728 static void DoSaveFile(LPCWSTR wszSaveFileName, WPARAM format)
730 HANDLE hFile;
731 EDITSTREAM stream;
732 LRESULT ret;
734 hFile = CreateFileW(wszSaveFileName, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS,
735 FILE_ATTRIBUTE_NORMAL, NULL);
737 if(hFile == INVALID_HANDLE_VALUE)
738 return;
740 if(format == (SF_TEXT | SF_UNICODE))
742 static const BYTE unicode[] = {0xff,0xfe};
743 DWORD writeOut;
744 WriteFile(hFile, &unicode, sizeof(unicode), &writeOut, 0);
746 if(writeOut != sizeof(unicode))
747 return;
750 stream.dwCookie = (DWORD_PTR)hFile;
751 stream.pfnCallback = stream_out;
753 ret = SendMessageW(hEditorWnd, EM_STREAMOUT, format, (LPARAM)&stream);
755 CloseHandle(hFile);
757 SetFocus(hEditorWnd);
759 if(!ret)
761 GETTEXTLENGTHEX gt;
762 gt.flags = GTL_DEFAULT;
763 gt.codepage = 1200;
765 if(SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
766 return;
769 lstrcpyW(wszFileName, wszSaveFileName);
770 set_caption(wszFileName);
771 SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
772 set_fileformat(format);
775 static void DialogSaveFile(void)
777 OPENFILENAMEW sfn;
779 WCHAR wszFile[MAX_PATH] = {'\0'};
780 static const WCHAR wszDefExt[] = {'r','t','f','\0'};
782 ZeroMemory(&sfn, sizeof(sfn));
784 sfn.lStructSize = sizeof(sfn);
785 sfn.Flags = OFN_HIDEREADONLY | OFN_PATHMUSTEXIST | OFN_OVERWRITEPROMPT;
786 sfn.hwndOwner = hMainWnd;
787 sfn.lpstrFilter = wszFilter;
788 sfn.lpstrFile = wszFile;
789 sfn.nMaxFile = MAX_PATH;
790 sfn.lpstrDefExt = wszDefExt;
791 sfn.nFilterIndex = fileformat_number(fileFormat)+1;
793 while(GetSaveFileNameW(&sfn))
795 if(fileformat_flags(sfn.nFilterIndex-1) != SF_RTF)
797 if(MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_SAVE_LOSEFORMATTING),
798 wszAppTitle, MB_YESNO | MB_ICONEXCLAMATION) != IDYES)
800 continue;
801 } else
803 DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
804 break;
806 } else
808 DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
809 break;
814 static BOOL prompt_save_changes(void)
816 if(!wszFileName[0])
818 GETTEXTLENGTHEX gt;
819 gt.flags = GTL_NUMCHARS;
820 gt.codepage = 1200;
821 if(!SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
822 return TRUE;
825 if(!SendMessageW(hEditorWnd, EM_GETMODIFY, 0, 0))
827 return TRUE;
828 } else
830 LPWSTR displayFileName;
831 WCHAR *text;
832 int ret;
834 if(!wszFileName[0])
835 displayFileName = wszDefaultFileName;
836 else
837 displayFileName = file_basename(wszFileName);
839 text = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
840 (lstrlenW(displayFileName)+lstrlenW(wszSaveChanges))*sizeof(WCHAR));
842 if(!text)
843 return FALSE;
845 wsprintfW(text, wszSaveChanges, displayFileName);
847 ret = MessageBoxW(hMainWnd, text, wszAppTitle, MB_YESNOCANCEL | MB_ICONEXCLAMATION);
849 HeapFree(GetProcessHeap(), 0, text);
851 switch(ret)
853 case IDNO:
854 return TRUE;
856 case IDYES:
857 if(wszFileName[0])
858 DoSaveFile(wszFileName, fileFormat);
859 else
860 DialogSaveFile();
861 return TRUE;
863 default:
864 return FALSE;
869 static void DialogOpenFile(void)
871 OPENFILENAMEW ofn;
873 WCHAR wszFile[MAX_PATH] = {'\0'};
874 static const WCHAR wszDefExt[] = {'r','t','f','\0'};
876 ZeroMemory(&ofn, sizeof(ofn));
878 ofn.lStructSize = sizeof(ofn);
879 ofn.Flags = OFN_HIDEREADONLY | OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST;
880 ofn.hwndOwner = hMainWnd;
881 ofn.lpstrFilter = wszFilter;
882 ofn.lpstrFile = wszFile;
883 ofn.nMaxFile = MAX_PATH;
884 ofn.lpstrDefExt = wszDefExt;
885 ofn.nFilterIndex = fileformat_number(fileFormat)+1;
887 if(GetOpenFileNameW(&ofn))
889 if(prompt_save_changes())
890 DoOpenFile(ofn.lpstrFile);
894 static LPWSTR dialog_print_to_file(void)
896 OPENFILENAMEW ofn;
897 static WCHAR file[MAX_PATH] = {'O','U','T','P','U','T','.','P','R','N',0};
898 static const WCHAR defExt[] = {'P','R','N',0};
900 ZeroMemory(&ofn, sizeof(ofn));
902 ofn.lStructSize = sizeof(ofn);
903 ofn.Flags = OFN_PATHMUSTEXIST | OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT;
904 ofn.hwndOwner = hMainWnd;
905 ofn.lpstrFilter = (LPWSTR)wszPrintFilter;
906 ofn.lpstrFile = (LPWSTR)file;
907 ofn.nMaxFile = MAX_PATH;
908 ofn.lpstrDefExt = (LPWSTR)defExt;
910 if(GetSaveFileNameW(&ofn))
911 return (LPWSTR)file;
912 else
913 return FALSE;
916 static LONG devunits_to_twips(int units, int dpi)
918 float ret = ((float)units / (float)dpi) * (float)567 * 2.54;
919 return (LONG)ret;
922 static int centmm_to_twips(int mm)
924 return MulDiv(mm, 567, 1000);
927 static int twips_to_centmm(int twips)
929 return MulDiv(twips, 1000, 567);
932 static HGLOBAL devMode;
933 static HGLOBAL devNames;
935 static void print(LPPRINTDLGW pd)
937 FORMATRANGE fr;
938 DOCINFOW di;
939 int dpiY, dpiX, width, height;
940 int printedPages = 0;
942 fr.hdc = pd->hDC;
943 fr.hdcTarget = pd->hDC;
945 dpiY = GetDeviceCaps(fr.hdc, LOGPIXELSY);
946 dpiX = GetDeviceCaps(fr.hdc, LOGPIXELSX);
947 width = devunits_to_twips(GetDeviceCaps(fr.hdc, PHYSICALWIDTH), dpiX);
948 height = devunits_to_twips(GetDeviceCaps(fr.hdc, PHYSICALHEIGHT), dpiY);
950 fr.rc.left = margins.left;
951 fr.rc.right = width - margins.right;
952 fr.rc.top = margins.top;
953 fr.rc.bottom = height - margins.bottom;
954 fr.rcPage.left = 0;
955 fr.rcPage.right = width;
956 fr.rcPage.top = 0;
957 fr.rcPage.bottom = height;
959 ZeroMemory(&di, sizeof(di));
960 di.cbSize = sizeof(di);
961 di.lpszDocName = (LPWSTR)wszFileName;
963 if(pd->Flags & PD_PRINTTOFILE)
965 di.lpszOutput = dialog_print_to_file();
966 if(!di.lpszOutput)
967 return;
970 if(pd->Flags & PD_SELECTION)
972 SendMessageW(hEditorWnd, EM_EXGETSEL, 0, (LPARAM)&fr.chrg);
973 } else
975 GETTEXTLENGTHEX gt;
976 gt.flags = GTL_DEFAULT;
977 gt.codepage = 1200;
978 fr.chrg.cpMin = 0;
979 fr.chrg.cpMax = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
981 if(pd->Flags & PD_PAGENUMS)
983 int i;
984 for(i = 1; i <= pd->nToPage; i++)
986 if(i == pd->nFromPage)
987 break;
989 fr.chrg.cpMin = SendMessageW(hEditorWnd, EM_FORMATRANGE, TRUE, (LPARAM)&fr);
994 StartDocW(fr.hdc, &di);
997 if(StartPage(fr.hdc) <= 0)
998 break;
1000 fr.chrg.cpMin = SendMessageW(hEditorWnd, EM_FORMATRANGE, TRUE, (LPARAM)&fr);
1002 if(EndPage(fr.hdc) <= 0)
1003 break;
1005 printedPages++;
1006 if((pd->Flags & PD_PAGENUMS) && (printedPages > (pd->nToPage - pd->nFromPage)))
1007 break;
1009 while(fr.chrg.cpMin < fr.chrg.cpMax);
1011 EndDoc(fr.hdc);
1012 SendMessageW(hEditorWnd, EM_FORMATRANGE, FALSE, 0);
1015 static void dialog_printsetup(void)
1017 PAGESETUPDLGW ps;
1019 ZeroMemory(&ps, sizeof(ps));
1020 ps.lStructSize = sizeof(ps);
1021 ps.hwndOwner = hMainWnd;
1022 ps.Flags = PSD_INHUNDREDTHSOFMILLIMETERS | PSD_MARGINS;
1023 ps.rtMargin.left = twips_to_centmm(margins.left);
1024 ps.rtMargin.right = twips_to_centmm(margins.right);
1025 ps.rtMargin.top = twips_to_centmm(margins.top);
1026 ps.rtMargin.bottom = twips_to_centmm(margins.bottom);
1027 ps.hDevMode = devMode;
1028 ps.hDevNames = devNames;
1030 if(PageSetupDlgW(&ps))
1032 margins.left = centmm_to_twips(ps.rtMargin.left);
1033 margins.right = centmm_to_twips(ps.rtMargin.right);
1034 margins.top = centmm_to_twips(ps.rtMargin.top);
1035 margins.bottom = centmm_to_twips(ps.rtMargin.bottom);
1036 devMode = ps.hDevMode;
1037 devNames = ps.hDevNames;
1041 static void print_quick(void)
1043 PRINTDLGW pd;
1044 ZeroMemory(&pd, sizeof(pd));
1046 if(devMode && devNames)
1048 LPDEVNAMES dn = GlobalLock(devNames);
1049 LPDEVMODEW dm = GlobalLock(devMode);
1050 pd.hDC = CreateDCW((LPWSTR)dn + dn->wDriverOffset,
1051 (LPWSTR)dn + dn->wDeviceOffset, 0, dm);
1052 GlobalUnlock(dn);
1053 GlobalUnlock(dm);
1054 } else
1056 ZeroMemory(&pd, sizeof(pd));
1057 pd.lStructSize = sizeof(pd);
1058 pd.Flags = PD_RETURNDC | PD_RETURNDEFAULT;
1059 pd.hwndOwner = hMainWnd;
1060 pd.hDevMode = (HGLOBAL)devMode;
1062 PrintDlgW(&pd);
1064 devMode = pd.hDevMode;
1065 devNames = pd.hDevNames;
1068 print(&pd);
1071 static void dialog_print(void)
1073 PRINTDLGW pd;
1074 int from = 0;
1075 int to = 0;
1077 ZeroMemory(&pd, sizeof(pd));
1078 pd.lStructSize = sizeof(pd);
1079 pd.hwndOwner = hMainWnd;
1080 pd.Flags = PD_RETURNDC | PD_USEDEVMODECOPIESANDCOLLATE;
1081 pd.nMinPage = 1;
1082 pd.nMaxPage = -1;
1083 pd.hDevMode = devMode;
1084 pd.hDevNames = devNames;
1086 SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
1087 if(from == to)
1088 pd.Flags |= PD_NOSELECTION;
1090 if(PrintDlgW(&pd))
1092 devMode = pd.hDevMode;
1093 devNames = pd.hDevNames;
1094 print(&pd);
1098 static void HandleCommandLine(LPWSTR cmdline)
1100 WCHAR delimiter;
1101 int opt_print = 0;
1103 /* skip white space */
1104 while (*cmdline == ' ') cmdline++;
1106 /* skip executable name */
1107 delimiter = (*cmdline == '"' ? '"' : ' ');
1109 if (*cmdline == delimiter) cmdline++;
1110 while (*cmdline && *cmdline != delimiter) cmdline++;
1111 if (*cmdline == delimiter) cmdline++;
1113 while (*cmdline == ' ' || *cmdline == '-' || *cmdline == '/')
1115 WCHAR option;
1117 if (*cmdline++ == ' ') continue;
1119 option = *cmdline;
1120 if (option) cmdline++;
1121 while (*cmdline == ' ') cmdline++;
1123 switch (option)
1125 case 'p':
1126 case 'P':
1127 opt_print = 1;
1128 break;
1132 if (*cmdline)
1134 /* file name is passed on the command line */
1135 if (cmdline[0] == '"')
1137 cmdline++;
1138 cmdline[lstrlenW(cmdline) - 1] = 0;
1140 DoOpenFile(cmdline);
1141 InvalidateRect(hMainWnd, NULL, FALSE);
1144 if (opt_print)
1145 MessageBox(hMainWnd, "Printing not implemented", "WordPad", MB_OK);
1148 static LRESULT handle_findmsg(LPFINDREPLACEW pFr)
1150 if(pFr->Flags & FR_DIALOGTERM)
1152 hFindWnd = 0;
1153 pFr->Flags = FR_FINDNEXT;
1154 return 0;
1155 } else if(pFr->Flags & FR_FINDNEXT)
1157 DWORD flags = FR_DOWN;
1158 FINDTEXTW ft;
1159 static CHARRANGE cr;
1160 LRESULT end, ret;
1161 GETTEXTLENGTHEX gt;
1162 LRESULT length;
1163 int startPos;
1164 HMENU hMenu = GetMenu(hMainWnd);
1165 MENUITEMINFOW mi;
1167 mi.cbSize = sizeof(mi);
1168 mi.fMask = MIIM_DATA;
1169 mi.dwItemData = 1;
1170 SetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
1172 gt.flags = GTL_NUMCHARS;
1173 gt.codepage = 1200;
1175 length = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
1177 if(pFr->lCustData == -1)
1179 SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&startPos, (LPARAM)&end);
1180 cr.cpMin = startPos;
1181 pFr->lCustData = startPos;
1182 cr.cpMax = length;
1183 if(cr.cpMin == length)
1184 cr.cpMin = 0;
1185 } else
1187 startPos = pFr->lCustData;
1190 if(cr.cpMax > length)
1192 startPos = 0;
1193 cr.cpMin = 0;
1194 cr.cpMax = length;
1197 ft.chrg = cr;
1198 ft.lpstrText = pFr->lpstrFindWhat;
1200 if(pFr->Flags & FR_MATCHCASE)
1201 flags |= FR_MATCHCASE;
1202 if(pFr->Flags & FR_WHOLEWORD)
1203 flags |= FR_WHOLEWORD;
1205 ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
1207 if(ret == -1)
1209 if(cr.cpMax == length && cr.cpMax != startPos)
1211 ft.chrg.cpMin = cr.cpMin = 0;
1212 ft.chrg.cpMax = cr.cpMax = startPos;
1214 ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
1218 if(ret == -1)
1220 pFr->lCustData = -1;
1221 MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_SEARCH_FINISHED), wszAppTitle,
1222 MB_OK | MB_ICONASTERISK);
1223 } else
1225 end = ret + lstrlenW(pFr->lpstrFindWhat);
1226 cr.cpMin = end;
1227 SendMessageW(hEditorWnd, EM_SETSEL, (WPARAM)ret, (LPARAM)end);
1228 SendMessageW(hEditorWnd, EM_SCROLLCARET, 0, 0);
1232 return 0;
1235 static void dialog_find(LPFINDREPLACEW fr)
1237 static WCHAR findBuffer[MAX_STRING_LEN];
1239 ZeroMemory(fr, sizeof(FINDREPLACEW));
1240 fr->lStructSize = sizeof(FINDREPLACEW);
1241 fr->hwndOwner = hMainWnd;
1242 fr->Flags = FR_HIDEUPDOWN;
1243 fr->lpstrFindWhat = findBuffer;
1244 fr->lCustData = -1;
1245 fr->wFindWhatLen = MAX_STRING_LEN*sizeof(WCHAR);
1247 hFindWnd = FindTextW(fr);
1250 static void registry_read_options(void)
1252 HKEY hKey;
1253 DWORD size = sizeof(RECT);
1255 if(registry_get_handle(&hKey, 0, key_options) != ERROR_SUCCESS ||
1256 RegQueryValueExW(hKey, var_pagemargin, 0, NULL, (LPBYTE)&margins,
1257 &size) != ERROR_SUCCESS || size != sizeof(RECT))
1259 margins.top = 1417;
1260 margins.bottom = 1417;
1261 margins.left = 1757;
1262 margins.right = 1757;
1265 RegCloseKey(hKey);
1268 static void registry_read_formatopts(int index, LPCWSTR key)
1270 HKEY hKey;
1271 DWORD action = 0;
1272 BOOL fetched = FALSE;
1273 barState[index] = 0;
1275 if(registry_get_handle(&hKey, &action, key) != ERROR_SUCCESS)
1276 return;
1278 if(action == REG_OPENED_EXISTING_KEY)
1280 DWORD size = sizeof(DWORD);
1282 if(RegQueryValueExW(hKey, var_barstate0, 0, NULL, (LPBYTE)&barState[index],
1283 &size) == ERROR_SUCCESS)
1284 fetched = TRUE;
1287 if(!fetched)
1288 barState[index] = (1 << BANDID_TOOLBAR) | (1 << BANDID_FORMATBAR) | (1 << BANDID_RULER) | (1 << BANDID_STATUSBAR);
1290 RegCloseKey(hKey);
1293 static void registry_read_formatopts_all(void)
1295 registry_read_formatopts(reg_formatindex(SF_RTF), key_rtf);
1296 registry_read_formatopts(reg_formatindex(SF_TEXT), key_text);
1299 static void registry_set_formatopts(int index, LPCWSTR key)
1301 HKEY hKey;
1302 DWORD action = 0;
1304 if(registry_get_handle(&hKey, &action, key) == ERROR_SUCCESS)
1306 RegSetValueExW(hKey, var_barstate0, 0, REG_DWORD, (LPBYTE)&barState[index],
1307 sizeof(DWORD));
1309 RegCloseKey(hKey);
1313 static void registry_set_formatopts_all(void)
1315 registry_set_formatopts(reg_formatindex(SF_RTF), key_rtf);
1316 registry_set_formatopts(reg_formatindex(SF_TEXT), key_text);
1319 static int current_units_to_twips(float number)
1321 int twips = (int)(number * 567);
1322 return twips;
1325 static void append_current_units(LPWSTR buffer)
1327 static const WCHAR space[] = {' '};
1328 lstrcatW(buffer, space);
1329 lstrcatW(buffer, units_cmW);
1332 static void number_with_units(LPWSTR buffer, int number)
1334 float converted = (float)number / 567;
1335 char string[MAX_STRING_LEN];
1337 sprintf(string, "%.2f ", converted);
1338 lstrcatA(string, units_cmA);
1339 MultiByteToWideChar(CP_ACP, 0, string, -1, buffer, MAX_STRING_LEN);
1342 BOOL CALLBACK datetime_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1344 switch(message)
1346 case WM_INITDIALOG:
1348 WCHAR buffer[MAX_STRING_LEN];
1349 SYSTEMTIME st;
1350 HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
1351 GetLocalTime(&st);
1353 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_SHORTDATE, &st, 0, (LPWSTR)&buffer,
1354 MAX_STRING_LEN);
1355 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1356 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &st, 0, (LPWSTR)&buffer,
1357 MAX_STRING_LEN);
1358 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1359 GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &st, 0, (LPWSTR)&buffer, MAX_STRING_LEN);
1360 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1362 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
1364 break;
1366 case WM_COMMAND:
1367 switch(LOWORD(wParam))
1369 case IDOK:
1371 LRESULT index;
1372 HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
1374 index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
1376 if(index != LB_ERR)
1378 WCHAR buffer[MAX_STRING_LEN];
1379 SendMessageW(hListWnd, LB_GETTEXT, index, (LPARAM)&buffer);
1380 SendMessageW(hEditorWnd, EM_REPLACESEL, TRUE, (LPARAM)&buffer);
1383 /* Fall through */
1385 case IDCANCEL:
1386 EndDialog(hWnd, wParam);
1387 return TRUE;
1390 return FALSE;
1393 BOOL CALLBACK newfile_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1395 switch(message)
1397 case WM_INITDIALOG:
1399 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
1400 WCHAR buffer[MAX_STRING_LEN];
1401 HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
1403 LoadStringW(hInstance, STRING_NEWFILE_RICHTEXT, (LPWSTR)buffer, MAX_STRING_LEN);
1404 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1405 LoadStringW(hInstance, STRING_NEWFILE_TXT, (LPWSTR)buffer, MAX_STRING_LEN);
1406 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1407 LoadStringW(hInstance, STRING_NEWFILE_TXT_UNICODE, (LPWSTR)buffer, MAX_STRING_LEN);
1408 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1410 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
1412 break;
1414 case WM_COMMAND:
1415 switch(LOWORD(wParam))
1417 case IDOK:
1419 LRESULT index;
1420 HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
1421 index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
1423 if(index != LB_ERR)
1424 EndDialog(hWnd, MAKELONG(fileformat_flags(index),0));
1426 return TRUE;
1428 case IDCANCEL:
1429 EndDialog(hWnd, MAKELONG(ID_NEWFILE_ABORT,0));
1430 return TRUE;
1433 return FALSE;
1436 static INT_PTR CALLBACK paraformat_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1438 switch(message)
1440 case WM_INITDIALOG:
1442 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd,
1443 GWLP_HINSTANCE);
1444 WCHAR buffer[MAX_STRING_LEN];
1445 HWND hListWnd = GetDlgItem(hWnd, IDC_PARA_ALIGN);
1446 HWND hLeftWnd = GetDlgItem(hWnd, IDC_PARA_LEFT);
1447 HWND hRightWnd = GetDlgItem(hWnd, IDC_PARA_RIGHT);
1448 HWND hFirstWnd = GetDlgItem(hWnd, IDC_PARA_FIRST);
1449 PARAFORMAT2 pf;
1450 int index = 0;
1452 LoadStringW(hInstance, STRING_ALIGN_LEFT, buffer,
1453 MAX_STRING_LEN);
1454 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
1455 LoadStringW(hInstance, STRING_ALIGN_RIGHT, buffer,
1456 MAX_STRING_LEN);
1457 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
1458 LoadStringW(hInstance, STRING_ALIGN_CENTER, buffer,
1459 MAX_STRING_LEN);
1460 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
1462 pf.cbSize = sizeof(pf);
1463 pf.dwMask = PFM_ALIGNMENT | PFM_OFFSET | PFM_RIGHTINDENT |
1464 PFM_OFFSETINDENT;
1465 SendMessageW(hEditorWnd, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1467 if(pf.wAlignment == PFA_RIGHT)
1468 index ++;
1469 else if(pf.wAlignment == PFA_CENTER)
1470 index += 2;
1472 SendMessageW(hListWnd, CB_SETCURSEL, index, 0);
1474 number_with_units(buffer, pf.dxOffset);
1475 SetWindowTextW(hLeftWnd, buffer);
1476 number_with_units(buffer, pf.dxRightIndent);
1477 SetWindowTextW(hRightWnd, buffer);
1478 number_with_units(buffer, pf.dxStartIndent - pf.dxOffset);
1479 SetWindowTextW(hFirstWnd, buffer);
1481 break;
1483 case WM_COMMAND:
1484 switch(LOWORD(wParam))
1486 case IDOK:
1488 HWND hLeftWnd = GetDlgItem(hWnd, IDC_PARA_LEFT);
1489 HWND hRightWnd = GetDlgItem(hWnd, IDC_PARA_RIGHT);
1490 HWND hFirstWnd = GetDlgItem(hWnd, IDC_PARA_FIRST);
1491 WCHAR buffer[MAX_STRING_LEN];
1492 float num;
1493 int ret = 0;
1494 PARAFORMAT pf;
1496 GetWindowTextW(hLeftWnd, buffer, MAX_STRING_LEN);
1497 if(number_from_string(buffer, &num, TRUE))
1498 ret++;
1499 pf.dxOffset = current_units_to_twips(num);
1500 GetWindowTextW(hRightWnd, buffer, MAX_STRING_LEN);
1501 if(number_from_string(buffer, &num, TRUE))
1502 ret++;
1503 pf.dxRightIndent = current_units_to_twips(num);
1504 GetWindowTextW(hFirstWnd, buffer, MAX_STRING_LEN);
1505 if(number_from_string(buffer, &num, TRUE))
1506 ret++;
1507 pf.dxStartIndent = current_units_to_twips(num);
1509 if(ret != 3)
1511 MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
1512 wszAppTitle, MB_OK | MB_ICONASTERISK);
1513 return FALSE;
1514 } else
1516 pf.dxStartIndent = pf.dxStartIndent + pf.dxOffset;
1517 pf.cbSize = sizeof(pf);
1518 pf.dwMask = PFM_OFFSET | PFM_OFFSETINDENT | PFM_RIGHTINDENT;
1519 SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
1522 /* Fall through */
1524 case IDCANCEL:
1525 EndDialog(hWnd, wParam);
1526 return TRUE;
1529 return FALSE;
1532 static INT_PTR CALLBACK tabstops_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1534 switch(message)
1536 case WM_INITDIALOG:
1538 HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1539 PARAFORMAT pf;
1540 WCHAR buffer[MAX_STRING_LEN];
1541 int i;
1543 pf.cbSize = sizeof(pf);
1544 pf.dwMask = PFM_TABSTOPS;
1545 SendMessageW(hEditorWnd, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1546 SendMessageW(hTabWnd, CB_LIMITTEXT, MAX_STRING_LEN-1, 0);
1548 for(i = 0; i < pf.cTabCount; i++)
1550 number_with_units(buffer, pf.rgxTabs[i]);
1551 SendMessageW(hTabWnd, CB_ADDSTRING, 0, (LPARAM)&buffer);
1553 SetFocus(hTabWnd);
1555 break;
1557 case WM_COMMAND:
1558 switch(LOWORD(wParam))
1560 case IDC_TABSTOPS:
1562 HWND hTabWnd = (HWND)lParam;
1563 HWND hAddWnd = GetDlgItem(hWnd, ID_TAB_ADD);
1564 HWND hDelWnd = GetDlgItem(hWnd, ID_TAB_DEL);
1565 HWND hEmptyWnd = GetDlgItem(hWnd, ID_TAB_EMPTY);
1567 if(GetWindowTextLengthW(hTabWnd))
1568 EnableWindow(hAddWnd, TRUE);
1569 else
1570 EnableWindow(hAddWnd, FALSE);
1572 if(SendMessageW(hTabWnd, CB_GETCOUNT, 0, 0))
1574 EnableWindow(hEmptyWnd, TRUE);
1576 if(SendMessageW(hTabWnd, CB_GETCURSEL, 0, 0) == CB_ERR)
1577 EnableWindow(hDelWnd, FALSE);
1578 else
1579 EnableWindow(hDelWnd, TRUE);
1580 } else
1582 EnableWindow(hEmptyWnd, FALSE);
1585 break;
1587 case ID_TAB_ADD:
1589 HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1590 WCHAR buffer[MAX_STRING_LEN];
1592 GetWindowTextW(hTabWnd, buffer, MAX_STRING_LEN);
1593 append_current_units(buffer);
1595 if(SendMessageW(hTabWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)&buffer) == CB_ERR)
1597 float number = 0;
1599 if(!number_from_string(buffer, &number, TRUE))
1601 MessageBoxW(hWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
1602 wszAppTitle, MB_OK | MB_ICONINFORMATION);
1603 } else
1605 SendMessageW(hTabWnd, CB_ADDSTRING, 0, (LPARAM)&buffer);
1606 SetWindowTextW(hTabWnd, 0);
1609 SetFocus(hTabWnd);
1611 break;
1613 case ID_TAB_DEL:
1615 HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1616 LRESULT ret;
1617 ret = SendMessageW(hTabWnd, CB_GETCURSEL, 0, 0);
1618 if(ret != CB_ERR)
1619 SendMessageW(hTabWnd, CB_DELETESTRING, ret, 0);
1621 break;
1623 case ID_TAB_EMPTY:
1625 HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1626 SendMessageW(hTabWnd, CB_RESETCONTENT, 0, 0);
1627 SetFocus(hTabWnd);
1629 break;
1631 case IDOK:
1633 HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1634 int i;
1635 WCHAR buffer[MAX_STRING_LEN];
1636 PARAFORMAT pf;
1637 float number;
1639 pf.cbSize = sizeof(pf);
1640 pf.dwMask = PFM_TABSTOPS;
1642 for(i = 0; SendMessageW(hTabWnd, CB_GETLBTEXT, i,
1643 (LPARAM)&buffer) != CB_ERR &&
1644 i < MAX_TAB_STOPS; i++)
1646 number_from_string(buffer, &number, TRUE);
1647 pf.rgxTabs[i] = current_units_to_twips(number);
1649 pf.cTabCount = i;
1650 SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
1652 /* Fall through */
1653 case IDCANCEL:
1654 EndDialog(hWnd, wParam);
1655 return TRUE;
1658 return FALSE;
1661 static int context_menu(LPARAM lParam)
1663 int x = (int)(short)LOWORD(lParam);
1664 int y = (int)(short)HIWORD(lParam);
1665 HMENU hPop = GetSubMenu(hPopupMenu, 0);
1667 if(x == -1)
1669 int from = 0, to = 0;
1670 POINTL pt;
1671 SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
1672 SendMessageW(hEditorWnd, EM_POSFROMCHAR, (WPARAM)&pt, (LPARAM)to);
1673 ClientToScreen(hEditorWnd, (POINT*)&pt);
1674 x = pt.x;
1675 y = pt.y;
1678 TrackPopupMenu(hPop, TPM_LEFTALIGN | TPM_TOPALIGN | TPM_RIGHTBUTTON,
1679 x, y, 0, hMainWnd, 0);
1681 return 0;
1684 static LRESULT OnCreate( HWND hWnd, WPARAM wParam, LPARAM lParam)
1686 HWND hToolBarWnd, hFormatBarWnd, hReBarWnd;
1687 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
1688 HANDLE hDLL;
1689 TBADDBITMAP ab;
1690 int nStdBitmaps = 0;
1691 REBARINFO rbi;
1692 REBARBANDINFOW rbb;
1693 static const WCHAR wszRichEditDll[] = {'R','I','C','H','E','D','2','0','.','D','L','L','\0'};
1694 static const WCHAR wszRichEditText[] = {'R','i','c','h','E','d','i','t',' ','t','e','x','t','\0'};
1696 CreateStatusWindowW(CCS_NODIVIDER|WS_CHILD|WS_VISIBLE, wszRichEditText, hWnd, IDC_STATUSBAR);
1698 hReBarWnd = CreateWindowExW(WS_EX_TOOLWINDOW, REBARCLASSNAMEW, NULL,
1699 CCS_NODIVIDER|WS_CHILD|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|RBS_VARHEIGHT|CCS_TOP,
1700 CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hWnd, (HMENU)IDC_REBAR, hInstance, NULL);
1702 rbi.cbSize = sizeof(rbi);
1703 rbi.fMask = 0;
1704 rbi.himl = NULL;
1705 if(!SendMessageW(hReBarWnd, RB_SETBARINFO, 0, (LPARAM)&rbi))
1706 return -1;
1708 hToolBarWnd = CreateToolbarEx(hReBarWnd, CCS_NOPARENTALIGN|CCS_NOMOVEY|WS_VISIBLE|WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_BUTTON,
1709 IDC_TOOLBAR,
1710 1, hInstance, IDB_TOOLBAR,
1711 NULL, 0,
1712 24, 24, 16, 16, sizeof(TBBUTTON));
1714 ab.hInst = HINST_COMMCTRL;
1715 ab.nID = IDB_STD_SMALL_COLOR;
1716 nStdBitmaps = SendMessageW(hToolBarWnd, TB_ADDBITMAP, 0, (LPARAM)&ab);
1718 AddButton(hToolBarWnd, nStdBitmaps+STD_FILENEW, ID_FILE_NEW);
1719 AddButton(hToolBarWnd, nStdBitmaps+STD_FILEOPEN, ID_FILE_OPEN);
1720 AddButton(hToolBarWnd, nStdBitmaps+STD_FILESAVE, ID_FILE_SAVE);
1721 AddSeparator(hToolBarWnd);
1722 AddButton(hToolBarWnd, nStdBitmaps+STD_PRINT, ID_PRINT_QUICK);
1723 AddButton(hToolBarWnd, nStdBitmaps+STD_PRINTPRE, ID_PREVIEW);
1724 AddSeparator(hToolBarWnd);
1725 AddButton(hToolBarWnd, nStdBitmaps+STD_FIND, ID_FIND);
1726 AddSeparator(hToolBarWnd);
1727 AddButton(hToolBarWnd, nStdBitmaps+STD_CUT, ID_EDIT_CUT);
1728 AddButton(hToolBarWnd, nStdBitmaps+STD_COPY, ID_EDIT_COPY);
1729 AddButton(hToolBarWnd, nStdBitmaps+STD_PASTE, ID_EDIT_PASTE);
1730 AddButton(hToolBarWnd, nStdBitmaps+STD_UNDO, ID_EDIT_UNDO);
1731 AddButton(hToolBarWnd, nStdBitmaps+STD_REDOW, ID_EDIT_REDO);
1732 AddSeparator(hToolBarWnd);
1733 AddButton(hToolBarWnd, 0, ID_DATETIME);
1735 SendMessageW(hToolBarWnd, TB_AUTOSIZE, 0, 0);
1737 rbb.cbSize = sizeof(rbb);
1738 rbb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_CHILD | RBBIM_STYLE | RBBIM_ID;
1739 rbb.fStyle = RBBS_CHILDEDGE | RBBS_BREAK | RBBS_NOGRIPPER;
1740 rbb.cx = 0;
1741 rbb.hwndChild = hToolBarWnd;
1742 rbb.cxMinChild = 0;
1743 rbb.cyChild = rbb.cyMinChild = HIWORD(SendMessageW(hToolBarWnd, TB_GETBUTTONSIZE, 0, 0));
1744 rbb.wID = BANDID_TOOLBAR;
1746 SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1748 hFormatBarWnd = CreateToolbarEx(hReBarWnd,
1749 CCS_NOPARENTALIGN | CCS_NOMOVEY | WS_VISIBLE | TBSTYLE_TOOLTIPS | TBSTYLE_BUTTON,
1750 IDC_FORMATBAR, 7, hInstance, IDB_FORMATBAR, NULL, 0, 16, 16, 16, 16, sizeof(TBBUTTON));
1752 AddButton(hFormatBarWnd, 0, ID_FORMAT_BOLD);
1753 AddButton(hFormatBarWnd, 1, ID_FORMAT_ITALIC);
1754 AddButton(hFormatBarWnd, 2, ID_FORMAT_UNDERLINE);
1755 AddSeparator(hFormatBarWnd);
1756 AddButton(hFormatBarWnd, 3, ID_ALIGN_LEFT);
1757 AddButton(hFormatBarWnd, 4, ID_ALIGN_CENTER);
1758 AddButton(hFormatBarWnd, 5, ID_ALIGN_RIGHT);
1759 AddSeparator(hFormatBarWnd);
1760 AddButton(hFormatBarWnd, 6, ID_BULLET);
1762 SendMessageW(hFormatBarWnd, TB_AUTOSIZE, 0, 0);
1764 rbb.hwndChild = hFormatBarWnd;
1765 rbb.wID = BANDID_FORMATBAR;
1767 SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1769 hDLL = LoadLibraryW(wszRichEditDll);
1770 if(!hDLL)
1772 MessageBoxW(hWnd, MAKEINTRESOURCEW(STRING_LOAD_RICHED_FAILED), wszAppTitle,
1773 MB_OK | MB_ICONEXCLAMATION);
1774 PostQuitMessage(1);
1777 hEditorWnd = CreateWindowExW(WS_EX_CLIENTEDGE, wszRichEditClass, NULL,
1778 WS_CHILD|WS_VISIBLE|ES_MULTILINE|ES_AUTOVSCROLL|ES_WANTRETURN|WS_VSCROLL,
1779 0, 0, 1000, 100, hWnd, (HMENU)IDC_EDITOR, hInstance, NULL);
1781 if (!hEditorWnd)
1783 fprintf(stderr, "Error code %u\n", GetLastError());
1784 return -1;
1786 assert(hEditorWnd);
1788 SetFocus(hEditorWnd);
1789 SendMessageW(hEditorWnd, EM_SETEVENTMASK, 0, ENM_SELCHANGE);
1791 set_default_font();
1793 DoLoadStrings();
1794 SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
1796 ID_FINDMSGSTRING = RegisterWindowMessageW(FINDMSGSTRINGW);
1798 registry_read_filelist(hWnd);
1799 registry_read_formatopts_all();
1800 registry_read_options();
1801 DragAcceptFiles(hWnd, TRUE);
1803 return 0;
1806 static LRESULT OnUser( HWND hWnd, WPARAM wParam, LPARAM lParam)
1808 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1809 HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
1810 HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
1811 HWND hwndFormatBar = GetDlgItem(hwndReBar, IDC_FORMATBAR);
1812 int from, to;
1813 CHARFORMAT2W fmt;
1814 PARAFORMAT2 pf;
1815 GETTEXTLENGTHEX gt;
1817 ZeroMemory(&fmt, sizeof(fmt));
1818 fmt.cbSize = sizeof(fmt);
1820 ZeroMemory(&pf, sizeof(pf));
1821 pf.cbSize = sizeof(pf);
1823 gt.flags = GTL_NUMCHARS;
1824 gt.codepage = 1200;
1826 SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_FIND,
1827 SendMessageW(hwndEditor, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0) ? 1 : 0);
1829 SendMessageW(hwndEditor, EM_GETCHARFORMAT, TRUE, (LPARAM)&fmt);
1831 SendMessageW(hwndEditor, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
1832 SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_UNDO,
1833 SendMessageW(hwndEditor, EM_CANUNDO, 0, 0));
1834 SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_REDO,
1835 SendMessageW(hwndEditor, EM_CANREDO, 0, 0));
1836 SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_CUT, from == to ? 0 : 1);
1837 SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_COPY, from == to ? 0 : 1);
1839 SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_BOLD, (fmt.dwMask & CFM_BOLD) &&
1840 (fmt.dwEffects & CFE_BOLD));
1841 SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_BOLD, !(fmt.dwMask & CFM_BOLD));
1842 SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_ITALIC, (fmt.dwMask & CFM_ITALIC) &&
1843 (fmt.dwEffects & CFE_ITALIC));
1844 SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_ITALIC, !(fmt.dwMask & CFM_ITALIC));
1845 SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_UNDERLINE, (fmt.dwMask & CFM_UNDERLINE) &&
1846 (fmt.dwEffects & CFE_UNDERLINE));
1847 SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_UNDERLINE, !(fmt.dwMask & CFM_UNDERLINE));
1849 SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1850 SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_LEFT, (pf.wAlignment == PFA_LEFT));
1851 SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_CENTER, (pf.wAlignment == PFA_CENTER));
1852 SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_RIGHT, (pf.wAlignment == PFA_RIGHT));
1854 SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_BULLET, (pf.wNumbering & PFN_BULLET));
1855 return 0;
1858 static LRESULT OnNotify( HWND hWnd, WPARAM wParam, LPARAM lParam)
1860 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1861 NMHDR *pHdr = (NMHDR *)lParam;
1863 if (pHdr->hwndFrom != hwndEditor)
1864 return 0;
1866 if (pHdr->code == EN_SELCHANGE)
1868 SELCHANGE *pSC = (SELCHANGE *)lParam;
1869 char buf[128];
1871 sprintf( buf,"selection = %d..%d, line count=%ld",
1872 pSC->chrg.cpMin, pSC->chrg.cpMax,
1873 SendMessage(hwndEditor, EM_GETLINECOUNT, 0, 0));
1874 SetWindowText(GetDlgItem(hWnd, IDC_STATUSBAR), buf);
1875 SendMessage(hWnd, WM_USER, 0, 0);
1876 return 1;
1878 return 0;
1881 static LRESULT OnCommand( HWND hWnd, WPARAM wParam, LPARAM lParam)
1883 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1884 static FINDREPLACEW findreplace;
1886 if ((HWND)lParam == hwndEditor)
1887 return 0;
1889 switch(LOWORD(wParam))
1892 case ID_FILE_EXIT:
1893 PostMessageW(hWnd, WM_CLOSE, 0, 0);
1894 break;
1896 case ID_FILE_NEW:
1898 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
1899 int ret = DialogBox(hInstance, MAKEINTRESOURCE(IDD_NEWFILE), hWnd,
1900 (DLGPROC)newfile_proc);
1902 if(ret != ID_NEWFILE_ABORT)
1904 if(prompt_save_changes())
1906 SETTEXTEX st;
1908 set_caption(NULL);
1909 wszFileName[0] = '\0';
1911 clear_formatting();
1913 st.flags = ST_DEFAULT;
1914 st.codepage = 1200;
1915 SendMessageW(hEditorWnd, EM_SETTEXTEX, (WPARAM)&st, 0);
1917 SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
1918 set_fileformat(ret);
1922 break;
1924 case ID_FILE_OPEN:
1925 DialogOpenFile();
1926 break;
1928 case ID_FILE_SAVE:
1929 if(wszFileName[0])
1931 DoSaveFile(wszFileName, fileFormat);
1932 break;
1934 /* Fall through */
1936 case ID_FILE_SAVEAS:
1937 DialogSaveFile();
1938 break;
1940 case ID_FILE_RECENT1:
1941 case ID_FILE_RECENT2:
1942 case ID_FILE_RECENT3:
1943 case ID_FILE_RECENT4:
1945 HMENU hMenu = GetMenu(hWnd);
1946 MENUITEMINFOW mi;
1948 mi.cbSize = sizeof(MENUITEMINFOW);
1949 mi.fMask = MIIM_DATA;
1950 if(GetMenuItemInfoW(hMenu, LOWORD(wParam), FALSE, &mi))
1951 DoOpenFile((LPWSTR)mi.dwItemData);
1953 break;
1955 case ID_FIND:
1956 dialog_find(&findreplace);
1957 break;
1959 case ID_FIND_NEXT:
1960 handle_findmsg(&findreplace);
1961 break;
1963 case ID_PRINT:
1964 dialog_print();
1965 break;
1967 case ID_PRINT_QUICK:
1968 print_quick();
1969 break;
1971 case ID_PREVIEW:
1973 static const WCHAR wszNotImplemented[] = {'N','o','t',' ',
1974 'i','m','p','l','e','m','e','n','t','e','d','\0'};
1975 MessageBoxW(hWnd, wszNotImplemented, wszAppTitle, MB_OK);
1977 break;
1979 case ID_PRINTSETUP:
1980 dialog_printsetup();
1981 break;
1983 case ID_FORMAT_BOLD:
1984 case ID_FORMAT_ITALIC:
1985 case ID_FORMAT_UNDERLINE:
1987 CHARFORMAT2W fmt;
1988 int mask = CFM_BOLD;
1989 if (LOWORD(wParam) == ID_FORMAT_ITALIC) mask = CFM_ITALIC;
1990 if (LOWORD(wParam) == ID_FORMAT_UNDERLINE) mask = CFM_UNDERLINE;
1992 ZeroMemory(&fmt, sizeof(fmt));
1993 fmt.cbSize = sizeof(fmt);
1994 SendMessageW(hwndEditor, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
1995 if (!(fmt.dwMask&mask))
1996 fmt.dwEffects |= mask;
1997 else
1998 fmt.dwEffects ^= mask;
1999 fmt.dwMask = mask;
2000 SendMessageW(hwndEditor, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
2001 break;
2004 case ID_EDIT_CUT:
2005 PostMessageW(hwndEditor, WM_CUT, 0, 0);
2006 break;
2008 case ID_EDIT_COPY:
2009 PostMessageW(hwndEditor, WM_COPY, 0, 0);
2010 break;
2012 case ID_EDIT_PASTE:
2013 PostMessageW(hwndEditor, WM_PASTE, 0, 0);
2014 break;
2016 case ID_EDIT_CLEAR:
2017 PostMessageW(hwndEditor, WM_CLEAR, 0, 0);
2018 break;
2020 case ID_EDIT_SELECTALL:
2022 CHARRANGE range = {0, -1};
2023 SendMessageW(hwndEditor, EM_EXSETSEL, 0, (LPARAM)&range);
2024 /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2025 return 0;
2028 case ID_EDIT_GETTEXT:
2030 int nLen = GetWindowTextLengthW(hwndEditor);
2031 LPWSTR data = HeapAlloc( GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR) );
2032 TEXTRANGEW tr;
2034 GetWindowTextW(hwndEditor, data, nLen+1);
2035 MessageBoxW(NULL, data, xszAppTitle, MB_OK);
2037 HeapFree( GetProcessHeap(), 0, data);
2038 data = HeapAlloc(GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR));
2039 tr.chrg.cpMin = 0;
2040 tr.chrg.cpMax = nLen;
2041 tr.lpstrText = data;
2042 SendMessage (hwndEditor, EM_GETTEXTRANGE, 0, (LPARAM)&tr);
2043 MessageBoxW(NULL, data, xszAppTitle, MB_OK);
2044 HeapFree( GetProcessHeap(), 0, data );
2046 /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2047 return 0;
2050 case ID_EDIT_CHARFORMAT:
2051 case ID_EDIT_DEFCHARFORMAT:
2053 CHARFORMAT2W cf;
2054 LRESULT i;
2055 ZeroMemory(&cf, sizeof(cf));
2056 cf.cbSize = sizeof(cf);
2057 cf.dwMask = 0;
2058 i = SendMessageW(hwndEditor, EM_GETCHARFORMAT,
2059 LOWORD(wParam) == ID_EDIT_CHARFORMAT, (LPARAM)&cf);
2060 return 0;
2063 case ID_EDIT_PARAFORMAT:
2065 PARAFORMAT2 pf;
2066 ZeroMemory(&pf, sizeof(pf));
2067 pf.cbSize = sizeof(pf);
2068 SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2069 return 0;
2072 case ID_EDIT_SELECTIONINFO:
2074 CHARRANGE range = {0, -1};
2075 char buf[128];
2076 WCHAR *data = NULL;
2078 SendMessage(hwndEditor, EM_EXGETSEL, 0, (LPARAM)&range);
2079 data = HeapAlloc(GetProcessHeap(), 0, sizeof(*data) * (range.cpMax-range.cpMin+1));
2080 SendMessage(hwndEditor, EM_GETSELTEXT, 0, (LPARAM)data);
2081 sprintf(buf, "Start = %d, End = %d", range.cpMin, range.cpMax);
2082 MessageBoxA(hWnd, buf, "Editor", MB_OK);
2083 MessageBoxW(hWnd, data, xszAppTitle, MB_OK);
2084 HeapFree( GetProcessHeap(), 0, data);
2085 /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2086 return 0;
2089 case ID_EDIT_READONLY:
2091 long nStyle = GetWindowLong(hwndEditor, GWL_STYLE);
2092 if (nStyle & ES_READONLY)
2093 SendMessageW(hwndEditor, EM_SETREADONLY, 0, 0);
2094 else
2095 SendMessageW(hwndEditor, EM_SETREADONLY, 1, 0);
2096 return 0;
2099 case ID_EDIT_MODIFIED:
2100 if (SendMessageW(hwndEditor, EM_GETMODIFY, 0, 0))
2101 SendMessageW(hwndEditor, EM_SETMODIFY, 0, 0);
2102 else
2103 SendMessageW(hwndEditor, EM_SETMODIFY, 1, 0);
2104 return 0;
2106 case ID_EDIT_UNDO:
2107 SendMessageW(hwndEditor, EM_UNDO, 0, 0);
2108 return 0;
2110 case ID_EDIT_REDO:
2111 SendMessageW(hwndEditor, EM_REDO, 0, 0);
2112 return 0;
2114 case ID_BULLET:
2116 PARAFORMAT pf;
2118 pf.cbSize = sizeof(pf);
2119 pf.dwMask = PFM_NUMBERING;
2120 SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2122 pf.dwMask |= PFM_OFFSET;
2124 if(pf.wNumbering == PFN_BULLET)
2126 pf.wNumbering = 0;
2127 pf.dxOffset = 0;
2128 } else
2130 pf.wNumbering = PFN_BULLET;
2131 pf.dxOffset = 720;
2134 SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2136 break;
2138 case ID_ALIGN_LEFT:
2139 case ID_ALIGN_CENTER:
2140 case ID_ALIGN_RIGHT:
2142 PARAFORMAT2 pf;
2144 pf.cbSize = sizeof(pf);
2145 pf.dwMask = PFM_ALIGNMENT;
2146 switch(LOWORD(wParam)) {
2147 case ID_ALIGN_LEFT: pf.wAlignment = PFA_LEFT; break;
2148 case ID_ALIGN_CENTER: pf.wAlignment = PFA_CENTER; break;
2149 case ID_ALIGN_RIGHT: pf.wAlignment = PFA_RIGHT; break;
2151 SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2152 break;
2155 case ID_BACK_1:
2156 SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 1, 0);
2157 break;
2159 case ID_BACK_2:
2160 SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 0, RGB(255,255,192));
2161 break;
2163 case ID_TOGGLE_TOOLBAR:
2164 set_toolbar_state(BANDID_TOOLBAR, !is_bar_visible(BANDID_TOOLBAR));
2165 update_window();
2166 break;
2168 case ID_TOGGLE_FORMATBAR:
2169 set_toolbar_state(BANDID_FORMATBAR, !is_bar_visible(BANDID_FORMATBAR));
2170 update_window();
2171 break;
2173 case ID_TOGGLE_STATUSBAR:
2174 set_statusbar_state(!is_bar_visible(BANDID_STATUSBAR));
2175 update_window();
2176 break;
2178 case ID_DATETIME:
2180 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2181 DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_DATETIME), hWnd, (DLGPROC)datetime_proc);
2182 break;
2185 case ID_PARAFORMAT:
2187 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2188 DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_PARAFORMAT), hWnd,
2189 paraformat_proc);
2191 break;
2193 case ID_TABSTOPS:
2195 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2196 DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_TABSTOPS), hWnd, tabstops_proc);
2198 break;
2200 default:
2201 SendMessageW(hwndEditor, WM_COMMAND, wParam, lParam);
2202 break;
2204 return 0;
2207 static LRESULT OnInitPopupMenu( HWND hWnd, WPARAM wParam, LPARAM lParam )
2209 HMENU hMenu = (HMENU)wParam;
2210 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2211 HWND hwndStatus = GetDlgItem(hWnd, IDC_STATUSBAR);
2212 PARAFORMAT pf;
2213 int nAlignment = -1;
2214 int selFrom, selTo;
2215 GETTEXTLENGTHEX gt;
2216 LRESULT textLength;
2217 MENUITEMINFOW mi;
2219 SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&selFrom, (LPARAM)&selTo);
2220 EnableMenuItem(hMenu, ID_EDIT_COPY, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
2221 EnableMenuItem(hMenu, ID_EDIT_CUT, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
2223 pf.cbSize = sizeof(PARAFORMAT);
2224 SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2225 CheckMenuItem(hMenu, ID_EDIT_READONLY,
2226 MF_BYCOMMAND|(GetWindowLong(hwndEditor, GWL_STYLE)&ES_READONLY ? MF_CHECKED : MF_UNCHECKED));
2227 CheckMenuItem(hMenu, ID_EDIT_MODIFIED,
2228 MF_BYCOMMAND|(SendMessage(hwndEditor, EM_GETMODIFY, 0, 0) ? MF_CHECKED : MF_UNCHECKED));
2229 if (pf.dwMask & PFM_ALIGNMENT)
2230 nAlignment = pf.wAlignment;
2231 CheckMenuItem(hMenu, ID_ALIGN_LEFT, MF_BYCOMMAND|(nAlignment == PFA_LEFT) ?
2232 MF_CHECKED : MF_UNCHECKED);
2233 CheckMenuItem(hMenu, ID_ALIGN_CENTER, MF_BYCOMMAND|(nAlignment == PFA_CENTER) ?
2234 MF_CHECKED : MF_UNCHECKED);
2235 CheckMenuItem(hMenu, ID_ALIGN_RIGHT, MF_BYCOMMAND|(nAlignment == PFA_RIGHT) ?
2236 MF_CHECKED : MF_UNCHECKED);
2237 CheckMenuItem(hMenu, ID_BULLET, MF_BYCOMMAND | ((pf.wNumbering == PFN_BULLET) ?
2238 MF_CHECKED : MF_UNCHECKED));
2239 EnableMenuItem(hMenu, ID_EDIT_UNDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANUNDO, 0, 0)) ?
2240 MF_ENABLED : MF_GRAYED);
2241 EnableMenuItem(hMenu, ID_EDIT_REDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANREDO, 0, 0)) ?
2242 MF_ENABLED : MF_GRAYED);
2244 CheckMenuItem(hMenu, ID_TOGGLE_TOOLBAR, MF_BYCOMMAND|(is_bar_visible(BANDID_TOOLBAR)) ?
2245 MF_CHECKED : MF_UNCHECKED);
2247 CheckMenuItem(hMenu, ID_TOGGLE_FORMATBAR, MF_BYCOMMAND|(is_bar_visible(BANDID_FORMATBAR)) ?
2248 MF_CHECKED : MF_UNCHECKED);
2250 CheckMenuItem(hMenu, ID_TOGGLE_STATUSBAR, MF_BYCOMMAND|IsWindowVisible(hwndStatus) ?
2251 MF_CHECKED : MF_UNCHECKED);
2253 gt.flags = GTL_NUMCHARS;
2254 gt.codepage = 1200;
2255 textLength = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
2256 EnableMenuItem(hMenu, ID_FIND, MF_BYCOMMAND|(textLength ? MF_ENABLED : MF_GRAYED));
2258 mi.cbSize = sizeof(mi);
2259 mi.fMask = MIIM_DATA;
2261 GetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
2263 EnableMenuItem(hMenu, ID_FIND_NEXT, MF_BYCOMMAND|((textLength && mi.dwItemData) ?
2264 MF_ENABLED : MF_GRAYED));
2265 return 0;
2268 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam )
2270 int nStatusSize = 0;
2271 RECT rc;
2272 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2273 HWND hwndStatusBar = GetDlgItem(hWnd, IDC_STATUSBAR);
2274 HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
2275 int rebarHeight = 0;
2276 int rebarRows = 2;
2278 if (hwndStatusBar)
2280 SendMessageW(hwndStatusBar, WM_SIZE, 0, 0);
2281 if (IsWindowVisible(hwndStatusBar))
2283 GetClientRect(hwndStatusBar, &rc);
2284 nStatusSize = rc.bottom - rc.top;
2285 } else
2287 nStatusSize = 0;
2290 if (hwndReBar)
2292 if(!is_bar_visible(BANDID_TOOLBAR))
2293 rebarRows--;
2295 if(!is_bar_visible(BANDID_FORMATBAR))
2296 rebarRows--;
2298 rebarHeight = rebarRows ? SendMessageW(hwndReBar, RB_GETBARHEIGHT, 0, 0) : 0;
2300 rc.top = rc.left = 0;
2301 rc.bottom = rebarHeight;
2302 rc.right = LOWORD(lParam);
2303 SendMessageW(hwndReBar, RB_SIZETORECT, 0, (LPARAM)&rc);
2305 if (hwndEditor)
2307 GetClientRect(hWnd, &rc);
2308 MoveWindow(hwndEditor, 0, rebarHeight, rc.right, rc.bottom-nStatusSize-rebarHeight, TRUE);
2311 return DefWindowProcW(hWnd, WM_SIZE, wParam, lParam);
2314 static LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
2316 if(msg == ID_FINDMSGSTRING)
2317 return handle_findmsg((LPFINDREPLACEW)lParam);
2319 switch(msg)
2321 case WM_CREATE:
2322 return OnCreate( hWnd, wParam, lParam );
2324 case WM_USER:
2325 return OnUser( hWnd, wParam, lParam );
2327 case WM_NOTIFY:
2328 return OnNotify( hWnd, wParam, lParam );
2330 case WM_COMMAND:
2331 return OnCommand( hWnd, wParam, lParam );
2333 case WM_DESTROY:
2334 PostQuitMessage(0);
2335 break;
2337 case WM_CLOSE:
2338 if(prompt_save_changes())
2340 registry_set_options();
2341 registry_set_formatopts_all();
2342 PostQuitMessage(0);
2344 break;
2346 case WM_ACTIVATE:
2347 if (LOWORD(wParam))
2348 SetFocus(GetDlgItem(hWnd, IDC_EDITOR));
2349 return 0;
2351 case WM_INITMENUPOPUP:
2352 return OnInitPopupMenu( hWnd, wParam, lParam );
2354 case WM_SIZE:
2355 return OnSize( hWnd, wParam, lParam );
2357 case WM_CONTEXTMENU:
2358 if((HWND)wParam == hEditorWnd)
2359 return context_menu(lParam);
2360 else
2361 return DefWindowProcW(hWnd, msg, wParam, lParam);
2363 case WM_DROPFILES:
2365 WCHAR file[MAX_PATH];
2366 DragQueryFileW((HDROP)wParam, 0, file, MAX_PATH);
2367 DragFinish((HDROP)wParam);
2369 if(prompt_save_changes())
2370 DoOpenFile(file);
2372 break;
2374 default:
2375 return DefWindowProcW(hWnd, msg, wParam, lParam);
2378 return 0;
2381 int CALLBACK WinMain(HINSTANCE hInstance, HINSTANCE hOldInstance, LPSTR szCmdParagraph, int res)
2383 INITCOMMONCONTROLSEX classes = {8, ICC_BAR_CLASSES|ICC_COOL_CLASSES};
2384 HACCEL hAccel;
2385 WNDCLASSW wc;
2386 MSG msg;
2387 RECT rc;
2388 static const WCHAR wszAccelTable[] = {'M','A','I','N','A','C','C','E','L',
2389 'T','A','B','L','E','\0'};
2391 InitCommonControlsEx(&classes);
2393 hAccel = LoadAcceleratorsW(hInstance, wszAccelTable);
2395 wc.style = CS_HREDRAW | CS_VREDRAW;
2396 wc.lpfnWndProc = WndProc;
2397 wc.cbClsExtra = 0;
2398 wc.cbWndExtra = 4;
2399 wc.hInstance = hInstance;
2400 wc.hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_WORDPAD));
2401 wc.hCursor = LoadCursor(NULL, IDC_IBEAM);
2402 wc.hbrBackground = GetSysColorBrush(COLOR_WINDOW);
2403 wc.lpszMenuName = xszMainMenu;
2404 wc.lpszClassName = wszMainWndClass;
2405 RegisterClassW(&wc);
2407 rc = registry_read_winrect();
2408 hMainWnd = CreateWindowExW(0, wszMainWndClass, wszAppTitle, WS_OVERLAPPEDWINDOW,
2409 rc.left, rc.top, rc.right-rc.left, rc.bottom-rc.top, NULL, NULL, hInstance, NULL);
2410 ShowWindow(hMainWnd, SW_SHOWDEFAULT);
2412 set_caption(NULL);
2413 set_bar_states();
2414 hPopupMenu = LoadMenuW(hInstance, MAKEINTRESOURCEW(IDM_POPUP));
2416 HandleCommandLine(GetCommandLineW());
2418 while(GetMessageW(&msg,0,0,0))
2420 if (IsDialogMessage(hFindWnd, &msg))
2421 continue;
2423 if (TranslateAcceleratorW(hMainWnd, hAccel, &msg))
2424 continue;
2425 TranslateMessage(&msg);
2426 DispatchMessageW(&msg);
2427 if (!PeekMessageW(&msg, 0, 0, 0, PM_NOREMOVE))
2428 SendMessageW(hMainWnd, WM_USER, 0, 0);
2431 return 0;