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
37 static const WCHAR xszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
38 static const WCHAR xszMainMenu[] = {'M','A','I','N','M','E','N','U',0};
40 static const WCHAR wszRichEditClass[] = {'R','I','C','H','E','D','I','T','2','0','W',0};
41 static const WCHAR wszMainWndClass[] = {'W','O','R','D','P','A','D','T','O','P',0};
42 static const WCHAR wszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
45 static HWND hEditorWnd;
47 static void AddButton(HWND hwndToolBar, int nImage, int nCommand)
51 ZeroMemory(&button, sizeof(button));
52 button.iBitmap = nImage;
53 button.idCommand = nCommand;
54 button.fsState = TBSTATE_ENABLED;
55 button.fsStyle = TBSTYLE_BUTTON;
58 SendMessage(hwndToolBar, TB_ADDBUTTONS, 1, (LPARAM)&button);
61 static void AddSeparator(HWND hwndToolBar)
65 ZeroMemory(&button, sizeof(button));
69 button.fsStyle = TBSTYLE_SEP;
72 SendMessage(hwndToolBar, TB_ADDBUTTONS, 1, (LPARAM)&button);
75 static LPSTR stream_buffer;
76 static LONG stream_buffer_size;
78 static DWORD CALLBACK stream_in(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
80 LONG size = min(stream_buffer_size, cb);
82 memcpy(buffer, stream_buffer, size);
83 stream_buffer_size -= size;
84 stream_buffer += size;
89 static void DoOpenFile(LPCWSTR szFileName)
97 hFile = CreateFileW(szFileName, GENERIC_READ, FILE_SHARE_READ, NULL,
98 OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
99 if (hFile == INVALID_HANDLE_VALUE)
102 size = GetFileSize(hFile, NULL);
103 if (size == INVALID_FILE_SIZE)
110 pTemp = HeapAlloc(GetProcessHeap(), 0, size);
117 if (!ReadFile(hFile, pTemp, size, &dwNumRead, NULL))
120 HeapFree(GetProcessHeap(), 0, pTemp);
124 pTemp[dwNumRead] = 0;
126 memset(&es, 0, sizeof(es));
127 es.pfnCallback = stream_in;
129 stream_buffer = pTemp;
130 stream_buffer_size = size;
132 SendMessage(hEditorWnd, EM_STREAMIN, SF_RTF, (LPARAM)&es);
133 HeapFree(GetProcessHeap(), 0, pTemp);
135 SetFocus(hEditorWnd);
138 static void HandleCommandLine(LPWSTR cmdline)
143 /* skip white space */
144 while (*cmdline == ' ') cmdline++;
146 /* skip executable name */
147 delimiter = (*cmdline == '"' ? '"' : ' ');
149 if (*cmdline == delimiter) cmdline++;
150 while (*cmdline && *cmdline != delimiter) cmdline++;
151 if (*cmdline == delimiter) cmdline++;
153 while (*cmdline == ' ' || *cmdline == '-' || *cmdline == '/')
157 if (*cmdline++ == ' ') continue;
160 if (option) cmdline++;
161 while (*cmdline == ' ') cmdline++;
174 /* file name is passed on the command line */
175 if (cmdline[0] == '"')
178 cmdline[lstrlenW(cmdline) - 1] = 0;
181 InvalidateRect(hMainWnd, NULL, FALSE);
185 MessageBox(hMainWnd, "Printing not implemented", "WordPad", MB_OK);
188 static LRESULT OnCreate( HWND hWnd, WPARAM wParam, LPARAM lParam)
190 HWND hToolBarWnd, hReBarWnd;
191 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
198 CreateStatusWindow(CCS_NODIVIDER|WS_CHILD|WS_VISIBLE, "RichEdit text", hWnd, IDC_STATUSBAR);
200 hReBarWnd = CreateWindowEx(WS_EX_TOOLWINDOW, REBARCLASSNAME, NULL,
201 CCS_NODIVIDER|WS_CHILD|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|RBS_VARHEIGHT|CCS_TOP,
202 CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hWnd, (HMENU)IDC_REBAR, hInstance, NULL);
204 rbi.cbSize = sizeof(rbi);
207 if(!SendMessage(hReBarWnd, RB_SETBARINFO, 0, (LPARAM)&rbi))
210 hToolBarWnd = CreateToolbarEx(hReBarWnd, CCS_NOPARENTALIGN|CCS_NODIVIDER|CCS_NOMOVEY|WS_VISIBLE|WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_FLAT,
212 3, hInstance, IDB_TOOLBAR,
214 24, 24, 16, 16, sizeof(TBBUTTON));
216 ab.hInst = HINST_COMMCTRL;
217 ab.nID = IDB_STD_SMALL_COLOR;
218 nStdBitmaps = SendMessage(hToolBarWnd, TB_ADDBITMAP, 3, (LPARAM)&ab);
219 AddButton(hToolBarWnd, nStdBitmaps+STD_FILENEW, ID_FILE_NEW);
220 AddButton(hToolBarWnd, nStdBitmaps+STD_FILEOPEN, ID_FILE_OPEN);
221 AddButton(hToolBarWnd, nStdBitmaps+STD_FILESAVE, ID_FILE_SAVE);
222 AddSeparator(hToolBarWnd);
223 AddButton(hToolBarWnd, nStdBitmaps+STD_CUT, ID_EDIT_CUT);
224 AddButton(hToolBarWnd, nStdBitmaps+STD_COPY, ID_EDIT_COPY);
225 AddSeparator(hToolBarWnd);
226 AddButton(hToolBarWnd, nStdBitmaps+STD_UNDO, ID_EDIT_UNDO);
227 AddButton(hToolBarWnd, nStdBitmaps+STD_REDOW, ID_EDIT_REDO);
228 AddSeparator(hToolBarWnd);
229 AddButton(hToolBarWnd, 0, ID_FORMAT_BOLD);
230 AddButton(hToolBarWnd, 1, ID_FORMAT_ITALIC);
231 AddButton(hToolBarWnd, 2, ID_FORMAT_UNDERLINE);
233 SendMessage(hToolBarWnd, TB_ADDSTRING, 0, (LPARAM)"Exit\0");
234 SendMessage(hToolBarWnd, TB_AUTOSIZE, 0, 0);
236 rbb.cbSize = sizeof(rbb);
237 rbb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_CHILD | RBBIM_STYLE;
238 rbb.fStyle = RBBS_CHILDEDGE;
240 rbb.hwndChild = hToolBarWnd;
242 rbb.cyChild = rbb.cyMinChild = HIWORD(SendMessage(hToolBarWnd, TB_GETBUTTONSIZE, 0, 0));
244 SendMessage(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
246 hDLL = LoadLibrary("RICHED20.DLL");
249 hEditorWnd = CreateWindowExW(WS_EX_CLIENTEDGE, wszRichEditClass, NULL,
250 WS_CHILD|WS_VISIBLE|ES_MULTILINE|ES_AUTOVSCROLL|ES_WANTRETURN|WS_VSCROLL,
251 0, 0, 1000, 100, hWnd, (HMENU)IDC_EDITOR, hInstance, NULL);
254 fprintf(stderr, "Error code %u\n", GetLastError());
259 SetFocus(hEditorWnd);
260 SendMessage(hEditorWnd, EM_SETEVENTMASK, 0, ENM_SELCHANGE);
264 static LRESULT OnUser( HWND hWnd, WPARAM wParam, LPARAM lParam)
266 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
267 HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
268 HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
272 ZeroMemory(&fmt, sizeof(fmt));
273 fmt.cbSize = sizeof(fmt);
275 SendMessage(hwndEditor, EM_GETCHARFORMAT, TRUE, (LPARAM)&fmt);
277 SendMessage(hwndEditor, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
278 SendMessage(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_UNDO,
279 SendMessage(hwndEditor, EM_CANUNDO, 0, 0));
280 SendMessage(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_REDO,
281 SendMessage(hwndEditor, EM_CANREDO, 0, 0));
282 SendMessage(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_CUT, from == to ? 0 : 1);
283 SendMessage(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_COPY, from == to ? 0 : 1);
284 SendMessage(hwndToolBar, TB_CHECKBUTTON, ID_FORMAT_BOLD, (fmt.dwMask & CFM_BOLD) && (fmt.dwEffects & CFE_BOLD));
285 SendMessage(hwndToolBar, TB_INDETERMINATE, ID_FORMAT_BOLD, !(fmt.dwMask & CFM_BOLD));
286 SendMessage(hwndToolBar, TB_CHECKBUTTON, ID_FORMAT_ITALIC, (fmt.dwMask & CFM_ITALIC) && (fmt.dwEffects & CFE_ITALIC));
287 SendMessage(hwndToolBar, TB_INDETERMINATE, ID_FORMAT_ITALIC, !(fmt.dwMask & CFM_ITALIC));
288 SendMessage(hwndToolBar, TB_CHECKBUTTON, ID_FORMAT_UNDERLINE, (fmt.dwMask & CFM_UNDERLINE) && (fmt.dwEffects & CFE_UNDERLINE));
289 SendMessage(hwndToolBar, TB_INDETERMINATE, ID_FORMAT_UNDERLINE, !(fmt.dwMask & CFM_UNDERLINE));
293 static LRESULT OnNotify( HWND hWnd, WPARAM wParam, LPARAM lParam)
295 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
296 NMHDR *pHdr = (NMHDR *)lParam;
298 if (pHdr->hwndFrom != hwndEditor)
301 if (pHdr->code == EN_SELCHANGE)
303 SELCHANGE *pSC = (SELCHANGE *)lParam;
306 sprintf( buf,"selection = %d..%d, line count=%ld\n",
307 pSC->chrg.cpMin, pSC->chrg.cpMax,
308 SendMessage(hwndEditor, EM_GETLINECOUNT, 0, 0));
309 SetWindowText(GetDlgItem(hWnd, IDC_STATUSBAR), buf);
310 SendMessage(hWnd, WM_USER, 0, 0);
316 static LRESULT OnCommand( HWND hWnd, WPARAM wParam, LPARAM lParam)
318 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
320 if ((HWND)lParam == hwndEditor)
323 switch(LOWORD(wParam))
326 PostMessage(hWnd, WM_CLOSE, 0, 0);
330 SetWindowTextA(hwndEditor, "");
331 /* FIXME: set default format too */
336 MessageBox(hWnd, "Open/Save not implemented", "WordPad", MB_OK);
340 case ID_FORMAT_ITALIC:
341 case ID_FORMAT_UNDERLINE:
345 if (LOWORD(wParam) == ID_FORMAT_ITALIC) mask = CFM_ITALIC;
346 if (LOWORD(wParam) == ID_FORMAT_UNDERLINE) mask = CFM_UNDERLINE;
348 ZeroMemory(&fmt, sizeof(fmt));
349 fmt.cbSize = sizeof(fmt);
350 SendMessage(hwndEditor, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
351 if (!(fmt.dwMask&mask))
352 fmt.dwEffects |= mask;
354 fmt.dwEffects ^= mask;
356 SendMessage(hwndEditor, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
361 PostMessage(hwndEditor, WM_CUT, 0, 0);
365 PostMessage(hwndEditor, WM_COPY, 0, 0);
368 case ID_EDIT_SELECTALL:
370 CHARRANGE range = {0, -1};
371 SendMessage(hwndEditor, EM_EXSETSEL, 0, (LPARAM)&range);
372 /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
376 case ID_EDIT_GETTEXT:
378 int nLen = GetWindowTextLengthW(hwndEditor);
379 LPWSTR data = HeapAlloc( GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR) );
382 GetWindowTextW(hwndEditor, data, nLen+1);
383 MessageBoxW(NULL, data, xszAppTitle, MB_OK);
385 HeapFree( GetProcessHeap(), 0, data);
386 data = HeapAlloc(GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR));
388 tr.chrg.cpMax = nLen;
390 SendMessage (hwndEditor, EM_GETTEXTRANGE, 0, (LPARAM)&tr);
391 MessageBoxW(NULL, data, xszAppTitle, MB_OK);
392 HeapFree( GetProcessHeap(), 0, data );
394 /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
398 case ID_EDIT_CHARFORMAT:
399 case ID_EDIT_DEFCHARFORMAT:
403 ZeroMemory(&cf, sizeof(cf));
404 cf.cbSize = sizeof(cf);
406 i = SendMessage(hwndEditor, EM_GETCHARFORMAT,
407 LOWORD(wParam) == ID_EDIT_CHARFORMAT, (LPARAM)&cf);
411 case ID_EDIT_PARAFORMAT:
414 ZeroMemory(&pf, sizeof(pf));
415 pf.cbSize = sizeof(pf);
416 SendMessage(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
420 case ID_EDIT_SELECTIONINFO:
422 CHARRANGE range = {0, -1};
426 SendMessage(hwndEditor, EM_EXGETSEL, 0, (LPARAM)&range);
427 data = HeapAlloc(GetProcessHeap(), 0, sizeof(*data) * (range.cpMax-range.cpMin+1));
428 SendMessage(hwndEditor, EM_GETSELTEXT, 0, (LPARAM)data);
429 sprintf(buf, "Start = %d, End = %d", range.cpMin, range.cpMax);
430 MessageBoxA(hWnd, buf, "Editor", MB_OK);
431 MessageBoxW(hWnd, data, xszAppTitle, MB_OK);
432 HeapFree( GetProcessHeap(), 0, data);
433 /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
437 case ID_EDIT_READONLY:
439 long nStyle = GetWindowLong(hwndEditor, GWL_STYLE);
440 if (nStyle & ES_READONLY)
441 SendMessage(hwndEditor, EM_SETREADONLY, 0, 0);
443 SendMessage(hwndEditor, EM_SETREADONLY, 1, 0);
447 case ID_EDIT_MODIFIED:
448 if (SendMessage(hwndEditor, EM_GETMODIFY, 0, 0))
449 SendMessage(hwndEditor, EM_SETMODIFY, 0, 0);
451 SendMessage(hwndEditor, EM_SETMODIFY, 1, 0);
455 SendMessage(hwndEditor, EM_UNDO, 0, 0);
459 SendMessage(hwndEditor, EM_REDO, 0, 0);
463 case ID_ALIGN_CENTER:
468 pf.cbSize = sizeof(pf);
469 pf.dwMask = PFM_ALIGNMENT;
470 switch(LOWORD(wParam)) {
471 case ID_ALIGN_LEFT: pf.wAlignment = PFA_LEFT; break;
472 case ID_ALIGN_CENTER: pf.wAlignment = PFA_CENTER; break;
473 case ID_ALIGN_RIGHT: pf.wAlignment = PFA_RIGHT; break;
475 SendMessage(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
480 SendMessage(hwndEditor, EM_SETBKGNDCOLOR, 1, 0);
484 SendMessage(hwndEditor, EM_SETBKGNDCOLOR, 0, RGB(255,255,192));
488 SendMessage(hwndEditor, WM_COMMAND, wParam, lParam);
494 static LRESULT OnInitPopupMenu( HWND hWnd, WPARAM wParam, LPARAM lParam )
496 HMENU hMenu = (HMENU)wParam;
497 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
501 pf.cbSize = sizeof(PARAFORMAT);
502 SendMessage(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
503 CheckMenuItem(hMenu, ID_EDIT_READONLY,
504 MF_BYCOMMAND|(GetWindowLong(hwndEditor, GWL_STYLE)&ES_READONLY ? MF_CHECKED : MF_UNCHECKED));
505 CheckMenuItem(hMenu, ID_EDIT_MODIFIED,
506 MF_BYCOMMAND|(SendMessage(hwndEditor, EM_GETMODIFY, 0, 0) ? MF_CHECKED : MF_UNCHECKED));
507 if (pf.dwMask & PFM_ALIGNMENT)
508 nAlignment = pf.wAlignment;
509 CheckMenuItem(hMenu, ID_ALIGN_LEFT, MF_BYCOMMAND|(nAlignment == PFA_LEFT) ? MF_CHECKED : MF_UNCHECKED);
510 CheckMenuItem(hMenu, ID_ALIGN_CENTER, MF_BYCOMMAND|(nAlignment == PFA_CENTER) ? MF_CHECKED : MF_UNCHECKED);
511 CheckMenuItem(hMenu, ID_ALIGN_RIGHT, MF_BYCOMMAND|(nAlignment == PFA_RIGHT) ? MF_CHECKED : MF_UNCHECKED);
512 EnableMenuItem(hMenu, ID_EDIT_UNDO, MF_BYCOMMAND|(SendMessage(hwndEditor, EM_CANUNDO, 0, 0)) ? MF_ENABLED : MF_GRAYED);
513 EnableMenuItem(hMenu, ID_EDIT_REDO, MF_BYCOMMAND|(SendMessage(hwndEditor, EM_CANREDO, 0, 0)) ? MF_ENABLED : MF_GRAYED);
517 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam )
519 int nStatusSize = 0, nTBSize = 0;
521 HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
522 HWND hwndStatusBar = GetDlgItem(hWnd, IDC_STATUSBAR);
523 HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
524 HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
528 SendMessage(hwndStatusBar, WM_SIZE, 0, 0);
529 GetClientRect(hwndStatusBar, &rc);
530 nStatusSize = rc.bottom - rc.top;
534 rc.left = rc.top = 0;
535 rc.right = LOWORD(lParam);
536 rc.bottom = HIWORD(lParam);
537 SendMessage(hwndToolBar, TB_AUTOSIZE, 0, 0);
538 SendMessage(hwndReBar, RB_SIZETORECT, 0, (LPARAM)&rc);
539 nTBSize = SendMessage(hwndReBar, RB_GETBARHEIGHT, 0, 0);
540 GetClientRect(hwndReBar, &rc);
541 MoveWindow(hwndReBar, 0, 0, LOWORD(lParam), rc.right, FALSE);
545 GetClientRect(hWnd, &rc);
546 MoveWindow(hwndEditor, 0, nTBSize, rc.right, rc.bottom-nStatusSize-nTBSize, TRUE);
549 return DefWindowProcW(hWnd, WM_SIZE, wParam, lParam);
552 static LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
557 return OnCreate( hWnd, wParam, lParam );
560 return OnUser( hWnd, wParam, lParam );
563 return OnNotify( hWnd, wParam, lParam );
566 return OnCommand( hWnd, wParam, lParam );
574 SetFocus(GetDlgItem(hWnd, IDC_EDITOR));
577 case WM_INITMENUPOPUP:
578 return OnInitPopupMenu( hWnd, wParam, lParam );
581 return OnSize( hWnd, wParam, lParam );
584 return DefWindowProcW(hWnd, msg, wParam, lParam);
590 int CALLBACK WinMain(HINSTANCE hInstance, HINSTANCE hOldInstance, LPSTR szCmdParagraph, int res)
592 INITCOMMONCONTROLSEX classes = {8, ICC_BAR_CLASSES|ICC_COOL_CLASSES};
597 InitCommonControlsEx(&classes);
599 hAccel = LoadAccelerators(hInstance, "MAINACCELTABLE");
601 wc.style = CS_HREDRAW | CS_VREDRAW;
602 wc.lpfnWndProc = WndProc;
605 wc.hInstance = hInstance;
607 wc.hCursor = LoadCursor(NULL, IDC_IBEAM);
608 wc.hbrBackground = GetSysColorBrush(COLOR_WINDOW);
609 wc.lpszMenuName = xszMainMenu;
610 wc.lpszClassName = wszMainWndClass;
613 hMainWnd = CreateWindowExW(0, wszMainWndClass, wszAppTitle, WS_OVERLAPPEDWINDOW,
614 CW_USEDEFAULT, CW_USEDEFAULT, 680, 260, NULL, NULL, hInstance, NULL);
615 ShowWindow(hMainWnd, SW_SHOWMAXIMIZED);
617 HandleCommandLine(GetCommandLineW());
619 while(GetMessage(&msg,0,0,0))
621 if (TranslateAccelerator(hMainWnd, hAccel, &msg))
623 TranslateMessage(&msg);
624 DispatchMessage(&msg);
625 if (!PeekMessage(&msg, 0, 0, 0, PM_NOREMOVE))
626 SendMessage(hMainWnd, WM_USER, 0, 0);