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 #include <shlobj.h>
  36
  37 #include "resource.h"
  38
  39 /* use LoadString */
  40 static const WCHAR xszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
  41 static const WCHAR xszMainMenu[] = {'M','A','I','N','M','E','N','U',0};
  42
  43 static const WCHAR wszRichEditClass[] = {'R','I','C','H','E','D','I','T','2','0','W',0};
  44 static const WCHAR wszMainWndClass[] = {'W','O','R','D','P','A','D','T','O','P',0};
  45 static const WCHAR wszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
  46
  47 static const WCHAR key_recentfiles[] = {'R','e','c','e','n','t',' ','f','i','l','e',
  48                                         ' ','l','i','s','t',0};
  49 static const WCHAR key_options[] = {'O','p','t','i','o','n','s',0};
  50
  51 static const WCHAR var_file[] = {'F','i','l','e','%','d',0};
  52 static const WCHAR var_framerect[] = {'F','r','a','m','e','R','e','c','t',0};
  53
  54
  55 static HWND hMainWnd;
  56 static HWND hEditorWnd;
  57 static HWND hFindWnd;
  58
  59 static UINT ID_FINDMSGSTRING;
  60
  61 static WCHAR wszFilter[MAX_STRING_LEN*4+6*3+5];
  62 static WCHAR wszDefaultFileName[MAX_STRING_LEN];
  63 static WCHAR wszSaveChanges[MAX_STRING_LEN];
  64
  65 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam );
  66
  67 /* Load string resources */
  68 static void DoLoadStrings(void)
  69 {
  70     LPWSTR p = wszFilter;
  71     static const WCHAR files_rtf[] = {'*','.','r','t','f','\0'};
  72     static const WCHAR files_txt[] = {'*','.','t','x','t','\0'};
  73     static const WCHAR files_all[] = {'*','.','*','\0'};
  74     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
  75
  76     LoadStringW(hInstance, STRING_RICHTEXT_FILES_RTF, p, MAX_STRING_LEN);
  77     p += lstrlenW(p) + 1;
  78     lstrcpyW(p, files_rtf);
  79     p += lstrlenW(p) + 1;
  80     LoadStringW(hInstance, STRING_TEXT_FILES_TXT, p, MAX_STRING_LEN);
  81     p += lstrlenW(p) + 1;
  82     lstrcpyW(p, files_txt);
  83     p += lstrlenW(p) + 1;
  84     LoadStringW(hInstance, STRING_TEXT_FILES_UNICODE_TXT, p, MAX_STRING_LEN);
  85     p += lstrlenW(p) + 1;
  86     lstrcpyW(p, files_txt);
  87     p += lstrlenW(p) + 1;
  88     LoadStringW(hInstance, STRING_ALL_FILES, p, MAX_STRING_LEN);
  89     p += lstrlenW(p) + 1;
  90     lstrcpyW(p, files_all);
  91     p += lstrlenW(p) + 1;
  92     *p = '\0';
  93
  94     p = wszDefaultFileName;
  95     LoadStringW(hInstance, STRING_DEFAULT_FILENAME, p, MAX_STRING_LEN);
  96
  97     p = wszSaveChanges;
  98     LoadStringW(hInstance, STRING_PROMPT_SAVE_CHANGES, p, MAX_STRING_LEN);
  99 }
 100
 101 static void AddButton(HWND hwndToolBar, int nImage, int nCommand)
 102 {
 103     TBBUTTON button;
 104
 105     ZeroMemory(&button, sizeof(button));
 106     button.iBitmap = nImage;
 107     button.idCommand = nCommand;
 108     button.fsState = TBSTATE_ENABLED;
 109     button.fsStyle = TBSTYLE_BUTTON;
 110     button.dwData = 0;
 111     button.iString = -1;
 112     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
 113 }
 114
 115 static void AddSeparator(HWND hwndToolBar)
 116 {
 117     TBBUTTON button;
 118
 119     ZeroMemory(&button, sizeof(button));
 120     button.iBitmap = -1;
 121     button.idCommand = 0;
 122     button.fsState = 0;
 123     button.fsStyle = TBSTYLE_SEP;
 124     button.dwData = 0;
 125     button.iString = -1;
 126     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
 127 }
 128
 129 static DWORD CALLBACK stream_in(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
 130 {
 131     HANDLE hFile = (HANDLE)cookie;
 132     DWORD read;
 133
 134     if(!ReadFile(hFile, buffer, cb, &read, 0))
 135         return 1;
 136
 137     *pcb = read;
 138
 139     return 0;
 140 }
 141
 142 static DWORD CALLBACK stream_out(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
 143 {
 144     DWORD written;
 145     int ret;
 146     HANDLE hFile = (HANDLE)cookie;
 147
 148     ret = WriteFile(hFile, buffer, cb, &written, 0);
 149
 150     if(!ret || (cb != written))
 151         return 1;
 152
 153     *pcb = cb;
 154
 155     return 0;
 156 }
 157
 158
 159 static LPWSTR file_basename(LPWSTR path)
 160 {
 161     LPWSTR pos = path + lstrlenW(path);
 162
 163     while(pos > path)
 164     {
 165         if(*pos == '\\' || *pos == '/')
 166         {
 167             pos++;
 168             break;
 169         }
 170         pos--;
 171     }
 172     return pos;
 173 }
 174
 175 static WCHAR wszFileName[MAX_PATH];
 176 static WPARAM fileFormat = SF_RTF;
 177
 178 static void set_caption(LPCWSTR wszNewFileName)
 179 {
 180     static const WCHAR wszSeparator[] = {' ','-',' '};
 181     WCHAR *wszCaption;
 182     SIZE_T length = 0;
 183
 184     if(!wszNewFileName)
 185         wszNewFileName = wszDefaultFileName;
 186     else
 187         wszNewFileName = file_basename((LPWSTR)wszNewFileName);
 188
 189     wszCaption = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
 190                 lstrlenW(wszNewFileName)*sizeof(WCHAR)+sizeof(wszSeparator)+sizeof(wszAppTitle));
 191
 192     if(!wszCaption)
 193         return;
 194
 195     memcpy(wszCaption, wszNewFileName, lstrlenW(wszNewFileName)*sizeof(WCHAR));
 196     length += lstrlenW(wszNewFileName);
 197     memcpy(wszCaption + length, wszSeparator, sizeof(wszSeparator));
 198     length += sizeof(wszSeparator) / sizeof(WCHAR);
 199     memcpy(wszCaption + length, wszAppTitle, sizeof(wszAppTitle));
 200
 201     SetWindowTextW(hMainWnd, wszCaption);
 202
 203     HeapFree(GetProcessHeap(), 0, wszCaption);
 204 }
 205
 206 static LRESULT registry_get_handle(HKEY *hKey, LPDWORD action, LPCWSTR subKey)
 207 {
 208     LONG ret;
 209     static const WCHAR wszProgramKey[] = {'S','o','f','t','w','a','r','e','\\',
 210         'M','i','c','r','o','s','o','f','t','\\',
 211         'W','i','n','d','o','w','s','\\',
 212         'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
 213         'A','p','p','l','e','t','s','\\',
 214         'W','o','r','d','p','a','d',0};
 215     LPWSTR key = (LPWSTR)wszProgramKey;
 216
 217     if(subKey)
 218     {
 219         WCHAR backslash[] = {'\\',0};
 220         key = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
 221                         (lstrlenW(wszProgramKey)+lstrlenW(subKey)+lstrlenW(backslash)+1)
 222                         *sizeof(WCHAR));
 223
 224         if(!key)
 225             return 1;
 226
 227         lstrcpyW(key, wszProgramKey);
 228         lstrcatW(key, backslash);
 229         lstrcatW(key, subKey);
 230     }
 231
 232     if(action)
 233     {
 234         ret = RegCreateKeyExW(HKEY_CURRENT_USER, key, 0, NULL, REG_OPTION_NON_VOLATILE,
 235                               KEY_READ | KEY_WRITE, NULL, hKey, action);
 236     } else
 237     {
 238         ret = RegOpenKeyExW(HKEY_CURRENT_USER, key, 0, KEY_READ | KEY_WRITE, hKey);
 239     }
 240
 241     if(subKey)
 242         HeapFree(GetProcessHeap(), 0, key);
 243
 244     return ret;
 245 }
 246
 247 static void registry_set_winrect(void)
 248 {
 249     HKEY hKey;
 250     DWORD action;
 251
 252     if(registry_get_handle(&hKey, &action, (LPWSTR)key_options) == ERROR_SUCCESS)
 253     {
 254         RECT rc;
 255
 256         GetWindowRect(hMainWnd, &rc);
 257
 258         RegSetValueExW(hKey, var_framerect, 0, REG_BINARY, (LPBYTE)&rc, sizeof(RECT));
 259     }
 260 }
 261
 262 static RECT registry_read_winrect(void)
 263 {
 264     HKEY hKey;
 265     RECT rc;
 266     DWORD size = sizeof(RECT);
 267
 268     ZeroMemory(&rc, sizeof(RECT));
 269     if(registry_get_handle(&hKey, 0, (LPWSTR)key_options) != ERROR_SUCCESS ||
 270        RegQueryValueExW(hKey, var_framerect, 0, NULL, (LPBYTE)&rc, &size) !=
 271        ERROR_SUCCESS || size != sizeof(RECT))
 272     {
 273         rc.top = 0;
 274         rc.left = 0;
 275         rc.bottom = 300;
 276         rc.right = 600;
 277     }
 278
 279     RegCloseKey(hKey);
 280     return rc;
 281 }
 282
 283 static void truncate_path(LPWSTR file, LPWSTR out, LPWSTR pos1, LPWSTR pos2)
 284 {
 285     static const WCHAR dots[] = {'.','.','.',0};
 286
 287     *++pos1 = 0;
 288
 289     lstrcatW(out, file);
 290     lstrcatW(out, dots);
 291     lstrcatW(out, pos2);
 292 }
 293
 294 static void format_filelist_filename(LPWSTR file, LPWSTR out)
 295 {
 296     LPWSTR pos_basename;
 297     LPWSTR truncpos1, truncpos2;
 298     WCHAR myDocs[MAX_STRING_LEN];
 299
 300     SHGetFolderPathW(NULL, CSIDL_PERSONAL, NULL, SHGFP_TYPE_CURRENT, (LPWSTR)&myDocs);
 301     pos_basename = file_basename(file);
 302     truncpos1 = NULL;
 303     truncpos2 = NULL;
 304
 305     *(pos_basename-1) = 0;
 306     if(!lstrcmpiW(file, myDocs) || (lstrlenW(pos_basename) > FILELIST_ENTRY_LENGTH))
 307     {
 308         truncpos1 = pos_basename;
 309         *(pos_basename-1) = '\\';
 310     } else
 311     {
 312         LPWSTR pos;
 313         BOOL morespace = FALSE;
 314
 315         *(pos_basename-1) = '\\';
 316
 317         for(pos = file; pos < pos_basename; pos++)
 318         {
 319             if(*pos == '\\' || *pos == '/')
 320             {
 321                 if(truncpos1)
 322                 {
 323                     if((pos - file + lstrlenW(pos_basename)) > FILELIST_ENTRY_LENGTH)
 324                         break;
 325
 326                     truncpos1 = pos;
 327                     morespace = TRUE;
 328                     break;
 329                 }
 330
 331                 if((pos - file + lstrlenW(pos_basename)) > FILELIST_ENTRY_LENGTH)
 332                     break;
 333
 334                 truncpos1 = pos;
 335             }
 336         }
 337
 338         if(morespace)
 339         {
 340             for(pos = pos_basename; pos >= truncpos1; pos--)
 341             {
 342                 if(*pos == '\\' || *pos == '/')
 343                 {
 344                     if((truncpos1 - file + lstrlenW(pos_basename) + pos_basename - pos) > FILELIST_ENTRY_LENGTH)
 345                         break;
 346
 347                     truncpos2 = pos;
 348                 }
 349             }
 350         }
 351     }
 352
 353     if(truncpos1 == pos_basename)
 354         lstrcatW(out, pos_basename);
 355     else if(truncpos1 == truncpos2 || !truncpos2)
 356         lstrcatW(out, file);
 357     else
 358         truncate_path(file, out, truncpos1, truncpos2 ? truncpos2 : (pos_basename-1));
 359 }
 360
 361 static void registry_read_filelist(HWND hMainWnd)
 362 {
 363     HKEY hFileKey;
 364
 365     if(registry_get_handle(&hFileKey, 0, key_recentfiles) == ERROR_SUCCESS)
 366     {
 367         WCHAR itemText[MAX_PATH+3], buffer[MAX_PATH];
 368         /* The menu item name is not the same as the file name, so we need to store
 369            the file name here */
 370         static WCHAR file1[MAX_PATH], file2[MAX_PATH], file3[MAX_PATH], file4[MAX_PATH];
 371         WCHAR numFormat[] = {'&','%','d',' ',0};
 372         LPWSTR pFile[] = {file1, file2, file3, file4};
 373         DWORD pathSize = MAX_PATH*sizeof(WCHAR);
 374         int i;
 375         WCHAR key[6];
 376         MENUITEMINFOW mi;
 377         HMENU hMenu = GetMenu(hMainWnd);
 378
 379         mi.cbSize = sizeof(MENUITEMINFOW);
 380         mi.fMask = MIIM_ID | MIIM_DATA | MIIM_STRING | MIIM_FTYPE;
 381         mi.fType = MFT_STRING;
 382         mi.dwTypeData = itemText;
 383         mi.wID = ID_FILE_RECENT1;
 384
 385         RemoveMenu(hMenu, ID_FILE_RECENT_SEPARATOR, MF_BYCOMMAND);
 386         for(i = 0; i < FILELIST_ENTRIES; i++)
 387         {
 388             wsprintfW(key, var_file, i+1);
 389             RemoveMenu(hMenu, ID_FILE_RECENT1+i, MF_BYCOMMAND);
 390             if(RegQueryValueExW(hFileKey, (LPWSTR)key, 0, NULL, (LPBYTE)pFile[i], &pathSize)
 391                != ERROR_SUCCESS)
 392                 break;
 393
 394             mi.dwItemData = (DWORD)pFile[i];
 395             wsprintfW(itemText, numFormat, i+1);
 396
 397             lstrcpyW(buffer, pFile[i]);
 398
 399             format_filelist_filename(buffer, itemText);
 400
 401             InsertMenuItemW(hMenu, ID_FILE_EXIT, FALSE, &mi);
 402             mi.wID++;
 403             pathSize = MAX_PATH*sizeof(WCHAR);
 404         }
 405         mi.fType = MFT_SEPARATOR;
 406         mi.fMask = MIIM_FTYPE | MIIM_ID;
 407         InsertMenuItemW(hMenu, ID_FILE_EXIT, FALSE, &mi);
 408
 409         RegCloseKey(hFileKey);
 410     }
 411 }
 412
 413 static void registry_set_filelist(LPCWSTR newFile)
 414 {
 415     HKEY hKey;
 416     DWORD action;
 417
 418     if(registry_get_handle(&hKey, &action, key_recentfiles) == ERROR_SUCCESS)
 419     {
 420         LPCWSTR pFiles[FILELIST_ENTRIES];
 421         int i;
 422         HMENU hMenu = GetMenu(hMainWnd);
 423         MENUITEMINFOW mi;
 424         WCHAR buffer[6];
 425
 426         mi.cbSize = sizeof(MENUITEMINFOW);
 427         mi.fMask = MIIM_DATA;
 428
 429         for(i = 0; i < FILELIST_ENTRIES; i++)
 430             pFiles[i] = NULL;
 431
 432         for(i = 0; GetMenuItemInfoW(hMenu, ID_FILE_RECENT1+i, FALSE, &mi); i++)
 433             pFiles[i] = (LPWSTR)mi.dwItemData;
 434
 435         if(lstrcmpiW(newFile, pFiles[0]))
 436         {
 437             for(i = 0; pFiles[i] && i < FILELIST_ENTRIES; i++)
 438             {
 439                 if(!lstrcmpiW(pFiles[i], newFile))
 440                 {
 441                     int j;
 442                     for(j = 0; pFiles[j] && j < i; j++)
 443                     {
 444                         pFiles[i-j] = pFiles[i-j-1];
 445                     }
 446                     pFiles[0] = NULL;
 447                     break;
 448                 }
 449             }
 450
 451             if(!pFiles[0])
 452             {
 453                 pFiles[0] = newFile;
 454             } else
 455             {
 456                 for(i = 0; pFiles[i] && i < FILELIST_ENTRIES-1; i++)
 457                     pFiles[FILELIST_ENTRIES-1-i] = pFiles[FILELIST_ENTRIES-2-i];
 458
 459                 pFiles[0] = newFile;
 460             }
 461
 462             for(i = 0; pFiles[i] && i < FILELIST_ENTRIES; i++)
 463             {
 464                 wsprintfW(buffer, var_file, i+1);
 465                 RegSetValueExW(hKey, (LPWSTR)&buffer, 0, REG_SZ, (LPBYTE)pFiles[i],
 466                                (lstrlenW(pFiles[i])+1)*sizeof(WCHAR));
 467             }
 468         }
 469     }
 470     RegCloseKey(hKey);
 471     registry_read_filelist(hMainWnd);
 472 }
 473
 474 static void clear_formatting(void)
 475 {
 476     PARAFORMAT2 pf;
 477
 478     pf.cbSize = sizeof(pf);
 479     pf.dwMask = PFM_ALIGNMENT;
 480     pf.wAlignment = PFA_LEFT;
 481     SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
 482 }
 483
 484 static int fileformat_number(WPARAM format)
 485 {
 486     int number = 0;
 487
 488     if(format == SF_TEXT)
 489     {
 490         number = 1;
 491     } else if (format == (SF_TEXT | SF_UNICODE))
 492     {
 493         number = 2;
 494     }
 495     return number;
 496 }
 497
 498 static WPARAM fileformat_flags(int format)
 499 {
 500     WPARAM flags[] = { SF_RTF , SF_TEXT , SF_TEXT | SF_UNICODE };
 501
 502     return flags[format];
 503 }
 504
 505 static void set_fileformat(WPARAM format)
 506 {
 507     fileFormat = format;
 508 }
 509
 510 static void DoOpenFile(LPCWSTR szOpenFileName)
 511 {
 512     HANDLE hFile;
 513     EDITSTREAM es;
 514     char fileStart[5];
 515     DWORD readOut;
 516     WPARAM format = SF_TEXT;
 517
 518     hFile = CreateFileW(szOpenFileName, GENERIC_READ, FILE_SHARE_READ, NULL,
 519                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
 520     if (hFile == INVALID_HANDLE_VALUE)
 521         return;
 522
 523     ReadFile(hFile, fileStart, 5, &readOut, NULL);
 524     SetFilePointer(hFile, 0, NULL, FILE_BEGIN);
 525
 526     if(readOut >= 2 && (BYTE)fileStart[0] == 0xff && (BYTE)fileStart[1] == 0xfe)
 527     {
 528         format = SF_TEXT | SF_UNICODE;
 529         SetFilePointer(hFile, 2, NULL, FILE_BEGIN);
 530     } else if(readOut >= 5)
 531     {
 532         static const char header[] = "{\\rtf";
 533         if(!memcmp(header, fileStart, 5))
 534             format = SF_RTF;
 535     }
 536
 537     es.dwCookie = (DWORD_PTR)hFile;
 538     es.pfnCallback = stream_in;
 539
 540     clear_formatting();
 541     SendMessageW(hEditorWnd, EM_STREAMIN, format, (LPARAM)&es);
 542
 543     CloseHandle(hFile);
 544
 545     SetFocus(hEditorWnd);
 546
 547     set_caption(szOpenFileName);
 548
 549     lstrcpyW(wszFileName, szOpenFileName);
 550     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
 551     registry_set_filelist(szOpenFileName);
 552     set_fileformat(format);
 553 }
 554
 555 static void DoSaveFile(LPCWSTR wszSaveFileName, WPARAM format)
 556 {
 557     HANDLE hFile;
 558     EDITSTREAM stream;
 559     LRESULT ret;
 560
 561     hFile = CreateFileW(wszSaveFileName, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS,
 562         FILE_ATTRIBUTE_NORMAL, NULL);
 563
 564     if(hFile == INVALID_HANDLE_VALUE)
 565         return;
 566
 567     if(format == (SF_TEXT | SF_UNICODE))
 568     {
 569         static const BYTE unicode[] = {0xff,0xfe};
 570         DWORD writeOut;
 571         WriteFile(hFile, &unicode, sizeof(unicode), &writeOut, 0);
 572
 573         if(writeOut != sizeof(unicode))
 574             return;
 575     }
 576
 577     stream.dwCookie = (DWORD_PTR)hFile;
 578     stream.pfnCallback = stream_out;
 579
 580     ret = SendMessageW(hEditorWnd, EM_STREAMOUT, format, (LPARAM)&stream);
 581
 582     CloseHandle(hFile);
 583
 584     SetFocus(hEditorWnd);
 585
 586     if(!ret)
 587     {
 588         GETTEXTLENGTHEX gt;
 589         gt.flags = GTL_DEFAULT;
 590         gt.codepage = 1200;
 591
 592         if(SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
 593             return;
 594     }
 595
 596     lstrcpyW(wszFileName, wszSaveFileName);
 597     set_caption(wszFileName);
 598     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
 599     set_fileformat(format);
 600 }
 601
 602 static void DialogSaveFile(void)
 603 {
 604     OPENFILENAMEW sfn;
 605
 606     WCHAR wszFile[MAX_PATH] = {'\0'};
 607     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
 608
 609     ZeroMemory(&sfn, sizeof(sfn));
 610
 611     sfn.lStructSize = sizeof(sfn);
 612     sfn.Flags = OFN_HIDEREADONLY | OFN_PATHMUSTEXIST | OFN_OVERWRITEPROMPT;
 613     sfn.hwndOwner = hMainWnd;
 614     sfn.lpstrFilter = wszFilter;
 615     sfn.lpstrFile = wszFile;
 616     sfn.nMaxFile = MAX_PATH;
 617     sfn.lpstrDefExt = wszDefExt;
 618     sfn.nFilterIndex = fileformat_number(fileFormat)+1;
 619
 620     while(GetSaveFileNameW(&sfn))
 621     {
 622         if(fileformat_flags(sfn.nFilterIndex-1) != SF_RTF)
 623         {
 624             if(MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_SAVE_LOSEFORMATTING),
 625                            wszAppTitle, MB_YESNO | MB_ICONEXCLAMATION) != IDYES)
 626             {
 627                 continue;
 628             } else
 629             {
 630                 DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
 631                 break;
 632             }
 633         } else
 634         {
 635             DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
 636             break;
 637         }
 638     }
 639 }
 640
 641 static BOOL prompt_save_changes(void)
 642 {
 643     if(!wszFileName[0])
 644     {
 645         GETTEXTLENGTHEX gt;
 646         gt.flags = GTL_NUMCHARS;
 647         gt.codepage = 1200;
 648         if(!SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
 649             return TRUE;
 650     }
 651
 652     if(!SendMessageW(hEditorWnd, EM_GETMODIFY, 0, 0))
 653     {
 654         return TRUE;
 655     } else
 656     {
 657         LPWSTR displayFileName;
 658         WCHAR *text;
 659         int ret;
 660
 661         if(!wszFileName[0])
 662             displayFileName = wszDefaultFileName;
 663         else
 664             displayFileName = file_basename(wszFileName);
 665
 666         text = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
 667                          (lstrlenW(displayFileName)+lstrlenW(wszSaveChanges))*sizeof(WCHAR));
 668
 669         if(!text)
 670             return FALSE;
 671
 672         wsprintfW(text, wszSaveChanges, displayFileName);
 673
 674         ret = MessageBoxW(hMainWnd, text, wszAppTitle, MB_YESNOCANCEL | MB_ICONEXCLAMATION);
 675
 676         HeapFree(GetProcessHeap(), 0, text);
 677
 678         switch(ret)
 679         {
 680             case IDNO:
 681                 return TRUE;
 682
 683             case IDYES:
 684                 if(wszFileName[0])
 685                     DoSaveFile(wszFileName, fileFormat);
 686                 else
 687                     DialogSaveFile();
 688                 return TRUE;
 689
 690             default:
 691                 return FALSE;
 692         }
 693     }
 694 }
 695
 696 static void DialogOpenFile(void)
 697 {
 698     OPENFILENAMEW ofn;
 699
 700     WCHAR wszFile[MAX_PATH] = {'\0'};
 701     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
 702
 703     ZeroMemory(&ofn, sizeof(ofn));
 704
 705     ofn.lStructSize = sizeof(ofn);
 706     ofn.Flags = OFN_HIDEREADONLY | OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST;
 707     ofn.hwndOwner = hMainWnd;
 708     ofn.lpstrFilter = wszFilter;
 709     ofn.lpstrFile = wszFile;
 710     ofn.nMaxFile = MAX_PATH;
 711     ofn.lpstrDefExt = wszDefExt;
 712     ofn.nFilterIndex = fileformat_number(fileFormat)+1;
 713
 714     if(GetOpenFileNameW(&ofn))
 715     {
 716         if(prompt_save_changes())
 717             DoOpenFile(ofn.lpstrFile);
 718     }
 719 }
 720
 721 static void HandleCommandLine(LPWSTR cmdline)
 722 {
 723     WCHAR delimiter;
 724     int opt_print = 0;
 725
 726     /* skip white space */
 727     while (*cmdline == ' ') cmdline++;
 728
 729     /* skip executable name */
 730     delimiter = (*cmdline == '"' ? '"' : ' ');
 731
 732     if (*cmdline == delimiter) cmdline++;
 733     while (*cmdline && *cmdline != delimiter) cmdline++;
 734     if (*cmdline == delimiter) cmdline++;
 735
 736     while (*cmdline == ' ' || *cmdline == '-' || *cmdline == '/')
 737     {
 738         WCHAR option;
 739
 740         if (*cmdline++ == ' ') continue;
 741
 742         option = *cmdline;
 743         if (option) cmdline++;
 744         while (*cmdline == ' ') cmdline++;
 745
 746         switch (option)
 747         {
 748             case 'p':
 749             case 'P':
 750                 opt_print = 1;
 751                 break;
 752         }
 753     }
 754
 755     if (*cmdline)
 756     {
 757         /* file name is passed on the command line */
 758         if (cmdline[0] == '"')
 759         {
 760             cmdline++;
 761             cmdline[lstrlenW(cmdline) - 1] = 0;
 762         }
 763         DoOpenFile(cmdline);
 764         InvalidateRect(hMainWnd, NULL, FALSE);
 765     }
 766
 767     if (opt_print)
 768         MessageBox(hMainWnd, "Printing not implemented", "WordPad", MB_OK);
 769 }
 770
 771 static LRESULT handle_findmsg(LPFINDREPLACEW pFr)
 772 {
 773     if(pFr->Flags & FR_DIALOGTERM)
 774     {
 775         hFindWnd = 0;
 776         pFr->Flags = FR_FINDNEXT;
 777         return 0;
 778     } else if(pFr->Flags & FR_FINDNEXT)
 779     {
 780         DWORD flags = FR_DOWN;
 781         FINDTEXTW ft;
 782         static CHARRANGE cr;
 783         LRESULT end, ret;
 784         GETTEXTLENGTHEX gt;
 785         LRESULT length;
 786         int startPos;
 787         HMENU hMenu = GetMenu(hMainWnd);
 788         MENUITEMINFOW mi;
 789
 790         mi.cbSize = sizeof(mi);
 791         mi.fMask = MIIM_DATA;
 792         mi.dwItemData = 1;
 793         SetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
 794
 795         gt.flags = GTL_NUMCHARS;
 796         gt.codepage = 1200;
 797
 798         length = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
 799
 800         if(pFr->lCustData == -1)
 801         {
 802             SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&startPos, (LPARAM)&end);
 803             cr.cpMin = startPos;
 804             pFr->lCustData = startPos;
 805             cr.cpMax = length;
 806             if(cr.cpMin == length)
 807                 cr.cpMin = 0;
 808         } else
 809         {
 810             startPos = pFr->lCustData;
 811         }
 812
 813         if(cr.cpMax > length)
 814         {
 815             startPos = 0;
 816             cr.cpMin = 0;
 817             cr.cpMax = length;
 818         }
 819
 820         ft.chrg = cr;
 821         ft.lpstrText = pFr->lpstrFindWhat;
 822
 823         if(pFr->Flags & FR_MATCHCASE)
 824             flags |= FR_MATCHCASE;
 825         if(pFr->Flags & FR_WHOLEWORD)
 826             flags |= FR_WHOLEWORD;
 827
 828         ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
 829
 830         if(ret == -1)
 831         {
 832             if(cr.cpMax == length && cr.cpMax != startPos)
 833             {
 834                 ft.chrg.cpMin = cr.cpMin = 0;
 835                 ft.chrg.cpMax = cr.cpMax = startPos;
 836
 837                 ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
 838             }
 839         }
 840
 841         if(ret == -1)
 842         {
 843             pFr->lCustData = -1;
 844             MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_SEARCH_FINISHED), wszAppTitle,
 845                         MB_OK | MB_ICONASTERISK);
 846         } else
 847         {
 848             end = ret + lstrlenW(pFr->lpstrFindWhat);
 849             cr.cpMin = end;
 850             SendMessageW(hEditorWnd, EM_SETSEL, (WPARAM)ret, (LPARAM)end);
 851             SendMessageW(hEditorWnd, EM_SCROLLCARET, 0, 0);
 852         }
 853     }
 854
 855     return 0;
 856 }
 857
 858 static void dialog_find(LPFINDREPLACEW fr)
 859 {
 860     static WCHAR findBuffer[MAX_STRING_LEN];
 861
 862     ZeroMemory(fr, sizeof(FINDREPLACEW));
 863     fr->lStructSize = sizeof(FINDREPLACEW);
 864     fr->hwndOwner = hMainWnd;
 865     fr->Flags = FR_HIDEUPDOWN;
 866     fr->lpstrFindWhat = findBuffer;
 867     fr->lCustData = -1;
 868     fr->wFindWhatLen = MAX_STRING_LEN*sizeof(WCHAR);
 869
 870     hFindWnd = FindTextW(fr);
 871 }
 872
 873
 874 static void DoDefaultFont(void)
 875 {
 876     static const WCHAR szFaceName[] = {'T','i','m','e','s',' ','N','e','w',' ','R','o','m','a','n',0};
 877     CHARFORMAT2W fmt;
 878
 879     ZeroMemory(&fmt, sizeof(fmt));
 880
 881     fmt.cbSize = sizeof(fmt);
 882     fmt.dwMask = CFM_FACE | CFM_BOLD | CFM_ITALIC | CFM_UNDERLINE;
 883     fmt.dwEffects = 0;
 884
 885     lstrcpyW(fmt.szFaceName, szFaceName);
 886
 887     SendMessageW(hEditorWnd, EM_SETCHARFORMAT,  SCF_DEFAULT, (LPARAM)&fmt);
 888 }
 889
 890 static void update_window(void)
 891 {
 892     RECT rect;
 893
 894     GetWindowRect(hMainWnd, &rect);
 895
 896     (void) OnSize(hMainWnd, SIZE_RESTORED, MAKELONG(rect.bottom, rect.right));
 897 }
 898
 899 static void toggle_toolbar(int bandId)
 900 {
 901     HWND hwndReBar = GetDlgItem(hMainWnd, IDC_REBAR);
 902     REBARBANDINFOW rbbinfo;
 903     BOOL hide = TRUE;
 904
 905     if(!hwndReBar)
 906         return;
 907
 908     rbbinfo.cbSize = sizeof(rbbinfo);
 909     rbbinfo.fMask = RBBIM_STYLE | RBBIM_SIZE;
 910
 911     SendMessageW(hwndReBar, RB_GETBANDINFO, bandId, (LPARAM)&rbbinfo);
 912
 913     if(rbbinfo.fStyle & RBBS_HIDDEN)
 914         hide = FALSE;
 915
 916     SendMessageW(hwndReBar, RB_SHOWBAND, bandId, hide ? 0 : 1);
 917
 918     if(bandId == BANDID_TOOLBAR)
 919     {
 920         rbbinfo.fMask ^= RBBIM_SIZE;
 921
 922         SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_FORMATBAR, (LPARAM)&rbbinfo);
 923
 924         if(hide)
 925             rbbinfo.fStyle ^= RBBS_BREAK;
 926         else
 927             rbbinfo.fStyle |= RBBS_BREAK;
 928
 929         SendMessageW(hwndReBar, RB_SETBANDINFO, BANDID_FORMATBAR, (LPARAM)&rbbinfo);
 930     }
 931 }
 932
 933 BOOL CALLBACK datetime_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
 934 {
 935     switch(message)
 936     {
 937         case WM_INITDIALOG:
 938             {
 939                 WCHAR buffer[MAX_STRING_LEN];
 940                 SYSTEMTIME st;
 941                 HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
 942                 GetLocalTime(&st);
 943
 944                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_SHORTDATE, &st, 0, (LPWSTR)&buffer,
 945                                MAX_STRING_LEN);
 946                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
 947                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &st, 0, (LPWSTR)&buffer,
 948                                MAX_STRING_LEN);
 949                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
 950                 GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &st, 0, (LPWSTR)&buffer, MAX_STRING_LEN);
 951                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
 952
 953                 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
 954             }
 955             break;
 956
 957         case WM_COMMAND:
 958             switch(LOWORD(wParam))
 959             {
 960                 case IDOK:
 961                     {
 962                         LRESULT index;
 963                         HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
 964
 965                         index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
 966
 967                         if(index != LB_ERR)
 968                         {
 969                             WCHAR buffer[MAX_STRING_LEN];
 970                             SendMessageW(hListWnd, LB_GETTEXT, index, (LPARAM)&buffer);
 971                             SendMessageW(hEditorWnd, EM_REPLACESEL, TRUE, (LPARAM)&buffer);
 972                         }
 973                     }
 974                     /* Fall through */
 975
 976                 case IDCANCEL:
 977                     EndDialog(hWnd, wParam);
 978                     return TRUE;
 979             }
 980     }
 981     return FALSE;
 982 }
 983
 984 BOOL CALLBACK newfile_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
 985 {
 986     switch(message)
 987     {
 988         case WM_INITDIALOG:
 989             {
 990                 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
 991                 WCHAR buffer[MAX_STRING_LEN];
 992                 HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
 993
 994                 LoadStringW(hInstance, STRING_NEWFILE_RICHTEXT, (LPWSTR)buffer, MAX_STRING_LEN);
 995                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
 996                 LoadStringW(hInstance, STRING_NEWFILE_TXT, (LPWSTR)buffer, MAX_STRING_LEN);
 997                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
 998                 LoadStringW(hInstance, STRING_NEWFILE_TXT_UNICODE, (LPWSTR)buffer, MAX_STRING_LEN);
 999                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1000
1001                 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
1002             }
1003             break;
1004
1005         case WM_COMMAND:
1006             switch(LOWORD(wParam))
1007             {
1008                 case IDOK:
1009                     {
1010                         LRESULT index;
1011                         HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
1012                         index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
1013
1014                         if(index != LB_ERR)
1015                             EndDialog(hWnd, MAKELONG(fileformat_flags(index),0));
1016                     }
1017                     return TRUE;
1018
1019                 case IDCANCEL:
1020                     EndDialog(hWnd, MAKELONG(ID_NEWFILE_ABORT,0));
1021                     return TRUE;
1022             }
1023     }
1024     return FALSE;
1025 }
1026
1027 static LRESULT OnCreate( HWND hWnd, WPARAM wParam, LPARAM lParam)
1028 {
1029     HWND hToolBarWnd, hFormatBarWnd,  hReBarWnd;
1030     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
1031     HANDLE hDLL;
1032     TBADDBITMAP ab;
1033     int nStdBitmaps = 0;
1034     REBARINFO rbi;
1035     REBARBANDINFOW rbb;
1036     static const WCHAR wszRichEditDll[] = {'R','I','C','H','E','D','2','0','.','D','L','L','\0'};
1037     static const WCHAR wszRichEditText[] = {'R','i','c','h','E','d','i','t',' ','t','e','x','t','\0'};
1038
1039     CreateStatusWindowW(CCS_NODIVIDER|WS_CHILD|WS_VISIBLE, wszRichEditText, hWnd, IDC_STATUSBAR);
1040
1041     hReBarWnd = CreateWindowExW(WS_EX_TOOLWINDOW, REBARCLASSNAMEW, NULL,
1042       CCS_NODIVIDER|WS_CHILD|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|RBS_VARHEIGHT|CCS_TOP,
1043       CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hWnd, (HMENU)IDC_REBAR, hInstance, NULL);
1044
1045     rbi.cbSize = sizeof(rbi);
1046     rbi.fMask = 0;
1047     rbi.himl = NULL;
1048     if(!SendMessageW(hReBarWnd, RB_SETBARINFO, 0, (LPARAM)&rbi))
1049         return -1;
1050
1051     hToolBarWnd = CreateToolbarEx(hReBarWnd, CCS_NOPARENTALIGN|CCS_NOMOVEY|WS_VISIBLE|WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_BUTTON,
1052       IDC_TOOLBAR,
1053       1, hInstance, IDB_TOOLBAR,
1054       NULL, 0,
1055       24, 24, 16, 16, sizeof(TBBUTTON));
1056
1057     ab.hInst = HINST_COMMCTRL;
1058     ab.nID = IDB_STD_SMALL_COLOR;
1059     nStdBitmaps = SendMessageW(hToolBarWnd, TB_ADDBITMAP, 0, (LPARAM)&ab);
1060
1061     AddButton(hToolBarWnd, nStdBitmaps+STD_FILENEW, ID_FILE_NEW);
1062     AddButton(hToolBarWnd, nStdBitmaps+STD_FILEOPEN, ID_FILE_OPEN);
1063     AddButton(hToolBarWnd, nStdBitmaps+STD_FILESAVE, ID_FILE_SAVE);
1064     AddSeparator(hToolBarWnd);
1065     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINT, ID_PRINT);
1066     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINTPRE, ID_PREVIEW);
1067     AddSeparator(hToolBarWnd);
1068     AddButton(hToolBarWnd, nStdBitmaps+STD_FIND, ID_FIND);
1069     AddSeparator(hToolBarWnd);
1070     AddButton(hToolBarWnd, nStdBitmaps+STD_CUT, ID_EDIT_CUT);
1071     AddButton(hToolBarWnd, nStdBitmaps+STD_COPY, ID_EDIT_COPY);
1072     AddButton(hToolBarWnd, nStdBitmaps+STD_PASTE, ID_EDIT_PASTE);
1073     AddButton(hToolBarWnd, nStdBitmaps+STD_UNDO, ID_EDIT_UNDO);
1074     AddButton(hToolBarWnd, nStdBitmaps+STD_REDOW, ID_EDIT_REDO);
1075     AddSeparator(hToolBarWnd);
1076     AddButton(hToolBarWnd, 0, ID_DATETIME);
1077
1078     SendMessageW(hToolBarWnd, TB_AUTOSIZE, 0, 0);
1079
1080     rbb.cbSize = sizeof(rbb);
1081     rbb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_CHILD | RBBIM_STYLE;
1082     rbb.fStyle = RBBS_CHILDEDGE | RBBS_BREAK | RBBS_NOGRIPPER;
1083     rbb.cx = 0;
1084     rbb.hwndChild = hToolBarWnd;
1085     rbb.cxMinChild = 0;
1086     rbb.cyChild = rbb.cyMinChild = HIWORD(SendMessageW(hToolBarWnd, TB_GETBUTTONSIZE, 0, 0));
1087
1088     SendMessageW(hReBarWnd, RB_INSERTBAND, BANDID_TOOLBAR, (LPARAM)&rbb);
1089
1090     hFormatBarWnd = CreateToolbarEx(hReBarWnd,
1091          CCS_NOPARENTALIGN | CCS_NOMOVEY | WS_VISIBLE | TBSTYLE_TOOLTIPS | TBSTYLE_BUTTON,
1092          IDC_FORMATBAR, 7, hInstance, IDB_FORMATBAR, NULL, 0, 16, 16, 16, 16, sizeof(TBBUTTON));
1093
1094     AddButton(hFormatBarWnd, 0, ID_FORMAT_BOLD);
1095     AddButton(hFormatBarWnd, 1, ID_FORMAT_ITALIC);
1096     AddButton(hFormatBarWnd, 2, ID_FORMAT_UNDERLINE);
1097     AddSeparator(hFormatBarWnd);
1098     AddButton(hFormatBarWnd, 3, ID_ALIGN_LEFT);
1099     AddButton(hFormatBarWnd, 4, ID_ALIGN_CENTER);
1100     AddButton(hFormatBarWnd, 5, ID_ALIGN_RIGHT);
1101     AddSeparator(hFormatBarWnd);
1102     AddButton(hFormatBarWnd, 6, ID_BULLET);
1103
1104     SendMessageW(hFormatBarWnd, TB_AUTOSIZE, 0, 0);
1105
1106     rbb.hwndChild = hFormatBarWnd;
1107
1108     SendMessageW(hReBarWnd, RB_INSERTBAND, BANDID_FORMATBAR, (LPARAM)&rbb);
1109
1110     hDLL = LoadLibraryW(wszRichEditDll);
1111     if(!hDLL)
1112     {
1113         MessageBoxW(hWnd, MAKEINTRESOURCEW(STRING_LOAD_RICHED_FAILED), wszAppTitle,
1114                     MB_OK | MB_ICONEXCLAMATION);
1115         PostQuitMessage(1);
1116     }
1117
1118     hEditorWnd = CreateWindowExW(WS_EX_CLIENTEDGE, wszRichEditClass, NULL,
1119       WS_CHILD|WS_VISIBLE|ES_MULTILINE|ES_AUTOVSCROLL|ES_WANTRETURN|WS_VSCROLL,
1120       0, 0, 1000, 100, hWnd, (HMENU)IDC_EDITOR, hInstance, NULL);
1121
1122     if (!hEditorWnd)
1123     {
1124         fprintf(stderr, "Error code %u\n", GetLastError());
1125         return -1;
1126     }
1127     assert(hEditorWnd);
1128
1129     SetFocus(hEditorWnd);
1130     SendMessageW(hEditorWnd, EM_SETEVENTMASK, 0, ENM_SELCHANGE);
1131
1132     DoDefaultFont();
1133
1134     DoLoadStrings();
1135     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
1136
1137     ID_FINDMSGSTRING = RegisterWindowMessageW(FINDMSGSTRINGW);
1138
1139     registry_read_filelist(hWnd);
1140
1141     return 0;
1142 }
1143
1144 static LRESULT OnUser( HWND hWnd, WPARAM wParam, LPARAM lParam)
1145 {
1146     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1147     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
1148     HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
1149     HWND hwndFormatBar = GetDlgItem(hwndReBar, IDC_FORMATBAR);
1150     int from, to;
1151     CHARFORMAT2W fmt;
1152     PARAFORMAT2 pf;
1153     GETTEXTLENGTHEX gt;
1154
1155     ZeroMemory(&fmt, sizeof(fmt));
1156     fmt.cbSize = sizeof(fmt);
1157
1158     ZeroMemory(&pf, sizeof(pf));
1159     pf.cbSize = sizeof(pf);
1160
1161     gt.flags = GTL_NUMCHARS;
1162     gt.codepage = 1200;
1163
1164     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_FIND,
1165                  SendMessageW(hwndEditor, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0) ? 1 : 0);
1166
1167     SendMessageW(hwndEditor, EM_GETCHARFORMAT, TRUE, (LPARAM)&fmt);
1168
1169     SendMessageW(hwndEditor, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
1170     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_UNDO,
1171       SendMessageW(hwndEditor, EM_CANUNDO, 0, 0));
1172     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_REDO,
1173       SendMessageW(hwndEditor, EM_CANREDO, 0, 0));
1174     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_CUT, from == to ? 0 : 1);
1175     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_COPY, from == to ? 0 : 1);
1176
1177     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_BOLD, (fmt.dwMask & CFM_BOLD) &&
1178             (fmt.dwEffects & CFE_BOLD));
1179     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_BOLD, !(fmt.dwMask & CFM_BOLD));
1180     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_ITALIC, (fmt.dwMask & CFM_ITALIC) &&
1181             (fmt.dwEffects & CFE_ITALIC));
1182     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_ITALIC, !(fmt.dwMask & CFM_ITALIC));
1183     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_UNDERLINE, (fmt.dwMask & CFM_UNDERLINE) &&
1184             (fmt.dwEffects & CFE_UNDERLINE));
1185     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_UNDERLINE, !(fmt.dwMask & CFM_UNDERLINE));
1186
1187     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1188     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_LEFT, (pf.wAlignment == PFA_LEFT));
1189     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_CENTER, (pf.wAlignment == PFA_CENTER));
1190     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_RIGHT, (pf.wAlignment == PFA_RIGHT));
1191
1192     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_BULLET, (pf.wNumbering & PFN_BULLET));
1193     return 0;
1194 }
1195
1196 static LRESULT OnNotify( HWND hWnd, WPARAM wParam, LPARAM lParam)
1197 {
1198     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1199     NMHDR *pHdr = (NMHDR *)lParam;
1200
1201     if (pHdr->hwndFrom != hwndEditor)
1202         return 0;
1203
1204     if (pHdr->code == EN_SELCHANGE)
1205     {
1206         SELCHANGE *pSC = (SELCHANGE *)lParam;
1207         char buf[128];
1208
1209         sprintf( buf,"selection = %d..%d, line count=%ld",
1210                  pSC->chrg.cpMin, pSC->chrg.cpMax,
1211         SendMessage(hwndEditor, EM_GETLINECOUNT, 0, 0));
1212         SetWindowText(GetDlgItem(hWnd, IDC_STATUSBAR), buf);
1213         SendMessage(hWnd, WM_USER, 0, 0);
1214         return 1;
1215     }
1216     return 0;
1217 }
1218
1219 static LRESULT OnCommand( HWND hWnd, WPARAM wParam, LPARAM lParam)
1220 {
1221     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1222     HWND hwndStatus = GetDlgItem(hWnd, IDC_STATUSBAR);
1223     static FINDREPLACEW findreplace;
1224
1225     if ((HWND)lParam == hwndEditor)
1226         return 0;
1227
1228     switch(LOWORD(wParam))
1229     {
1230
1231     case ID_FILE_EXIT:
1232         PostMessageW(hWnd, WM_CLOSE, 0, 0);
1233         break;
1234
1235     case ID_FILE_NEW:
1236         {
1237             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
1238             int ret = DialogBox(hInstance, MAKEINTRESOURCE(IDD_NEWFILE), hWnd,
1239                                 (DLGPROC)newfile_proc);
1240
1241             if(ret != ID_NEWFILE_ABORT)
1242             {
1243                 if(prompt_save_changes())
1244                 {
1245                     SETTEXTEX st;
1246
1247                     set_caption(NULL);
1248                     wszFileName[0] = '\0';
1249
1250                     st.flags = ST_DEFAULT;
1251                     st.codepage = 1200;
1252                     SendMessageW(hEditorWnd, EM_SETTEXTEX, (WPARAM)&st, 0);
1253
1254                     clear_formatting();
1255
1256                     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
1257                     set_fileformat(ret);
1258                 }
1259             }
1260         }
1261         break;
1262
1263     case ID_FILE_OPEN:
1264         DialogOpenFile();
1265         break;
1266
1267     case ID_FILE_SAVE:
1268         if(wszFileName[0])
1269         {
1270             DoSaveFile(wszFileName, fileFormat);
1271             break;
1272         }
1273         /* Fall through */
1274
1275     case ID_FILE_SAVEAS:
1276         DialogSaveFile();
1277         break;
1278
1279     case ID_FILE_RECENT1:
1280     case ID_FILE_RECENT2:
1281     case ID_FILE_RECENT3:
1282     case ID_FILE_RECENT4:
1283         {
1284             HMENU hMenu = GetMenu(hWnd);
1285             MENUITEMINFOW mi;
1286
1287             mi.cbSize = sizeof(MENUITEMINFOW);
1288             mi.fMask = MIIM_DATA;
1289             if(GetMenuItemInfoW(hMenu, LOWORD(wParam), FALSE, &mi))
1290                 DoOpenFile((LPWSTR)mi.dwItemData);
1291         }
1292         break;
1293
1294     case ID_FIND:
1295         dialog_find(&findreplace);
1296         break;
1297
1298     case ID_FIND_NEXT:
1299         handle_findmsg(&findreplace);
1300         break;
1301
1302     case ID_PRINT:
1303     case ID_PREVIEW:
1304         {
1305             static const WCHAR wszNotImplemented[] = {'N','o','t',' ',
1306                                                       'i','m','p','l','e','m','e','n','t','e','d','\0'};
1307             MessageBoxW(hWnd, wszNotImplemented, wszAppTitle, MB_OK);
1308         }
1309         break;
1310
1311     case ID_FORMAT_BOLD:
1312     case ID_FORMAT_ITALIC:
1313     case ID_FORMAT_UNDERLINE:
1314         {
1315         CHARFORMAT2W fmt;
1316         int mask = CFM_BOLD;
1317         if (LOWORD(wParam) == ID_FORMAT_ITALIC) mask = CFM_ITALIC;
1318         if (LOWORD(wParam) == ID_FORMAT_UNDERLINE) mask = CFM_UNDERLINE;
1319
1320         ZeroMemory(&fmt, sizeof(fmt));
1321         fmt.cbSize = sizeof(fmt);
1322         SendMessageW(hwndEditor, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
1323         if (!(fmt.dwMask&mask))
1324             fmt.dwEffects |= mask;
1325         else
1326             fmt.dwEffects ^= mask;
1327         fmt.dwMask = mask;
1328         SendMessageW(hwndEditor, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
1329         break;
1330         }
1331
1332     case ID_EDIT_CUT:
1333         PostMessageW(hwndEditor, WM_CUT, 0, 0);
1334         break;
1335
1336     case ID_EDIT_COPY:
1337         PostMessageW(hwndEditor, WM_COPY, 0, 0);
1338         break;
1339
1340     case ID_EDIT_PASTE:
1341         PostMessageW(hwndEditor, WM_PASTE, 0, 0);
1342         break;
1343
1344     case ID_EDIT_CLEAR:
1345         PostMessageW(hwndEditor, WM_CLEAR, 0, 0);
1346         break;
1347
1348     case ID_EDIT_SELECTALL:
1349         {
1350         CHARRANGE range = {0, -1};
1351         SendMessageW(hwndEditor, EM_EXSETSEL, 0, (LPARAM)&range);
1352         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
1353         return 0;
1354         }
1355
1356     case ID_EDIT_GETTEXT:
1357         {
1358         int nLen = GetWindowTextLengthW(hwndEditor);
1359         LPWSTR data = HeapAlloc( GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR) );
1360         TEXTRANGEW tr;
1361
1362         GetWindowTextW(hwndEditor, data, nLen+1);
1363         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
1364
1365         HeapFree( GetProcessHeap(), 0, data);
1366         data = HeapAlloc(GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR));
1367         tr.chrg.cpMin = 0;
1368         tr.chrg.cpMax = nLen;
1369         tr.lpstrText = data;
1370         SendMessage (hwndEditor, EM_GETTEXTRANGE, 0, (LPARAM)&tr);
1371         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
1372         HeapFree( GetProcessHeap(), 0, data );
1373
1374         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
1375         return 0;
1376         }
1377
1378     case ID_EDIT_CHARFORMAT:
1379     case ID_EDIT_DEFCHARFORMAT:
1380         {
1381         CHARFORMAT2W cf;
1382         LRESULT i;
1383         ZeroMemory(&cf, sizeof(cf));
1384         cf.cbSize = sizeof(cf);
1385         cf.dwMask = 0;
1386         i = SendMessageW(hwndEditor, EM_GETCHARFORMAT,
1387                         LOWORD(wParam) == ID_EDIT_CHARFORMAT, (LPARAM)&cf);
1388         return 0;
1389         }
1390
1391     case ID_EDIT_PARAFORMAT:
1392         {
1393         PARAFORMAT2 pf;
1394         ZeroMemory(&pf, sizeof(pf));
1395         pf.cbSize = sizeof(pf);
1396         SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1397         return 0;
1398         }
1399
1400     case ID_EDIT_SELECTIONINFO:
1401         {
1402         CHARRANGE range = {0, -1};
1403         char buf[128];
1404         WCHAR *data = NULL;
1405
1406         SendMessage(hwndEditor, EM_EXGETSEL, 0, (LPARAM)&range);
1407         data = HeapAlloc(GetProcessHeap(), 0, sizeof(*data) * (range.cpMax-range.cpMin+1));
1408         SendMessage(hwndEditor, EM_GETSELTEXT, 0, (LPARAM)data);
1409         sprintf(buf, "Start = %d, End = %d", range.cpMin, range.cpMax);
1410         MessageBoxA(hWnd, buf, "Editor", MB_OK);
1411         MessageBoxW(hWnd, data, xszAppTitle, MB_OK);
1412         HeapFree( GetProcessHeap(), 0, data);
1413         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
1414         return 0;
1415         }
1416
1417     case ID_EDIT_READONLY:
1418         {
1419         long nStyle = GetWindowLong(hwndEditor, GWL_STYLE);
1420         if (nStyle & ES_READONLY)
1421             SendMessageW(hwndEditor, EM_SETREADONLY, 0, 0);
1422         else
1423             SendMessageW(hwndEditor, EM_SETREADONLY, 1, 0);
1424         return 0;
1425         }
1426
1427     case ID_EDIT_MODIFIED:
1428         if (SendMessageW(hwndEditor, EM_GETMODIFY, 0, 0))
1429             SendMessageW(hwndEditor, EM_SETMODIFY, 0, 0);
1430         else
1431             SendMessageW(hwndEditor, EM_SETMODIFY, 1, 0);
1432         return 0;
1433
1434     case ID_EDIT_UNDO:
1435         SendMessageW(hwndEditor, EM_UNDO, 0, 0);
1436         return 0;
1437
1438     case ID_EDIT_REDO:
1439         SendMessageW(hwndEditor, EM_REDO, 0, 0);
1440         return 0;
1441
1442     case ID_BULLET:
1443         {
1444             PARAFORMAT pf;
1445
1446             pf.cbSize = sizeof(pf);
1447             pf.dwMask = PFM_NUMBERING;
1448             SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1449
1450             pf.dwMask |=  PFM_OFFSET;
1451
1452             if(pf.wNumbering == PFN_BULLET)
1453             {
1454                 pf.wNumbering = 0;
1455                 pf.dxOffset = 0;
1456             } else
1457             {
1458                 pf.wNumbering = PFN_BULLET;
1459                 pf.dxOffset = 720;
1460             }
1461
1462             SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
1463         }
1464         break;
1465
1466     case ID_ALIGN_LEFT:
1467     case ID_ALIGN_CENTER:
1468     case ID_ALIGN_RIGHT:
1469         {
1470         PARAFORMAT2 pf;
1471
1472         pf.cbSize = sizeof(pf);
1473         pf.dwMask = PFM_ALIGNMENT;
1474         switch(LOWORD(wParam)) {
1475         case ID_ALIGN_LEFT: pf.wAlignment = PFA_LEFT; break;
1476         case ID_ALIGN_CENTER: pf.wAlignment = PFA_CENTER; break;
1477         case ID_ALIGN_RIGHT: pf.wAlignment = PFA_RIGHT; break;
1478         }
1479         SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
1480         break;
1481         }
1482
1483     case ID_BACK_1:
1484         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 1, 0);
1485         break;
1486
1487     case ID_BACK_2:
1488         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 0, RGB(255,255,192));
1489         break;
1490
1491     case ID_TOGGLE_TOOLBAR:
1492         toggle_toolbar(BANDID_TOOLBAR);
1493         update_window();
1494         break;
1495
1496     case ID_TOGGLE_FORMATBAR:
1497         toggle_toolbar(BANDID_FORMATBAR);
1498         update_window();
1499         break;
1500
1501     case ID_TOGGLE_STATUSBAR:
1502         ShowWindow(hwndStatus, IsWindowVisible(hwndStatus) ? SW_HIDE : SW_SHOW);
1503         update_window();
1504         break;
1505
1506     case ID_DATETIME:
1507         {
1508         HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
1509         DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_DATETIME), hWnd, (DLGPROC)datetime_proc);
1510         break;
1511         }
1512
1513     default:
1514         SendMessageW(hwndEditor, WM_COMMAND, wParam, lParam);
1515         break;
1516     }
1517     return 0;
1518 }
1519
1520 static LRESULT OnInitPopupMenu( HWND hWnd, WPARAM wParam, LPARAM lParam )
1521 {
1522     HMENU hMenu = (HMENU)wParam;
1523     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1524     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
1525     HWND hwndStatus = GetDlgItem(hWnd, IDC_STATUSBAR);
1526     PARAFORMAT pf;
1527     int nAlignment = -1;
1528     REBARBANDINFOW rbbinfo;
1529     int selFrom, selTo;
1530     GETTEXTLENGTHEX gt;
1531     LRESULT textLength;
1532     MENUITEMINFOW mi;
1533
1534     SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&selFrom, (LPARAM)&selTo);
1535     EnableMenuItem(hMenu, ID_EDIT_COPY, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
1536     EnableMenuItem(hMenu, ID_EDIT_CUT, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
1537
1538     pf.cbSize = sizeof(PARAFORMAT);
1539     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1540     CheckMenuItem(hMenu, ID_EDIT_READONLY,
1541       MF_BYCOMMAND|(GetWindowLong(hwndEditor, GWL_STYLE)&ES_READONLY ? MF_CHECKED : MF_UNCHECKED));
1542     CheckMenuItem(hMenu, ID_EDIT_MODIFIED,
1543       MF_BYCOMMAND|(SendMessage(hwndEditor, EM_GETMODIFY, 0, 0) ? MF_CHECKED : MF_UNCHECKED));
1544     if (pf.dwMask & PFM_ALIGNMENT)
1545         nAlignment = pf.wAlignment;
1546     CheckMenuItem(hMenu, ID_ALIGN_LEFT, MF_BYCOMMAND|(nAlignment == PFA_LEFT) ?
1547             MF_CHECKED : MF_UNCHECKED);
1548     CheckMenuItem(hMenu, ID_ALIGN_CENTER, MF_BYCOMMAND|(nAlignment == PFA_CENTER) ?
1549             MF_CHECKED : MF_UNCHECKED);
1550     CheckMenuItem(hMenu, ID_ALIGN_RIGHT, MF_BYCOMMAND|(nAlignment == PFA_RIGHT) ?
1551             MF_CHECKED : MF_UNCHECKED);
1552     CheckMenuItem(hMenu, ID_BULLET, MF_BYCOMMAND | ((pf.wNumbering == PFN_BULLET) ?
1553             MF_CHECKED : MF_UNCHECKED));
1554     EnableMenuItem(hMenu, ID_EDIT_UNDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANUNDO, 0, 0)) ?
1555             MF_ENABLED : MF_GRAYED);
1556     EnableMenuItem(hMenu, ID_EDIT_REDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANREDO, 0, 0)) ?
1557             MF_ENABLED : MF_GRAYED);
1558
1559     rbbinfo.cbSize = sizeof(rbbinfo);
1560     rbbinfo.fMask = RBBIM_STYLE;
1561     SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_TOOLBAR, (LPARAM)&rbbinfo);
1562
1563     CheckMenuItem(hMenu, ID_TOGGLE_TOOLBAR, MF_BYCOMMAND|(rbbinfo.fStyle & RBBS_HIDDEN) ?
1564             MF_UNCHECKED : MF_CHECKED);
1565
1566     SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_FORMATBAR, (LPARAM)&rbbinfo);
1567
1568     CheckMenuItem(hMenu, ID_TOGGLE_FORMATBAR, MF_BYCOMMAND|(rbbinfo.fStyle & RBBS_HIDDEN) ?
1569             MF_UNCHECKED : MF_CHECKED);
1570
1571     CheckMenuItem(hMenu, ID_TOGGLE_STATUSBAR, MF_BYCOMMAND|IsWindowVisible(hwndStatus) ?
1572             MF_CHECKED : MF_UNCHECKED);
1573
1574     gt.flags = GTL_NUMCHARS;
1575     gt.codepage = 1200;
1576     textLength = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
1577     EnableMenuItem(hMenu, ID_FIND, MF_BYCOMMAND|(textLength ? MF_ENABLED : MF_GRAYED));
1578
1579     mi.cbSize = sizeof(mi);
1580     mi.fMask = MIIM_DATA;
1581
1582     GetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
1583
1584     EnableMenuItem(hMenu, ID_FIND_NEXT, MF_BYCOMMAND|((textLength && mi.dwItemData) ?
1585                    MF_ENABLED : MF_GRAYED));
1586     return 0;
1587 }
1588
1589 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam )
1590 {
1591     int nStatusSize = 0;
1592     RECT rc;
1593     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1594     HWND hwndStatusBar = GetDlgItem(hWnd, IDC_STATUSBAR);
1595     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
1596     int rebarHeight = 0;
1597     REBARBANDINFOW rbbinfo;
1598     int rebarRows = 2;
1599
1600     if (hwndStatusBar)
1601     {
1602         SendMessageW(hwndStatusBar, WM_SIZE, 0, 0);
1603         if (IsWindowVisible(hwndStatusBar))
1604         {
1605             GetClientRect(hwndStatusBar, &rc);
1606             nStatusSize = rc.bottom - rc.top;
1607         } else
1608         {
1609             nStatusSize = 0;
1610         }
1611     }
1612     if (hwndReBar)
1613     {
1614         rbbinfo.cbSize = sizeof(rbbinfo);
1615         rbbinfo.fMask = RBBIM_STYLE;
1616
1617         SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_TOOLBAR, (LPARAM)&rbbinfo);
1618         if(rbbinfo.fStyle & RBBS_HIDDEN)
1619             rebarRows--;
1620
1621         SendMessageW(hwndReBar, RB_GETBANDINFO, BANDID_FORMATBAR, (LPARAM)&rbbinfo);
1622         if(rbbinfo.fStyle & RBBS_HIDDEN)
1623             rebarRows--;
1624
1625         rebarHeight = rebarRows ? SendMessageW(hwndReBar, RB_GETBARHEIGHT, 0, 0) : 0;
1626
1627         rc.top = rc.left = 0;
1628         rc.bottom = rebarHeight;
1629         rc.right = LOWORD(lParam);
1630         SendMessageW(hwndReBar, RB_SIZETORECT, 0, (LPARAM)&rc);
1631     }
1632     if (hwndEditor)
1633     {
1634         GetClientRect(hWnd, &rc);
1635         MoveWindow(hwndEditor, 0, rebarHeight, rc.right, rc.bottom-nStatusSize-rebarHeight, TRUE);
1636     }
1637
1638     return DefWindowProcW(hWnd, WM_SIZE, wParam, lParam);
1639 }
1640
1641 static LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
1642 {
1643     if(msg == ID_FINDMSGSTRING)
1644         return handle_findmsg((LPFINDREPLACEW)lParam);
1645
1646     switch(msg)
1647     {
1648     case WM_CREATE:
1649         return OnCreate( hWnd, wParam, lParam );
1650
1651     case WM_USER:
1652         return OnUser( hWnd, wParam, lParam );
1653
1654     case WM_NOTIFY:
1655         return OnNotify( hWnd, wParam, lParam );
1656
1657     case WM_COMMAND:
1658         return OnCommand( hWnd, wParam, lParam );
1659
1660     case WM_DESTROY:
1661         PostQuitMessage(0);
1662         break;
1663
1664     case WM_CLOSE:
1665         if(prompt_save_changes())
1666         {
1667             registry_set_winrect();
1668             PostQuitMessage(0);
1669         }
1670         break;
1671
1672     case WM_ACTIVATE:
1673         if (LOWORD(wParam))
1674             SetFocus(GetDlgItem(hWnd, IDC_EDITOR));
1675         return 0;
1676
1677     case WM_INITMENUPOPUP:
1678         return OnInitPopupMenu( hWnd, wParam, lParam );
1679
1680     case WM_SIZE:
1681         return OnSize( hWnd, wParam, lParam );
1682
1683     default:
1684         return DefWindowProcW(hWnd, msg, wParam, lParam);
1685     }
1686
1687     return 0;
1688 }
1689
1690 int CALLBACK WinMain(HINSTANCE hInstance, HINSTANCE hOldInstance, LPSTR szCmdParagraph, int res)
1691 {
1692     INITCOMMONCONTROLSEX classes = {8, ICC_BAR_CLASSES|ICC_COOL_CLASSES};
1693     HACCEL hAccel;
1694     WNDCLASSW wc;
1695     MSG msg;
1696     RECT rc;
1697     static const WCHAR wszAccelTable[] = {'M','A','I','N','A','C','C','E','L',
1698                                           'T','A','B','L','E','\0'};
1699
1700     InitCommonControlsEx(&classes);
1701
1702     hAccel = LoadAcceleratorsW(hInstance, wszAccelTable);
1703
1704     wc.style = CS_HREDRAW | CS_VREDRAW;
1705     wc.lpfnWndProc = WndProc;
1706     wc.cbClsExtra = 0;
1707     wc.cbWndExtra = 4;
1708     wc.hInstance = hInstance;
1709     wc.hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_WORDPAD));
1710     wc.hCursor = LoadCursor(NULL, IDC_IBEAM);
1711     wc.hbrBackground = GetSysColorBrush(COLOR_WINDOW);
1712     wc.lpszMenuName = xszMainMenu;
1713     wc.lpszClassName = wszMainWndClass;
1714     RegisterClassW(&wc);
1715
1716     rc = registry_read_winrect();
1717     hMainWnd = CreateWindowExW(0, wszMainWndClass, wszAppTitle, WS_OVERLAPPEDWINDOW,
1718       rc.left, rc.top, rc.right-rc.left, rc.bottom-rc.top, NULL, NULL, hInstance, NULL);
1719     ShowWindow(hMainWnd, SW_SHOWDEFAULT);
1720
1721     set_caption(NULL);
1722
1723     HandleCommandLine(GetCommandLineW());
1724
1725     while(GetMessageW(&msg,0,0,0))
1726     {
1727         if (IsDialogMessage(hFindWnd, &msg))
1728             continue;
1729
1730         if (TranslateAcceleratorW(hMainWnd, hAccel, &msg))
1731             continue;
1732         TranslateMessage(&msg);
1733         DispatchMessageW(&msg);
1734         if (!PeekMessageW(&msg, 0, 0, 0, PM_NOREMOVE))
1735             SendMessageW(hMainWnd, WM_USER, 0, 0);
1736     }
1737
1738     return 0;
1739 }