base/applications/wordpad/wordpad.c

   1 /*
   2  * Wordpad implementation
   3  *
   4  * Copyright 2004 by Krzysztof Foltman
   5  * Copyright 2007-2008 by Alexander N. Sørnes <alex@thehandofagony.com>
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #define WIN32_LEAN_AND_MEAN
  23 #define _WIN32_IE 0x0400
  24
  25 #include <stdarg.h>
  26 #include <stdlib.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 <shellapi.h>
  36 #include <math.h>
  37 #include <errno.h>
  38
  39 #include "wordpad.h"
  40
  41 #ifdef NONAMELESSUNION
  42 # define U(x)  (x).u
  43 # define U2(x) (x).u2
  44 # define U3(x) (x).u3
  45 #else
  46 # define U(x)  (x)
  47 # define U2(x) (x)
  48 # define U3(x) (x)
  49 #endif
  50
  51 /* use LoadString */
  52 static const WCHAR xszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
  53
  54 static const WCHAR wszRichEditClass[] = {'R','I','C','H','E','D','I','T','2','0','W',0};
  55 static const WCHAR wszMainWndClass[] = {'W','O','R','D','P','A','D','T','O','P',0};
  56 static const WCHAR wszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
  57
  58 static const WCHAR stringFormat[] = {'%','2','d','\0'};
  59
  60 static HWND hMainWnd;
  61 static HWND hEditorWnd;
  62 static HWND hFindWnd;
  63 static HMENU hPopupMenu;
  64
  65 static UINT ID_FINDMSGSTRING;
  66
  67 static DWORD wordWrap[2];
  68 static DWORD barState[2];
  69 static WPARAM fileFormat = SF_RTF;
  70
  71 static WCHAR wszFileName[MAX_PATH];
  72 static WCHAR wszFilter[MAX_STRING_LEN*4+6*3+5];
  73 static WCHAR wszDefaultFileName[MAX_STRING_LEN];
  74 static WCHAR wszSaveChanges[MAX_STRING_LEN];
  75 static WCHAR units_cmW[MAX_STRING_LEN];
  76
  77 static char units_cmA[MAX_STRING_LEN];
  78
  79 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam );
  80
  81 /* Load string resources */
  82 static void DoLoadStrings(void)
  83 {
  84     LPWSTR p = wszFilter;
  85     static const WCHAR files_rtf[] = {'*','.','r','t','f','\0'};
  86     static const WCHAR files_txt[] = {'*','.','t','x','t','\0'};
  87     static const WCHAR files_all[] = {'*','.','*','\0'};
  88
  89     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
  90
  91     LoadStringW(hInstance, STRING_RICHTEXT_FILES_RTF, p, MAX_STRING_LEN);
  92     p += lstrlenW(p) + 1;
  93     lstrcpyW(p, files_rtf);
  94     p += lstrlenW(p) + 1;
  95     LoadStringW(hInstance, STRING_TEXT_FILES_TXT, p, MAX_STRING_LEN);
  96     p += lstrlenW(p) + 1;
  97     lstrcpyW(p, files_txt);
  98     p += lstrlenW(p) + 1;
  99     LoadStringW(hInstance, STRING_TEXT_FILES_UNICODE_TXT, p, MAX_STRING_LEN);
 100     p += lstrlenW(p) + 1;
 101     lstrcpyW(p, files_txt);
 102     p += lstrlenW(p) + 1;
 103     LoadStringW(hInstance, STRING_ALL_FILES, p, MAX_STRING_LEN);
 104     p += lstrlenW(p) + 1;
 105     lstrcpyW(p, files_all);
 106     p += lstrlenW(p) + 1;
 107     *p = '\0';
 108
 109     p = wszDefaultFileName;
 110     LoadStringW(hInstance, STRING_DEFAULT_FILENAME, p, MAX_STRING_LEN);
 111
 112     p = wszSaveChanges;
 113     LoadStringW(hInstance, STRING_PROMPT_SAVE_CHANGES, p, MAX_STRING_LEN);
 114
 115     LoadStringA(hInstance, STRING_UNITS_CM, units_cmA, MAX_STRING_LEN);
 116     LoadStringW(hInstance, STRING_UNITS_CM, units_cmW, MAX_STRING_LEN);
 117 }
 118
 119 static void AddButton(HWND hwndToolBar, int nImage, int nCommand)
 120 {
 121     TBBUTTON button;
 122
 123     ZeroMemory(&button, sizeof(button));
 124     button.iBitmap = nImage;
 125     button.idCommand = nCommand;
 126     button.fsState = TBSTATE_ENABLED;
 127     button.fsStyle = TBSTYLE_BUTTON;
 128     button.dwData = 0;
 129     button.iString = -1;
 130     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
 131 }
 132
 133 static void AddSeparator(HWND hwndToolBar)
 134 {
 135     TBBUTTON button;
 136
 137     ZeroMemory(&button, sizeof(button));
 138     button.iBitmap = -1;
 139     button.idCommand = 0;
 140     button.fsState = 0;
 141     button.fsStyle = TBSTYLE_SEP;
 142     button.dwData = 0;
 143     button.iString = -1;
 144     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
 145 }
 146
 147 static DWORD CALLBACK stream_in(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
 148 {
 149     HANDLE hFile = (HANDLE)cookie;
 150     DWORD read;
 151
 152     if(!ReadFile(hFile, buffer, cb, &read, 0))
 153         return 1;
 154
 155     *pcb = read;
 156
 157     return 0;
 158 }
 159
 160 static DWORD CALLBACK stream_out(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
 161 {
 162     DWORD written;
 163     int ret;
 164     HANDLE hFile = (HANDLE)cookie;
 165
 166     ret = WriteFile(hFile, buffer, cb, &written, 0);
 167
 168     if(!ret || (cb != written))
 169         return 1;
 170
 171     *pcb = cb;
 172
 173     return 0;
 174 }
 175
 176 LPWSTR file_basename(LPWSTR path)
 177 {
 178     LPWSTR pos = path + lstrlenW(path);
 179
 180     while(pos > path)
 181     {
 182         if(*pos == '\\' || *pos == '/')
 183         {
 184             pos++;
 185             break;
 186         }
 187         pos--;
 188     }
 189     return pos;
 190 }
 191
 192 static void set_caption(LPCWSTR wszNewFileName)
 193 {
 194     static const WCHAR wszSeparator[] = {' ','-',' '};
 195     WCHAR *wszCaption;
 196     SIZE_T length = 0;
 197
 198     if(!wszNewFileName)
 199         wszNewFileName = wszDefaultFileName;
 200     else
 201         wszNewFileName = file_basename((LPWSTR)wszNewFileName);
 202
 203     wszCaption = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
 204                 lstrlenW(wszNewFileName)*sizeof(WCHAR)+sizeof(wszSeparator)+sizeof(wszAppTitle));
 205
 206     if(!wszCaption)
 207         return;
 208
 209     memcpy(wszCaption, wszNewFileName, lstrlenW(wszNewFileName)*sizeof(WCHAR));
 210     length += lstrlenW(wszNewFileName);
 211     memcpy(wszCaption + length, wszSeparator, sizeof(wszSeparator));
 212     length += sizeof(wszSeparator) / sizeof(WCHAR);
 213     memcpy(wszCaption + length, wszAppTitle, sizeof(wszAppTitle));
 214
 215     SetWindowTextW(hMainWnd, wszCaption);
 216
 217     HeapFree(GetProcessHeap(), 0, wszCaption);
 218 }
 219
 220 static BOOL validate_endptr(LPCSTR endptr, BOOL units)
 221 {
 222     if(!endptr)
 223         return FALSE;
 224     if(!*endptr)
 225         return TRUE;
 226
 227     while(*endptr == ' ')
 228         endptr++;
 229
 230     if(!units)
 231         return *endptr == '\0';
 232
 233     /* FIXME: Allow other units and convert between them */
 234     if(!lstrcmpA(endptr, units_cmA))
 235         endptr += 2;
 236
 237     return *endptr == '\0';
 238 }
 239
 240 static BOOL number_from_string(LPCWSTR string, float *num, BOOL units)
 241 {
 242     double ret;
 243     char buffer[MAX_STRING_LEN];
 244     char *endptr = buffer;
 245
 246     WideCharToMultiByte(CP_ACP, 0, string, -1, buffer, MAX_STRING_LEN, NULL, NULL);
 247     *num = 0;
 248     errno = 0;
 249     ret = strtod(buffer, &endptr);
 250
 251     if((ret == 0 && errno != 0) || endptr == buffer || !validate_endptr(endptr, units))
 252     {
 253         return FALSE;
 254     } else
 255     {
 256         *num = (float)ret;
 257         return TRUE;
 258     }
 259 }
 260
 261 static void set_size(float size)
 262 {
 263     CHARFORMAT2W fmt;
 264
 265     ZeroMemory(&fmt, sizeof(fmt));
 266     fmt.cbSize = sizeof(fmt);
 267     fmt.dwMask = CFM_SIZE;
 268     fmt.yHeight = (int)(size * 20.0);
 269     SendMessageW(hEditorWnd, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 270 }
 271
 272 static void on_sizelist_modified(HWND hwndSizeList, LPWSTR wszNewFontSize)
 273 {
 274     WCHAR sizeBuffer[MAX_STRING_LEN];
 275     CHARFORMAT2W format;
 276
 277     ZeroMemory(&format, sizeof(format));
 278     format.cbSize = sizeof(format);
 279     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&format);
 280
 281     wsprintfW(sizeBuffer, stringFormat, format.yHeight / 20);
 282     if(lstrcmpW(sizeBuffer, wszNewFontSize))
 283     {
 284         float size = 0;
 285         if(number_from_string((LPCWSTR) wszNewFontSize, &size, FALSE)
 286            && size > 0)
 287         {
 288             set_size(size);
 289         } else
 290         {
 291             SetWindowTextW(hwndSizeList, sizeBuffer);
 292             MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
 293                         wszAppTitle, MB_OK | MB_ICONINFORMATION);
 294         }
 295     }
 296 }
 297
 298 static void add_size(HWND hSizeListWnd, unsigned size)
 299 {
 300     WCHAR buffer[3];
 301     COMBOBOXEXITEMW cbItem;
 302     cbItem.mask = CBEIF_TEXT;
 303     cbItem.iItem = -1;
 304
 305     wsprintfW(buffer, stringFormat, size);
 306     cbItem.pszText = (LPWSTR)buffer;
 307     SendMessageW(hSizeListWnd, CBEM_INSERTITEMW, 0, (LPARAM)&cbItem);
 308 }
 309
 310 static void populate_size_list(HWND hSizeListWnd)
 311 {
 312     HWND hReBarWnd = GetDlgItem(hMainWnd, IDC_REBAR);
 313     HWND hFontListWnd = GetDlgItem(hReBarWnd, IDC_FONTLIST);
 314     COMBOBOXEXITEMW cbFontItem;
 315     CHARFORMAT2W fmt;
 316     HWND hListEditWnd = (HWND)SendMessageW(hSizeListWnd, CBEM_GETEDITCONTROL, 0, 0);
 317     HDC hdc = GetDC(hMainWnd);
 318     static const unsigned choices[] = {8,9,10,11,12,14,16,18,20,22,24,26,28,36,48,72};
 319     WCHAR buffer[3];
 320     int i;
 321     DWORD fontStyle;
 322
 323     ZeroMemory(&fmt, sizeof(fmt));
 324     fmt.cbSize = sizeof(fmt);
 325     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 326
 327     cbFontItem.mask = CBEIF_LPARAM;
 328     cbFontItem.iItem = SendMessageW(hFontListWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)fmt.szFaceName);
 329     SendMessageW(hFontListWnd, CBEM_GETITEMW, 0, (LPARAM)&cbFontItem);
 330
 331     fontStyle = (DWORD)LOWORD(cbFontItem.lParam);
 332
 333     SendMessageW(hSizeListWnd, CB_RESETCONTENT, 0, 0);
 334
 335     if((fontStyle & RASTER_FONTTYPE) && cbFontItem.iItem)
 336     {
 337         add_size(hSizeListWnd, (BYTE)MulDiv(HIWORD(cbFontItem.lParam), 72,
 338                                GetDeviceCaps(hdc, LOGPIXELSY)));
 339     } else
 340     {
 341         for(i = 0; i < sizeof(choices)/sizeof(choices[0]); i++)
 342             add_size(hSizeListWnd, choices[i]);
 343     }
 344
 345     wsprintfW(buffer, stringFormat, fmt.yHeight / 20);
 346     SendMessageW(hListEditWnd, WM_SETTEXT, 0, (LPARAM)buffer);
 347 }
 348
 349 static void update_size_list(void)
 350 {
 351     HWND hReBar = GetDlgItem(hMainWnd, IDC_REBAR);
 352     HWND hwndSizeList = GetDlgItem(hReBar, IDC_SIZELIST);
 353     HWND hwndSizeListEdit = (HWND)SendMessageW(hwndSizeList, CBEM_GETEDITCONTROL, 0, 0);
 354     WCHAR fontSize[MAX_STRING_LEN], sizeBuffer[MAX_STRING_LEN];
 355     CHARFORMAT2W fmt;
 356
 357     ZeroMemory(&fmt, sizeof(fmt));
 358     fmt.cbSize = sizeof(fmt);
 359
 360     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 361
 362     SendMessageW(hwndSizeListEdit, WM_GETTEXT, MAX_PATH, (LPARAM)fontSize);
 363     wsprintfW(sizeBuffer, stringFormat, fmt.yHeight / 20);
 364
 365     if(lstrcmpW(fontSize, sizeBuffer))
 366         SendMessageW(hwndSizeListEdit, WM_SETTEXT, 0, (LPARAM)sizeBuffer);
 367 }
 368
 369 static void update_font_list(void)
 370 {
 371     HWND hReBar = GetDlgItem(hMainWnd, IDC_REBAR);
 372     HWND hFontList = GetDlgItem(hReBar, IDC_FONTLIST);
 373     HWND hFontListEdit = (HWND)SendMessageW(hFontList, CBEM_GETEDITCONTROL, 0, 0);
 374     WCHAR fontName[MAX_STRING_LEN];
 375     CHARFORMAT2W fmt;
 376
 377     ZeroMemory(&fmt, sizeof(fmt));
 378     fmt.cbSize = sizeof(fmt);
 379
 380     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 381     if (!SendMessageW(hFontListEdit, WM_GETTEXT, MAX_PATH, (LPARAM)fontName)) return;
 382
 383     if(lstrcmpW(fontName, fmt.szFaceName))
 384     {
 385         SendMessageW(hFontListEdit, WM_SETTEXT, 0, (LPARAM)fmt.szFaceName);
 386         populate_size_list(GetDlgItem(hReBar, IDC_SIZELIST));
 387     } else
 388     {
 389         update_size_list();
 390     }
 391 }
 392
 393 static void clear_formatting(void)
 394 {
 395     PARAFORMAT2 pf;
 396
 397     pf.cbSize = sizeof(pf);
 398     pf.dwMask = PFM_ALIGNMENT;
 399     pf.wAlignment = PFA_LEFT;
 400     SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
 401 }
 402
 403 static int fileformat_number(WPARAM format)
 404 {
 405     int number = 0;
 406
 407     if(format == SF_TEXT)
 408     {
 409         number = 1;
 410     } else if (format == (SF_TEXT | SF_UNICODE))
 411     {
 412         number = 2;
 413     }
 414     return number;
 415 }
 416
 417 static WPARAM fileformat_flags(int format)
 418 {
 419     WPARAM flags[] = { SF_RTF , SF_TEXT , SF_TEXT | SF_UNICODE };
 420
 421     return flags[format];
 422 }
 423
 424 static void set_font(LPCWSTR wszFaceName)
 425 {
 426     HWND hReBarWnd = GetDlgItem(hMainWnd, IDC_REBAR);
 427     HWND hSizeListWnd = GetDlgItem(hReBarWnd, IDC_SIZELIST);
 428     HWND hFontListWnd = GetDlgItem(hReBarWnd, IDC_FONTLIST);
 429     HWND hFontListEditWnd = (HWND)SendMessageW(hFontListWnd, CBEM_GETEDITCONTROL, 0, 0);
 430     CHARFORMAT2W fmt;
 431
 432     ZeroMemory(&fmt, sizeof(fmt));
 433
 434     fmt.cbSize = sizeof(fmt);
 435     fmt.dwMask = CFM_FACE;
 436
 437     lstrcpyW(fmt.szFaceName, wszFaceName);
 438
 439     SendMessageW(hEditorWnd, EM_SETCHARFORMAT,  SCF_SELECTION, (LPARAM)&fmt);
 440
 441     populate_size_list(hSizeListWnd);
 442
 443     SendMessageW(hFontListEditWnd, WM_SETTEXT, 0, (LPARAM)(LPWSTR)wszFaceName);
 444 }
 445
 446 static void set_default_font(void)
 447 {
 448     static const WCHAR richTextFont[] = {'T','i','m','e','s',' ','N','e','w',' ',
 449                                          'R','o','m','a','n',0};
 450     static const WCHAR plainTextFont[] = {'C','o','u','r','i','e','r',' ','N','e','w',0};
 451     CHARFORMAT2W fmt;
 452     LPCWSTR font;
 453
 454     ZeroMemory(&fmt, sizeof(fmt));
 455
 456     fmt.cbSize = sizeof(fmt);
 457     fmt.dwMask = CFM_FACE | CFM_BOLD | CFM_ITALIC | CFM_UNDERLINE;
 458     fmt.dwEffects = 0;
 459
 460     if(fileFormat & SF_RTF)
 461         font = richTextFont;
 462     else
 463         font = plainTextFont;
 464
 465     lstrcpyW(fmt.szFaceName, font);
 466
 467     SendMessageW(hEditorWnd, EM_SETCHARFORMAT,  SCF_DEFAULT, (LPARAM)&fmt);
 468 }
 469
 470 static void on_fontlist_modified(HWND hwndFontList, LPWSTR wszNewFaceName)
 471 {
 472     CHARFORMAT2W format;
 473     ZeroMemory(&format, sizeof(format));
 474     format.cbSize = sizeof(format);
 475     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&format);
 476
 477     if(lstrcmpW(format.szFaceName, wszNewFaceName))
 478         set_font((LPCWSTR) wszNewFaceName);
 479 }
 480
 481 static void add_font(LPCWSTR fontName, DWORD fontType, HWND hListWnd, NEWTEXTMETRICEXW *ntmc)
 482 {
 483     COMBOBOXEXITEMW cbItem;
 484     WCHAR buffer[MAX_PATH];
 485     int fontHeight = 0;
 486
 487     cbItem.mask = CBEIF_TEXT;
 488     cbItem.pszText = buffer;
 489     cbItem.cchTextMax = MAX_STRING_LEN;
 490     cbItem.iItem = 0;
 491
 492     while(SendMessageW(hListWnd, CBEM_GETITEMW, 0, (LPARAM)&cbItem))
 493     {
 494         if(lstrcmpiW(cbItem.pszText, fontName) <= 0)
 495             cbItem.iItem++;
 496         else
 497             break;
 498     }
 499     cbItem.pszText = HeapAlloc( GetProcessHeap(), 0, (lstrlenW(fontName) + 1)*sizeof(WCHAR) );
 500     lstrcpyW( cbItem.pszText, fontName );
 501
 502     cbItem.mask |= CBEIF_LPARAM;
 503     if(fontType & RASTER_FONTTYPE)
 504         fontHeight = ntmc->ntmTm.tmHeight - ntmc->ntmTm.tmInternalLeading;
 505
 506     cbItem.lParam = MAKELONG(fontType,fontHeight);
 507     SendMessageW(hListWnd, CBEM_INSERTITEMW, 0, (LPARAM)&cbItem);
 508     HeapFree( GetProcessHeap(), 0, cbItem.pszText );
 509 }
 510
 511 static void dialog_choose_font(void)
 512 {
 513     CHOOSEFONTW cf;
 514     LOGFONTW lf;
 515     CHARFORMAT2W fmt;
 516     HDC hDC = GetDC(hMainWnd);
 517
 518     ZeroMemory(&cf, sizeof(cf));
 519     cf.lStructSize = sizeof(cf);
 520     cf.hwndOwner = hMainWnd;
 521     cf.lpLogFont = &lf;
 522     cf.Flags = CF_SCREENFONTS | CF_NOSCRIPTSEL | CF_INITTOLOGFONTSTRUCT | CF_EFFECTS;
 523
 524     ZeroMemory(&fmt, sizeof(fmt));
 525     fmt.cbSize = sizeof(fmt);
 526
 527     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 528     lstrcpyW(cf.lpLogFont->lfFaceName, fmt.szFaceName);
 529     cf.lpLogFont->lfItalic = (fmt.dwEffects & CFE_ITALIC) ? TRUE : FALSE;
 530     cf.lpLogFont->lfWeight = (fmt.dwEffects & CFE_BOLD) ? FW_BOLD : FW_NORMAL;
 531     cf.lpLogFont->lfUnderline = (fmt.dwEffects & CFE_UNDERLINE) ? TRUE : FALSE;
 532     cf.lpLogFont->lfStrikeOut = (fmt.dwEffects & CFE_STRIKEOUT) ? TRUE : FALSE;
 533     cf.lpLogFont->lfHeight = -MulDiv(fmt.yHeight / 20, GetDeviceCaps(hDC, LOGPIXELSY), 72);
 534     cf.rgbColors = fmt.crTextColor;
 535
 536     if(ChooseFontW(&cf))
 537     {
 538         ZeroMemory(&fmt, sizeof(fmt));
 539         fmt.cbSize = sizeof(fmt);
 540         fmt.dwMask = CFM_BOLD | CFM_ITALIC | CFM_SIZE | CFM_UNDERLINE | CFM_STRIKEOUT | CFM_COLOR;
 541         fmt.yHeight = cf.iPointSize * 2;
 542
 543         if(cf.nFontType & BOLD_FONTTYPE)
 544             fmt.dwEffects |= CFE_BOLD;
 545         if(cf.nFontType & ITALIC_FONTTYPE)
 546             fmt.dwEffects |= CFE_ITALIC;
 547         if(cf.lpLogFont->lfUnderline == TRUE)
 548             fmt.dwEffects |= CFE_UNDERLINE;
 549         if(cf.lpLogFont->lfStrikeOut == TRUE)
 550             fmt.dwEffects |= CFE_STRIKEOUT;
 551
 552         fmt.crTextColor = cf.rgbColors;
 553
 554         SendMessageW(hEditorWnd, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 555         set_font(cf.lpLogFont->lfFaceName);
 556     }
 557 }
 558
 559
 560 int CALLBACK enum_font_proc(const LOGFONTW *lpelfe, const TEXTMETRICW *lpntme,
 561                             DWORD FontType, LPARAM lParam)
 562 {
 563     HWND hListWnd = (HWND) lParam;
 564
 565     if(SendMessageW(hListWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)lpelfe->lfFaceName) == CB_ERR)
 566     {
 567
 568         add_font((LPWSTR)lpelfe->lfFaceName, FontType, hListWnd, (NEWTEXTMETRICEXW*)lpntme);
 569     }
 570
 571     return 1;
 572 }
 573
 574 static void populate_font_list(HWND hListWnd)
 575 {
 576     HDC hdc = GetDC(hMainWnd);
 577     LOGFONTW fontinfo;
 578     HWND hListEditWnd = (HWND)SendMessageW(hListWnd, CBEM_GETEDITCONTROL, 0, 0);
 579     CHARFORMAT2W fmt;
 580
 581     fontinfo.lfCharSet = DEFAULT_CHARSET;
 582     *fontinfo.lfFaceName = '\0';
 583     fontinfo.lfPitchAndFamily = 0;
 584
 585     EnumFontFamiliesExW(hdc, &fontinfo, enum_font_proc,
 586                         (LPARAM)hListWnd, 0);
 587
 588     ZeroMemory(&fmt, sizeof(fmt));
 589     fmt.cbSize = sizeof(fmt);
 590     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_DEFAULT, (LPARAM)&fmt);
 591     SendMessageW(hListEditWnd, WM_SETTEXT, 0, (LPARAM)fmt.szFaceName);
 592 }
 593
 594 static void update_window(void)
 595 {
 596     RECT rect;
 597
 598     GetClientRect(hMainWnd, &rect);
 599
 600     OnSize(hMainWnd, SIZE_RESTORED, MAKELPARAM(rect.right, rect.bottom));
 601 }
 602
 603 static BOOL is_bar_visible(int bandId)
 604 {
 605     return barState[reg_formatindex(fileFormat)] & (1 << bandId);
 606 }
 607
 608 static void store_bar_state(int bandId, BOOL show)
 609 {
 610     int formatIndex = reg_formatindex(fileFormat);
 611
 612     if(show)
 613         barState[formatIndex] |= (1 << bandId);
 614     else
 615         barState[formatIndex] &= ~(1 << bandId);
 616 }
 617
 618 static void set_toolbar_state(int bandId, BOOL show)
 619 {
 620     HWND hwndReBar = GetDlgItem(hMainWnd, IDC_REBAR);
 621
 622     SendMessageW(hwndReBar, RB_SHOWBAND, SendMessageW(hwndReBar, RB_IDTOINDEX, bandId, 0), show);
 623
 624     if(bandId == BANDID_TOOLBAR)
 625     {
 626         REBARBANDINFOW rbbinfo;
 627         int index = SendMessageW(hwndReBar, RB_IDTOINDEX, BANDID_FONTLIST, 0);
 628
 629         rbbinfo.cbSize = sizeof(rbbinfo);
 630         rbbinfo.fMask = RBBIM_STYLE;
 631
 632         SendMessageW(hwndReBar, RB_GETBANDINFO, index, (LPARAM)&rbbinfo);
 633
 634         if(!show)
 635             rbbinfo.fStyle &= ~RBBS_BREAK;
 636         else
 637             rbbinfo.fStyle |= RBBS_BREAK;
 638
 639         SendMessageW(hwndReBar, RB_SETBANDINFO, index, (LPARAM)&rbbinfo);
 640     }
 641
 642     if(bandId == BANDID_TOOLBAR || bandId == BANDID_FORMATBAR || bandId == BANDID_RULER)
 643         store_bar_state(bandId, show);
 644 }
 645
 646 static void set_statusbar_state(BOOL show)
 647 {
 648     HWND hStatusWnd = GetDlgItem(hMainWnd, IDC_STATUSBAR);
 649
 650     ShowWindow(hStatusWnd, show ? SW_SHOW : SW_HIDE);
 651     store_bar_state(BANDID_STATUSBAR, show);
 652 }
 653
 654 static void set_bar_states(void)
 655 {
 656     set_toolbar_state(BANDID_TOOLBAR, is_bar_visible(BANDID_TOOLBAR));
 657     set_toolbar_state(BANDID_FONTLIST, is_bar_visible(BANDID_FORMATBAR));
 658     set_toolbar_state(BANDID_SIZELIST, is_bar_visible(BANDID_FORMATBAR));
 659     set_toolbar_state(BANDID_FORMATBAR, is_bar_visible(BANDID_FORMATBAR));
 660     set_toolbar_state(BANDID_RULER, is_bar_visible(BANDID_RULER));
 661     set_statusbar_state(is_bar_visible(BANDID_STATUSBAR));
 662
 663     update_window();
 664 }
 665
 666 static void preview_exit(HWND hMainWnd)
 667 {
 668     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
 669     HMENU hMenu = LoadMenuW(hInstance, MAKEINTRESOURCEW(IDM_MAINMENU));
 670     HWND hEditorWnd = GetDlgItem(hMainWnd, IDC_EDITOR);
 671
 672     set_bar_states();
 673     ShowWindow(hEditorWnd, TRUE);
 674
 675     close_preview(hMainWnd);
 676
 677     SetMenu(hMainWnd, hMenu);
 678     registry_read_filelist(hMainWnd);
 679
 680     update_window();
 681 }
 682
 683 static void set_fileformat(WPARAM format)
 684 {
 685     HICON hIcon;
 686     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
 687     fileFormat = format;
 688
 689     if(format & SF_TEXT)
 690         hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_TXT));
 691     else
 692         hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_RTF));
 693
 694     SendMessageW(hMainWnd, WM_SETICON, ICON_BIG, (LPARAM)hIcon);
 695
 696     set_bar_states();
 697     set_default_font();
 698     target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
 699 }
 700
 701 static void DoOpenFile(LPCWSTR szOpenFileName)
 702 {
 703     HANDLE hFile;
 704     EDITSTREAM es;
 705     char fileStart[5];
 706     DWORD readOut;
 707     WPARAM format = SF_TEXT;
 708
 709     hFile = CreateFileW(szOpenFileName, GENERIC_READ, FILE_SHARE_READ, NULL,
 710                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
 711     if (hFile == INVALID_HANDLE_VALUE)
 712         return;
 713
 714     ReadFile(hFile, fileStart, 5, &readOut, NULL);
 715     SetFilePointer(hFile, 0, NULL, FILE_BEGIN);
 716
 717     if(readOut >= 2 && (BYTE)fileStart[0] == 0xff && (BYTE)fileStart[1] == 0xfe)
 718     {
 719         format = SF_TEXT | SF_UNICODE;
 720         SetFilePointer(hFile, 2, NULL, FILE_BEGIN);
 721     } else if(readOut >= 5)
 722     {
 723         static const char header[] = "{\\rtf";
 724         static const BYTE STG_magic[] = { 0xd0,0xcf,0x11,0xe0 };
 725
 726         if(!memcmp(header, fileStart, 5))
 727             format = SF_RTF;
 728         else if (!memcmp(STG_magic, fileStart, sizeof(STG_magic)))
 729         {
 730             CloseHandle(hFile);
 731             MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_OLE_STORAGE_NOT_SUPPORTED), wszAppTitle,
 732                         MB_OK | MB_ICONEXCLAMATION);
 733             return;
 734         }
 735     }
 736
 737     es.dwCookie = (DWORD_PTR)hFile;
 738     es.pfnCallback = stream_in;
 739
 740     clear_formatting();
 741     set_fileformat(format);
 742     SendMessageW(hEditorWnd, EM_STREAMIN, format, (LPARAM)&es);
 743
 744     CloseHandle(hFile);
 745
 746     SetFocus(hEditorWnd);
 747
 748     set_caption(szOpenFileName);
 749
 750     lstrcpyW(wszFileName, szOpenFileName);
 751     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
 752     registry_set_filelist(szOpenFileName, hMainWnd);
 753     update_font_list();
 754 }
 755
 756 static void DoSaveFile(LPCWSTR wszSaveFileName, WPARAM format)
 757 {
 758     HANDLE hFile;
 759     EDITSTREAM stream;
 760     LRESULT ret;
 761
 762     hFile = CreateFileW(wszSaveFileName, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS,
 763         FILE_ATTRIBUTE_NORMAL, NULL);
 764
 765     if(hFile == INVALID_HANDLE_VALUE)
 766         return;
 767
 768     if(format == (SF_TEXT | SF_UNICODE))
 769     {
 770         static const BYTE unicode[] = {0xff,0xfe};
 771         DWORD writeOut;
 772         WriteFile(hFile, &unicode, sizeof(unicode), &writeOut, 0);
 773
 774         if(writeOut != sizeof(unicode))
 775             return;
 776     }
 777
 778     stream.dwCookie = (DWORD_PTR)hFile;
 779     stream.pfnCallback = stream_out;
 780
 781     ret = SendMessageW(hEditorWnd, EM_STREAMOUT, format, (LPARAM)&stream);
 782
 783     CloseHandle(hFile);
 784
 785     SetFocus(hEditorWnd);
 786
 787     if(!ret)
 788     {
 789         GETTEXTLENGTHEX gt;
 790         gt.flags = GTL_DEFAULT;
 791         gt.codepage = 1200;
 792
 793         if(SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
 794             return;
 795     }
 796
 797     lstrcpyW(wszFileName, wszSaveFileName);
 798     set_caption(wszFileName);
 799     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
 800     set_fileformat(format);
 801 }
 802
 803 static void DialogSaveFile(void)
 804 {
 805     OPENFILENAMEW sfn;
 806
 807     WCHAR wszFile[MAX_PATH] = {'\0'};
 808     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
 809
 810     ZeroMemory(&sfn, sizeof(sfn));
 811
 812     sfn.lStructSize = sizeof(sfn);
 813     sfn.Flags = OFN_HIDEREADONLY | OFN_PATHMUSTEXIST | OFN_OVERWRITEPROMPT;
 814     sfn.hwndOwner = hMainWnd;
 815     sfn.lpstrFilter = wszFilter;
 816     sfn.lpstrFile = wszFile;
 817     sfn.nMaxFile = MAX_PATH;
 818     sfn.lpstrDefExt = wszDefExt;
 819     sfn.nFilterIndex = fileformat_number(fileFormat)+1;
 820
 821     while(GetSaveFileNameW(&sfn))
 822     {
 823         if(fileformat_flags(sfn.nFilterIndex-1) != SF_RTF)
 824         {
 825             if(MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_SAVE_LOSEFORMATTING),
 826                            wszAppTitle, MB_YESNO | MB_ICONEXCLAMATION) != IDYES)
 827             {
 828                 continue;
 829             } else
 830             {
 831                 DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
 832                 break;
 833             }
 834         } else
 835         {
 836             DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
 837             break;
 838         }
 839     }
 840 }
 841
 842 static BOOL prompt_save_changes(void)
 843 {
 844     if(!wszFileName[0])
 845     {
 846         GETTEXTLENGTHEX gt;
 847         gt.flags = GTL_NUMCHARS;
 848         gt.codepage = 1200;
 849         if(!SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
 850             return TRUE;
 851     }
 852
 853     if(!SendMessageW(hEditorWnd, EM_GETMODIFY, 0, 0))
 854     {
 855         return TRUE;
 856     } else
 857     {
 858         LPWSTR displayFileName;
 859         WCHAR *text;
 860         int ret;
 861
 862         if(!wszFileName[0])
 863             displayFileName = wszDefaultFileName;
 864         else
 865             displayFileName = file_basename(wszFileName);
 866
 867         text = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
 868                          (lstrlenW(displayFileName)+lstrlenW(wszSaveChanges))*sizeof(WCHAR));
 869
 870         if(!text)
 871             return FALSE;
 872
 873         wsprintfW(text, wszSaveChanges, displayFileName);
 874
 875         ret = MessageBoxW(hMainWnd, text, wszAppTitle, MB_YESNOCANCEL | MB_ICONEXCLAMATION);
 876
 877         HeapFree(GetProcessHeap(), 0, text);
 878
 879         switch(ret)
 880         {
 881             case IDNO:
 882                 return TRUE;
 883
 884             case IDYES:
 885                 if(wszFileName[0])
 886                     DoSaveFile(wszFileName, fileFormat);
 887                 else
 888                     DialogSaveFile();
 889                 return TRUE;
 890
 891             default:
 892                 return FALSE;
 893         }
 894     }
 895 }
 896
 897 static void DialogOpenFile(void)
 898 {
 899     OPENFILENAMEW ofn;
 900
 901     WCHAR wszFile[MAX_PATH] = {'\0'};
 902     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
 903
 904     ZeroMemory(&ofn, sizeof(ofn));
 905
 906     ofn.lStructSize = sizeof(ofn);
 907     ofn.Flags = OFN_HIDEREADONLY | OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST;
 908     ofn.hwndOwner = hMainWnd;
 909     ofn.lpstrFilter = wszFilter;
 910     ofn.lpstrFile = wszFile;
 911     ofn.nMaxFile = MAX_PATH;
 912     ofn.lpstrDefExt = wszDefExt;
 913     ofn.nFilterIndex = fileformat_number(fileFormat)+1;
 914
 915     if(GetOpenFileNameW(&ofn))
 916     {
 917         if(prompt_save_changes())
 918             DoOpenFile(ofn.lpstrFile);
 919     }
 920 }
 921
 922 static void dialog_about(void)
 923 {
 924     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
 925     HICON icon = LoadImageW(hInstance, MAKEINTRESOURCEW(IDI_WORDPAD), IMAGE_ICON, 48, 48, LR_SHARED);
 926     ShellAboutW(hMainWnd, wszAppTitle, 0, icon);
 927 }
 928
 929 static INT_PTR CALLBACK formatopts_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
 930 {
 931     switch(message)
 932     {
 933         case WM_INITDIALOG:
 934             {
 935                 LPPROPSHEETPAGEW ps = (LPPROPSHEETPAGEW)lParam;
 936                 int wrap = -1;
 937                 char id[4];
 938                 HWND hIdWnd = GetDlgItem(hWnd, IDC_PAGEFMT_ID);
 939
 940                 sprintf(id, "%d\n", (int)ps->lParam);
 941                 SetWindowTextA(hIdWnd, id);
 942                 if(wordWrap[ps->lParam] == ID_WORDWRAP_WINDOW)
 943                     wrap = IDC_PAGEFMT_WW;
 944                 else if(wordWrap[ps->lParam] == ID_WORDWRAP_MARGIN)
 945                     wrap = IDC_PAGEFMT_WM;
 946
 947                 if(wrap != -1)
 948                     CheckRadioButton(hWnd, IDC_PAGEFMT_WW,
 949                                      IDC_PAGEFMT_WM, wrap);
 950
 951                 if(barState[ps->lParam] & (1 << BANDID_TOOLBAR))
 952                     CheckDlgButton(hWnd, IDC_PAGEFMT_TB, TRUE);
 953                 if(barState[ps->lParam] & (1 << BANDID_FORMATBAR))
 954                     CheckDlgButton(hWnd, IDC_PAGEFMT_FB, TRUE);
 955                 if(barState[ps->lParam] & (1 << BANDID_RULER))
 956                     CheckDlgButton(hWnd, IDC_PAGEFMT_RU, TRUE);
 957                 if(barState[ps->lParam] & (1 << BANDID_STATUSBAR))
 958                     CheckDlgButton(hWnd, IDC_PAGEFMT_SB, TRUE);
 959             }
 960             break;
 961
 962         case WM_COMMAND:
 963             switch(LOWORD(wParam))
 964             {
 965                 case IDC_PAGEFMT_WW:
 966                 case IDC_PAGEFMT_WM:
 967                     CheckRadioButton(hWnd, IDC_PAGEFMT_WW, IDC_PAGEFMT_WM,
 968                                      LOWORD(wParam));
 969                     break;
 970
 971                 case IDC_PAGEFMT_TB:
 972                 case IDC_PAGEFMT_FB:
 973                 case IDC_PAGEFMT_RU:
 974                 case IDC_PAGEFMT_SB:
 975                     CheckDlgButton(hWnd, LOWORD(wParam),
 976                                    !IsDlgButtonChecked(hWnd, LOWORD(wParam)));
 977                     break;
 978             }
 979             break;
 980         case WM_NOTIFY:
 981             {
 982                 LPNMHDR header = (LPNMHDR)lParam;
 983                 if(header->code == PSN_APPLY)
 984                 {
 985                     HWND hIdWnd = GetDlgItem(hWnd, IDC_PAGEFMT_ID);
 986                     char sid[4];
 987                     int id;
 988
 989                     GetWindowTextA(hIdWnd, sid, 4);
 990                     id = atoi(sid);
 991                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_WW))
 992                         wordWrap[id] = ID_WORDWRAP_WINDOW;
 993                     else if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_WM))
 994                         wordWrap[id] = ID_WORDWRAP_MARGIN;
 995
 996                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_TB))
 997                         barState[id] |= (1 << BANDID_TOOLBAR);
 998                     else
 999                         barState[id] &= ~(1 << BANDID_TOOLBAR);
1000
1001                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_FB))
1002                         barState[id] |= (1 << BANDID_FORMATBAR);
1003                     else
1004                         barState[id] &= ~(1 << BANDID_FORMATBAR);
1005
1006                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_RU))
1007                         barState[id] |= (1 << BANDID_RULER);
1008                     else
1009                         barState[id] &= ~(1 << BANDID_RULER);
1010
1011                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_SB))
1012                         barState[id] |= (1 << BANDID_STATUSBAR);
1013                     else
1014                         barState[id] &= ~(1 << BANDID_STATUSBAR);
1015                 }
1016             }
1017             break;
1018     }
1019     return FALSE;
1020 }
1021
1022 static void dialog_viewproperties(void)
1023 {
1024     PROPSHEETPAGEW psp[2];
1025     PROPSHEETHEADERW psh;
1026     int i;
1027     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
1028     LPCPROPSHEETPAGEW ppsp = (LPCPROPSHEETPAGEW)&psp;
1029
1030     psp[0].dwSize = sizeof(PROPSHEETPAGEW);
1031     psp[0].dwFlags = PSP_USETITLE;
1032     U(psp[0]).pszTemplate = MAKEINTRESOURCEW(IDD_FORMATOPTS);
1033     psp[0].pfnDlgProc = formatopts_proc;
1034     psp[0].hInstance = hInstance;
1035     psp[0].lParam = reg_formatindex(SF_TEXT);
1036     psp[0].pfnCallback = NULL;
1037     psp[0].pszTitle = MAKEINTRESOURCEW(STRING_VIEWPROPS_TEXT);
1038     for(i = 1; i < sizeof(psp)/sizeof(psp[0]); i++)
1039     {
1040         psp[i].dwSize = psp[0].dwSize;
1041         psp[i].dwFlags = psp[0].dwFlags;
1042         U(psp[i]).pszTemplate = U(psp[0]).pszTemplate;
1043         psp[i].pfnDlgProc = psp[0].pfnDlgProc;
1044         psp[i].hInstance = psp[0].hInstance;
1045         psp[i].lParam = reg_formatindex(SF_RTF);
1046         psp[i].pfnCallback = psp[0].pfnCallback;
1047         psp[i].pszTitle = MAKEINTRESOURCEW(STRING_VIEWPROPS_RICHTEXT);
1048     }
1049
1050     psh.dwSize = sizeof(psh);
1051     psh.dwFlags = PSH_USEICONID | PSH_PROPSHEETPAGE | PSH_NOAPPLYNOW;
1052     psh.hwndParent = hMainWnd;
1053     psh.hInstance = hInstance;
1054     psh.pszCaption = MAKEINTRESOURCEW(STRING_VIEWPROPS_TITLE);
1055     psh.nPages = sizeof(psp)/sizeof(psp[0]);
1056     U3(psh).ppsp = ppsp;
1057     U(psh).pszIcon = MAKEINTRESOURCEW(IDI_WORDPAD);
1058
1059     if(fileFormat & SF_RTF)
1060         U2(psh).nStartPage = 1;
1061     else
1062         U2(psh).nStartPage = 0;
1063     PropertySheetW(&psh);
1064     set_bar_states();
1065     target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
1066 }
1067
1068 static void HandleCommandLine(LPWSTR cmdline)
1069 {
1070     WCHAR delimiter;
1071     int opt_print = 0;
1072
1073     /* skip white space */
1074     while (*cmdline == ' ') cmdline++;
1075
1076     /* skip executable name */
1077     delimiter = (*cmdline == '"' ? '"' : ' ');
1078
1079     if (*cmdline == delimiter) cmdline++;
1080     while (*cmdline && *cmdline != delimiter) cmdline++;
1081     if (*cmdline == delimiter) cmdline++;
1082
1083     while (*cmdline)
1084     {
1085         while (isspace(*cmdline)) cmdline++;
1086
1087         if (*cmdline == '-' || *cmdline == '/')
1088         {
1089             if (!cmdline[2] || isspace(cmdline[2]))
1090             {
1091                 switch (cmdline[1])
1092                 {
1093                 case 'P':
1094                 case 'p':
1095                     opt_print = 1;
1096                     cmdline += 2;
1097                     continue;
1098                 }
1099             }
1100             /* a filename starting by / */
1101         }
1102         break;
1103     }
1104
1105     if (*cmdline)
1106     {
1107         /* file name is passed on the command line */
1108         if (cmdline[0] == '"')
1109         {
1110             cmdline++;
1111             cmdline[lstrlenW(cmdline) - 1] = 0;
1112         }
1113         DoOpenFile(cmdline);
1114         InvalidateRect(hMainWnd, NULL, FALSE);
1115     }
1116
1117     if (opt_print)
1118         MessageBox(hMainWnd, "Printing not implemented", "WordPad", MB_OK);
1119 }
1120
1121 static LRESULT handle_findmsg(LPFINDREPLACEW pFr)
1122 {
1123     if(pFr->Flags & FR_DIALOGTERM)
1124     {
1125         hFindWnd = 0;
1126         pFr->Flags = FR_FINDNEXT;
1127         return 0;
1128     }
1129
1130     if(pFr->Flags & FR_FINDNEXT || pFr->Flags & FR_REPLACE || pFr->Flags & FR_REPLACEALL)
1131     {
1132         DWORD flags = FR_DOWN;
1133         FINDTEXTW ft;
1134         static CHARRANGE cr;
1135         LRESULT end, ret;
1136         GETTEXTLENGTHEX gt;
1137         LRESULT length;
1138         int startPos;
1139         HMENU hMenu = GetMenu(hMainWnd);
1140         MENUITEMINFOW mi;
1141
1142         mi.cbSize = sizeof(mi);
1143         mi.fMask = MIIM_DATA;
1144         mi.dwItemData = 1;
1145         SetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
1146
1147         gt.flags = GTL_NUMCHARS;
1148         gt.codepage = 1200;
1149
1150         length = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
1151
1152         if(pFr->lCustData == -1)
1153         {
1154             SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&startPos, (LPARAM)&end);
1155             cr.cpMin = startPos;
1156             pFr->lCustData = startPos;
1157             cr.cpMax = length;
1158             if(cr.cpMin == length)
1159                 cr.cpMin = 0;
1160         } else
1161         {
1162             startPos = pFr->lCustData;
1163         }
1164
1165         if(cr.cpMax > length)
1166         {
1167             startPos = 0;
1168             cr.cpMin = 0;
1169             cr.cpMax = length;
1170         }
1171
1172         ft.chrg = cr;
1173         ft.lpstrText = pFr->lpstrFindWhat;
1174
1175         if(pFr->Flags & FR_MATCHCASE)
1176             flags |= FR_MATCHCASE;
1177         if(pFr->Flags & FR_WHOLEWORD)
1178             flags |= FR_WHOLEWORD;
1179
1180         ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
1181
1182         if(ret == -1)
1183         {
1184             if(cr.cpMax == length && cr.cpMax != startPos)
1185             {
1186                 ft.chrg.cpMin = cr.cpMin = 0;
1187                 ft.chrg.cpMax = cr.cpMax = startPos;
1188
1189                 ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
1190             }
1191         }
1192
1193         if(ret == -1)
1194         {
1195             pFr->lCustData = -1;
1196             MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_SEARCH_FINISHED), wszAppTitle,
1197                         MB_OK | MB_ICONASTERISK);
1198         } else
1199         {
1200             end = ret + lstrlenW(pFr->lpstrFindWhat);
1201             cr.cpMin = end;
1202             SendMessageW(hEditorWnd, EM_SETSEL, (WPARAM)ret, (LPARAM)end);
1203             SendMessageW(hEditorWnd, EM_SCROLLCARET, 0, 0);
1204
1205             if(pFr->Flags & FR_REPLACE || pFr->Flags & FR_REPLACEALL)
1206                 SendMessageW(hEditorWnd, EM_REPLACESEL, TRUE, (LPARAM)pFr->lpstrReplaceWith);
1207
1208             if(pFr->Flags & FR_REPLACEALL)
1209                 handle_findmsg(pFr);
1210         }
1211     }
1212
1213     return 0;
1214 }
1215
1216 static void dialog_find(LPFINDREPLACEW fr, BOOL replace)
1217 {
1218     static WCHAR findBuffer[MAX_STRING_LEN];
1219
1220     ZeroMemory(fr, sizeof(FINDREPLACEW));
1221     fr->lStructSize = sizeof(FINDREPLACEW);
1222     fr->hwndOwner = hMainWnd;
1223     fr->Flags = FR_HIDEUPDOWN;
1224     fr->lpstrFindWhat = findBuffer;
1225     fr->lCustData = -1;
1226     fr->wFindWhatLen = MAX_STRING_LEN*sizeof(WCHAR);
1227
1228     if(replace)
1229         hFindWnd = ReplaceTextW(fr);
1230     else
1231         hFindWnd = FindTextW(fr);
1232 }
1233
1234 static int current_units_to_twips(float number)
1235 {
1236     int twips = (int)(number * TWIPS_PER_CM);
1237     return twips;
1238 }
1239
1240 static void append_current_units(LPWSTR buffer)
1241 {
1242     static const WCHAR space[] = {' ', 0};
1243     lstrcatW(buffer, space);
1244     lstrcatW(buffer, units_cmW);
1245 }
1246
1247 static void number_with_units(LPWSTR buffer, int number)
1248 {
1249     float converted = (float)number / TWIPS_PER_CM;
1250     char string[MAX_STRING_LEN];
1251
1252     sprintf(string, "%.2f ", converted);
1253     lstrcatA(string, units_cmA);
1254     MultiByteToWideChar(CP_ACP, 0, string, -1, buffer, MAX_STRING_LEN);
1255 }
1256
1257 static BOOL get_comboexlist_selection(HWND hComboEx, LPWSTR wszBuffer, UINT bufferLength)
1258 {
1259     HANDLE hHeap;
1260     COMBOBOXEXITEM cbItem;
1261     COMBOBOXINFO cbInfo;
1262     HWND hCombo, hList;
1263     int idx, result;
1264     char *szBuffer;
1265     hCombo = (HWND)SendMessage(hComboEx, CBEM_GETCOMBOCONTROL, 0, 0);
1266     if (!hCombo)
1267         return FALSE;
1268     cbInfo.cbSize = sizeof(COMBOBOXINFO);
1269     result = SendMessage(hCombo, CB_GETCOMBOBOXINFO, 0, (LPARAM)&cbInfo);
1270     if (!result)
1271         return FALSE;
1272     hList = cbInfo.hwndList;
1273     idx = SendMessage(hList, LB_GETCURSEL, 0, 0);
1274     if (idx < 0)
1275         return FALSE;
1276
1277     hHeap = GetProcessHeap();
1278     szBuffer = HeapAlloc(hHeap, HEAP_ZERO_MEMORY, bufferLength);
1279     ZeroMemory(&cbItem, sizeof(cbItem));
1280     cbItem.mask = CBEIF_TEXT;
1281     cbItem.iItem = idx;
1282     cbItem.pszText = szBuffer;
1283     cbItem.cchTextMax = bufferLength-1;
1284     result = SendMessage(hComboEx, CBEM_GETITEM, 0, (LPARAM)&cbItem);
1285     if (!result)
1286     {
1287         HeapFree(hHeap, 0, szBuffer);
1288         return FALSE;
1289     }
1290
1291     result = MultiByteToWideChar(CP_ACP, 0, szBuffer, -1, wszBuffer, bufferLength);
1292     HeapFree(hHeap, 0, szBuffer);
1293     return result != 0;
1294 }
1295
1296 static INT_PTR CALLBACK datetime_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1297 {
1298     switch(message)
1299     {
1300         case WM_INITDIALOG:
1301             {
1302                 WCHAR buffer[MAX_STRING_LEN];
1303                 SYSTEMTIME st;
1304                 HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
1305                 GetLocalTime(&st);
1306
1307                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_SHORTDATE, &st, 0, (LPWSTR)&buffer,
1308                                MAX_STRING_LEN);
1309                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1310                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &st, 0, (LPWSTR)&buffer,
1311                                MAX_STRING_LEN);
1312                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1313                 GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &st, 0, (LPWSTR)&buffer, MAX_STRING_LEN);
1314                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1315
1316                 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
1317             }
1318             break;
1319
1320         case WM_COMMAND:
1321             switch(LOWORD(wParam))
1322             {
1323                 case IDOK:
1324                     {
1325                         LRESULT index;
1326                         HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
1327
1328                         index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
1329
1330                         if(index != LB_ERR)
1331                         {
1332                             WCHAR buffer[MAX_STRING_LEN];
1333                             SendMessageW(hListWnd, LB_GETTEXT, index, (LPARAM)&buffer);
1334                             SendMessageW(hEditorWnd, EM_REPLACESEL, TRUE, (LPARAM)&buffer);
1335                         }
1336                     }
1337                     /* Fall through */
1338
1339                 case IDCANCEL:
1340                     EndDialog(hWnd, wParam);
1341                     return TRUE;
1342             }
1343     }
1344     return FALSE;
1345 }
1346
1347 static INT_PTR CALLBACK newfile_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1348 {
1349     switch(message)
1350     {
1351         case WM_INITDIALOG:
1352             {
1353                 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
1354                 WCHAR buffer[MAX_STRING_LEN];
1355                 HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
1356
1357                 LoadStringW(hInstance, STRING_NEWFILE_RICHTEXT, (LPWSTR)buffer, MAX_STRING_LEN);
1358                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1359                 LoadStringW(hInstance, STRING_NEWFILE_TXT, (LPWSTR)buffer, MAX_STRING_LEN);
1360                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1361                 LoadStringW(hInstance, STRING_NEWFILE_TXT_UNICODE, (LPWSTR)buffer, MAX_STRING_LEN);
1362                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
1363
1364                 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
1365             }
1366             break;
1367
1368         case WM_COMMAND:
1369             switch(LOWORD(wParam))
1370             {
1371                 case IDOK:
1372                     {
1373                         LRESULT index;
1374                         HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
1375                         index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
1376
1377                         if(index != LB_ERR)
1378                             EndDialog(hWnd, MAKELONG(fileformat_flags(index),0));
1379                     }
1380                     return TRUE;
1381
1382                 case IDCANCEL:
1383                     EndDialog(hWnd, MAKELONG(ID_NEWFILE_ABORT,0));
1384                     return TRUE;
1385             }
1386     }
1387     return FALSE;
1388 }
1389
1390 static INT_PTR CALLBACK paraformat_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1391 {
1392     static const WORD ALIGNMENT_VALUES[] = {PFA_LEFT, PFA_RIGHT, PFA_CENTER};
1393
1394     switch(message)
1395     {
1396         case WM_INITDIALOG:
1397             {
1398                 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd,
1399                                                                   GWLP_HINSTANCE);
1400                 WCHAR buffer[MAX_STRING_LEN];
1401                 HWND hListWnd = GetDlgItem(hWnd, IDC_PARA_ALIGN);
1402                 HWND hLeftWnd = GetDlgItem(hWnd, IDC_PARA_LEFT);
1403                 HWND hRightWnd = GetDlgItem(hWnd, IDC_PARA_RIGHT);
1404                 HWND hFirstWnd = GetDlgItem(hWnd, IDC_PARA_FIRST);
1405                 PARAFORMAT2 pf;
1406                 int index = 0;
1407
1408                 LoadStringW(hInstance, STRING_ALIGN_LEFT, buffer,
1409                             MAX_STRING_LEN);
1410                 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
1411                 LoadStringW(hInstance, STRING_ALIGN_RIGHT, buffer,
1412                             MAX_STRING_LEN);
1413                 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
1414                 LoadStringW(hInstance, STRING_ALIGN_CENTER, buffer,
1415                             MAX_STRING_LEN);
1416                 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
1417
1418                 pf.cbSize = sizeof(pf);
1419                 pf.dwMask = PFM_ALIGNMENT | PFM_OFFSET | PFM_RIGHTINDENT |
1420                             PFM_STARTINDENT;
1421                 SendMessageW(hEditorWnd, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1422
1423                 if(pf.wAlignment == PFA_RIGHT)
1424                     index ++;
1425                 else if(pf.wAlignment == PFA_CENTER)
1426                     index += 2;
1427
1428                 SendMessageW(hListWnd, CB_SETCURSEL, index, 0);
1429
1430                 number_with_units(buffer, pf.dxStartIndent + pf.dxOffset);
1431                 SetWindowTextW(hLeftWnd, buffer);
1432                 number_with_units(buffer, pf.dxRightIndent);
1433                 SetWindowTextW(hRightWnd, buffer);
1434                 number_with_units(buffer, -pf.dxOffset);
1435                 SetWindowTextW(hFirstWnd, buffer);
1436             }
1437             break;
1438
1439         case WM_COMMAND:
1440             switch(LOWORD(wParam))
1441             {
1442                 case IDOK:
1443                     {
1444                         HWND hListWnd = GetDlgItem(hWnd, IDC_PARA_ALIGN);
1445                         HWND hLeftWnd = GetDlgItem(hWnd, IDC_PARA_LEFT);
1446                         HWND hRightWnd = GetDlgItem(hWnd, IDC_PARA_RIGHT);
1447                         HWND hFirstWnd = GetDlgItem(hWnd, IDC_PARA_FIRST);
1448                         WCHAR buffer[MAX_STRING_LEN];
1449                         int index;
1450                         float num;
1451                         int ret = 0;
1452                         PARAFORMAT pf;
1453
1454                         index = SendMessageW(hListWnd, CB_GETCURSEL, 0, 0);
1455                         pf.wAlignment = ALIGNMENT_VALUES[index];
1456
1457                         GetWindowTextW(hLeftWnd, buffer, MAX_STRING_LEN);
1458                         if(number_from_string(buffer, &num, TRUE))
1459                             ret++;
1460                         pf.dxOffset = current_units_to_twips(num);
1461                         GetWindowTextW(hRightWnd, buffer, MAX_STRING_LEN);
1462                         if(number_from_string(buffer, &num, TRUE))
1463                             ret++;
1464                         pf.dxRightIndent = current_units_to_twips(num);
1465                         GetWindowTextW(hFirstWnd, buffer, MAX_STRING_LEN);
1466                         if(number_from_string(buffer, &num, TRUE))
1467                             ret++;
1468                         pf.dxStartIndent = current_units_to_twips(num);
1469
1470                         if(ret != 3)
1471                         {
1472                             MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
1473                                         wszAppTitle, MB_OK | MB_ICONASTERISK);
1474                             return FALSE;
1475                         } else
1476                         {
1477                             if (pf.dxOffset + pf.dxStartIndent < 0
1478                                 && pf.dxStartIndent < 0)
1479                             {
1480                                 /* The first line is before the left edge, so
1481                                  * make sure it is at the left edge. */
1482                                 pf.dxOffset = -pf.dxStartIndent;
1483                             } else if (pf.dxOffset < 0) {
1484                                 /* The second and following lines are before
1485                                  * the left edge, so set it to be at the left
1486                                  * edge, and adjust the first line since it
1487                                  * is relative to it. */
1488                                 pf.dxStartIndent = max(pf.dxStartIndent + pf.dxOffset, 0);
1489                                 pf.dxOffset = 0;
1490                             }
1491                             /* Internally the dxStartIndent is the absolute
1492                              * offset for the first line and dxOffset is
1493                              * to it value as opposed how it is displayed with
1494                              * the first line being the relative value.
1495                              * These two lines make the adjustments. */
1496                             pf.dxStartIndent = pf.dxStartIndent + pf.dxOffset;
1497                             pf.dxOffset = pf.dxOffset - pf.dxStartIndent;
1498
1499                             pf.cbSize = sizeof(pf);
1500                             pf.dwMask = PFM_ALIGNMENT | PFM_OFFSET | PFM_RIGHTINDENT |
1501                                         PFM_STARTINDENT;
1502                             SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
1503                         }
1504                     }
1505                     /* Fall through */
1506
1507                 case IDCANCEL:
1508                     EndDialog(hWnd, wParam);
1509                     return TRUE;
1510             }
1511     }
1512     return FALSE;
1513 }
1514
1515 static INT_PTR CALLBACK tabstops_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1516 {
1517     switch(message)
1518     {
1519         case WM_INITDIALOG:
1520             {
1521                 HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1522                 PARAFORMAT pf;
1523                 WCHAR buffer[MAX_STRING_LEN];
1524                 int i;
1525
1526                 pf.cbSize = sizeof(pf);
1527                 pf.dwMask = PFM_TABSTOPS;
1528                 SendMessageW(hEditorWnd, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1529                 SendMessageW(hTabWnd, CB_LIMITTEXT, MAX_STRING_LEN-1, 0);
1530
1531                 for(i = 0; i < pf.cTabCount; i++)
1532                 {
1533                     number_with_units(buffer, pf.rgxTabs[i]);
1534                     SendMessageW(hTabWnd, CB_ADDSTRING, 0, (LPARAM)&buffer);
1535                 }
1536                 SetFocus(hTabWnd);
1537             }
1538             break;
1539
1540         case WM_COMMAND:
1541             switch(LOWORD(wParam))
1542             {
1543                 case IDC_TABSTOPS:
1544                     {
1545                         HWND hTabWnd = (HWND)lParam;
1546                         HWND hAddWnd = GetDlgItem(hWnd, ID_TAB_ADD);
1547                         HWND hDelWnd = GetDlgItem(hWnd, ID_TAB_DEL);
1548                         HWND hEmptyWnd = GetDlgItem(hWnd, ID_TAB_EMPTY);
1549
1550                         if(GetWindowTextLengthW(hTabWnd))
1551                             EnableWindow(hAddWnd, TRUE);
1552                         else
1553                             EnableWindow(hAddWnd, FALSE);
1554
1555                         if(SendMessageW(hTabWnd, CB_GETCOUNT, 0, 0))
1556                         {
1557                             EnableWindow(hEmptyWnd, TRUE);
1558
1559                             if(SendMessageW(hTabWnd, CB_GETCURSEL, 0, 0) == CB_ERR)
1560                                 EnableWindow(hDelWnd, FALSE);
1561                             else
1562                                 EnableWindow(hDelWnd, TRUE);
1563                         } else
1564                         {
1565                             EnableWindow(hEmptyWnd, FALSE);
1566                         }
1567                     }
1568                     break;
1569
1570                 case ID_TAB_ADD:
1571                     {
1572                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1573                         WCHAR buffer[MAX_STRING_LEN];
1574
1575                         GetWindowTextW(hTabWnd, buffer, MAX_STRING_LEN);
1576                         append_current_units(buffer);
1577
1578                         if(SendMessageW(hTabWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)&buffer) == CB_ERR)
1579                         {
1580                             float number = 0;
1581
1582                             if(!number_from_string(buffer, &number, TRUE))
1583                             {
1584                                 MessageBoxW(hWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
1585                                              wszAppTitle, MB_OK | MB_ICONINFORMATION);
1586                             } else
1587                             {
1588                                 SendMessageW(hTabWnd, CB_ADDSTRING, 0, (LPARAM)&buffer);
1589                                 SetWindowTextW(hTabWnd, 0);
1590                             }
1591                         }
1592                         SetFocus(hTabWnd);
1593                     }
1594                     break;
1595
1596                 case ID_TAB_DEL:
1597                     {
1598                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1599                         LRESULT ret;
1600                         ret = SendMessageW(hTabWnd, CB_GETCURSEL, 0, 0);
1601                         if(ret != CB_ERR)
1602                             SendMessageW(hTabWnd, CB_DELETESTRING, ret, 0);
1603                     }
1604                     break;
1605
1606                 case ID_TAB_EMPTY:
1607                     {
1608                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1609                         SendMessageW(hTabWnd, CB_RESETCONTENT, 0, 0);
1610                         SetFocus(hTabWnd);
1611                     }
1612                     break;
1613
1614                 case IDOK:
1615                     {
1616                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
1617                         int i;
1618                         WCHAR buffer[MAX_STRING_LEN];
1619                         PARAFORMAT pf;
1620                         float number;
1621
1622                         pf.cbSize = sizeof(pf);
1623                         pf.dwMask = PFM_TABSTOPS;
1624
1625                         for(i = 0; SendMessageW(hTabWnd, CB_GETLBTEXT, i,
1626                                                 (LPARAM)&buffer) != CB_ERR &&
1627                                                         i < MAX_TAB_STOPS; i++)
1628                         {
1629                             number_from_string(buffer, &number, TRUE);
1630                             pf.rgxTabs[i] = current_units_to_twips(number);
1631                         }
1632                         pf.cTabCount = i;
1633                         SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
1634                     }
1635                     /* Fall through */
1636                 case IDCANCEL:
1637                     EndDialog(hWnd, wParam);
1638                     return TRUE;
1639             }
1640     }
1641     return FALSE;
1642 }
1643
1644 static int context_menu(LPARAM lParam)
1645 {
1646     int x = (int)(short)LOWORD(lParam);
1647     int y = (int)(short)HIWORD(lParam);
1648     HMENU hPop = GetSubMenu(hPopupMenu, 0);
1649
1650     if(x == -1)
1651     {
1652         int from = 0, to = 0;
1653         POINTL pt;
1654         SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
1655         SendMessageW(hEditorWnd, EM_POSFROMCHAR, (WPARAM)&pt, (LPARAM)to);
1656         ClientToScreen(hEditorWnd, (POINT*)&pt);
1657         x = pt.x;
1658         y = pt.y;
1659     }
1660
1661     TrackPopupMenu(hPop, TPM_LEFTALIGN | TPM_TOPALIGN | TPM_RIGHTBUTTON,
1662                    x, y, 0, hMainWnd, 0);
1663
1664     return 0;
1665 }
1666
1667 static LRESULT OnCreate( HWND hWnd, WPARAM wParam, LPARAM lParam)
1668 {
1669     HWND hToolBarWnd, hFormatBarWnd,  hReBarWnd, hFontListWnd, hSizeListWnd, hRulerWnd;
1670     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
1671     HANDLE hDLL;
1672     TBADDBITMAP ab;
1673     int nStdBitmaps = 0;
1674     REBARINFO rbi;
1675     REBARBANDINFOW rbb;
1676     static const WCHAR wszRichEditDll[] = {'R','I','C','H','E','D','2','0','.','D','L','L','\0'};
1677     static const WCHAR wszRichEditText[] = {'R','i','c','h','E','d','i','t',' ','t','e','x','t','\0'};
1678
1679     CreateStatusWindowW(CCS_NODIVIDER|WS_CHILD|WS_VISIBLE, wszRichEditText, hWnd, IDC_STATUSBAR);
1680
1681     hReBarWnd = CreateWindowExW(WS_EX_TOOLWINDOW, REBARCLASSNAMEW, NULL,
1682       CCS_NODIVIDER|WS_CHILD|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|RBS_VARHEIGHT|CCS_TOP,
1683       CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hWnd, (HMENU)IDC_REBAR, hInstance, NULL);
1684
1685     rbi.cbSize = sizeof(rbi);
1686     rbi.fMask = 0;
1687     rbi.himl = NULL;
1688     if(!SendMessageW(hReBarWnd, RB_SETBARINFO, 0, (LPARAM)&rbi))
1689         return -1;
1690
1691     hToolBarWnd = CreateToolbarEx(hReBarWnd, CCS_NOPARENTALIGN|CCS_NOMOVEY|WS_VISIBLE|WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_BUTTON,
1692       IDC_TOOLBAR,
1693       1, hInstance, IDB_TOOLBAR,
1694       NULL, 0,
1695       24, 24, 16, 16, sizeof(TBBUTTON));
1696
1697     ab.hInst = HINST_COMMCTRL;
1698     ab.nID = IDB_STD_SMALL_COLOR;
1699     nStdBitmaps = SendMessageW(hToolBarWnd, TB_ADDBITMAP, 0, (LPARAM)&ab);
1700
1701     AddButton(hToolBarWnd, nStdBitmaps+STD_FILENEW, ID_FILE_NEW);
1702     AddButton(hToolBarWnd, nStdBitmaps+STD_FILEOPEN, ID_FILE_OPEN);
1703     AddButton(hToolBarWnd, nStdBitmaps+STD_FILESAVE, ID_FILE_SAVE);
1704     AddSeparator(hToolBarWnd);
1705     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINT, ID_PRINT_QUICK);
1706     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINTPRE, ID_PREVIEW);
1707     AddSeparator(hToolBarWnd);
1708     AddButton(hToolBarWnd, nStdBitmaps+STD_FIND, ID_FIND);
1709     AddSeparator(hToolBarWnd);
1710     AddButton(hToolBarWnd, nStdBitmaps+STD_CUT, ID_EDIT_CUT);
1711     AddButton(hToolBarWnd, nStdBitmaps+STD_COPY, ID_EDIT_COPY);
1712     AddButton(hToolBarWnd, nStdBitmaps+STD_PASTE, ID_EDIT_PASTE);
1713     AddButton(hToolBarWnd, nStdBitmaps+STD_UNDO, ID_EDIT_UNDO);
1714     AddButton(hToolBarWnd, nStdBitmaps+STD_REDOW, ID_EDIT_REDO);
1715     AddSeparator(hToolBarWnd);
1716     AddButton(hToolBarWnd, 0, ID_DATETIME);
1717
1718     SendMessageW(hToolBarWnd, TB_AUTOSIZE, 0, 0);
1719
1720     rbb.cbSize = sizeof(rbb);
1721     rbb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_CHILD | RBBIM_STYLE | RBBIM_ID;
1722     rbb.fStyle = RBBS_CHILDEDGE | RBBS_BREAK | RBBS_NOGRIPPER;
1723     rbb.cx = 0;
1724     rbb.hwndChild = hToolBarWnd;
1725     rbb.cxMinChild = 0;
1726     rbb.cyChild = rbb.cyMinChild = HIWORD(SendMessageW(hToolBarWnd, TB_GETBUTTONSIZE, 0, 0));
1727     rbb.wID = BANDID_TOOLBAR;
1728
1729     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1730
1731     hFontListWnd = CreateWindowExW(0, WC_COMBOBOXEXW, NULL,
1732                       WS_BORDER | WS_VISIBLE | WS_CHILD | CBS_DROPDOWN | CBS_SORT,
1733                       0, 0, 200, 150, hReBarWnd, (HMENU)IDC_FONTLIST, hInstance, NULL);
1734
1735     rbb.hwndChild = hFontListWnd;
1736     rbb.cx = 200;
1737     rbb.wID = BANDID_FONTLIST;
1738
1739     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1740
1741     hSizeListWnd = CreateWindowExW(0, WC_COMBOBOXEXW, NULL,
1742                       WS_BORDER | WS_VISIBLE | WS_CHILD | CBS_DROPDOWN,
1743                       0, 0, 50, 150, hReBarWnd, (HMENU)IDC_SIZELIST, hInstance, NULL);
1744
1745     rbb.hwndChild = hSizeListWnd;
1746     rbb.cx = 50;
1747     rbb.fStyle ^= RBBS_BREAK;
1748     rbb.wID = BANDID_SIZELIST;
1749
1750     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1751
1752     hFormatBarWnd = CreateToolbarEx(hReBarWnd,
1753          CCS_NOPARENTALIGN | CCS_NOMOVEY | WS_VISIBLE | TBSTYLE_TOOLTIPS | TBSTYLE_BUTTON,
1754          IDC_FORMATBAR, 7, hInstance, IDB_FORMATBAR, NULL, 0, 16, 16, 16, 16, sizeof(TBBUTTON));
1755
1756     AddButton(hFormatBarWnd, 0, ID_FORMAT_BOLD);
1757     AddButton(hFormatBarWnd, 1, ID_FORMAT_ITALIC);
1758     AddButton(hFormatBarWnd, 2, ID_FORMAT_UNDERLINE);
1759     AddSeparator(hFormatBarWnd);
1760     AddButton(hFormatBarWnd, 3, ID_ALIGN_LEFT);
1761     AddButton(hFormatBarWnd, 4, ID_ALIGN_CENTER);
1762     AddButton(hFormatBarWnd, 5, ID_ALIGN_RIGHT);
1763     AddSeparator(hFormatBarWnd);
1764     AddButton(hFormatBarWnd, 6, ID_BULLET);
1765
1766     SendMessageW(hFormatBarWnd, TB_AUTOSIZE, 0, 0);
1767
1768     rbb.hwndChild = hFormatBarWnd;
1769     rbb.wID = BANDID_FORMATBAR;
1770
1771     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1772
1773     hRulerWnd = CreateWindowExW(0, WC_STATICW, NULL, WS_VISIBLE | WS_CHILD,
1774                                 0, 0, 200, 10, hReBarWnd,  (HMENU)IDC_RULER, hInstance, NULL);
1775
1776
1777     rbb.hwndChild = hRulerWnd;
1778     rbb.wID = BANDID_RULER;
1779     rbb.fStyle |= RBBS_BREAK;
1780
1781     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
1782
1783     hDLL = LoadLibraryW(wszRichEditDll);
1784     if(!hDLL)
1785     {
1786         MessageBoxW(hWnd, MAKEINTRESOURCEW(STRING_LOAD_RICHED_FAILED), wszAppTitle,
1787                     MB_OK | MB_ICONEXCLAMATION);
1788         PostQuitMessage(1);
1789     }
1790
1791     hEditorWnd = CreateWindowExW(WS_EX_CLIENTEDGE, wszRichEditClass, NULL,
1792       WS_CHILD|WS_VISIBLE|ES_SELECTIONBAR|ES_MULTILINE|ES_AUTOVSCROLL
1793       |ES_WANTRETURN|WS_VSCROLL|ES_NOHIDESEL,
1794       0, 0, 1000, 100, hWnd, (HMENU)IDC_EDITOR, hInstance, NULL);
1795
1796     if (!hEditorWnd)
1797     {
1798         fprintf(stderr, "Error code %u\n", GetLastError());
1799         return -1;
1800     }
1801     assert(hEditorWnd);
1802
1803     SetFocus(hEditorWnd);
1804     SendMessageW(hEditorWnd, EM_SETEVENTMASK, 0, ENM_SELCHANGE);
1805
1806     set_default_font();
1807
1808     populate_font_list(hFontListWnd);
1809     populate_size_list(hSizeListWnd);
1810     DoLoadStrings();
1811     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
1812
1813     ID_FINDMSGSTRING = RegisterWindowMessageW(FINDMSGSTRINGW);
1814
1815     registry_read_filelist(hWnd);
1816     registry_read_formatopts_all(barState, wordWrap);
1817     registry_read_options();
1818     DragAcceptFiles(hWnd, TRUE);
1819
1820     return 0;
1821 }
1822
1823 static LRESULT OnUser( HWND hWnd, WPARAM wParam, LPARAM lParam)
1824 {
1825     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1826     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
1827     HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
1828     HWND hwndFormatBar = GetDlgItem(hwndReBar, IDC_FORMATBAR);
1829     int from, to;
1830     CHARFORMAT2W fmt;
1831     PARAFORMAT2 pf;
1832     GETTEXTLENGTHEX gt;
1833
1834     ZeroMemory(&fmt, sizeof(fmt));
1835     fmt.cbSize = sizeof(fmt);
1836
1837     ZeroMemory(&pf, sizeof(pf));
1838     pf.cbSize = sizeof(pf);
1839
1840     gt.flags = GTL_NUMCHARS;
1841     gt.codepage = 1200;
1842
1843     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_FIND,
1844                  SendMessageW(hwndEditor, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0) ? 1 : 0);
1845
1846     SendMessageW(hwndEditor, EM_GETCHARFORMAT, TRUE, (LPARAM)&fmt);
1847
1848     SendMessageW(hwndEditor, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
1849     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_UNDO,
1850       SendMessageW(hwndEditor, EM_CANUNDO, 0, 0));
1851     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_REDO,
1852       SendMessageW(hwndEditor, EM_CANREDO, 0, 0));
1853     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_CUT, from == to ? 0 : 1);
1854     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_COPY, from == to ? 0 : 1);
1855
1856     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_BOLD, (fmt.dwMask & CFM_BOLD) &&
1857             (fmt.dwEffects & CFE_BOLD));
1858     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_BOLD, !(fmt.dwMask & CFM_BOLD));
1859     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_ITALIC, (fmt.dwMask & CFM_ITALIC) &&
1860             (fmt.dwEffects & CFE_ITALIC));
1861     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_ITALIC, !(fmt.dwMask & CFM_ITALIC));
1862     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_UNDERLINE, (fmt.dwMask & CFM_UNDERLINE) &&
1863             (fmt.dwEffects & CFE_UNDERLINE));
1864     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_UNDERLINE, !(fmt.dwMask & CFM_UNDERLINE));
1865
1866     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
1867     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_LEFT, (pf.wAlignment == PFA_LEFT));
1868     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_CENTER, (pf.wAlignment == PFA_CENTER));
1869     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_RIGHT, (pf.wAlignment == PFA_RIGHT));
1870
1871     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_BULLET, (pf.wNumbering & PFN_BULLET));
1872     return 0;
1873 }
1874
1875 static LRESULT OnNotify( HWND hWnd, WPARAM wParam, LPARAM lParam)
1876 {
1877     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1878     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
1879     NMHDR *pHdr = (NMHDR *)lParam;
1880     HWND hwndFontList = GetDlgItem(hwndReBar, IDC_FONTLIST);
1881     HWND hwndSizeList = GetDlgItem(hwndReBar, IDC_SIZELIST);
1882
1883     if (pHdr->hwndFrom == hwndFontList || pHdr->hwndFrom == hwndSizeList)
1884     {
1885         if (pHdr->code == CBEN_ENDEDITW)
1886         {
1887             NMCBEENDEDIT *endEdit = (NMCBEENDEDIT *)lParam;
1888             if(pHdr->hwndFrom == hwndFontList)
1889             {
1890                 on_fontlist_modified(hwndFontList, (LPWSTR)endEdit->szText);
1891             } else if (pHdr->hwndFrom == hwndSizeList)
1892             {
1893                 on_sizelist_modified(hwndSizeList, (LPWSTR)endEdit->szText);
1894             }
1895         }
1896         return 0;
1897     }
1898
1899     if (pHdr->hwndFrom != hwndEditor)
1900         return 0;
1901
1902     if (pHdr->code == EN_SELCHANGE)
1903     {
1904         SELCHANGE *pSC = (SELCHANGE *)lParam;
1905         char buf[128];
1906
1907         update_font_list();
1908
1909         sprintf( buf,"selection = %d..%d, line count=%ld",
1910                  pSC->chrg.cpMin, pSC->chrg.cpMax,
1911         SendMessage(hwndEditor, EM_GETLINECOUNT, 0, 0));
1912         SetWindowText(GetDlgItem(hWnd, IDC_STATUSBAR), buf);
1913         SendMessage(hWnd, WM_USER, 0, 0);
1914         return 1;
1915     }
1916     return 0;
1917 }
1918
1919 static LRESULT OnCommand( HWND hWnd, WPARAM wParam, LPARAM lParam)
1920 {
1921     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
1922     static FINDREPLACEW findreplace;
1923
1924     if ((HWND)lParam == hwndEditor)
1925         return 0;
1926
1927     switch(LOWORD(wParam))
1928     {
1929
1930     case ID_FILE_EXIT:
1931         PostMessageW(hWnd, WM_CLOSE, 0, 0);
1932         break;
1933
1934     case ID_FILE_NEW:
1935         {
1936             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
1937             int ret = DialogBox(hInstance, MAKEINTRESOURCE(IDD_NEWFILE), hWnd,
1938                                 newfile_proc);
1939
1940             if(ret != ID_NEWFILE_ABORT)
1941             {
1942                 if(prompt_save_changes())
1943                 {
1944                     SETTEXTEX st;
1945
1946                     set_caption(NULL);
1947                     wszFileName[0] = '\0';
1948
1949                     clear_formatting();
1950
1951                     st.flags = ST_DEFAULT;
1952                     st.codepage = 1200;
1953                     SendMessageW(hEditorWnd, EM_SETTEXTEX, (WPARAM)&st, 0);
1954
1955                     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
1956                     set_fileformat(ret);
1957                     update_font_list();
1958                 }
1959             }
1960         }
1961         break;
1962
1963     case ID_FILE_OPEN:
1964         DialogOpenFile();
1965         break;
1966
1967     case ID_FILE_SAVE:
1968         if(wszFileName[0])
1969         {
1970             DoSaveFile(wszFileName, fileFormat);
1971             break;
1972         }
1973         /* Fall through */
1974
1975     case ID_FILE_SAVEAS:
1976         DialogSaveFile();
1977         break;
1978
1979     case ID_FILE_RECENT1:
1980     case ID_FILE_RECENT2:
1981     case ID_FILE_RECENT3:
1982     case ID_FILE_RECENT4:
1983         {
1984             HMENU hMenu = GetMenu(hWnd);
1985             MENUITEMINFOW mi;
1986
1987             mi.cbSize = sizeof(MENUITEMINFOW);
1988             mi.fMask = MIIM_DATA;
1989             if(GetMenuItemInfoW(hMenu, LOWORD(wParam), FALSE, &mi))
1990                 DoOpenFile((LPWSTR)mi.dwItemData);
1991         }
1992         break;
1993
1994     case ID_FIND:
1995         dialog_find(&findreplace, FALSE);
1996         break;
1997
1998     case ID_FIND_NEXT:
1999         handle_findmsg(&findreplace);
2000         break;
2001
2002     case ID_REPLACE:
2003         dialog_find(&findreplace, TRUE);
2004         break;
2005
2006     case ID_FONTSETTINGS:
2007         dialog_choose_font();
2008         break;
2009
2010     case ID_PRINT:
2011         dialog_print(hWnd, wszFileName);
2012         target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
2013         break;
2014
2015     case ID_PRINT_QUICK:
2016         print_quick(wszFileName);
2017         target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
2018         break;
2019
2020     case ID_PREVIEW:
2021         {
2022             int index = reg_formatindex(fileFormat);
2023             DWORD tmp = barState[index];
2024             barState[index] = 0;
2025             set_bar_states();
2026             barState[index] = tmp;
2027             ShowWindow(hEditorWnd, FALSE);
2028
2029             init_preview(hWnd, wszFileName);
2030
2031             SetMenu(hWnd, NULL);
2032             InvalidateRect(0, 0, TRUE);
2033         }
2034         break;
2035
2036     case ID_PRINTSETUP:
2037         dialog_printsetup(hWnd);
2038         target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
2039         break;
2040
2041     case ID_FORMAT_BOLD:
2042     case ID_FORMAT_ITALIC:
2043     case ID_FORMAT_UNDERLINE:
2044         {
2045         CHARFORMAT2W fmt;
2046         int effects = CFE_BOLD;
2047
2048         ZeroMemory(&fmt, sizeof(fmt));
2049         fmt.cbSize = sizeof(fmt);
2050         SendMessageW(hwndEditor, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
2051
2052         fmt.dwMask = CFM_BOLD;
2053
2054         if (LOWORD(wParam) == ID_FORMAT_ITALIC)
2055         {
2056             effects = CFE_ITALIC;
2057             fmt.dwMask = CFM_ITALIC;
2058         } else if (LOWORD(wParam) == ID_FORMAT_UNDERLINE)
2059         {
2060             effects = CFE_UNDERLINE;
2061             fmt.dwMask = CFM_UNDERLINE;
2062         }
2063
2064         fmt.dwEffects ^= effects;
2065
2066         SendMessageW(hwndEditor, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
2067         break;
2068         }
2069
2070     case ID_EDIT_CUT:
2071         PostMessageW(hwndEditor, WM_CUT, 0, 0);
2072         break;
2073
2074     case ID_EDIT_COPY:
2075         PostMessageW(hwndEditor, WM_COPY, 0, 0);
2076         break;
2077
2078     case ID_EDIT_PASTE:
2079         PostMessageW(hwndEditor, WM_PASTE, 0, 0);
2080         break;
2081
2082     case ID_EDIT_CLEAR:
2083         PostMessageW(hwndEditor, WM_CLEAR, 0, 0);
2084         break;
2085
2086     case ID_EDIT_SELECTALL:
2087         {
2088         CHARRANGE range = {0, -1};
2089         SendMessageW(hwndEditor, EM_EXSETSEL, 0, (LPARAM)&range);
2090         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2091         return 0;
2092         }
2093
2094     case ID_EDIT_GETTEXT:
2095         {
2096         int nLen = GetWindowTextLengthW(hwndEditor);
2097         LPWSTR data = HeapAlloc( GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR) );
2098         TEXTRANGEW tr;
2099
2100         GetWindowTextW(hwndEditor, data, nLen+1);
2101         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
2102
2103         HeapFree( GetProcessHeap(), 0, data);
2104         data = HeapAlloc(GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR));
2105         tr.chrg.cpMin = 0;
2106         tr.chrg.cpMax = nLen;
2107         tr.lpstrText = data;
2108         SendMessage (hwndEditor, EM_GETTEXTRANGE, 0, (LPARAM)&tr);
2109         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
2110         HeapFree( GetProcessHeap(), 0, data );
2111
2112         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2113         return 0;
2114         }
2115
2116     case ID_EDIT_CHARFORMAT:
2117     case ID_EDIT_DEFCHARFORMAT:
2118         {
2119         CHARFORMAT2W cf;
2120         LRESULT i;
2121         ZeroMemory(&cf, sizeof(cf));
2122         cf.cbSize = sizeof(cf);
2123         cf.dwMask = 0;
2124         i = SendMessageW(hwndEditor, EM_GETCHARFORMAT,
2125                         LOWORD(wParam) == ID_EDIT_CHARFORMAT, (LPARAM)&cf);
2126         return 0;
2127         }
2128
2129     case ID_EDIT_PARAFORMAT:
2130         {
2131         PARAFORMAT2 pf;
2132         ZeroMemory(&pf, sizeof(pf));
2133         pf.cbSize = sizeof(pf);
2134         SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2135         return 0;
2136         }
2137
2138     case ID_EDIT_SELECTIONINFO:
2139         {
2140         CHARRANGE range = {0, -1};
2141         char buf[128];
2142         WCHAR *data = NULL;
2143
2144         SendMessage(hwndEditor, EM_EXGETSEL, 0, (LPARAM)&range);
2145         data = HeapAlloc(GetProcessHeap(), 0, sizeof(*data) * (range.cpMax-range.cpMin+1));
2146         SendMessage(hwndEditor, EM_GETSELTEXT, 0, (LPARAM)data);
2147         sprintf(buf, "Start = %d, End = %d", range.cpMin, range.cpMax);
2148         MessageBoxA(hWnd, buf, "Editor", MB_OK);
2149         MessageBoxW(hWnd, data, xszAppTitle, MB_OK);
2150         HeapFree( GetProcessHeap(), 0, data);
2151         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2152         return 0;
2153         }
2154
2155     case ID_EDIT_READONLY:
2156         {
2157         long nStyle = GetWindowLong(hwndEditor, GWL_STYLE);
2158         if (nStyle & ES_READONLY)
2159             SendMessageW(hwndEditor, EM_SETREADONLY, 0, 0);
2160         else
2161             SendMessageW(hwndEditor, EM_SETREADONLY, 1, 0);
2162         return 0;
2163         }
2164
2165     case ID_EDIT_MODIFIED:
2166         if (SendMessageW(hwndEditor, EM_GETMODIFY, 0, 0))
2167             SendMessageW(hwndEditor, EM_SETMODIFY, 0, 0);
2168         else
2169             SendMessageW(hwndEditor, EM_SETMODIFY, 1, 0);
2170         return 0;
2171
2172     case ID_EDIT_UNDO:
2173         SendMessageW(hwndEditor, EM_UNDO, 0, 0);
2174         return 0;
2175
2176     case ID_EDIT_REDO:
2177         SendMessageW(hwndEditor, EM_REDO, 0, 0);
2178         return 0;
2179
2180     case ID_BULLET:
2181         {
2182             PARAFORMAT pf;
2183
2184             pf.cbSize = sizeof(pf);
2185             pf.dwMask = PFM_NUMBERING;
2186             SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2187
2188             pf.dwMask |=  PFM_OFFSET;
2189
2190             if(pf.wNumbering == PFN_BULLET)
2191             {
2192                 pf.wNumbering = 0;
2193                 pf.dxOffset = 0;
2194             } else
2195             {
2196                 pf.wNumbering = PFN_BULLET;
2197                 pf.dxOffset = 720;
2198             }
2199
2200             SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2201         }
2202         break;
2203
2204     case ID_ALIGN_LEFT:
2205     case ID_ALIGN_CENTER:
2206     case ID_ALIGN_RIGHT:
2207         {
2208         PARAFORMAT2 pf;
2209
2210         pf.cbSize = sizeof(pf);
2211         pf.dwMask = PFM_ALIGNMENT;
2212         switch(LOWORD(wParam)) {
2213         case ID_ALIGN_LEFT: pf.wAlignment = PFA_LEFT; break;
2214         case ID_ALIGN_CENTER: pf.wAlignment = PFA_CENTER; break;
2215         case ID_ALIGN_RIGHT: pf.wAlignment = PFA_RIGHT; break;
2216         }
2217         SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2218         break;
2219         }
2220
2221     case ID_BACK_1:
2222         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 1, 0);
2223         break;
2224
2225     case ID_BACK_2:
2226         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 0, RGB(255,255,192));
2227         break;
2228
2229     case ID_TOGGLE_TOOLBAR:
2230         set_toolbar_state(BANDID_TOOLBAR, !is_bar_visible(BANDID_TOOLBAR));
2231         update_window();
2232         break;
2233
2234     case ID_TOGGLE_FORMATBAR:
2235         set_toolbar_state(BANDID_FONTLIST, !is_bar_visible(BANDID_FORMATBAR));
2236         set_toolbar_state(BANDID_SIZELIST, !is_bar_visible(BANDID_FORMATBAR));
2237         set_toolbar_state(BANDID_FORMATBAR, !is_bar_visible(BANDID_FORMATBAR));
2238         update_window();
2239         break;
2240
2241     case ID_TOGGLE_STATUSBAR:
2242         set_statusbar_state(!is_bar_visible(BANDID_STATUSBAR));
2243         update_window();
2244         break;
2245
2246     case ID_TOGGLE_RULER:
2247         set_toolbar_state(BANDID_RULER, !is_bar_visible(BANDID_RULER));
2248         update_window();
2249         break;
2250
2251     case ID_DATETIME:
2252         {
2253         HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2254         DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_DATETIME), hWnd, datetime_proc);
2255         break;
2256         }
2257
2258     case ID_PARAFORMAT:
2259         {
2260             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2261             DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_PARAFORMAT), hWnd,
2262                        paraformat_proc);
2263         }
2264         break;
2265
2266     case ID_TABSTOPS:
2267         {
2268             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2269             DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_TABSTOPS), hWnd, tabstops_proc);
2270         }
2271         break;
2272
2273     case ID_ABOUT:
2274         dialog_about();
2275         break;
2276
2277     case ID_VIEWPROPERTIES:
2278         dialog_viewproperties();
2279         break;
2280
2281     case IDC_FONTLIST:
2282         if (HIWORD(wParam) == CBN_SELENDOK)
2283         {
2284             WCHAR buffer[LF_FACESIZE];
2285             HWND hwndFontList = (HWND)lParam;
2286             get_comboexlist_selection(hwndFontList, buffer, LF_FACESIZE);
2287             on_fontlist_modified(hwndFontList, buffer);
2288         }
2289         break;
2290
2291     case IDC_SIZELIST:
2292         if (HIWORD(wParam) == CBN_SELENDOK)
2293         {
2294             WCHAR buffer[MAX_STRING_LEN+1];
2295             HWND hwndSizeList = (HWND)lParam;
2296             get_comboexlist_selection(hwndSizeList, buffer, MAX_STRING_LEN+1);
2297             on_sizelist_modified(hwndSizeList, buffer);
2298         }
2299         break;
2300
2301     default:
2302         SendMessageW(hwndEditor, WM_COMMAND, wParam, lParam);
2303         break;
2304     }
2305     return 0;
2306 }
2307
2308 static LRESULT OnInitPopupMenu( HWND hWnd, WPARAM wParam, LPARAM lParam )
2309 {
2310     HMENU hMenu = (HMENU)wParam;
2311     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2312     HWND hwndStatus = GetDlgItem(hWnd, IDC_STATUSBAR);
2313     PARAFORMAT pf;
2314     int nAlignment = -1;
2315     int selFrom, selTo;
2316     GETTEXTLENGTHEX gt;
2317     LRESULT textLength;
2318     MENUITEMINFOW mi;
2319
2320     SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&selFrom, (LPARAM)&selTo);
2321     EnableMenuItem(hMenu, ID_EDIT_COPY, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
2322     EnableMenuItem(hMenu, ID_EDIT_CUT, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
2323
2324     pf.cbSize = sizeof(PARAFORMAT);
2325     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2326     CheckMenuItem(hMenu, ID_EDIT_READONLY,
2327       MF_BYCOMMAND|(GetWindowLong(hwndEditor, GWL_STYLE)&ES_READONLY ? MF_CHECKED : MF_UNCHECKED));
2328     CheckMenuItem(hMenu, ID_EDIT_MODIFIED,
2329       MF_BYCOMMAND|(SendMessage(hwndEditor, EM_GETMODIFY, 0, 0) ? MF_CHECKED : MF_UNCHECKED));
2330     if (pf.dwMask & PFM_ALIGNMENT)
2331         nAlignment = pf.wAlignment;
2332     CheckMenuItem(hMenu, ID_ALIGN_LEFT, MF_BYCOMMAND|(nAlignment == PFA_LEFT) ?
2333             MF_CHECKED : MF_UNCHECKED);
2334     CheckMenuItem(hMenu, ID_ALIGN_CENTER, MF_BYCOMMAND|(nAlignment == PFA_CENTER) ?
2335             MF_CHECKED : MF_UNCHECKED);
2336     CheckMenuItem(hMenu, ID_ALIGN_RIGHT, MF_BYCOMMAND|(nAlignment == PFA_RIGHT) ?
2337             MF_CHECKED : MF_UNCHECKED);
2338     CheckMenuItem(hMenu, ID_BULLET, MF_BYCOMMAND | ((pf.wNumbering == PFN_BULLET) ?
2339             MF_CHECKED : MF_UNCHECKED));
2340     EnableMenuItem(hMenu, ID_EDIT_UNDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANUNDO, 0, 0)) ?
2341             MF_ENABLED : MF_GRAYED);
2342     EnableMenuItem(hMenu, ID_EDIT_REDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANREDO, 0, 0)) ?
2343             MF_ENABLED : MF_GRAYED);
2344
2345     CheckMenuItem(hMenu, ID_TOGGLE_TOOLBAR, MF_BYCOMMAND|(is_bar_visible(BANDID_TOOLBAR)) ?
2346             MF_CHECKED : MF_UNCHECKED);
2347
2348     CheckMenuItem(hMenu, ID_TOGGLE_FORMATBAR, MF_BYCOMMAND|(is_bar_visible(BANDID_FORMATBAR)) ?
2349             MF_CHECKED : MF_UNCHECKED);
2350
2351     CheckMenuItem(hMenu, ID_TOGGLE_STATUSBAR, MF_BYCOMMAND|IsWindowVisible(hwndStatus) ?
2352             MF_CHECKED : MF_UNCHECKED);
2353
2354     CheckMenuItem(hMenu, ID_TOGGLE_RULER, MF_BYCOMMAND|(is_bar_visible(BANDID_RULER)) ? MF_CHECKED : MF_UNCHECKED);
2355
2356     gt.flags = GTL_NUMCHARS;
2357     gt.codepage = 1200;
2358     textLength = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
2359     EnableMenuItem(hMenu, ID_FIND, MF_BYCOMMAND|(textLength ? MF_ENABLED : MF_GRAYED));
2360
2361     mi.cbSize = sizeof(mi);
2362     mi.fMask = MIIM_DATA;
2363
2364     GetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
2365
2366     EnableMenuItem(hMenu, ID_FIND_NEXT, MF_BYCOMMAND|((textLength && mi.dwItemData) ?
2367                    MF_ENABLED : MF_GRAYED));
2368
2369     EnableMenuItem(hMenu, ID_REPLACE, MF_BYCOMMAND|(textLength ? MF_ENABLED : MF_GRAYED));
2370
2371     return 0;
2372 }
2373
2374 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam )
2375 {
2376     int nStatusSize = 0;
2377     RECT rc;
2378     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2379     HWND hwndStatusBar = GetDlgItem(hWnd, IDC_STATUSBAR);
2380     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
2381     HWND hRulerWnd = GetDlgItem(hWnd, IDC_RULER);
2382     int rebarHeight = 0;
2383
2384     if (hwndStatusBar)
2385     {
2386         SendMessageW(hwndStatusBar, WM_SIZE, 0, 0);
2387         if (IsWindowVisible(hwndStatusBar))
2388         {
2389             GetClientRect(hwndStatusBar, &rc);
2390             nStatusSize = rc.bottom - rc.top;
2391         } else
2392         {
2393             nStatusSize = 0;
2394         }
2395     }
2396     if (hwndReBar)
2397     {
2398         rebarHeight = SendMessageW(hwndReBar, RB_GETBARHEIGHT, 0, 0);
2399
2400         MoveWindow(hwndReBar, 0, 0, LOWORD(lParam), rebarHeight, TRUE);
2401     }
2402     if (hwndEditor)
2403     {
2404         GetClientRect(hWnd, &rc);
2405         MoveWindow(hwndEditor, 0, rebarHeight, rc.right, rc.bottom-nStatusSize-rebarHeight, TRUE);
2406     }
2407
2408     redraw_ruler(hRulerWnd);
2409
2410     return DefWindowProcW(hWnd, WM_SIZE, wParam, lParam);
2411 }
2412
2413 static LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
2414 {
2415     if(msg == ID_FINDMSGSTRING)
2416         return handle_findmsg((LPFINDREPLACEW)lParam);
2417
2418     switch(msg)
2419     {
2420     case WM_CREATE:
2421         return OnCreate( hWnd, wParam, lParam );
2422
2423     case WM_USER:
2424         return OnUser( hWnd, wParam, lParam );
2425
2426     case WM_NOTIFY:
2427         return OnNotify( hWnd, wParam, lParam );
2428
2429     case WM_COMMAND:
2430         if(preview_isactive())
2431         {
2432             return preview_command( hWnd, wParam, lParam );
2433         }
2434
2435         return OnCommand( hWnd, wParam, lParam );
2436
2437     case WM_DESTROY:
2438         PostQuitMessage(0);
2439         break;
2440
2441     case WM_CLOSE:
2442         if(preview_isactive())
2443         {
2444             preview_exit(hWnd);
2445         } else if(prompt_save_changes())
2446         {
2447             registry_set_options(hMainWnd);
2448             registry_set_formatopts_all(barState);
2449             PostQuitMessage(0);
2450         }
2451         break;
2452
2453     case WM_ACTIVATE:
2454         if (LOWORD(wParam))
2455             SetFocus(GetDlgItem(hWnd, IDC_EDITOR));
2456         return 0;
2457
2458     case WM_INITMENUPOPUP:
2459         return OnInitPopupMenu( hWnd, wParam, lParam );
2460
2461     case WM_SIZE:
2462         return OnSize( hWnd, wParam, lParam );
2463
2464     case WM_CONTEXTMENU:
2465         if((HWND)wParam == hEditorWnd)
2466             return context_menu(lParam);
2467         else
2468             return DefWindowProcW(hWnd, msg, wParam, lParam);
2469
2470     case WM_DROPFILES:
2471         {
2472             WCHAR file[MAX_PATH];
2473             DragQueryFileW((HDROP)wParam, 0, file, MAX_PATH);
2474             DragFinish((HDROP)wParam);
2475
2476             if(prompt_save_changes())
2477                 DoOpenFile(file);
2478         }
2479         break;
2480     case WM_PAINT:
2481         if(preview_isactive())
2482             return print_preview(hWnd);
2483         else
2484             return DefWindowProcW(hWnd, msg, wParam, lParam);
2485
2486     default:
2487         return DefWindowProcW(hWnd, msg, wParam, lParam);
2488     }
2489
2490     return 0;
2491 }
2492
2493 int CALLBACK WinMain(HINSTANCE hInstance, HINSTANCE hOldInstance, LPSTR szCmdParagraph, int nCmdShow)
2494 {
2495     INITCOMMONCONTROLSEX classes = {8, ICC_BAR_CLASSES|ICC_COOL_CLASSES|ICC_USEREX_CLASSES};
2496     HACCEL hAccel;
2497     WNDCLASSW wc;
2498     MSG msg;
2499     RECT rc;
2500     UINT_PTR hPrevRulerProc;
2501     HWND hRulerWnd;
2502     POINTL EditPoint;
2503     DWORD bMaximized;
2504     static const WCHAR wszAccelTable[] = {'M','A','I','N','A','C','C','E','L',
2505                                           'T','A','B','L','E','\0'};
2506
2507     InitCommonControlsEx(&classes);
2508
2509     hAccel = LoadAcceleratorsW(hInstance, wszAccelTable);
2510
2511     wc.style = CS_HREDRAW | CS_VREDRAW;
2512     wc.lpfnWndProc = WndProc;
2513     wc.cbClsExtra = 0;
2514     wc.cbWndExtra = 4;
2515     wc.hInstance = hInstance;
2516     wc.hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_WORDPAD));
2517     wc.hCursor = LoadCursor(NULL, IDC_IBEAM);
2518     wc.hbrBackground = GetSysColorBrush(COLOR_WINDOW);
2519     wc.lpszMenuName = MAKEINTRESOURCEW(IDM_MAINMENU);
2520     wc.lpszClassName = wszMainWndClass;
2521     RegisterClassW(&wc);
2522
2523     registry_read_winrect(&rc);
2524     hMainWnd = CreateWindowExW(0, wszMainWndClass, wszAppTitle, WS_CLIPCHILDREN|WS_OVERLAPPEDWINDOW,
2525       rc.left, rc.top, rc.right-rc.left, rc.bottom-rc.top, NULL, NULL, hInstance, NULL);
2526     registry_read_maximized(&bMaximized);
2527     if ((nCmdShow == SW_SHOWNORMAL || nCmdShow == SW_SHOWDEFAULT)
2528              && bMaximized)
2529         nCmdShow = SW_SHOWMAXIMIZED;
2530     ShowWindow(hMainWnd, nCmdShow);
2531
2532     set_caption(NULL);
2533     set_bar_states();
2534     set_fileformat(SF_RTF);
2535     SendMessageW(hEditorWnd, EM_EMPTYUNDOBUFFER, 0, 0);
2536     hPopupMenu = LoadMenuW(hInstance, MAKEINTRESOURCEW(IDM_POPUP));
2537     get_default_printer_opts();
2538     target_device(hMainWnd, wordWrap[reg_formatindex(fileFormat)]);
2539
2540     hRulerWnd = GetDlgItem(GetDlgItem(hMainWnd, IDC_REBAR), IDC_RULER);
2541     SendMessageW(GetDlgItem(hMainWnd, IDC_EDITOR), EM_POSFROMCHAR, (WPARAM)&EditPoint, 0);
2542     hPrevRulerProc = SetWindowLongPtrW(hRulerWnd, GWLP_WNDPROC, (UINT_PTR)ruler_proc);
2543     SendMessageW(hRulerWnd, WM_USER, (WPARAM)&EditPoint, hPrevRulerProc);
2544
2545     HandleCommandLine(GetCommandLineW());
2546
2547     while(GetMessageW(&msg,0,0,0))
2548     {
2549         if (IsDialogMessage(hFindWnd, &msg))
2550             continue;
2551
2552         if (TranslateAcceleratorW(hMainWnd, hAccel, &msg))
2553             continue;
2554         TranslateMessage(&msg);
2555         DispatchMessageW(&msg);
2556         if (!PeekMessageW(&msg, 0, 0, 0, PM_NOREMOVE))
2557             SendMessageW(hMainWnd, WM_USER, 0, 0);
2558     }
2559
2560     return 0;
2561 }