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 char szFilter[MAX_STRING_LEN];
  50
  51 /* Load string resources */
  52 static void DoLoadStrings()
  53 {
  54     LPSTR p = szFilter;
  55     char files_rtf[] = "*.rtf";
  56     char files_txt[] = "*.txt";
  57     char files_all[] = "*.*";
  58     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
  59
  60     LoadString(hInstance, STRING_RICHTEXT_FILES_RTF, p, MAX_STRING_LEN);
  61     p += strlen(p) + 1;
  62     lstrcpy(p, files_rtf);
  63     p += strlen(p) + 1;
  64     LoadString(hInstance, STRING_TEXT_FILES_TXT, p, MAX_STRING_LEN);
  65     p += strlen(p) + 1;
  66     lstrcpy(p, files_txt);
  67     p += strlen(p) + 1;
  68     LoadString(hInstance, STRING_ALL_FILES, p, MAX_STRING_LEN);
  69     p += strlen(p) + 1;
  70     lstrcpy(p, files_all);
  71     p += strlen(p) + 1;
  72     *p = '\0';
  73 }
  74
  75 static void AddButton(HWND hwndToolBar, int nImage, int nCommand)
  76 {
  77     TBBUTTON button;
  78
  79     ZeroMemory(&button, sizeof(button));
  80     button.iBitmap = nImage;
  81     button.idCommand = nCommand;
  82     button.fsState = TBSTATE_ENABLED;
  83     button.fsStyle = TBSTYLE_BUTTON;
  84     button.dwData = 0;
  85     button.iString = -1;
  86     SendMessage(hwndToolBar, TB_ADDBUTTONS, 1, (LPARAM)&button);
  87 }
  88
  89 static void AddSeparator(HWND hwndToolBar)
  90 {
  91     TBBUTTON button;
  92
  93     ZeroMemory(&button, sizeof(button));
  94     button.iBitmap = -1;
  95     button.idCommand = 0;
  96     button.fsState = 0;
  97     button.fsStyle = TBSTYLE_SEP;
  98     button.dwData = 0;
  99     button.iString = -1;
 100     SendMessage(hwndToolBar, TB_ADDBUTTONS, 1, (LPARAM)&button);
 101 }
 102
 103 static LPSTR stream_buffer;
 104 static LONG  stream_buffer_size;
 105
 106 static DWORD CALLBACK stream_in(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
 107 {
 108     LONG size = min(stream_buffer_size, cb);
 109
 110     memcpy(buffer, stream_buffer, size);
 111     stream_buffer_size -= size;
 112     stream_buffer += size;
 113     *pcb = size;
 114     return 0;
 115 }
 116
 117 static void DoOpenFile(LPCWSTR szFileName)
 118 {
 119     HANDLE hFile;
 120     LPSTR pTemp;
 121     DWORD size;
 122     DWORD dwNumRead;
 123     EDITSTREAM es;
 124
 125     char szCaption[MAX_PATH];
 126     char szAppTitle[sizeof(wszAppTitle)];
 127     char szSeparator[] = " - ";
 128
 129     hFile = CreateFileW(szFileName, GENERIC_READ, FILE_SHARE_READ, NULL,
 130                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
 131     if (hFile == INVALID_HANDLE_VALUE)
 132         return;
 133
 134     size = GetFileSize(hFile, NULL);
 135     if (size == INVALID_FILE_SIZE)
 136     {
 137         CloseHandle(hFile);
 138         return;
 139     }
 140     size++;
 141
 142     pTemp = HeapAlloc(GetProcessHeap(), 0, size);
 143     if (!pTemp)
 144     {
 145         CloseHandle(hFile);
 146         return;
 147     }
 148
 149     if (!ReadFile(hFile, pTemp, size, &dwNumRead, NULL))
 150     {
 151         CloseHandle(hFile);
 152         HeapFree(GetProcessHeap(), 0, pTemp);
 153         return;
 154     }
 155     CloseHandle(hFile);
 156     pTemp[dwNumRead] = 0;
 157
 158     memset(&es, 0, sizeof(es));
 159     es.pfnCallback = stream_in;
 160
 161     stream_buffer = pTemp;
 162     stream_buffer_size = size;
 163
 164     SendMessage(hEditorWnd, EM_STREAMIN, SF_RTF, (LPARAM)&es);
 165     HeapFree(GetProcessHeap(), 0, pTemp);
 166
 167     SetFocus(hEditorWnd);
 168
 169     WideCharToMultiByte(CP_ACP, 0, wszAppTitle, -1, szAppTitle, sizeof(wszAppTitle), NULL, NULL);
 170
 171     WideCharToMultiByte(CP_ACP, 0, szFileName, -1, szCaption, MAX_PATH, NULL, NULL);
 172
 173     lstrcat(szCaption, szSeparator);
 174     lstrcat(szCaption, szAppTitle);
 175
 176     SetWindowText(hMainWnd, szCaption);
 177 }
 178
 179 static void DialogOpenFile()
 180 {
 181     OPENFILENAME ofn;
 182
 183     char szFile[MAX_PATH] = "";
 184     char szDefExt[] = "rtf";
 185
 186     ZeroMemory(&ofn, sizeof(ofn));
 187
 188     ofn.lStructSize = sizeof(ofn);
 189     ofn.Flags = OFN_HIDEREADONLY | OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST;
 190     ofn.hwndOwner = hMainWnd;
 191     ofn.lpstrFilter = szFilter;
 192     ofn.lpstrFile = szFile;
 193     ofn.nMaxFile = MAX_PATH;
 194     ofn.lpstrDefExt = szDefExt;
 195
 196     if(GetOpenFileName(&ofn))
 197     {
 198         WCHAR szOpenFile[MAX_PATH];
 199
 200         MultiByteToWideChar(CP_ACP, 0, ofn.lpstrFile, MAX_PATH, szOpenFile, sizeof(szOpenFile)/sizeof(szOpenFile[0]));
 201
 202         DoOpenFile(szOpenFile);
 203     }
 204 }
 205
 206 static void HandleCommandLine(LPWSTR cmdline)
 207 {
 208     WCHAR delimiter;
 209     int opt_print = 0;
 210
 211     /* skip white space */
 212     while (*cmdline == ' ') cmdline++;
 213
 214     /* skip executable name */
 215     delimiter = (*cmdline == '"' ? '"' : ' ');
 216
 217     if (*cmdline == delimiter) cmdline++;
 218     while (*cmdline && *cmdline != delimiter) cmdline++;
 219     if (*cmdline == delimiter) cmdline++;
 220
 221     while (*cmdline == ' ' || *cmdline == '-' || *cmdline == '/')
 222     {
 223         WCHAR option;
 224
 225         if (*cmdline++ == ' ') continue;
 226
 227         option = *cmdline;
 228         if (option) cmdline++;
 229         while (*cmdline == ' ') cmdline++;
 230
 231         switch (option)
 232         {
 233             case 'p':
 234             case 'P':
 235                 opt_print = 1;
 236                 break;
 237         }
 238     }
 239
 240     if (*cmdline)
 241     {
 242         /* file name is passed on the command line */
 243         if (cmdline[0] == '"')
 244         {
 245             cmdline++;
 246             cmdline[lstrlenW(cmdline) - 1] = 0;
 247         }
 248         DoOpenFile(cmdline);
 249         InvalidateRect(hMainWnd, NULL, FALSE);
 250     }
 251
 252     if (opt_print)
 253         MessageBox(hMainWnd, "Printing not implemented", "WordPad", MB_OK);
 254 }
 255
 256 static LRESULT OnCreate( HWND hWnd, WPARAM wParam, LPARAM lParam)
 257 {
 258     HWND hToolBarWnd, hReBarWnd;
 259     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
 260     HANDLE hDLL;
 261     TBADDBITMAP ab;
 262     int nStdBitmaps = 0;
 263     REBARINFO rbi;
 264     REBARBANDINFO rbb;
 265
 266     CreateStatusWindow(CCS_NODIVIDER|WS_CHILD|WS_VISIBLE, "RichEdit text", hWnd, IDC_STATUSBAR);
 267
 268     hReBarWnd = CreateWindowEx(WS_EX_TOOLWINDOW, REBARCLASSNAME, NULL,
 269       CCS_NODIVIDER|WS_CHILD|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|RBS_VARHEIGHT|CCS_TOP,
 270       CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hWnd, (HMENU)IDC_REBAR, hInstance, NULL);
 271
 272     rbi.cbSize = sizeof(rbi);
 273     rbi.fMask = 0;
 274     rbi.himl = NULL;
 275     if(!SendMessage(hReBarWnd, RB_SETBARINFO, 0, (LPARAM)&rbi))
 276         return -1;
 277
 278     hToolBarWnd = CreateToolbarEx(hReBarWnd, CCS_NOPARENTALIGN|CCS_NODIVIDER|CCS_NOMOVEY|WS_VISIBLE|WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_BUTTON,
 279       IDC_TOOLBAR,
 280       3, hInstance, IDB_TOOLBAR,
 281       NULL, 0,
 282       24, 24, 16, 16, sizeof(TBBUTTON));
 283
 284     ab.hInst = HINST_COMMCTRL;
 285     ab.nID = IDB_STD_SMALL_COLOR;
 286     nStdBitmaps = SendMessage(hToolBarWnd, TB_ADDBITMAP, 3, (LPARAM)&ab);
 287     AddButton(hToolBarWnd, nStdBitmaps+STD_FILENEW, ID_FILE_NEW);
 288     AddButton(hToolBarWnd, nStdBitmaps+STD_FILEOPEN, ID_FILE_OPEN);
 289     AddButton(hToolBarWnd, nStdBitmaps+STD_FILESAVE, ID_FILE_SAVE);
 290     AddSeparator(hToolBarWnd);
 291     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINT, ID_PRINT);
 292     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINTPRE, ID_PREVIEW);
 293     AddSeparator(hToolBarWnd);
 294     AddButton(hToolBarWnd, nStdBitmaps+STD_FIND, ID_FIND);
 295     AddSeparator(hToolBarWnd);
 296     AddButton(hToolBarWnd, nStdBitmaps+STD_CUT, ID_EDIT_CUT);
 297     AddButton(hToolBarWnd, nStdBitmaps+STD_COPY, ID_EDIT_COPY);
 298     AddButton(hToolBarWnd, nStdBitmaps+STD_PASTE, ID_EDIT_PASTE);
 299     AddButton(hToolBarWnd, nStdBitmaps+STD_UNDO, ID_EDIT_UNDO);
 300     AddButton(hToolBarWnd, nStdBitmaps+STD_REDOW, ID_EDIT_REDO);
 301     AddSeparator(hToolBarWnd);
 302     AddButton(hToolBarWnd, 0, ID_FORMAT_BOLD);
 303     AddButton(hToolBarWnd, 1, ID_FORMAT_ITALIC);
 304     AddButton(hToolBarWnd, 2, ID_FORMAT_UNDERLINE);
 305
 306     SendMessage(hToolBarWnd, TB_ADDSTRING, 0, (LPARAM)"Exit\0");
 307     SendMessage(hToolBarWnd, TB_AUTOSIZE, 0, 0);
 308
 309     rbb.cbSize = sizeof(rbb);
 310     rbb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_CHILD | RBBIM_STYLE;
 311     rbb.fStyle = RBBS_CHILDEDGE;
 312     rbb.cx = 500;
 313     rbb.hwndChild = hToolBarWnd;
 314     rbb.cxMinChild = 0;
 315     rbb.cyChild = rbb.cyMinChild = HIWORD(SendMessage(hToolBarWnd, TB_GETBUTTONSIZE, 0, 0));
 316
 317     SendMessage(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
 318
 319     hDLL = LoadLibrary("RICHED20.DLL");
 320     assert(hDLL);
 321
 322     hEditorWnd = CreateWindowExW(WS_EX_CLIENTEDGE, wszRichEditClass, NULL,
 323       WS_CHILD|WS_VISIBLE|ES_MULTILINE|ES_AUTOVSCROLL|ES_WANTRETURN|WS_VSCROLL,
 324       0, 0, 1000, 100, hWnd, (HMENU)IDC_EDITOR, hInstance, NULL);
 325     if (!hEditorWnd)
 326     {
 327         fprintf(stderr, "Error code %u\n", GetLastError());
 328         return -1;
 329     }
 330     assert(hEditorWnd);
 331
 332     SetFocus(hEditorWnd);
 333     SendMessage(hEditorWnd, EM_SETEVENTMASK, 0, ENM_SELCHANGE);
 334
 335     DoLoadStrings();
 336
 337     return 0;
 338 }
 339
 340 static LRESULT OnUser( HWND hWnd, WPARAM wParam, LPARAM lParam)
 341 {
 342     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
 343     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
 344     HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
 345     int from, to;
 346     CHARFORMAT2W fmt;
 347
 348     ZeroMemory(&fmt, sizeof(fmt));
 349     fmt.cbSize = sizeof(fmt);
 350
 351     SendMessage(hwndEditor, EM_GETCHARFORMAT, TRUE, (LPARAM)&fmt);
 352
 353     SendMessage(hwndEditor, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
 354     SendMessage(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_UNDO,
 355       SendMessage(hwndEditor, EM_CANUNDO, 0, 0));
 356     SendMessage(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_REDO,
 357       SendMessage(hwndEditor, EM_CANREDO, 0, 0));
 358     SendMessage(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_CUT, from == to ? 0 : 1);
 359     SendMessage(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_COPY, from == to ? 0 : 1);
 360     SendMessage(hwndToolBar, TB_CHECKBUTTON, ID_FORMAT_BOLD, (fmt.dwMask & CFM_BOLD) && (fmt.dwEffects & CFE_BOLD));
 361     SendMessage(hwndToolBar, TB_INDETERMINATE, ID_FORMAT_BOLD, !(fmt.dwMask & CFM_BOLD));
 362     SendMessage(hwndToolBar, TB_CHECKBUTTON, ID_FORMAT_ITALIC, (fmt.dwMask & CFM_ITALIC) && (fmt.dwEffects & CFE_ITALIC));
 363     SendMessage(hwndToolBar, TB_INDETERMINATE, ID_FORMAT_ITALIC, !(fmt.dwMask & CFM_ITALIC));
 364     SendMessage(hwndToolBar, TB_CHECKBUTTON, ID_FORMAT_UNDERLINE, (fmt.dwMask & CFM_UNDERLINE) && (fmt.dwEffects & CFE_UNDERLINE));
 365     SendMessage(hwndToolBar, TB_INDETERMINATE, ID_FORMAT_UNDERLINE, !(fmt.dwMask & CFM_UNDERLINE));
 366     return 0;
 367 }
 368
 369 static LRESULT OnNotify( HWND hWnd, WPARAM wParam, LPARAM lParam)
 370 {
 371     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
 372     NMHDR *pHdr = (NMHDR *)lParam;
 373
 374     if (pHdr->hwndFrom != hwndEditor)
 375         return 0;
 376
 377     if (pHdr->code == EN_SELCHANGE)
 378     {
 379         SELCHANGE *pSC = (SELCHANGE *)lParam;
 380         char buf[128];
 381
 382         sprintf( buf,"selection = %d..%d, line count=%ld\n",
 383                  pSC->chrg.cpMin, pSC->chrg.cpMax,
 384         SendMessage(hwndEditor, EM_GETLINECOUNT, 0, 0));
 385         SetWindowText(GetDlgItem(hWnd, IDC_STATUSBAR), buf);
 386         SendMessage(hWnd, WM_USER, 0, 0);
 387         return 1;
 388     }
 389     return 0;
 390 }
 391
 392 static LRESULT OnCommand( HWND hWnd, WPARAM wParam, LPARAM lParam)
 393 {
 394     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
 395
 396     if ((HWND)lParam == hwndEditor)
 397         return 0;
 398
 399     switch(LOWORD(wParam))
 400     {
 401     case ID_FILE_EXIT:
 402         PostMessage(hWnd, WM_CLOSE, 0, 0);
 403         break;
 404
 405     case ID_FILE_NEW:
 406         SetWindowTextA(hwndEditor, "");
 407         /* FIXME: set default format too */
 408         break;
 409
 410     case ID_FILE_OPEN:
 411         DialogOpenFile();
 412         break;
 413
 414     case ID_FILE_SAVE:
 415     case ID_PRINT:
 416     case ID_PREVIEW:
 417     case ID_FIND:
 418         MessageBox(hWnd, "Not implemented", "WordPad", MB_OK);
 419         break;
 420
 421     case ID_FORMAT_BOLD:
 422     case ID_FORMAT_ITALIC:
 423     case ID_FORMAT_UNDERLINE:
 424         {
 425         CHARFORMAT2W fmt;
 426         int mask = CFM_BOLD;
 427         if (LOWORD(wParam) == ID_FORMAT_ITALIC) mask = CFM_ITALIC;
 428         if (LOWORD(wParam) == ID_FORMAT_UNDERLINE) mask = CFM_UNDERLINE;
 429
 430         ZeroMemory(&fmt, sizeof(fmt));
 431         fmt.cbSize = sizeof(fmt);
 432         SendMessage(hwndEditor, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 433         if (!(fmt.dwMask&mask))
 434             fmt.dwEffects |= mask;
 435         else
 436             fmt.dwEffects ^= mask;
 437         fmt.dwMask = mask;
 438         SendMessage(hwndEditor, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 439         break;
 440         }
 441
 442     case ID_EDIT_CUT:
 443         PostMessage(hwndEditor, WM_CUT, 0, 0);
 444         break;
 445
 446     case ID_EDIT_COPY:
 447         PostMessage(hwndEditor, WM_COPY, 0, 0);
 448         break;
 449
 450     case ID_EDIT_PASTE:
 451         PostMessage(hwndEditor, WM_PASTE, 0, 0);
 452         break;
 453
 454     case ID_EDIT_CLEAR:
 455         PostMessage(hwndEditor, WM_CLEAR, 0, 0);
 456         break;
 457
 458     case ID_EDIT_SELECTALL:
 459         {
 460         CHARRANGE range = {0, -1};
 461         SendMessage(hwndEditor, EM_EXSETSEL, 0, (LPARAM)&range);
 462         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
 463         return 0;
 464         }
 465
 466     case ID_EDIT_GETTEXT:
 467         {
 468         int nLen = GetWindowTextLengthW(hwndEditor);
 469         LPWSTR data = HeapAlloc( GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR) );
 470         TEXTRANGEW tr;
 471
 472         GetWindowTextW(hwndEditor, data, nLen+1);
 473         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
 474
 475         HeapFree( GetProcessHeap(), 0, data);
 476         data = HeapAlloc(GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR));
 477         tr.chrg.cpMin = 0;
 478         tr.chrg.cpMax = nLen;
 479         tr.lpstrText = data;
 480         SendMessage (hwndEditor, EM_GETTEXTRANGE, 0, (LPARAM)&tr);
 481         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
 482         HeapFree( GetProcessHeap(), 0, data );
 483
 484         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
 485         return 0;
 486         }
 487
 488     case ID_EDIT_CHARFORMAT:
 489     case ID_EDIT_DEFCHARFORMAT:
 490         {
 491         CHARFORMAT2W cf;
 492         LRESULT i;
 493         ZeroMemory(&cf, sizeof(cf));
 494         cf.cbSize = sizeof(cf);
 495         cf.dwMask = 0;
 496         i = SendMessage(hwndEditor, EM_GETCHARFORMAT,
 497                         LOWORD(wParam) == ID_EDIT_CHARFORMAT, (LPARAM)&cf);
 498         return 0;
 499         }
 500
 501     case ID_EDIT_PARAFORMAT:
 502         {
 503         PARAFORMAT2 pf;
 504         ZeroMemory(&pf, sizeof(pf));
 505         pf.cbSize = sizeof(pf);
 506         SendMessage(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
 507         return 0;
 508         }
 509
 510     case ID_EDIT_SELECTIONINFO:
 511         {
 512         CHARRANGE range = {0, -1};
 513         char buf[128];
 514         WCHAR *data = NULL;
 515
 516         SendMessage(hwndEditor, EM_EXGETSEL, 0, (LPARAM)&range);
 517         data = HeapAlloc(GetProcessHeap(), 0, sizeof(*data) * (range.cpMax-range.cpMin+1));
 518         SendMessage(hwndEditor, EM_GETSELTEXT, 0, (LPARAM)data);
 519         sprintf(buf, "Start = %d, End = %d", range.cpMin, range.cpMax);
 520         MessageBoxA(hWnd, buf, "Editor", MB_OK);
 521         MessageBoxW(hWnd, data, xszAppTitle, MB_OK);
 522         HeapFree( GetProcessHeap(), 0, data);
 523         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
 524         return 0;
 525         }
 526
 527     case ID_EDIT_READONLY:
 528         {
 529         long nStyle = GetWindowLong(hwndEditor, GWL_STYLE);
 530         if (nStyle & ES_READONLY)
 531             SendMessage(hwndEditor, EM_SETREADONLY, 0, 0);
 532         else
 533             SendMessage(hwndEditor, EM_SETREADONLY, 1, 0);
 534         return 0;
 535         }
 536
 537     case ID_EDIT_MODIFIED:
 538         if (SendMessage(hwndEditor, EM_GETMODIFY, 0, 0))
 539             SendMessage(hwndEditor, EM_SETMODIFY, 0, 0);
 540         else
 541             SendMessage(hwndEditor, EM_SETMODIFY, 1, 0);
 542         return 0;
 543
 544     case ID_EDIT_UNDO:
 545         SendMessage(hwndEditor, EM_UNDO, 0, 0);
 546         return 0;
 547
 548     case ID_EDIT_REDO:
 549         SendMessage(hwndEditor, EM_REDO, 0, 0);
 550         return 0;
 551
 552     case ID_ALIGN_LEFT:
 553     case ID_ALIGN_CENTER:
 554     case ID_ALIGN_RIGHT:
 555         {
 556         PARAFORMAT2 pf;
 557
 558         pf.cbSize = sizeof(pf);
 559         pf.dwMask = PFM_ALIGNMENT;
 560         switch(LOWORD(wParam)) {
 561         case ID_ALIGN_LEFT: pf.wAlignment = PFA_LEFT; break;
 562         case ID_ALIGN_CENTER: pf.wAlignment = PFA_CENTER; break;
 563         case ID_ALIGN_RIGHT: pf.wAlignment = PFA_RIGHT; break;
 564         }
 565         SendMessage(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
 566         break;
 567         }
 568
 569     case ID_BACK_1:
 570         SendMessage(hwndEditor, EM_SETBKGNDCOLOR, 1, 0);
 571         break;
 572
 573     case ID_BACK_2:
 574         SendMessage(hwndEditor, EM_SETBKGNDCOLOR, 0, RGB(255,255,192));
 575         break;
 576
 577     default:
 578         SendMessage(hwndEditor, WM_COMMAND, wParam, lParam);
 579         break;
 580     }
 581     return 0;
 582 }
 583
 584 static LRESULT OnInitPopupMenu( HWND hWnd, WPARAM wParam, LPARAM lParam )
 585 {
 586     HMENU hMenu = (HMENU)wParam;
 587     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
 588     PARAFORMAT pf;
 589     int nAlignment = -1;
 590
 591     pf.cbSize = sizeof(PARAFORMAT);
 592     SendMessage(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
 593     CheckMenuItem(hMenu, ID_EDIT_READONLY,
 594       MF_BYCOMMAND|(GetWindowLong(hwndEditor, GWL_STYLE)&ES_READONLY ? MF_CHECKED : MF_UNCHECKED));
 595     CheckMenuItem(hMenu, ID_EDIT_MODIFIED,
 596       MF_BYCOMMAND|(SendMessage(hwndEditor, EM_GETMODIFY, 0, 0) ? MF_CHECKED : MF_UNCHECKED));
 597     if (pf.dwMask & PFM_ALIGNMENT)
 598         nAlignment = pf.wAlignment;
 599     CheckMenuItem(hMenu, ID_ALIGN_LEFT, MF_BYCOMMAND|(nAlignment == PFA_LEFT) ? MF_CHECKED : MF_UNCHECKED);
 600     CheckMenuItem(hMenu, ID_ALIGN_CENTER, MF_BYCOMMAND|(nAlignment == PFA_CENTER) ? MF_CHECKED : MF_UNCHECKED);
 601     CheckMenuItem(hMenu, ID_ALIGN_RIGHT, MF_BYCOMMAND|(nAlignment == PFA_RIGHT) ? MF_CHECKED : MF_UNCHECKED);
 602     EnableMenuItem(hMenu, ID_EDIT_UNDO, MF_BYCOMMAND|(SendMessage(hwndEditor, EM_CANUNDO, 0, 0)) ? MF_ENABLED : MF_GRAYED);
 603     EnableMenuItem(hMenu, ID_EDIT_REDO, MF_BYCOMMAND|(SendMessage(hwndEditor, EM_CANREDO, 0, 0)) ? MF_ENABLED : MF_GRAYED);
 604     return 0;
 605 }
 606
 607 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam )
 608 {
 609     int nStatusSize = 0, nTBSize = 0;
 610     RECT rc;
 611     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
 612     HWND hwndStatusBar = GetDlgItem(hWnd, IDC_STATUSBAR);
 613     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
 614     HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
 615
 616     if (hwndStatusBar)
 617     {
 618         SendMessage(hwndStatusBar, WM_SIZE, 0, 0);
 619         GetClientRect(hwndStatusBar, &rc);
 620         nStatusSize = rc.bottom - rc.top;
 621     }
 622     if (hwndToolBar)
 623     {
 624         rc.left = rc.top = 0;
 625         rc.right = LOWORD(lParam);
 626         rc.bottom = HIWORD(lParam);
 627         SendMessage(hwndToolBar, TB_AUTOSIZE, 0, 0);
 628         SendMessage(hwndReBar, RB_SIZETORECT, 0, (LPARAM)&rc);
 629         nTBSize = SendMessage(hwndReBar, RB_GETBARHEIGHT, 0, 0);
 630         GetClientRect(hwndReBar, &rc);
 631         MoveWindow(hwndReBar, 0, 0, LOWORD(lParam), rc.right, FALSE);
 632     }
 633     if (hwndEditor)
 634     {
 635         GetClientRect(hWnd, &rc);
 636         MoveWindow(hwndEditor, 0, nTBSize, rc.right, rc.bottom-nStatusSize-nTBSize, TRUE);
 637     }
 638
 639     return DefWindowProcW(hWnd, WM_SIZE, wParam, lParam);
 640 }
 641
 642 static LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
 643 {
 644     switch(msg)
 645     {
 646     case WM_CREATE:
 647         return OnCreate( hWnd, wParam, lParam );
 648
 649     case WM_USER:
 650         return OnUser( hWnd, wParam, lParam );
 651
 652     case WM_NOTIFY:
 653         return OnNotify( hWnd, wParam, lParam );
 654
 655     case WM_COMMAND:
 656         return OnCommand( hWnd, wParam, lParam );
 657
 658     case WM_DESTROY:
 659         PostQuitMessage(0);
 660         break;
 661
 662     case WM_ACTIVATE:
 663         if (LOWORD(wParam))
 664             SetFocus(GetDlgItem(hWnd, IDC_EDITOR));
 665         return 0;
 666
 667     case WM_INITMENUPOPUP:
 668         return OnInitPopupMenu( hWnd, wParam, lParam );
 669
 670     case WM_SIZE:
 671         return OnSize( hWnd, wParam, lParam );
 672
 673     default:
 674         return DefWindowProcW(hWnd, msg, wParam, lParam);
 675     }
 676
 677     return 0;
 678 }
 679
 680 int CALLBACK WinMain(HINSTANCE hInstance, HINSTANCE hOldInstance, LPSTR szCmdParagraph, int res)
 681 {
 682     INITCOMMONCONTROLSEX classes = {8, ICC_BAR_CLASSES|ICC_COOL_CLASSES};
 683     HACCEL hAccel;
 684     WNDCLASSW wc;
 685     MSG msg;
 686
 687     InitCommonControlsEx(&classes);
 688
 689     hAccel = LoadAccelerators(hInstance, "MAINACCELTABLE");
 690
 691     wc.style = CS_HREDRAW | CS_VREDRAW;
 692     wc.lpfnWndProc = WndProc;
 693     wc.cbClsExtra = 0;
 694     wc.cbWndExtra = 4;
 695     wc.hInstance = hInstance;
 696     wc.hIcon = NULL;
 697     wc.hCursor = LoadCursor(NULL, IDC_IBEAM);
 698     wc.hbrBackground = GetSysColorBrush(COLOR_WINDOW);
 699     wc.lpszMenuName = xszMainMenu;
 700     wc.lpszClassName = wszMainWndClass;
 701     RegisterClassW(&wc);
 702
 703     hMainWnd = CreateWindowExW(0, wszMainWndClass, wszAppTitle, WS_OVERLAPPEDWINDOW,
 704       CW_USEDEFAULT, CW_USEDEFAULT, 680, 260, NULL, NULL, hInstance, NULL);
 705     ShowWindow(hMainWnd, SW_SHOWDEFAULT);
 706
 707     HandleCommandLine(GetCommandLineW());
 708
 709     while(GetMessage(&msg,0,0,0))
 710     {
 711         if (TranslateAccelerator(hMainWnd, hAccel, &msg))
 712             continue;
 713         TranslateMessage(&msg);
 714         DispatchMessage(&msg);
 715         if (!PeekMessage(&msg, 0, 0, 0, PM_NOREMOVE))
 716             SendMessage(hMainWnd, WM_USER, 0, 0);
 717     }
 718
 719     return 0;
 720 }