programs/wordpad/wordpad.c

   1 /*
   2  * Wordpad implementation
   3  *
   4  * Copyright 2004 by Krzysztof Foltman
   5  * Copyright 2007 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 #define MAX_STRING_LEN 255
  26
  27 #include <stdarg.h>
  28 #include <ctype.h>
  29 #include <stdio.h>
  30 #include <assert.h>
  31
  32 #include <windows.h>
  33 #include <richedit.h>
  34 #include <commctrl.h>
  35 #include <commdlg.h>
  36 #include <shlobj.h>
  37 #include <shellapi.h>
  38 #include <math.h>
  39 #include <errno.h>
  40
  41 #include "resource.h"
  42
  43 #ifdef NONAMELESSUNION
  44 # define U(x)  (x).u
  45 # define U2(x) (x).u2
  46 # define U3(x) (x).u3
  47 #else
  48 # define U(x)  (x)
  49 # define U2(x) (x)
  50 # define U3(x) (x)
  51 #endif
  52
  53 /* use LoadString */
  54 static const WCHAR xszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
  55 static const WCHAR xszMainMenu[] = {'M','A','I','N','M','E','N','U',0};
  56
  57 static const WCHAR wszRichEditClass[] = {'R','I','C','H','E','D','I','T','2','0','W',0};
  58 static const WCHAR wszMainWndClass[] = {'W','O','R','D','P','A','D','T','O','P',0};
  59 static const WCHAR wszAppTitle[] = {'W','i','n','e',' ','W','o','r','d','p','a','d',0};
  60
  61 static const WCHAR key_recentfiles[] = {'R','e','c','e','n','t',' ','f','i','l','e',
  62                                         ' ','l','i','s','t',0};
  63 static const WCHAR key_options[] = {'O','p','t','i','o','n','s',0};
  64 static const WCHAR key_rtf[] = {'R','T','F',0};
  65 static const WCHAR key_text[] = {'T','e','x','t',0};
  66
  67 static const WCHAR var_file[] = {'F','i','l','e','%','d',0};
  68 static const WCHAR var_framerect[] = {'F','r','a','m','e','R','e','c','t',0};
  69 static const WCHAR var_barstate0[] = {'B','a','r','S','t','a','t','e','0',0};
  70 static const WCHAR var_pagemargin[] = {'P','a','g','e','M','a','r','g','i','n',0};
  71
  72 static const WCHAR stringFormat[] = {'%','2','d','\0'};
  73
  74 static HWND hMainWnd;
  75 static HWND hEditorWnd;
  76 static HWND hFindWnd;
  77 static HMENU hPopupMenu;
  78
  79 static UINT ID_FINDMSGSTRING;
  80
  81 static WCHAR wszFilter[MAX_STRING_LEN*4+6*3+5];
  82 static WCHAR wszDefaultFileName[MAX_STRING_LEN];
  83 static WCHAR wszSaveChanges[MAX_STRING_LEN];
  84 static WCHAR wszPrintFilter[MAX_STRING_LEN*2+6+4+1];
  85 static WCHAR units_cmW[MAX_STRING_LEN];
  86
  87 static char units_cmA[MAX_STRING_LEN];
  88
  89 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam );
  90
  91 /* Load string resources */
  92 static void DoLoadStrings(void)
  93 {
  94     LPWSTR p = wszFilter;
  95     static const WCHAR files_rtf[] = {'*','.','r','t','f','\0'};
  96     static const WCHAR files_txt[] = {'*','.','t','x','t','\0'};
  97     static const WCHAR files_all[] = {'*','.','*','\0'};
  98     static const WCHAR files_prn[] = {'*','.','P','R','N',0};
  99     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
 100
 101     LoadStringW(hInstance, STRING_RICHTEXT_FILES_RTF, p, MAX_STRING_LEN);
 102     p += lstrlenW(p) + 1;
 103     lstrcpyW(p, files_rtf);
 104     p += lstrlenW(p) + 1;
 105     LoadStringW(hInstance, STRING_TEXT_FILES_TXT, p, MAX_STRING_LEN);
 106     p += lstrlenW(p) + 1;
 107     lstrcpyW(p, files_txt);
 108     p += lstrlenW(p) + 1;
 109     LoadStringW(hInstance, STRING_TEXT_FILES_UNICODE_TXT, p, MAX_STRING_LEN);
 110     p += lstrlenW(p) + 1;
 111     lstrcpyW(p, files_txt);
 112     p += lstrlenW(p) + 1;
 113     LoadStringW(hInstance, STRING_ALL_FILES, p, MAX_STRING_LEN);
 114     p += lstrlenW(p) + 1;
 115     lstrcpyW(p, files_all);
 116     p += lstrlenW(p) + 1;
 117     *p = '\0';
 118
 119     p = wszPrintFilter;
 120     LoadStringW(hInstance, STRING_PRINTER_FILES_PRN, p, MAX_STRING_LEN);
 121     p += lstrlenW(p) + 1;
 122     lstrcpyW(p, files_prn);
 123     p += lstrlenW(p) + 1;
 124     LoadStringW(hInstance, STRING_ALL_FILES, p, MAX_STRING_LEN);
 125     p += lstrlenW(p) + 1;
 126     lstrcpyW(p, files_all);
 127     p += lstrlenW(p) + 1;
 128     *p = 0;
 129
 130     p = wszDefaultFileName;
 131     LoadStringW(hInstance, STRING_DEFAULT_FILENAME, p, MAX_STRING_LEN);
 132
 133     p = wszSaveChanges;
 134     LoadStringW(hInstance, STRING_PROMPT_SAVE_CHANGES, p, MAX_STRING_LEN);
 135
 136     LoadStringA(hInstance, STRING_UNITS_CM, units_cmA, MAX_STRING_LEN);
 137     LoadStringW(hInstance, STRING_UNITS_CM, units_cmW, MAX_STRING_LEN);
 138 }
 139
 140 static void AddButton(HWND hwndToolBar, int nImage, int nCommand)
 141 {
 142     TBBUTTON button;
 143
 144     ZeroMemory(&button, sizeof(button));
 145     button.iBitmap = nImage;
 146     button.idCommand = nCommand;
 147     button.fsState = TBSTATE_ENABLED;
 148     button.fsStyle = TBSTYLE_BUTTON;
 149     button.dwData = 0;
 150     button.iString = -1;
 151     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
 152 }
 153
 154 static void AddTextButton(HWND hWnd, int string, int command, int id)
 155 {
 156     REBARBANDINFOW rb;
 157     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
 158     static const WCHAR button[] = {'B','U','T','T','O','N',0};
 159     WCHAR text[MAX_STRING_LEN];
 160     HWND hButton;
 161     RECT rc;
 162
 163     LoadStringW(hInstance, string, text, MAX_STRING_LEN);
 164     hButton = CreateWindowW(button, text,
 165                             WS_VISIBLE | WS_CHILD, 5, 5, 100, 15,
 166                             hMainWnd, (HMENU)command, hInstance, NULL);
 167
 168     rb.cbSize = sizeof(rb);
 169     rb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_STYLE | RBBIM_CHILD | RBBIM_IDEALSIZE | RBBIM_ID;
 170     rb.fStyle = RBBS_NOGRIPPER | RBBS_VARIABLEHEIGHT;
 171     rb.hwndChild = hButton;
 172     rb.cyChild = rb.cyMinChild = 22;
 173     rb.cx = rb.cxMinChild = 90;
 174     rb.cxIdeal = 100;
 175     rb.wID = id;
 176
 177     rc.bottom = 22;
 178     rc.right = 90;
 179
 180     SendMessageW(hWnd, RB_INSERTBAND, -1, (LPARAM)&rb);
 181     SetWindowPos(hButton, 0, 0, 0, 90, 22, SWP_NOMOVE | SWP_NOOWNERZORDER | SWP_NOZORDER);
 182 }
 183
 184 static void AddSeparator(HWND hwndToolBar)
 185 {
 186     TBBUTTON button;
 187
 188     ZeroMemory(&button, sizeof(button));
 189     button.iBitmap = -1;
 190     button.idCommand = 0;
 191     button.fsState = 0;
 192     button.fsStyle = TBSTYLE_SEP;
 193     button.dwData = 0;
 194     button.iString = -1;
 195     SendMessageW(hwndToolBar, TB_ADDBUTTONSW, 1, (LPARAM)&button);
 196 }
 197
 198 static DWORD CALLBACK stream_in(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
 199 {
 200     HANDLE hFile = (HANDLE)cookie;
 201     DWORD read;
 202
 203     if(!ReadFile(hFile, buffer, cb, &read, 0))
 204         return 1;
 205
 206     *pcb = read;
 207
 208     return 0;
 209 }
 210
 211 static DWORD CALLBACK stream_out(DWORD_PTR cookie, LPBYTE buffer, LONG cb, LONG *pcb)
 212 {
 213     DWORD written;
 214     int ret;
 215     HANDLE hFile = (HANDLE)cookie;
 216
 217     ret = WriteFile(hFile, buffer, cb, &written, 0);
 218
 219     if(!ret || (cb != written))
 220         return 1;
 221
 222     *pcb = cb;
 223
 224     return 0;
 225 }
 226
 227
 228 static LPWSTR file_basename(LPWSTR path)
 229 {
 230     LPWSTR pos = path + lstrlenW(path);
 231
 232     while(pos > path)
 233     {
 234         if(*pos == '\\' || *pos == '/')
 235         {
 236             pos++;
 237             break;
 238         }
 239         pos--;
 240     }
 241     return pos;
 242 }
 243
 244 static WCHAR wszFileName[MAX_PATH];
 245 static WPARAM fileFormat = SF_RTF;
 246
 247 static void set_caption(LPCWSTR wszNewFileName)
 248 {
 249     static const WCHAR wszSeparator[] = {' ','-',' '};
 250     WCHAR *wszCaption;
 251     SIZE_T length = 0;
 252
 253     if(!wszNewFileName)
 254         wszNewFileName = wszDefaultFileName;
 255     else
 256         wszNewFileName = file_basename((LPWSTR)wszNewFileName);
 257
 258     wszCaption = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
 259                 lstrlenW(wszNewFileName)*sizeof(WCHAR)+sizeof(wszSeparator)+sizeof(wszAppTitle));
 260
 261     if(!wszCaption)
 262         return;
 263
 264     memcpy(wszCaption, wszNewFileName, lstrlenW(wszNewFileName)*sizeof(WCHAR));
 265     length += lstrlenW(wszNewFileName);
 266     memcpy(wszCaption + length, wszSeparator, sizeof(wszSeparator));
 267     length += sizeof(wszSeparator) / sizeof(WCHAR);
 268     memcpy(wszCaption + length, wszAppTitle, sizeof(wszAppTitle));
 269
 270     SetWindowTextW(hMainWnd, wszCaption);
 271
 272     HeapFree(GetProcessHeap(), 0, wszCaption);
 273 }
 274
 275 static LRESULT registry_get_handle(HKEY *hKey, LPDWORD action, LPCWSTR subKey)
 276 {
 277     LONG ret;
 278     static const WCHAR wszProgramKey[] = {'S','o','f','t','w','a','r','e','\\',
 279         'M','i','c','r','o','s','o','f','t','\\',
 280         'W','i','n','d','o','w','s','\\',
 281         'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
 282         'A','p','p','l','e','t','s','\\',
 283         'W','o','r','d','p','a','d',0};
 284     LPWSTR key = (LPWSTR)wszProgramKey;
 285
 286     if(subKey)
 287     {
 288         WCHAR backslash[] = {'\\',0};
 289         key = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
 290                         (lstrlenW(wszProgramKey)+lstrlenW(subKey)+lstrlenW(backslash)+1)
 291                         *sizeof(WCHAR));
 292
 293         if(!key)
 294             return 1;
 295
 296         lstrcpyW(key, wszProgramKey);
 297         lstrcatW(key, backslash);
 298         lstrcatW(key, subKey);
 299     }
 300
 301     if(action)
 302     {
 303         ret = RegCreateKeyExW(HKEY_CURRENT_USER, key, 0, NULL, REG_OPTION_NON_VOLATILE,
 304                               KEY_READ | KEY_WRITE, NULL, hKey, action);
 305     } else
 306     {
 307         ret = RegOpenKeyExW(HKEY_CURRENT_USER, key, 0, KEY_READ | KEY_WRITE, hKey);
 308     }
 309
 310     if(subKey)
 311         HeapFree(GetProcessHeap(), 0, key);
 312
 313     return ret;
 314 }
 315
 316 static RECT margins;
 317
 318 static void registry_set_options(void)
 319 {
 320     HKEY hKey;
 321     DWORD action;
 322
 323     if(registry_get_handle(&hKey, &action, (LPWSTR)key_options) == ERROR_SUCCESS)
 324     {
 325         RECT rc;
 326
 327         GetWindowRect(hMainWnd, &rc);
 328
 329         RegSetValueExW(hKey, var_framerect, 0, REG_BINARY, (LPBYTE)&rc, sizeof(RECT));
 330
 331         RegSetValueExW(hKey, var_pagemargin, 0, REG_BINARY, (LPBYTE)&margins, sizeof(RECT));
 332     }
 333 }
 334
 335 static RECT registry_read_winrect(void)
 336 {
 337     HKEY hKey;
 338     RECT rc;
 339     DWORD size = sizeof(RECT);
 340
 341     ZeroMemory(&rc, sizeof(RECT));
 342     if(registry_get_handle(&hKey, 0, (LPWSTR)key_options) != ERROR_SUCCESS ||
 343        RegQueryValueExW(hKey, var_framerect, 0, NULL, (LPBYTE)&rc, &size) !=
 344        ERROR_SUCCESS || size != sizeof(RECT))
 345     {
 346         rc.top = 0;
 347         rc.left = 0;
 348         rc.bottom = 300;
 349         rc.right = 600;
 350     }
 351
 352     RegCloseKey(hKey);
 353     return rc;
 354 }
 355
 356 static void truncate_path(LPWSTR file, LPWSTR out, LPWSTR pos1, LPWSTR pos2)
 357 {
 358     static const WCHAR dots[] = {'.','.','.',0};
 359
 360     *++pos1 = 0;
 361
 362     lstrcatW(out, file);
 363     lstrcatW(out, dots);
 364     lstrcatW(out, pos2);
 365 }
 366
 367 static void format_filelist_filename(LPWSTR file, LPWSTR out)
 368 {
 369     LPWSTR pos_basename;
 370     LPWSTR truncpos1, truncpos2;
 371     WCHAR myDocs[MAX_STRING_LEN];
 372
 373     SHGetFolderPathW(NULL, CSIDL_PERSONAL, NULL, SHGFP_TYPE_CURRENT, (LPWSTR)&myDocs);
 374     pos_basename = file_basename(file);
 375     truncpos1 = NULL;
 376     truncpos2 = NULL;
 377
 378     *(pos_basename-1) = 0;
 379     if(!lstrcmpiW(file, myDocs) || (lstrlenW(pos_basename) > FILELIST_ENTRY_LENGTH))
 380     {
 381         truncpos1 = pos_basename;
 382         *(pos_basename-1) = '\\';
 383     } else
 384     {
 385         LPWSTR pos;
 386         BOOL morespace = FALSE;
 387
 388         *(pos_basename-1) = '\\';
 389
 390         for(pos = file; pos < pos_basename; pos++)
 391         {
 392             if(*pos == '\\' || *pos == '/')
 393             {
 394                 if(truncpos1)
 395                 {
 396                     if((pos - file + lstrlenW(pos_basename)) > FILELIST_ENTRY_LENGTH)
 397                         break;
 398
 399                     truncpos1 = pos;
 400                     morespace = TRUE;
 401                     break;
 402                 }
 403
 404                 if((pos - file + lstrlenW(pos_basename)) > FILELIST_ENTRY_LENGTH)
 405                     break;
 406
 407                 truncpos1 = pos;
 408             }
 409         }
 410
 411         if(morespace)
 412         {
 413             for(pos = pos_basename; pos >= truncpos1; pos--)
 414             {
 415                 if(*pos == '\\' || *pos == '/')
 416                 {
 417                     if((truncpos1 - file + lstrlenW(pos_basename) + pos_basename - pos) > FILELIST_ENTRY_LENGTH)
 418                         break;
 419
 420                     truncpos2 = pos;
 421                 }
 422             }
 423         }
 424     }
 425
 426     if(truncpos1 == pos_basename)
 427         lstrcatW(out, pos_basename);
 428     else if(truncpos1 == truncpos2 || !truncpos2)
 429         lstrcatW(out, file);
 430     else
 431         truncate_path(file, out, truncpos1, truncpos2 ? truncpos2 : (pos_basename-1));
 432 }
 433
 434 static void registry_read_filelist(HWND hMainWnd)
 435 {
 436     HKEY hFileKey;
 437
 438     if(registry_get_handle(&hFileKey, 0, key_recentfiles) == ERROR_SUCCESS)
 439     {
 440         WCHAR itemText[MAX_PATH+3], buffer[MAX_PATH];
 441         /* The menu item name is not the same as the file name, so we need to store
 442            the file name here */
 443         static WCHAR file1[MAX_PATH], file2[MAX_PATH], file3[MAX_PATH], file4[MAX_PATH];
 444         WCHAR numFormat[] = {'&','%','d',' ',0};
 445         LPWSTR pFile[] = {file1, file2, file3, file4};
 446         DWORD pathSize = MAX_PATH*sizeof(WCHAR);
 447         int i;
 448         WCHAR key[6];
 449         MENUITEMINFOW mi;
 450         HMENU hMenu = GetMenu(hMainWnd);
 451
 452         mi.cbSize = sizeof(MENUITEMINFOW);
 453         mi.fMask = MIIM_ID | MIIM_DATA | MIIM_STRING | MIIM_FTYPE;
 454         mi.fType = MFT_STRING;
 455         mi.dwTypeData = itemText;
 456         mi.wID = ID_FILE_RECENT1;
 457
 458         RemoveMenu(hMenu, ID_FILE_RECENT_SEPARATOR, MF_BYCOMMAND);
 459         for(i = 0; i < FILELIST_ENTRIES; i++)
 460         {
 461             wsprintfW(key, var_file, i+1);
 462             RemoveMenu(hMenu, ID_FILE_RECENT1+i, MF_BYCOMMAND);
 463             if(RegQueryValueExW(hFileKey, (LPWSTR)key, 0, NULL, (LPBYTE)pFile[i], &pathSize)
 464                != ERROR_SUCCESS)
 465                 break;
 466
 467             mi.dwItemData = (DWORD)pFile[i];
 468             wsprintfW(itemText, numFormat, i+1);
 469
 470             lstrcpyW(buffer, pFile[i]);
 471
 472             format_filelist_filename(buffer, itemText);
 473
 474             InsertMenuItemW(hMenu, ID_FILE_EXIT, FALSE, &mi);
 475             mi.wID++;
 476             pathSize = MAX_PATH*sizeof(WCHAR);
 477         }
 478         mi.fType = MFT_SEPARATOR;
 479         mi.fMask = MIIM_FTYPE | MIIM_ID;
 480         InsertMenuItemW(hMenu, ID_FILE_EXIT, FALSE, &mi);
 481
 482         RegCloseKey(hFileKey);
 483     }
 484 }
 485
 486 static void registry_set_filelist(LPCWSTR newFile)
 487 {
 488     HKEY hKey;
 489     DWORD action;
 490
 491     if(registry_get_handle(&hKey, &action, key_recentfiles) == ERROR_SUCCESS)
 492     {
 493         LPCWSTR pFiles[FILELIST_ENTRIES];
 494         int i;
 495         HMENU hMenu = GetMenu(hMainWnd);
 496         MENUITEMINFOW mi;
 497         WCHAR buffer[6];
 498
 499         mi.cbSize = sizeof(MENUITEMINFOW);
 500         mi.fMask = MIIM_DATA;
 501
 502         for(i = 0; i < FILELIST_ENTRIES; i++)
 503             pFiles[i] = NULL;
 504
 505         for(i = 0; GetMenuItemInfoW(hMenu, ID_FILE_RECENT1+i, FALSE, &mi); i++)
 506             pFiles[i] = (LPWSTR)mi.dwItemData;
 507
 508         if(lstrcmpiW(newFile, pFiles[0]))
 509         {
 510             for(i = 0; pFiles[i] && i < FILELIST_ENTRIES; i++)
 511             {
 512                 if(!lstrcmpiW(pFiles[i], newFile))
 513                 {
 514                     int j;
 515                     for(j = 0; pFiles[j] && j < i; j++)
 516                     {
 517                         pFiles[i-j] = pFiles[i-j-1];
 518                     }
 519                     pFiles[0] = NULL;
 520                     break;
 521                 }
 522             }
 523
 524             if(!pFiles[0])
 525             {
 526                 pFiles[0] = newFile;
 527             } else
 528             {
 529                 for(i = 0; pFiles[i] && i < FILELIST_ENTRIES-1; i++)
 530                     pFiles[FILELIST_ENTRIES-1-i] = pFiles[FILELIST_ENTRIES-2-i];
 531
 532                 pFiles[0] = newFile;
 533             }
 534
 535             for(i = 0; pFiles[i] && i < FILELIST_ENTRIES; i++)
 536             {
 537                 wsprintfW(buffer, var_file, i+1);
 538                 RegSetValueExW(hKey, (LPWSTR)&buffer, 0, REG_SZ, (LPBYTE)pFiles[i],
 539                                (lstrlenW(pFiles[i])+1)*sizeof(WCHAR));
 540             }
 541         }
 542     }
 543     RegCloseKey(hKey);
 544     registry_read_filelist(hMainWnd);
 545 }
 546
 547 static BOOL validate_endptr(LPCSTR endptr, BOOL units)
 548 {
 549     if(!endptr || !*endptr)
 550         return TRUE;
 551
 552     while(*endptr == ' ')
 553         endptr++;
 554
 555     if(!units)
 556         return *endptr != '\0';
 557
 558     /* FIXME: Allow other units and convert between them */
 559     if(!lstrcmpA(endptr, units_cmA))
 560         endptr += 2;
 561
 562     return *endptr != '\0';
 563 }
 564
 565 static BOOL number_from_string(LPCWSTR string, float *num, BOOL units)
 566 {
 567     double ret;
 568     char buffer[MAX_STRING_LEN];
 569     char *endptr = buffer;
 570
 571     WideCharToMultiByte(CP_ACP, 0, string, -1, buffer, MAX_STRING_LEN, NULL, NULL);
 572     *num = 0;
 573     errno = 0;
 574     ret = strtod(buffer, &endptr);
 575
 576     if((ret == 0 && errno != 0) || endptr == buffer || validate_endptr(endptr, units))
 577     {
 578         return FALSE;
 579     } else
 580     {
 581         *num = (float)ret;
 582         return TRUE;
 583     }
 584 }
 585
 586 static void set_size(float size)
 587 {
 588     CHARFORMAT2W fmt;
 589
 590     ZeroMemory(&fmt, sizeof(fmt));
 591     fmt.cbSize = sizeof(fmt);
 592     fmt.dwMask = CFM_SIZE;
 593     fmt.yHeight = (int)(size * 20.0);
 594     SendMessageW(hEditorWnd, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 595 }
 596
 597 static void add_size(HWND hSizeListWnd, unsigned size)
 598 {
 599     WCHAR buffer[3];
 600     COMBOBOXEXITEMW cbItem;
 601     cbItem.mask = CBEIF_TEXT;
 602     cbItem.iItem = -1;
 603
 604     wsprintfW(buffer, stringFormat, size);
 605     cbItem.pszText = (LPWSTR)buffer;
 606     SendMessageW(hSizeListWnd, CBEM_INSERTITEMW, 0, (LPARAM)&cbItem);
 607 }
 608
 609 static void populate_size_list(HWND hSizeListWnd)
 610 {
 611     HWND hReBarWnd = GetDlgItem(hMainWnd, IDC_REBAR);
 612     HWND hFontListWnd = GetDlgItem(hReBarWnd, IDC_FONTLIST);
 613     COMBOBOXEXITEMW cbFontItem;
 614     CHARFORMAT2W fmt;
 615     HWND hListEditWnd = (HWND)SendMessageW(hSizeListWnd, CBEM_GETEDITCONTROL, 0, 0);
 616     HDC hdc = GetDC(hMainWnd);
 617     static const unsigned choices[] = {8,9,10,11,12,14,16,18,20,22,24,26,28,36,48,72};
 618     WCHAR buffer[3];
 619     int i;
 620     DWORD fontStyle;
 621
 622     ZeroMemory(&fmt, sizeof(fmt));
 623     fmt.cbSize = sizeof(fmt);
 624     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 625
 626     cbFontItem.mask = CBEIF_LPARAM;
 627     cbFontItem.iItem = SendMessageW(hFontListWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)fmt.szFaceName);
 628     SendMessageW(hFontListWnd, CBEM_GETITEMW, 0, (LPARAM)&cbFontItem);
 629
 630     fontStyle = (DWORD)LOWORD(cbFontItem.lParam);
 631
 632     SendMessageW(hSizeListWnd, CB_RESETCONTENT, 0, 0);
 633
 634     if((fontStyle & RASTER_FONTTYPE) && cbFontItem.iItem)
 635     {
 636         add_size(hSizeListWnd, (BYTE)MulDiv(HIWORD(cbFontItem.lParam), 72,
 637                                GetDeviceCaps(hdc, LOGPIXELSY)));
 638     } else
 639     {
 640         for(i = 0; i < sizeof(choices)/sizeof(choices[0]); i++)
 641             add_size(hSizeListWnd, choices[i]);
 642     }
 643
 644     wsprintfW(buffer, stringFormat, fmt.yHeight / 20);
 645     SendMessageW(hListEditWnd, WM_SETTEXT, 0, (LPARAM)buffer);
 646 }
 647
 648 static void update_size_list(void)
 649 {
 650     HWND hReBar = GetDlgItem(hMainWnd, IDC_REBAR);
 651     HWND hwndSizeList = GetDlgItem(hReBar, IDC_SIZELIST);
 652     HWND hwndSizeListEdit = (HWND)SendMessageW(hwndSizeList, CBEM_GETEDITCONTROL, 0, 0);
 653     WCHAR fontSize[MAX_STRING_LEN], sizeBuffer[MAX_STRING_LEN];
 654     CHARFORMAT2W fmt;
 655
 656     ZeroMemory(&fmt, sizeof(fmt));
 657     fmt.cbSize = sizeof(fmt);
 658
 659     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 660
 661     SendMessageW(hwndSizeListEdit, WM_GETTEXT, MAX_PATH, (LPARAM)fontSize);
 662     wsprintfW(sizeBuffer, stringFormat, fmt.yHeight / 20);
 663
 664     if(lstrcmpW(fontSize, sizeBuffer))
 665         SendMessageW(hwndSizeListEdit, WM_SETTEXT, 0, (LPARAM)sizeBuffer);
 666 }
 667
 668 static void update_font_list(void)
 669 {
 670     HWND hReBar = GetDlgItem(hMainWnd, IDC_REBAR);
 671     HWND hFontList = GetDlgItem(hReBar, IDC_FONTLIST);
 672     HWND hFontListEdit = (HWND)SendMessageW(hFontList, CBEM_GETEDITCONTROL, 0, 0);
 673     WCHAR fontName[MAX_STRING_LEN];
 674     CHARFORMAT2W fmt;
 675
 676     ZeroMemory(&fmt, sizeof(fmt));
 677     fmt.cbSize = sizeof(fmt);
 678
 679     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 680     SendMessageW(hFontListEdit, WM_GETTEXT, MAX_PATH, (LPARAM)fontName);
 681
 682     if(lstrcmpW(fontName, fmt.szFaceName))
 683     {
 684         SendMessageW(hFontListEdit, WM_SETTEXT, 0, (LPARAM)fmt.szFaceName);
 685         populate_size_list(GetDlgItem(hReBar, IDC_SIZELIST));
 686     } else
 687     {
 688         update_size_list();
 689     }
 690 }
 691
 692 static void clear_formatting(void)
 693 {
 694     PARAFORMAT2 pf;
 695
 696     pf.cbSize = sizeof(pf);
 697     pf.dwMask = PFM_ALIGNMENT;
 698     pf.wAlignment = PFA_LEFT;
 699     SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
 700 }
 701
 702 static int reg_formatindex(WPARAM format)
 703 {
 704     return (format & SF_TEXT) ? 1 : 0;
 705 }
 706
 707 static int fileformat_number(WPARAM format)
 708 {
 709     int number = 0;
 710
 711     if(format == SF_TEXT)
 712     {
 713         number = 1;
 714     } else if (format == (SF_TEXT | SF_UNICODE))
 715     {
 716         number = 2;
 717     }
 718     return number;
 719 }
 720
 721 static WPARAM fileformat_flags(int format)
 722 {
 723     WPARAM flags[] = { SF_RTF , SF_TEXT , SF_TEXT | SF_UNICODE };
 724
 725     return flags[format];
 726 }
 727
 728 static void set_font(LPCWSTR wszFaceName)
 729 {
 730     HWND hReBarWnd = GetDlgItem(hMainWnd, IDC_REBAR);
 731     HWND hSizeListWnd = GetDlgItem(hReBarWnd, IDC_SIZELIST);
 732     HWND hFontListWnd = GetDlgItem(hReBarWnd, IDC_FONTLIST);
 733     HWND hFontListEditWnd = (HWND)SendMessageW(hFontListWnd, CBEM_GETEDITCONTROL, 0, 0);
 734     CHARFORMAT2W fmt;
 735
 736     ZeroMemory(&fmt, sizeof(fmt));
 737
 738     fmt.cbSize = sizeof(fmt);
 739     fmt.dwMask = CFM_FACE;
 740
 741     lstrcpyW(fmt.szFaceName, wszFaceName);
 742
 743     SendMessageW(hEditorWnd, EM_SETCHARFORMAT,  SCF_SELECTION, (LPARAM)&fmt);
 744
 745     populate_size_list(hSizeListWnd);
 746
 747     SendMessageW(hFontListEditWnd, WM_SETTEXT, 0, (LPARAM)(LPWSTR)wszFaceName);
 748 }
 749
 750 static void set_default_font(void)
 751 {
 752     static const WCHAR richTextFont[] = {'T','i','m','e','s',' ','N','e','w',' ',
 753                                          'R','o','m','a','n',0};
 754     static const WCHAR plainTextFont[] = {'C','o','u','r','i','e','r',' ','N','e','w',0};
 755     CHARFORMAT2W fmt;
 756     LPCWSTR font;
 757
 758     ZeroMemory(&fmt, sizeof(fmt));
 759
 760     fmt.cbSize = sizeof(fmt);
 761     fmt.dwMask = CFM_FACE | CFM_BOLD | CFM_ITALIC | CFM_UNDERLINE;
 762     fmt.dwEffects = 0;
 763
 764     if(fileFormat & SF_RTF)
 765         font = richTextFont;
 766     else
 767         font = plainTextFont;
 768
 769     lstrcpyW(fmt.szFaceName, font);
 770
 771     SendMessageW(hEditorWnd, EM_SETCHARFORMAT,  SCF_DEFAULT, (LPARAM)&fmt);
 772 }
 773
 774 static void add_font(LPWSTR fontName, DWORD fontType, HWND hListWnd, NEWTEXTMETRICEXW *ntmc)
 775 {
 776     COMBOBOXEXITEMW cbItem;
 777     WCHAR buffer[MAX_PATH];
 778     int fontHeight = 0;
 779
 780     cbItem.mask = CBEIF_TEXT;
 781     cbItem.pszText = buffer;
 782     cbItem.cchTextMax = MAX_STRING_LEN;
 783     cbItem.iItem = 0;
 784
 785     while(SendMessageW(hListWnd, CBEM_GETITEMW, 0, (LPARAM)&cbItem))
 786     {
 787         if(lstrcmpiW(cbItem.pszText, fontName) <= 0)
 788             cbItem.iItem++;
 789         else
 790             break;
 791     }
 792     cbItem.pszText = fontName;
 793
 794     cbItem.mask |= CBEIF_LPARAM;
 795     if(fontType & RASTER_FONTTYPE)
 796         fontHeight = ntmc->ntmTm.tmHeight - ntmc->ntmTm.tmInternalLeading;
 797
 798     cbItem.lParam = MAKELONG(fontType,fontHeight);
 799     SendMessageW(hListWnd, CBEM_INSERTITEMW, 0, (LPARAM)&cbItem);
 800 }
 801
 802 static void dialog_choose_font(void)
 803 {
 804     CHOOSEFONTW cf;
 805     LOGFONTW lf;
 806     CHARFORMAT2W fmt;
 807     HDC hDC = GetDC(hMainWnd);
 808
 809     ZeroMemory(&cf, sizeof(cf));
 810     cf.lStructSize = sizeof(cf);
 811     cf.hwndOwner = hMainWnd;
 812     cf.lpLogFont = &lf;
 813     cf.Flags = CF_SCREENFONTS | CF_NOSCRIPTSEL | CF_INITTOLOGFONTSTRUCT | CF_EFFECTS;
 814
 815     ZeroMemory(&fmt, sizeof(fmt));
 816     fmt.cbSize = sizeof(fmt);
 817
 818     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 819     lstrcpyW(cf.lpLogFont->lfFaceName, fmt.szFaceName);
 820     cf.lpLogFont->lfItalic = (fmt.dwEffects & CFE_ITALIC) ? TRUE : FALSE;
 821     cf.lpLogFont->lfWeight = (fmt.dwEffects & CFE_BOLD) ? FW_BOLD : FW_NORMAL;
 822     cf.lpLogFont->lfUnderline = (fmt.dwEffects & CFE_UNDERLINE) ? TRUE : FALSE;
 823     cf.lpLogFont->lfStrikeOut = (fmt.dwEffects & CFE_STRIKEOUT) ? TRUE : FALSE;
 824     cf.lpLogFont->lfHeight = -MulDiv(fmt.yHeight / 20, GetDeviceCaps(hDC, LOGPIXELSY), 72);
 825     cf.rgbColors = fmt.crTextColor;
 826
 827     if(ChooseFontW(&cf))
 828     {
 829         ZeroMemory(&fmt, sizeof(fmt));
 830         fmt.cbSize = sizeof(fmt);
 831         fmt.dwMask = CFM_BOLD | CFM_ITALIC | CFM_SIZE | CFM_UNDERLINE | CFM_STRIKEOUT | CFM_COLOR;
 832         fmt.yHeight = cf.iPointSize * 2;
 833
 834         if(cf.nFontType & BOLD_FONTTYPE)
 835             fmt.dwEffects |= CFE_BOLD;
 836         if(cf.nFontType & ITALIC_FONTTYPE)
 837             fmt.dwEffects |= CFE_ITALIC;
 838         if(cf.lpLogFont->lfUnderline == TRUE)
 839             fmt.dwEffects |= CFE_UNDERLINE;
 840         if(cf.lpLogFont->lfStrikeOut == TRUE)
 841             fmt.dwEffects |= CFE_STRIKEOUT;
 842
 843         fmt.crTextColor = cf.rgbColors;
 844
 845         SendMessageW(hEditorWnd, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
 846         set_font(cf.lpLogFont->lfFaceName);
 847     }
 848 }
 849
 850
 851 int CALLBACK enum_font_proc(const LOGFONTW *lpelfe, const TEXTMETRICW *lpntme,
 852                             DWORD FontType, LPARAM lParam)
 853 {
 854     HWND hListWnd = (HWND) lParam;
 855
 856     if(SendMessageW(hListWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)lpelfe->lfFaceName) == CB_ERR)
 857     {
 858
 859         add_font((LPWSTR)lpelfe->lfFaceName, FontType, hListWnd, (NEWTEXTMETRICEXW*)lpntme);
 860     }
 861
 862     return 1;
 863 }
 864
 865 static void populate_font_list(HWND hListWnd)
 866 {
 867     HDC hdc = GetDC(hMainWnd);
 868     LOGFONTW fontinfo;
 869     HWND hListEditWnd = (HWND)SendMessageW(hListWnd, CBEM_GETEDITCONTROL, 0, 0);
 870     CHARFORMAT2W fmt;
 871
 872     fontinfo.lfCharSet = DEFAULT_CHARSET;
 873     *fontinfo.lfFaceName = '\0';
 874     fontinfo.lfPitchAndFamily = 0;
 875
 876     EnumFontFamiliesExW(hdc, &fontinfo, enum_font_proc,
 877                         (LPARAM)hListWnd, 0);
 878
 879     ZeroMemory(&fmt, sizeof(fmt));
 880     fmt.cbSize = sizeof(fmt);
 881     SendMessageW(hEditorWnd, EM_GETCHARFORMAT, SCF_DEFAULT, (LPARAM)&fmt);
 882     SendMessageW(hListEditWnd, WM_SETTEXT, 0, (LPARAM)fmt.szFaceName);
 883 }
 884
 885 static void update_window(void)
 886 {
 887     RECT rect;
 888
 889     GetWindowRect(hMainWnd, &rect);
 890
 891     (void) OnSize(hMainWnd, SIZE_RESTORED, MAKELONG(rect.bottom, rect.right));
 892 }
 893
 894 static DWORD barState[2];
 895 static DWORD wordWrap[2];
 896
 897 static BOOL is_bar_visible(int bandId)
 898 {
 899     return barState[reg_formatindex(fileFormat)] & (1 << bandId);
 900 }
 901
 902 static void store_bar_state(int bandId, BOOL show)
 903 {
 904     int formatIndex = reg_formatindex(fileFormat);
 905
 906     if(show)
 907         barState[formatIndex] |= (1 << bandId);
 908     else
 909         barState[formatIndex] &= ~(1 << bandId);
 910 }
 911
 912 static void set_toolbar_state(int bandId, BOOL show)
 913 {
 914     HWND hwndReBar = GetDlgItem(hMainWnd, IDC_REBAR);
 915
 916     SendMessageW(hwndReBar, RB_SHOWBAND, SendMessageW(hwndReBar, RB_IDTOINDEX, bandId, 0), show);
 917
 918     if(bandId == BANDID_TOOLBAR)
 919     {
 920         REBARBANDINFOW rbbinfo;
 921         int index = SendMessageW(hwndReBar, RB_IDTOINDEX, BANDID_FONTLIST, 0);
 922
 923         rbbinfo.cbSize = sizeof(rbbinfo);
 924         rbbinfo.fMask = RBBIM_STYLE;
 925
 926         SendMessageW(hwndReBar, RB_GETBANDINFO, index, (LPARAM)&rbbinfo);
 927
 928         if(!show)
 929             rbbinfo.fStyle &= ~RBBS_BREAK;
 930         else
 931             rbbinfo.fStyle |= RBBS_BREAK;
 932
 933         SendMessageW(hwndReBar, RB_SETBANDINFO, index, (LPARAM)&rbbinfo);
 934     }
 935
 936     if(bandId == BANDID_TOOLBAR || bandId == BANDID_FORMATBAR)
 937         store_bar_state(bandId, show);
 938 }
 939
 940 static void set_statusbar_state(BOOL show)
 941 {
 942     HWND hStatusWnd = GetDlgItem(hMainWnd, IDC_STATUSBAR);
 943
 944     ShowWindow(hStatusWnd, show ? SW_SHOW : SW_HIDE);
 945     store_bar_state(BANDID_STATUSBAR, show);
 946 }
 947
 948 static void set_bar_states(void)
 949 {
 950     set_toolbar_state(BANDID_TOOLBAR, is_bar_visible(BANDID_TOOLBAR));
 951     set_toolbar_state(BANDID_FONTLIST, is_bar_visible(BANDID_FORMATBAR));
 952     set_toolbar_state(BANDID_SIZELIST, is_bar_visible(BANDID_FORMATBAR));
 953     set_toolbar_state(BANDID_FORMATBAR, is_bar_visible(BANDID_FORMATBAR));
 954     set_statusbar_state(is_bar_visible(BANDID_STATUSBAR));
 955
 956     update_window();
 957 }
 958
 959 static HGLOBAL devMode;
 960 static HGLOBAL devNames;
 961
 962 static HDC make_dc(void)
 963 {
 964     if(devNames && devMode)
 965     {
 966         LPDEVNAMES dn = GlobalLock(devNames);
 967         LPDEVMODEW dm = GlobalLock(devMode);
 968         HDC ret;
 969
 970         ret = CreateDCW((LPWSTR)dn + dn->wDriverOffset,
 971                         (LPWSTR)dn + dn->wDeviceOffset, 0, dm);
 972
 973         GlobalUnlock(dn);
 974         GlobalUnlock(dm);
 975
 976         return ret;
 977     } else
 978     {
 979         return 0;
 980     }
 981 }
 982
 983 static LONG twips_to_pixels(int twips, int dpi)
 984 {
 985     float ret = ((float)twips / ((float)567 * 2.54)) * (float)dpi;
 986     return (LONG)ret;
 987 }
 988
 989 static LONG devunits_to_twips(int units, int dpi)
 990 {
 991     float ret = ((float)units / (float)dpi) * (float)567 * 2.54;
 992     return (LONG)ret;
 993 }
 994
 995 static LONG centmm_to_twips(int mm)
 996 {
 997     return MulDiv(mm, 567, 1000);
 998 }
 999
1000 static LONG twips_to_centmm(int twips)
1001 {
1002     return MulDiv(twips, 1000, 567);
1003 }
1004
1005 static RECT get_print_rect(HDC hdc)
1006 {
1007     RECT rc;
1008     int width, height;
1009
1010     if(hdc)
1011     {
1012         int dpiY = GetDeviceCaps(hdc, LOGPIXELSY);
1013         int dpiX = GetDeviceCaps(hdc, LOGPIXELSX);
1014         width = devunits_to_twips(GetDeviceCaps(hdc, PHYSICALWIDTH), dpiX);
1015         height = devunits_to_twips(GetDeviceCaps(hdc, PHYSICALHEIGHT), dpiY);
1016     } else
1017     {
1018         width = centmm_to_twips(18500);
1019         height = centmm_to_twips(27000);
1020     }
1021
1022     rc.left = margins.left;
1023     rc.right = width - margins.right;
1024     rc.top = margins.top;
1025     rc.bottom = height - margins.bottom;
1026
1027     return rc;
1028 }
1029
1030 static void target_device(void)
1031 {
1032     HDC hdc = make_dc();
1033     int width = 0;
1034     int index = reg_formatindex(fileFormat);
1035
1036     if(wordWrap[index] == ID_WORDWRAP_MARGIN)
1037     {
1038         RECT rc = get_print_rect(hdc);
1039         width = rc.right;
1040     }
1041
1042     if(!hdc)
1043     {
1044         HDC hMaindc = GetDC(hMainWnd);
1045         hdc = CreateCompatibleDC(hMaindc);
1046         ReleaseDC(hMainWnd, hMaindc);
1047     }
1048
1049     SendMessageW(hEditorWnd, EM_SETTARGETDEVICE, (WPARAM)hdc, width);
1050
1051     DeleteDC(hdc);
1052 }
1053
1054 static void set_fileformat(WPARAM format)
1055 {
1056     HICON hIcon;
1057     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
1058     fileFormat = format;
1059
1060     if(format & SF_TEXT)
1061         hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_TXT));
1062     else
1063         hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_RTF));
1064
1065     SendMessageW(hMainWnd, WM_SETICON, ICON_BIG, (LPARAM)hIcon);
1066
1067     set_bar_states();
1068     set_default_font();
1069     target_device();
1070 }
1071
1072 static void DoOpenFile(LPCWSTR szOpenFileName)
1073 {
1074     HANDLE hFile;
1075     EDITSTREAM es;
1076     char fileStart[5];
1077     DWORD readOut;
1078     WPARAM format = SF_TEXT;
1079
1080     hFile = CreateFileW(szOpenFileName, GENERIC_READ, FILE_SHARE_READ, NULL,
1081                         OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
1082     if (hFile == INVALID_HANDLE_VALUE)
1083         return;
1084
1085     ReadFile(hFile, fileStart, 5, &readOut, NULL);
1086     SetFilePointer(hFile, 0, NULL, FILE_BEGIN);
1087
1088     if(readOut >= 2 && (BYTE)fileStart[0] == 0xff && (BYTE)fileStart[1] == 0xfe)
1089     {
1090         format = SF_TEXT | SF_UNICODE;
1091         SetFilePointer(hFile, 2, NULL, FILE_BEGIN);
1092     } else if(readOut >= 5)
1093     {
1094         static const char header[] = "{\\rtf";
1095         static const BYTE STG_magic[] = { 0xd0,0xcf,0x11,0xe0 };
1096
1097         if(!memcmp(header, fileStart, 5))
1098             format = SF_RTF;
1099         else if (!memcmp(STG_magic, fileStart, sizeof(STG_magic)))
1100         {
1101             CloseHandle(hFile);
1102             MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_OLE_STORAGE_NOT_SUPPORTED), wszAppTitle,
1103                         MB_OK | MB_ICONEXCLAMATION);
1104             return;
1105         }
1106     }
1107
1108     es.dwCookie = (DWORD_PTR)hFile;
1109     es.pfnCallback = stream_in;
1110
1111     clear_formatting();
1112     set_fileformat(format);
1113     SendMessageW(hEditorWnd, EM_STREAMIN, format, (LPARAM)&es);
1114
1115     CloseHandle(hFile);
1116
1117     SetFocus(hEditorWnd);
1118
1119     set_caption(szOpenFileName);
1120
1121     lstrcpyW(wszFileName, szOpenFileName);
1122     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
1123     registry_set_filelist(szOpenFileName);
1124     update_font_list();
1125 }
1126
1127 static void DoSaveFile(LPCWSTR wszSaveFileName, WPARAM format)
1128 {
1129     HANDLE hFile;
1130     EDITSTREAM stream;
1131     LRESULT ret;
1132
1133     hFile = CreateFileW(wszSaveFileName, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS,
1134         FILE_ATTRIBUTE_NORMAL, NULL);
1135
1136     if(hFile == INVALID_HANDLE_VALUE)
1137         return;
1138
1139     if(format == (SF_TEXT | SF_UNICODE))
1140     {
1141         static const BYTE unicode[] = {0xff,0xfe};
1142         DWORD writeOut;
1143         WriteFile(hFile, &unicode, sizeof(unicode), &writeOut, 0);
1144
1145         if(writeOut != sizeof(unicode))
1146             return;
1147     }
1148
1149     stream.dwCookie = (DWORD_PTR)hFile;
1150     stream.pfnCallback = stream_out;
1151
1152     ret = SendMessageW(hEditorWnd, EM_STREAMOUT, format, (LPARAM)&stream);
1153
1154     CloseHandle(hFile);
1155
1156     SetFocus(hEditorWnd);
1157
1158     if(!ret)
1159     {
1160         GETTEXTLENGTHEX gt;
1161         gt.flags = GTL_DEFAULT;
1162         gt.codepage = 1200;
1163
1164         if(SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
1165             return;
1166     }
1167
1168     lstrcpyW(wszFileName, wszSaveFileName);
1169     set_caption(wszFileName);
1170     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
1171     set_fileformat(format);
1172 }
1173
1174 static void DialogSaveFile(void)
1175 {
1176     OPENFILENAMEW sfn;
1177
1178     WCHAR wszFile[MAX_PATH] = {'\0'};
1179     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
1180
1181     ZeroMemory(&sfn, sizeof(sfn));
1182
1183     sfn.lStructSize = sizeof(sfn);
1184     sfn.Flags = OFN_HIDEREADONLY | OFN_PATHMUSTEXIST | OFN_OVERWRITEPROMPT;
1185     sfn.hwndOwner = hMainWnd;
1186     sfn.lpstrFilter = wszFilter;
1187     sfn.lpstrFile = wszFile;
1188     sfn.nMaxFile = MAX_PATH;
1189     sfn.lpstrDefExt = wszDefExt;
1190     sfn.nFilterIndex = fileformat_number(fileFormat)+1;
1191
1192     while(GetSaveFileNameW(&sfn))
1193     {
1194         if(fileformat_flags(sfn.nFilterIndex-1) != SF_RTF)
1195         {
1196             if(MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_SAVE_LOSEFORMATTING),
1197                            wszAppTitle, MB_YESNO | MB_ICONEXCLAMATION) != IDYES)
1198             {
1199                 continue;
1200             } else
1201             {
1202                 DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
1203                 break;
1204             }
1205         } else
1206         {
1207             DoSaveFile(sfn.lpstrFile, fileformat_flags(sfn.nFilterIndex-1));
1208             break;
1209         }
1210     }
1211 }
1212
1213 static BOOL prompt_save_changes(void)
1214 {
1215     if(!wszFileName[0])
1216     {
1217         GETTEXTLENGTHEX gt;
1218         gt.flags = GTL_NUMCHARS;
1219         gt.codepage = 1200;
1220         if(!SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0))
1221             return TRUE;
1222     }
1223
1224     if(!SendMessageW(hEditorWnd, EM_GETMODIFY, 0, 0))
1225     {
1226         return TRUE;
1227     } else
1228     {
1229         LPWSTR displayFileName;
1230         WCHAR *text;
1231         int ret;
1232
1233         if(!wszFileName[0])
1234             displayFileName = wszDefaultFileName;
1235         else
1236             displayFileName = file_basename(wszFileName);
1237
1238         text = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
1239                          (lstrlenW(displayFileName)+lstrlenW(wszSaveChanges))*sizeof(WCHAR));
1240
1241         if(!text)
1242             return FALSE;
1243
1244         wsprintfW(text, wszSaveChanges, displayFileName);
1245
1246         ret = MessageBoxW(hMainWnd, text, wszAppTitle, MB_YESNOCANCEL | MB_ICONEXCLAMATION);
1247
1248         HeapFree(GetProcessHeap(), 0, text);
1249
1250         switch(ret)
1251         {
1252             case IDNO:
1253                 return TRUE;
1254
1255             case IDYES:
1256                 if(wszFileName[0])
1257                     DoSaveFile(wszFileName, fileFormat);
1258                 else
1259                     DialogSaveFile();
1260                 return TRUE;
1261
1262             default:
1263                 return FALSE;
1264         }
1265     }
1266 }
1267
1268 static void DialogOpenFile(void)
1269 {
1270     OPENFILENAMEW ofn;
1271
1272     WCHAR wszFile[MAX_PATH] = {'\0'};
1273     static const WCHAR wszDefExt[] = {'r','t','f','\0'};
1274
1275     ZeroMemory(&ofn, sizeof(ofn));
1276
1277     ofn.lStructSize = sizeof(ofn);
1278     ofn.Flags = OFN_HIDEREADONLY | OFN_FILEMUSTEXIST | OFN_PATHMUSTEXIST;
1279     ofn.hwndOwner = hMainWnd;
1280     ofn.lpstrFilter = wszFilter;
1281     ofn.lpstrFile = wszFile;
1282     ofn.nMaxFile = MAX_PATH;
1283     ofn.lpstrDefExt = wszDefExt;
1284     ofn.nFilterIndex = fileformat_number(fileFormat)+1;
1285
1286     if(GetOpenFileNameW(&ofn))
1287     {
1288         if(prompt_save_changes())
1289             DoOpenFile(ofn.lpstrFile);
1290     }
1291 }
1292
1293 static LPWSTR dialog_print_to_file(void)
1294 {
1295     OPENFILENAMEW ofn;
1296     static WCHAR file[MAX_PATH] = {'O','U','T','P','U','T','.','P','R','N',0};
1297     static const WCHAR defExt[] = {'P','R','N',0};
1298
1299     ZeroMemory(&ofn, sizeof(ofn));
1300
1301     ofn.lStructSize = sizeof(ofn);
1302     ofn.Flags = OFN_PATHMUSTEXIST | OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT;
1303     ofn.hwndOwner = hMainWnd;
1304     ofn.lpstrFilter = (LPWSTR)wszPrintFilter;
1305     ofn.lpstrFile = (LPWSTR)file;
1306     ofn.nMaxFile = MAX_PATH;
1307     ofn.lpstrDefExt = (LPWSTR)defExt;
1308
1309     if(GetSaveFileNameW(&ofn))
1310         return (LPWSTR)file;
1311     else
1312         return FALSE;
1313 }
1314
1315 static int get_num_pages(FORMATRANGE fr)
1316 {
1317     int page = 0;
1318
1319     do
1320     {
1321         page++;
1322         fr.chrg.cpMin = SendMessageW(hEditorWnd, EM_FORMATRANGE, TRUE,
1323                                      (LPARAM)&fr);
1324     }
1325     while(fr.chrg.cpMin && fr.chrg.cpMin < fr.chrg.cpMax);
1326
1327     return page;
1328 }
1329
1330 static void char_from_pagenum(FORMATRANGE *fr, int page)
1331 {
1332     int i;
1333
1334     for(i = 1; i <= page; i++)
1335     {
1336         if(i == page)
1337             break;
1338
1339         fr->chrg.cpMin = SendMessageW(hEditorWnd, EM_FORMATRANGE, TRUE, (LPARAM)fr);
1340     }
1341 }
1342
1343 static void print(LPPRINTDLGW pd)
1344 {
1345     FORMATRANGE fr;
1346     DOCINFOW di;
1347     int printedPages = 0;
1348
1349     fr.hdc = pd->hDC;
1350     fr.hdcTarget = pd->hDC;
1351
1352     fr.rc = get_print_rect(fr.hdc);
1353     fr.rcPage.left = 0;
1354     fr.rcPage.right = fr.rc.right + margins.right;
1355     fr.rcPage.top = 0;
1356     fr.rcPage.bottom = fr.rc.bottom + margins.bottom;
1357
1358     ZeroMemory(&di, sizeof(di));
1359     di.cbSize = sizeof(di);
1360     di.lpszDocName = (LPWSTR)wszFileName;
1361
1362     if(pd->Flags & PD_PRINTTOFILE)
1363     {
1364         di.lpszOutput = dialog_print_to_file();
1365         if(!di.lpszOutput)
1366             return;
1367     }
1368
1369     if(pd->Flags & PD_SELECTION)
1370     {
1371         SendMessageW(hEditorWnd, EM_EXGETSEL, 0, (LPARAM)&fr.chrg);
1372     } else
1373     {
1374         GETTEXTLENGTHEX gt;
1375         gt.flags = GTL_DEFAULT;
1376         gt.codepage = 1200;
1377         fr.chrg.cpMin = 0;
1378         fr.chrg.cpMax = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
1379
1380         if(pd->Flags & PD_PAGENUMS)
1381             char_from_pagenum(&fr, pd->nToPage);
1382     }
1383
1384     StartDocW(fr.hdc, &di);
1385     do
1386     {
1387         if(StartPage(fr.hdc) <= 0)
1388             break;
1389
1390         fr.chrg.cpMin = SendMessageW(hEditorWnd, EM_FORMATRANGE, TRUE, (LPARAM)&fr);
1391
1392         if(EndPage(fr.hdc) <= 0)
1393             break;
1394
1395         printedPages++;
1396         if((pd->Flags & PD_PAGENUMS) && (printedPages > (pd->nToPage - pd->nFromPage)))
1397             break;
1398     }
1399     while(fr.chrg.cpMin && fr.chrg.cpMin < fr.chrg.cpMax);
1400
1401     EndDoc(fr.hdc);
1402     SendMessageW(hEditorWnd, EM_FORMATRANGE, FALSE, 0);
1403     target_device();
1404 }
1405
1406 static void dialog_printsetup(void)
1407 {
1408     PAGESETUPDLGW ps;
1409
1410     ZeroMemory(&ps, sizeof(ps));
1411     ps.lStructSize = sizeof(ps);
1412     ps.hwndOwner = hMainWnd;
1413     ps.Flags = PSD_INHUNDREDTHSOFMILLIMETERS | PSD_MARGINS;
1414     ps.rtMargin.left = twips_to_centmm(margins.left);
1415     ps.rtMargin.right = twips_to_centmm(margins.right);
1416     ps.rtMargin.top = twips_to_centmm(margins.top);
1417     ps.rtMargin.bottom = twips_to_centmm(margins.bottom);
1418     ps.hDevMode = devMode;
1419     ps.hDevNames = devNames;
1420
1421     if(PageSetupDlgW(&ps))
1422     {
1423         margins.left = centmm_to_twips(ps.rtMargin.left);
1424         margins.right = centmm_to_twips(ps.rtMargin.right);
1425         margins.top = centmm_to_twips(ps.rtMargin.top);
1426         margins.bottom = centmm_to_twips(ps.rtMargin.bottom);
1427         devMode = ps.hDevMode;
1428         devNames = ps.hDevNames;
1429         target_device();
1430     }
1431 }
1432
1433 static void get_default_printer_opts(void)
1434 {
1435     PRINTDLGW pd;
1436     ZeroMemory(&pd, sizeof(pd));
1437
1438     ZeroMemory(&pd, sizeof(pd));
1439     pd.lStructSize = sizeof(pd);
1440     pd.Flags = PD_RETURNDC | PD_RETURNDEFAULT;
1441     pd.hwndOwner = hMainWnd;
1442     pd.hDevMode = devMode;
1443
1444     PrintDlgW(&pd);
1445
1446     devMode = pd.hDevMode;
1447     devNames = pd.hDevNames;
1448 }
1449
1450 static void print_quick(void)
1451 {
1452     PRINTDLGW pd;
1453
1454     ZeroMemory(&pd, sizeof(pd));
1455     pd.hDC = make_dc();
1456
1457     print(&pd);
1458 }
1459
1460 static void dialog_print(void)
1461 {
1462     PRINTDLGW pd;
1463     int from = 0;
1464     int to = 0;
1465
1466     ZeroMemory(&pd, sizeof(pd));
1467     pd.lStructSize = sizeof(pd);
1468     pd.hwndOwner = hMainWnd;
1469     pd.Flags = PD_RETURNDC | PD_USEDEVMODECOPIESANDCOLLATE;
1470     pd.nMinPage = 1;
1471     pd.nMaxPage = -1;
1472     pd.hDevMode = devMode;
1473     pd.hDevNames = devNames;
1474
1475     SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
1476     if(from == to)
1477         pd.Flags |= PD_NOSELECTION;
1478
1479     if(PrintDlgW(&pd))
1480     {
1481         devMode = pd.hDevMode;
1482         devNames = pd.hDevNames;
1483         print(&pd);
1484     }
1485 }
1486
1487 typedef struct _previewinfo
1488 {
1489     int page;
1490     int pages;
1491     HDC hdc;
1492     HDC hdcSized;
1493     RECT window;
1494 } previewinfo, *ppreviewinfo;
1495
1496 static previewinfo preview;
1497
1498 static void preview_bar_show(BOOL show)
1499 {
1500     HWND hReBar = GetDlgItem(hMainWnd, IDC_REBAR);
1501     int i;
1502
1503     if(show)
1504     {
1505         REBARBANDINFOW rb;
1506
1507         AddTextButton(hReBar, STRING_PREVIEW_PRINT, ID_PRINT, BANDID_PREVIEW_BTN1);
1508         AddTextButton(hReBar, STRING_PREVIEW_NEXTPAGE, ID_PREVIEW_NEXTPAGE, BANDID_PREVIEW_BTN2);
1509         AddTextButton(hReBar, STRING_PREVIEW_PREVPAGE, ID_PREVIEW_PREVPAGE, BANDID_PREVIEW_BTN3);
1510         AddTextButton(hReBar, STRING_PREVIEW_CLOSE, ID_FILE_EXIT, BANDID_PREVIEW_BTN4);
1511
1512         rb.cbSize = sizeof(rb);
1513         rb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_STYLE | RBBIM_CHILD | RBBIM_IDEALSIZE | RBBIM_ID;
1514         rb.fStyle = RBBS_NOGRIPPER | RBBS_VARIABLEHEIGHT;
1515         rb.cyChild = rb.cyMinChild = 22;
1516         rb.cx = rb.cxMinChild = 90;
1517         rb.cxIdeal = 100;
1518         rb.wID = BANDID_PREVIEW_BUFFER;
1519
1520         SendMessageW(hReBar, RB_INSERTBAND, -1, (LPARAM)&rb);
1521     } else
1522     {
1523         for(i = 0; i <= PREVIEW_BUTTONS; i++)
1524             SendMessageW(hReBar, RB_DELETEBAND, SendMessageW(hReBar, RB_IDTOINDEX, BANDID_PREVIEW_BTN1+i, 0), 0);
1525     }
1526 }
1527
1528 static void preview_exit(void)
1529 {
1530     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
1531     HMENU hMenu = LoadMenuW(hInstance, xszMainMenu);
1532
1533     set_bar_states();
1534     preview.window.right = 0;
1535     preview.window.bottom = 0;
1536     preview.page = 0;
1537     preview.pages = 0;
1538     ShowWindow(hEditorWnd, TRUE);
1539
1540     preview_bar_show(FALSE);
1541
1542     SetMenu(hMainWnd, hMenu);
1543     registry_read_filelist(hMainWnd);
1544
1545     update_window();
1546 }
1547
1548 static LRESULT print_preview(void)
1549 {
1550     FORMATRANGE fr;
1551     GETTEXTLENGTHEX gt;
1552     HDC hdc;
1553     RECT window, background;
1554     HBITMAP hBitmapCapture, hBitmapScaled;
1555     int bmWidth, bmHeight, bmNewWidth, bmNewHeight;
1556     float ratioWidth, ratioHeight, ratio;
1557     int xOffset, yOffset;
1558     int barheight;
1559     HWND hReBar = GetDlgItem(hMainWnd, IDC_REBAR);
1560     PAINTSTRUCT ps;
1561
1562     hdc = BeginPaint(hMainWnd, &ps);
1563     GetClientRect(hMainWnd, &window);
1564
1565     fr.hdcTarget = make_dc();
1566     fr.rc = get_print_rect(fr.hdcTarget);
1567     fr.rcPage.left = 0;
1568     fr.rcPage.top = 0;
1569     fr.rcPage.bottom = fr.rc.bottom + margins.bottom;
1570     fr.rcPage.right = fr.rc.right + margins.right;
1571
1572     bmWidth = twips_to_pixels(fr.rcPage.right, GetDeviceCaps(hdc, LOGPIXELSX));
1573     bmHeight = twips_to_pixels(fr.rcPage.bottom, GetDeviceCaps(hdc, LOGPIXELSY));
1574
1575     hBitmapCapture = CreateCompatibleBitmap(hdc, bmWidth, bmHeight);
1576
1577     if(!preview.hdc)
1578     {
1579         RECT paper;
1580
1581         preview.hdc = CreateCompatibleDC(hdc);
1582         fr.hdc = preview.hdc;
1583         gt.flags = GTL_DEFAULT;
1584         gt.codepage = 1200;
1585         fr.chrg.cpMin = 0;
1586         fr.chrg.cpMax = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
1587
1588         paper.left = 0;
1589         paper.right = bmWidth;
1590         paper.top = 0;
1591         paper.bottom = bmHeight;
1592
1593         if(!preview.pages)
1594             preview.pages = get_num_pages(fr);
1595
1596         SelectObject(preview.hdc, hBitmapCapture);
1597
1598         char_from_pagenum(&fr, preview.page);
1599
1600         FillRect(preview.hdc, &paper, GetStockObject(WHITE_BRUSH));
1601         SendMessageW(hEditorWnd, EM_FORMATRANGE, TRUE, (LPARAM)&fr);
1602         SendMessageW(hEditorWnd, EM_FORMATRANGE, FALSE, 0);
1603
1604         EnableWindow(GetDlgItem(hReBar, ID_PREVIEW_PREVPAGE), preview.page > 1);
1605         EnableWindow(GetDlgItem(hReBar, ID_PREVIEW_NEXTPAGE), preview.page < preview.pages);
1606     }
1607
1608     barheight = SendMessageW(hReBar, RB_GETBARHEIGHT, 0, 0);
1609     ratioWidth = ((float)window.right - 20.0) / (float)bmHeight;
1610     ratioHeight = ((float)window.bottom - 20.0 - (float)barheight) / (float)bmHeight;
1611
1612     if(ratioWidth > ratioHeight)
1613         ratio = ratioHeight;
1614     else
1615         ratio = ratioWidth;
1616
1617     bmNewWidth = (int)((float)bmWidth * ratio);
1618     bmNewHeight = (int)((float)bmHeight * ratio);
1619     hBitmapScaled = CreateCompatibleBitmap(hdc, bmNewWidth, bmNewHeight);
1620
1621     xOffset = ((window.right - bmNewWidth) / 2);
1622     yOffset = ((window.bottom - bmNewHeight + barheight) / 2);
1623
1624     if(window.right != preview.window.right || window.bottom != preview.window.bottom)
1625     {
1626         DeleteDC(preview.hdcSized),
1627         preview.hdcSized = CreateCompatibleDC(hdc);
1628         SelectObject(preview.hdcSized, hBitmapScaled);
1629
1630         StretchBlt(preview.hdcSized, 0, 0, bmNewWidth, bmNewHeight, preview.hdc, 0, 0, bmWidth, bmHeight, SRCCOPY);
1631     }
1632
1633     window.top = barheight;
1634     FillRect(hdc, &window, GetStockObject(GRAY_BRUSH));
1635
1636     SelectObject(hdc, hBitmapScaled);
1637
1638     background.left = xOffset - 2;
1639     background.right = xOffset + bmNewWidth + 2;
1640     background.top = yOffset - 2;
1641     background.bottom = yOffset + bmNewHeight + 2;
1642
1643     FillRect(hdc, &background, GetStockObject(BLACK_BRUSH));
1644
1645     BitBlt(hdc, xOffset, yOffset, bmNewWidth, bmNewHeight, preview.hdcSized, 0, 0, SRCCOPY);
1646
1647     DeleteDC(fr.hdcTarget);
1648     preview.window = window;
1649
1650     EndPaint(hMainWnd, &ps);
1651
1652     return 0;
1653 }
1654
1655 static LRESULT preview_command(HWND hWnd, WPARAM wParam, LPARAM lParam)
1656 {
1657     switch(LOWORD(wParam))
1658     {
1659         case ID_FILE_EXIT:
1660             PostMessageW(hMainWnd, WM_CLOSE, 0, 0);
1661             break;
1662
1663         case ID_PREVIEW_NEXTPAGE:
1664         case ID_PREVIEW_PREVPAGE:
1665             {
1666                 HWND hReBar = GetDlgItem(hMainWnd, IDC_REBAR);
1667                 RECT rc;
1668
1669                 if(LOWORD(wParam) == ID_PREVIEW_NEXTPAGE)
1670                     preview.page++;
1671                 else
1672                     preview.page--;
1673
1674                 preview.hdc = 0;
1675                 preview.window.right = 0;
1676
1677                 GetClientRect(hMainWnd, &rc);
1678                 rc.top += SendMessageW(hReBar, RB_GETBARHEIGHT, 0, 0);
1679                 InvalidateRect(hMainWnd, &rc, TRUE);
1680             }
1681             break;
1682
1683         case ID_PRINT:
1684             dialog_print();
1685             preview_exit();
1686             break;
1687     }
1688
1689     return 0;
1690 }
1691
1692
1693 static void dialog_about(void)
1694 {
1695     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
1696     HICON icon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_WORDPAD));
1697     ShellAboutW(hMainWnd, wszAppTitle, 0, icon);
1698 }
1699
1700 static INT_PTR CALLBACK formatopts_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
1701 {
1702     switch(message)
1703     {
1704         case WM_INITDIALOG:
1705             {
1706                 LPPROPSHEETPAGEW ps = (LPPROPSHEETPAGEW)lParam;
1707                 int wrap = -1;
1708                 char id[4];
1709                 HWND hIdWnd = GetDlgItem(hWnd, IDC_PAGEFMT_ID);
1710
1711                 sprintf(id, "%d\n", (int)ps->lParam);
1712                 SetWindowTextA(hIdWnd, id);
1713                 if(wordWrap[ps->lParam] == ID_WORDWRAP_WINDOW)
1714                     wrap = IDC_PAGEFMT_WW;
1715                 else if(wordWrap[ps->lParam] == ID_WORDWRAP_MARGIN)
1716                     wrap = IDC_PAGEFMT_WM;
1717
1718                 if(wrap != -1)
1719                     CheckRadioButton(hWnd, IDC_PAGEFMT_WW,
1720                                      IDC_PAGEFMT_WM, wrap);
1721
1722                 if(barState[ps->lParam] & (1 << BANDID_TOOLBAR))
1723                     CheckDlgButton(hWnd, IDC_PAGEFMT_TB, TRUE);
1724                 if(barState[ps->lParam] & (1 << BANDID_FORMATBAR))
1725                     CheckDlgButton(hWnd, IDC_PAGEFMT_FB, TRUE);
1726                 if(barState[ps->lParam] & (BANDID_STATUSBAR))
1727                     CheckDlgButton(hWnd, IDC_PAGEFMT_SB, TRUE);
1728             }
1729             break;
1730
1731         case WM_COMMAND:
1732             switch(LOWORD(wParam))
1733             {
1734                 case IDC_PAGEFMT_WW:
1735                 case IDC_PAGEFMT_WM:
1736                     CheckRadioButton(hWnd, IDC_PAGEFMT_WW, IDC_PAGEFMT_WM,
1737                                      LOWORD(wParam));
1738                     break;
1739
1740                 case IDC_PAGEFMT_TB:
1741                 case IDC_PAGEFMT_FB:
1742                 case IDC_PAGEFMT_SB:
1743                     CheckDlgButton(hWnd, LOWORD(wParam),
1744                                    !IsDlgButtonChecked(hWnd, LOWORD(wParam)));
1745                     break;
1746             }
1747             break;
1748         case WM_NOTIFY:
1749             {
1750                 LPNMHDR header = (LPNMHDR)lParam;
1751                 if(header->code == PSN_APPLY)
1752                 {
1753                     HWND hIdWnd = GetDlgItem(hWnd, IDC_PAGEFMT_ID);
1754                     char sid[4];
1755                     int id;
1756
1757                     GetWindowTextA(hIdWnd, sid, 4);
1758                     id = atoi(sid);
1759                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_WW))
1760                         wordWrap[id] = ID_WORDWRAP_WINDOW;
1761                     else if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_WM))
1762                         wordWrap[id] = ID_WORDWRAP_MARGIN;
1763
1764                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_TB))
1765                         barState[id] |= (1 << BANDID_TOOLBAR);
1766                     else
1767                         barState[id] &= ~(1 << BANDID_TOOLBAR);
1768
1769                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_FB))
1770                         barState[id] |= (1 << BANDID_FORMATBAR);
1771                     else
1772                         barState[id] &= ~(1 << BANDID_FORMATBAR);
1773
1774                     if(IsDlgButtonChecked(hWnd, IDC_PAGEFMT_SB))
1775                         barState[id] |= (1 << BANDID_STATUSBAR);
1776                     else
1777                         barState[id] &= ~(1 << BANDID_STATUSBAR);
1778                 }
1779             }
1780             break;
1781     }
1782     return FALSE;
1783 }
1784
1785 static void dialog_viewproperties(void)
1786 {
1787     PROPSHEETPAGEW psp[2];
1788     PROPSHEETHEADERW psh;
1789     int i;
1790     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
1791     LPCPROPSHEETPAGEW ppsp = (LPCPROPSHEETPAGEW)&psp;
1792
1793     psp[0].dwSize = sizeof(PROPSHEETPAGEW);
1794     psp[0].dwFlags = PSP_USETITLE;
1795     U(psp[0]).pszTemplate = MAKEINTRESOURCEW(IDD_FORMATOPTS);
1796     psp[0].pfnDlgProc = formatopts_proc;
1797     psp[0].hInstance = hInstance;
1798     psp[0].lParam = reg_formatindex(SF_TEXT);
1799     psp[0].pfnCallback = NULL;
1800     psp[0].pszTitle = MAKEINTRESOURCEW(STRING_VIEWPROPS_TEXT);
1801     for(i = 1; i < sizeof(psp)/sizeof(psp[0]); i++)
1802     {
1803         psp[i].dwSize = psp[0].dwSize;
1804         psp[i].dwFlags = psp[0].dwFlags;
1805         U(psp[i]).pszTemplate = U(psp[0]).pszTemplate;
1806         psp[i].pfnDlgProc = psp[0].pfnDlgProc;
1807         psp[i].hInstance = psp[0].hInstance;
1808         psp[i].lParam = reg_formatindex(SF_RTF);
1809         psp[i].pfnCallback = psp[0].pfnCallback;
1810         psp[i].pszTitle = MAKEINTRESOURCEW(STRING_VIEWPROPS_RICHTEXT);
1811     }
1812
1813     psh.dwSize = sizeof(psh);
1814     psh.dwFlags = PSH_USEICONID | PSH_PROPSHEETPAGE | PSH_NOAPPLYNOW;
1815     psh.hwndParent = hMainWnd;
1816     psh.hInstance = hInstance;
1817     psh.pszCaption = MAKEINTRESOURCEW(STRING_VIEWPROPS_TITLE);
1818     psh.nPages = sizeof(psp)/sizeof(psp[0]);
1819     U3(psh).ppsp = ppsp;
1820     U(psh).pszIcon = MAKEINTRESOURCEW(IDI_WORDPAD);
1821
1822     if(fileFormat & SF_RTF)
1823         U2(psh).nStartPage = 1;
1824     else
1825         U2(psh).nStartPage = 0;
1826     PropertySheetW(&psh);
1827     set_bar_states();
1828     target_device();
1829 }
1830
1831 static void HandleCommandLine(LPWSTR cmdline)
1832 {
1833     WCHAR delimiter;
1834     int opt_print = 0;
1835
1836     /* skip white space */
1837     while (*cmdline == ' ') cmdline++;
1838
1839     /* skip executable name */
1840     delimiter = (*cmdline == '"' ? '"' : ' ');
1841
1842     if (*cmdline == delimiter) cmdline++;
1843     while (*cmdline && *cmdline != delimiter) cmdline++;
1844     if (*cmdline == delimiter) cmdline++;
1845
1846     while (*cmdline == ' ' || *cmdline == '-' || *cmdline == '/')
1847     {
1848         WCHAR option;
1849
1850         if (*cmdline++ == ' ') continue;
1851
1852         option = *cmdline;
1853         if (option) cmdline++;
1854         while (*cmdline == ' ') cmdline++;
1855
1856         switch (option)
1857         {
1858             case 'p':
1859             case 'P':
1860                 opt_print = 1;
1861                 break;
1862         }
1863     }
1864
1865     if (*cmdline)
1866     {
1867         /* file name is passed on the command line */
1868         if (cmdline[0] == '"')
1869         {
1870             cmdline++;
1871             cmdline[lstrlenW(cmdline) - 1] = 0;
1872         }
1873         DoOpenFile(cmdline);
1874         InvalidateRect(hMainWnd, NULL, FALSE);
1875     }
1876
1877     if (opt_print)
1878         MessageBox(hMainWnd, "Printing not implemented", "WordPad", MB_OK);
1879 }
1880
1881 static LRESULT handle_findmsg(LPFINDREPLACEW pFr)
1882 {
1883     if(pFr->Flags & FR_DIALOGTERM)
1884     {
1885         hFindWnd = 0;
1886         pFr->Flags = FR_FINDNEXT;
1887         return 0;
1888     }
1889
1890     if(pFr->Flags & FR_FINDNEXT || pFr->Flags & FR_REPLACE || pFr->Flags & FR_REPLACEALL)
1891     {
1892         DWORD flags = FR_DOWN;
1893         FINDTEXTW ft;
1894         static CHARRANGE cr;
1895         LRESULT end, ret;
1896         GETTEXTLENGTHEX gt;
1897         LRESULT length;
1898         int startPos;
1899         HMENU hMenu = GetMenu(hMainWnd);
1900         MENUITEMINFOW mi;
1901
1902         mi.cbSize = sizeof(mi);
1903         mi.fMask = MIIM_DATA;
1904         mi.dwItemData = 1;
1905         SetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
1906
1907         gt.flags = GTL_NUMCHARS;
1908         gt.codepage = 1200;
1909
1910         length = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
1911
1912         if(pFr->lCustData == -1)
1913         {
1914             SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&startPos, (LPARAM)&end);
1915             cr.cpMin = startPos;
1916             pFr->lCustData = startPos;
1917             cr.cpMax = length;
1918             if(cr.cpMin == length)
1919                 cr.cpMin = 0;
1920         } else
1921         {
1922             startPos = pFr->lCustData;
1923         }
1924
1925         if(cr.cpMax > length)
1926         {
1927             startPos = 0;
1928             cr.cpMin = 0;
1929             cr.cpMax = length;
1930         }
1931
1932         ft.chrg = cr;
1933         ft.lpstrText = pFr->lpstrFindWhat;
1934
1935         if(pFr->Flags & FR_MATCHCASE)
1936             flags |= FR_MATCHCASE;
1937         if(pFr->Flags & FR_WHOLEWORD)
1938             flags |= FR_WHOLEWORD;
1939
1940         ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
1941
1942         if(ret == -1)
1943         {
1944             if(cr.cpMax == length && cr.cpMax != startPos)
1945             {
1946                 ft.chrg.cpMin = cr.cpMin = 0;
1947                 ft.chrg.cpMax = cr.cpMax = startPos;
1948
1949                 ret = SendMessageW(hEditorWnd, EM_FINDTEXTW, (WPARAM)flags, (LPARAM)&ft);
1950             }
1951         }
1952
1953         if(ret == -1)
1954         {
1955             pFr->lCustData = -1;
1956             MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_SEARCH_FINISHED), wszAppTitle,
1957                         MB_OK | MB_ICONASTERISK);
1958         } else
1959         {
1960             end = ret + lstrlenW(pFr->lpstrFindWhat);
1961             cr.cpMin = end;
1962             SendMessageW(hEditorWnd, EM_SETSEL, (WPARAM)ret, (LPARAM)end);
1963             SendMessageW(hEditorWnd, EM_SCROLLCARET, 0, 0);
1964
1965             if(pFr->Flags & FR_REPLACE || pFr->Flags & FR_REPLACEALL)
1966                 SendMessageW(hEditorWnd, EM_REPLACESEL, TRUE, (LPARAM)pFr->lpstrReplaceWith);
1967
1968             if(pFr->Flags & FR_REPLACEALL)
1969                 handle_findmsg(pFr);
1970         }
1971     }
1972
1973     return 0;
1974 }
1975
1976 static void dialog_find(LPFINDREPLACEW fr, BOOL replace)
1977 {
1978     static WCHAR findBuffer[MAX_STRING_LEN];
1979
1980     ZeroMemory(fr, sizeof(FINDREPLACEW));
1981     fr->lStructSize = sizeof(FINDREPLACEW);
1982     fr->hwndOwner = hMainWnd;
1983     fr->Flags = FR_HIDEUPDOWN;
1984     fr->lpstrFindWhat = findBuffer;
1985     fr->lCustData = -1;
1986     fr->wFindWhatLen = MAX_STRING_LEN*sizeof(WCHAR);
1987
1988     if(replace)
1989         hFindWnd = ReplaceTextW(fr);
1990     else
1991         hFindWnd = FindTextW(fr);
1992 }
1993
1994 static void registry_read_options(void)
1995 {
1996     HKEY hKey;
1997     DWORD size = sizeof(RECT);
1998
1999     if(registry_get_handle(&hKey, 0, key_options) != ERROR_SUCCESS ||
2000        RegQueryValueExW(hKey, var_pagemargin, 0, NULL, (LPBYTE)&margins,
2001                         &size) != ERROR_SUCCESS || size != sizeof(RECT))
2002     {
2003         margins.top = 1417;
2004         margins.bottom = 1417;
2005         margins.left = 1757;
2006         margins.right = 1757;
2007     }
2008
2009     RegCloseKey(hKey);
2010 }
2011
2012 static void registry_read_formatopts(int index, LPCWSTR key)
2013 {
2014     HKEY hKey;
2015     DWORD action = 0;
2016     BOOL fetched = FALSE;
2017     barState[index] = 0;
2018     wordWrap[index] = 0;
2019
2020     if(registry_get_handle(&hKey, &action, key) != ERROR_SUCCESS)
2021         return;
2022
2023     if(action == REG_OPENED_EXISTING_KEY)
2024     {
2025         DWORD size = sizeof(DWORD);
2026
2027         if(RegQueryValueExW(hKey, var_barstate0, 0, NULL, (LPBYTE)&barState[index],
2028                          &size) == ERROR_SUCCESS)
2029             fetched = TRUE;
2030     }
2031
2032     if(!fetched)
2033         barState[index] = (1 << BANDID_TOOLBAR) | (1 << BANDID_FORMATBAR) | (1 << BANDID_RULER) | (1 << BANDID_STATUSBAR);
2034
2035     if(index == reg_formatindex(SF_RTF))
2036         wordWrap[index] = ID_WORDWRAP_WINDOW;
2037     else if(index == reg_formatindex(SF_TEXT))
2038         wordWrap[index] = ID_WORDWRAP_WINDOW; /* FIXME: should be ID_WORDWRAP_NONE once we support it */
2039
2040     RegCloseKey(hKey);
2041 }
2042
2043 static void registry_read_formatopts_all(void)
2044 {
2045     registry_read_formatopts(reg_formatindex(SF_RTF), key_rtf);
2046     registry_read_formatopts(reg_formatindex(SF_TEXT), key_text);
2047 }
2048
2049 static void registry_set_formatopts(int index, LPCWSTR key)
2050 {
2051     HKEY hKey;
2052     DWORD action = 0;
2053
2054     if(registry_get_handle(&hKey, &action, key) == ERROR_SUCCESS)
2055     {
2056         RegSetValueExW(hKey, var_barstate0, 0, REG_DWORD, (LPBYTE)&barState[index],
2057                        sizeof(DWORD));
2058
2059         RegCloseKey(hKey);
2060     }
2061 }
2062
2063 static void registry_set_formatopts_all(void)
2064 {
2065     registry_set_formatopts(reg_formatindex(SF_RTF), key_rtf);
2066     registry_set_formatopts(reg_formatindex(SF_TEXT), key_text);
2067 }
2068
2069 static int current_units_to_twips(float number)
2070 {
2071     int twips = (int)(number * 567);
2072     return twips;
2073 }
2074
2075 static void append_current_units(LPWSTR buffer)
2076 {
2077     static const WCHAR space[] = {' '};
2078     lstrcatW(buffer, space);
2079     lstrcatW(buffer, units_cmW);
2080 }
2081
2082 static void number_with_units(LPWSTR buffer, int number)
2083 {
2084     float converted = (float)number / 567;
2085     char string[MAX_STRING_LEN];
2086
2087     sprintf(string, "%.2f ", converted);
2088     lstrcatA(string, units_cmA);
2089     MultiByteToWideChar(CP_ACP, 0, string, -1, buffer, MAX_STRING_LEN);
2090 }
2091
2092 BOOL CALLBACK datetime_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
2093 {
2094     switch(message)
2095     {
2096         case WM_INITDIALOG:
2097             {
2098                 WCHAR buffer[MAX_STRING_LEN];
2099                 SYSTEMTIME st;
2100                 HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
2101                 GetLocalTime(&st);
2102
2103                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_SHORTDATE, &st, 0, (LPWSTR)&buffer,
2104                                MAX_STRING_LEN);
2105                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
2106                 GetDateFormatW(LOCALE_USER_DEFAULT, DATE_LONGDATE, &st, 0, (LPWSTR)&buffer,
2107                                MAX_STRING_LEN);
2108                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
2109                 GetTimeFormatW(LOCALE_USER_DEFAULT, 0, &st, 0, (LPWSTR)&buffer, MAX_STRING_LEN);
2110                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
2111
2112                 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
2113             }
2114             break;
2115
2116         case WM_COMMAND:
2117             switch(LOWORD(wParam))
2118             {
2119                 case IDOK:
2120                     {
2121                         LRESULT index;
2122                         HWND hListWnd = GetDlgItem(hWnd, IDC_DATETIME);
2123
2124                         index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
2125
2126                         if(index != LB_ERR)
2127                         {
2128                             WCHAR buffer[MAX_STRING_LEN];
2129                             SendMessageW(hListWnd, LB_GETTEXT, index, (LPARAM)&buffer);
2130                             SendMessageW(hEditorWnd, EM_REPLACESEL, TRUE, (LPARAM)&buffer);
2131                         }
2132                     }
2133                     /* Fall through */
2134
2135                 case IDCANCEL:
2136                     EndDialog(hWnd, wParam);
2137                     return TRUE;
2138             }
2139     }
2140     return FALSE;
2141 }
2142
2143 BOOL CALLBACK newfile_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
2144 {
2145     switch(message)
2146     {
2147         case WM_INITDIALOG:
2148             {
2149                 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd, GWLP_HINSTANCE);
2150                 WCHAR buffer[MAX_STRING_LEN];
2151                 HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
2152
2153                 LoadStringW(hInstance, STRING_NEWFILE_RICHTEXT, (LPWSTR)buffer, MAX_STRING_LEN);
2154                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
2155                 LoadStringW(hInstance, STRING_NEWFILE_TXT, (LPWSTR)buffer, MAX_STRING_LEN);
2156                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
2157                 LoadStringW(hInstance, STRING_NEWFILE_TXT_UNICODE, (LPWSTR)buffer, MAX_STRING_LEN);
2158                 SendMessageW(hListWnd, LB_ADDSTRING, 0, (LPARAM)&buffer);
2159
2160                 SendMessageW(hListWnd, LB_SETSEL, TRUE, 0);
2161             }
2162             break;
2163
2164         case WM_COMMAND:
2165             switch(LOWORD(wParam))
2166             {
2167                 case IDOK:
2168                     {
2169                         LRESULT index;
2170                         HWND hListWnd = GetDlgItem(hWnd, IDC_NEWFILE);
2171                         index = SendMessageW(hListWnd, LB_GETCURSEL, 0, 0);
2172
2173                         if(index != LB_ERR)
2174                             EndDialog(hWnd, MAKELONG(fileformat_flags(index),0));
2175                     }
2176                     return TRUE;
2177
2178                 case IDCANCEL:
2179                     EndDialog(hWnd, MAKELONG(ID_NEWFILE_ABORT,0));
2180                     return TRUE;
2181             }
2182     }
2183     return FALSE;
2184 }
2185
2186 static INT_PTR CALLBACK paraformat_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
2187 {
2188     switch(message)
2189     {
2190         case WM_INITDIALOG:
2191             {
2192                 HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hMainWnd,
2193                                                                   GWLP_HINSTANCE);
2194                 WCHAR buffer[MAX_STRING_LEN];
2195                 HWND hListWnd = GetDlgItem(hWnd, IDC_PARA_ALIGN);
2196                 HWND hLeftWnd = GetDlgItem(hWnd, IDC_PARA_LEFT);
2197                 HWND hRightWnd = GetDlgItem(hWnd, IDC_PARA_RIGHT);
2198                 HWND hFirstWnd = GetDlgItem(hWnd, IDC_PARA_FIRST);
2199                 PARAFORMAT2 pf;
2200                 int index = 0;
2201
2202                 LoadStringW(hInstance, STRING_ALIGN_LEFT, buffer,
2203                             MAX_STRING_LEN);
2204                 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
2205                 LoadStringW(hInstance, STRING_ALIGN_RIGHT, buffer,
2206                             MAX_STRING_LEN);
2207                 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
2208                 LoadStringW(hInstance, STRING_ALIGN_CENTER, buffer,
2209                             MAX_STRING_LEN);
2210                 SendMessageW(hListWnd, CB_ADDSTRING, 0, (LPARAM)buffer);
2211
2212                 pf.cbSize = sizeof(pf);
2213                 pf.dwMask = PFM_ALIGNMENT | PFM_OFFSET | PFM_RIGHTINDENT |
2214                             PFM_OFFSETINDENT;
2215                 SendMessageW(hEditorWnd, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2216
2217                 if(pf.wAlignment == PFA_RIGHT)
2218                     index ++;
2219                 else if(pf.wAlignment == PFA_CENTER)
2220                     index += 2;
2221
2222                 SendMessageW(hListWnd, CB_SETCURSEL, index, 0);
2223
2224                 number_with_units(buffer, pf.dxOffset);
2225                 SetWindowTextW(hLeftWnd, buffer);
2226                 number_with_units(buffer, pf.dxRightIndent);
2227                 SetWindowTextW(hRightWnd, buffer);
2228                 number_with_units(buffer, pf.dxStartIndent - pf.dxOffset);
2229                 SetWindowTextW(hFirstWnd, buffer);
2230             }
2231             break;
2232
2233         case WM_COMMAND:
2234             switch(LOWORD(wParam))
2235             {
2236                 case IDOK:
2237                     {
2238                         HWND hLeftWnd = GetDlgItem(hWnd, IDC_PARA_LEFT);
2239                         HWND hRightWnd = GetDlgItem(hWnd, IDC_PARA_RIGHT);
2240                         HWND hFirstWnd = GetDlgItem(hWnd, IDC_PARA_FIRST);
2241                         WCHAR buffer[MAX_STRING_LEN];
2242                         float num;
2243                         int ret = 0;
2244                         PARAFORMAT pf;
2245
2246                         GetWindowTextW(hLeftWnd, buffer, MAX_STRING_LEN);
2247                         if(number_from_string(buffer, &num, TRUE))
2248                             ret++;
2249                         pf.dxOffset = current_units_to_twips(num);
2250                         GetWindowTextW(hRightWnd, buffer, MAX_STRING_LEN);
2251                         if(number_from_string(buffer, &num, TRUE))
2252                             ret++;
2253                         pf.dxRightIndent = current_units_to_twips(num);
2254                         GetWindowTextW(hFirstWnd, buffer, MAX_STRING_LEN);
2255                         if(number_from_string(buffer, &num, TRUE))
2256                             ret++;
2257                         pf.dxStartIndent = current_units_to_twips(num);
2258
2259                         if(ret != 3)
2260                         {
2261                             MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
2262                                         wszAppTitle, MB_OK | MB_ICONASTERISK);
2263                             return FALSE;
2264                         } else
2265                         {
2266                             pf.dxStartIndent = pf.dxStartIndent + pf.dxOffset;
2267                             pf.cbSize = sizeof(pf);
2268                             pf.dwMask = PFM_OFFSET | PFM_OFFSETINDENT | PFM_RIGHTINDENT;
2269                             SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2270                         }
2271                     }
2272                     /* Fall through */
2273
2274                 case IDCANCEL:
2275                     EndDialog(hWnd, wParam);
2276                     return TRUE;
2277             }
2278     }
2279     return FALSE;
2280 }
2281
2282 static INT_PTR CALLBACK tabstops_proc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
2283 {
2284     switch(message)
2285     {
2286         case WM_INITDIALOG:
2287             {
2288                 HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
2289                 PARAFORMAT pf;
2290                 WCHAR buffer[MAX_STRING_LEN];
2291                 int i;
2292
2293                 pf.cbSize = sizeof(pf);
2294                 pf.dwMask = PFM_TABSTOPS;
2295                 SendMessageW(hEditorWnd, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2296                 SendMessageW(hTabWnd, CB_LIMITTEXT, MAX_STRING_LEN-1, 0);
2297
2298                 for(i = 0; i < pf.cTabCount; i++)
2299                 {
2300                     number_with_units(buffer, pf.rgxTabs[i]);
2301                     SendMessageW(hTabWnd, CB_ADDSTRING, 0, (LPARAM)&buffer);
2302                 }
2303                 SetFocus(hTabWnd);
2304             }
2305             break;
2306
2307         case WM_COMMAND:
2308             switch(LOWORD(wParam))
2309             {
2310                 case IDC_TABSTOPS:
2311                     {
2312                         HWND hTabWnd = (HWND)lParam;
2313                         HWND hAddWnd = GetDlgItem(hWnd, ID_TAB_ADD);
2314                         HWND hDelWnd = GetDlgItem(hWnd, ID_TAB_DEL);
2315                         HWND hEmptyWnd = GetDlgItem(hWnd, ID_TAB_EMPTY);
2316
2317                         if(GetWindowTextLengthW(hTabWnd))
2318                             EnableWindow(hAddWnd, TRUE);
2319                         else
2320                             EnableWindow(hAddWnd, FALSE);
2321
2322                         if(SendMessageW(hTabWnd, CB_GETCOUNT, 0, 0))
2323                         {
2324                             EnableWindow(hEmptyWnd, TRUE);
2325
2326                             if(SendMessageW(hTabWnd, CB_GETCURSEL, 0, 0) == CB_ERR)
2327                                 EnableWindow(hDelWnd, FALSE);
2328                             else
2329                                 EnableWindow(hDelWnd, TRUE);
2330                         } else
2331                         {
2332                             EnableWindow(hEmptyWnd, FALSE);
2333                         }
2334                     }
2335                     break;
2336
2337                 case ID_TAB_ADD:
2338                     {
2339                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
2340                         WCHAR buffer[MAX_STRING_LEN];
2341
2342                         GetWindowTextW(hTabWnd, buffer, MAX_STRING_LEN);
2343                         append_current_units(buffer);
2344
2345                         if(SendMessageW(hTabWnd, CB_FINDSTRINGEXACT, -1, (LPARAM)&buffer) == CB_ERR)
2346                         {
2347                             float number = 0;
2348
2349                             if(!number_from_string(buffer, &number, TRUE))
2350                             {
2351                                 MessageBoxW(hWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER),
2352                                              wszAppTitle, MB_OK | MB_ICONINFORMATION);
2353                             } else
2354                             {
2355                                 SendMessageW(hTabWnd, CB_ADDSTRING, 0, (LPARAM)&buffer);
2356                                 SetWindowTextW(hTabWnd, 0);
2357                             }
2358                         }
2359                         SetFocus(hTabWnd);
2360                     }
2361                     break;
2362
2363                 case ID_TAB_DEL:
2364                     {
2365                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
2366                         LRESULT ret;
2367                         ret = SendMessageW(hTabWnd, CB_GETCURSEL, 0, 0);
2368                         if(ret != CB_ERR)
2369                             SendMessageW(hTabWnd, CB_DELETESTRING, ret, 0);
2370                     }
2371                     break;
2372
2373                 case ID_TAB_EMPTY:
2374                     {
2375                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
2376                         SendMessageW(hTabWnd, CB_RESETCONTENT, 0, 0);
2377                         SetFocus(hTabWnd);
2378                     }
2379                     break;
2380
2381                 case IDOK:
2382                     {
2383                         HWND hTabWnd = GetDlgItem(hWnd, IDC_TABSTOPS);
2384                         int i;
2385                         WCHAR buffer[MAX_STRING_LEN];
2386                         PARAFORMAT pf;
2387                         float number;
2388
2389                         pf.cbSize = sizeof(pf);
2390                         pf.dwMask = PFM_TABSTOPS;
2391
2392                         for(i = 0; SendMessageW(hTabWnd, CB_GETLBTEXT, i,
2393                                                 (LPARAM)&buffer) != CB_ERR &&
2394                                                         i < MAX_TAB_STOPS; i++)
2395                         {
2396                             number_from_string(buffer, &number, TRUE);
2397                             pf.rgxTabs[i] = current_units_to_twips(number);
2398                         }
2399                         pf.cTabCount = i;
2400                         SendMessageW(hEditorWnd, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2401                     }
2402                     /* Fall through */
2403                 case IDCANCEL:
2404                     EndDialog(hWnd, wParam);
2405                     return TRUE;
2406             }
2407     }
2408     return FALSE;
2409 }
2410
2411 static int context_menu(LPARAM lParam)
2412 {
2413     int x = (int)(short)LOWORD(lParam);
2414     int y = (int)(short)HIWORD(lParam);
2415     HMENU hPop = GetSubMenu(hPopupMenu, 0);
2416
2417     if(x == -1)
2418     {
2419         int from = 0, to = 0;
2420         POINTL pt;
2421         SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
2422         SendMessageW(hEditorWnd, EM_POSFROMCHAR, (WPARAM)&pt, (LPARAM)to);
2423         ClientToScreen(hEditorWnd, (POINT*)&pt);
2424         x = pt.x;
2425         y = pt.y;
2426     }
2427
2428     TrackPopupMenu(hPop, TPM_LEFTALIGN | TPM_TOPALIGN | TPM_RIGHTBUTTON,
2429                    x, y, 0, hMainWnd, 0);
2430
2431     return 0;
2432 }
2433
2434 static LRESULT OnCreate( HWND hWnd, WPARAM wParam, LPARAM lParam)
2435 {
2436     HWND hToolBarWnd, hFormatBarWnd,  hReBarWnd, hFontListWnd, hSizeListWnd;
2437     HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2438     HANDLE hDLL;
2439     TBADDBITMAP ab;
2440     int nStdBitmaps = 0;
2441     REBARINFO rbi;
2442     REBARBANDINFOW rbb;
2443     static const WCHAR wszRichEditDll[] = {'R','I','C','H','E','D','2','0','.','D','L','L','\0'};
2444     static const WCHAR wszRichEditText[] = {'R','i','c','h','E','d','i','t',' ','t','e','x','t','\0'};
2445
2446     CreateStatusWindowW(CCS_NODIVIDER|WS_CHILD|WS_VISIBLE, wszRichEditText, hWnd, IDC_STATUSBAR);
2447
2448     hReBarWnd = CreateWindowExW(WS_EX_TOOLWINDOW, REBARCLASSNAMEW, NULL,
2449       CCS_NODIVIDER|WS_CHILD|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN|RBS_VARHEIGHT|CCS_TOP,
2450       CW_USEDEFAULT, CW_USEDEFAULT, 0, 0, hWnd, (HMENU)IDC_REBAR, hInstance, NULL);
2451
2452     rbi.cbSize = sizeof(rbi);
2453     rbi.fMask = 0;
2454     rbi.himl = NULL;
2455     if(!SendMessageW(hReBarWnd, RB_SETBARINFO, 0, (LPARAM)&rbi))
2456         return -1;
2457
2458     hToolBarWnd = CreateToolbarEx(hReBarWnd, CCS_NOPARENTALIGN|CCS_NOMOVEY|WS_VISIBLE|WS_CHILD|TBSTYLE_TOOLTIPS|TBSTYLE_BUTTON,
2459       IDC_TOOLBAR,
2460       1, hInstance, IDB_TOOLBAR,
2461       NULL, 0,
2462       24, 24, 16, 16, sizeof(TBBUTTON));
2463
2464     ab.hInst = HINST_COMMCTRL;
2465     ab.nID = IDB_STD_SMALL_COLOR;
2466     nStdBitmaps = SendMessageW(hToolBarWnd, TB_ADDBITMAP, 0, (LPARAM)&ab);
2467
2468     AddButton(hToolBarWnd, nStdBitmaps+STD_FILENEW, ID_FILE_NEW);
2469     AddButton(hToolBarWnd, nStdBitmaps+STD_FILEOPEN, ID_FILE_OPEN);
2470     AddButton(hToolBarWnd, nStdBitmaps+STD_FILESAVE, ID_FILE_SAVE);
2471     AddSeparator(hToolBarWnd);
2472     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINT, ID_PRINT_QUICK);
2473     AddButton(hToolBarWnd, nStdBitmaps+STD_PRINTPRE, ID_PREVIEW);
2474     AddSeparator(hToolBarWnd);
2475     AddButton(hToolBarWnd, nStdBitmaps+STD_FIND, ID_FIND);
2476     AddSeparator(hToolBarWnd);
2477     AddButton(hToolBarWnd, nStdBitmaps+STD_CUT, ID_EDIT_CUT);
2478     AddButton(hToolBarWnd, nStdBitmaps+STD_COPY, ID_EDIT_COPY);
2479     AddButton(hToolBarWnd, nStdBitmaps+STD_PASTE, ID_EDIT_PASTE);
2480     AddButton(hToolBarWnd, nStdBitmaps+STD_UNDO, ID_EDIT_UNDO);
2481     AddButton(hToolBarWnd, nStdBitmaps+STD_REDOW, ID_EDIT_REDO);
2482     AddSeparator(hToolBarWnd);
2483     AddButton(hToolBarWnd, 0, ID_DATETIME);
2484
2485     SendMessageW(hToolBarWnd, TB_AUTOSIZE, 0, 0);
2486
2487     rbb.cbSize = sizeof(rbb);
2488     rbb.fMask = RBBIM_SIZE | RBBIM_CHILDSIZE | RBBIM_CHILD | RBBIM_STYLE | RBBIM_ID;
2489     rbb.fStyle = RBBS_CHILDEDGE | RBBS_BREAK | RBBS_NOGRIPPER;
2490     rbb.cx = 0;
2491     rbb.hwndChild = hToolBarWnd;
2492     rbb.cxMinChild = 0;
2493     rbb.cyChild = rbb.cyMinChild = HIWORD(SendMessageW(hToolBarWnd, TB_GETBUTTONSIZE, 0, 0));
2494     rbb.wID = BANDID_TOOLBAR;
2495
2496     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
2497
2498     hFontListWnd = CreateWindowExW(0, WC_COMBOBOXEXW, NULL,
2499                       WS_BORDER | WS_VISIBLE | WS_CHILD | CBS_DROPDOWN | CBS_SORT,
2500                       0, 0, 200, 150, hReBarWnd, (HMENU)IDC_FONTLIST, hInstance, NULL);
2501
2502     rbb.hwndChild = hFontListWnd;
2503     rbb.cx = 200;
2504     rbb.wID = BANDID_FONTLIST;
2505
2506     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
2507
2508     hSizeListWnd = CreateWindowExW(0, WC_COMBOBOXEXW, NULL,
2509                       WS_BORDER | WS_VISIBLE | WS_CHILD | CBS_DROPDOWN,
2510                       0, 0, 50, 150, hReBarWnd, (HMENU)IDC_SIZELIST, hInstance, NULL);
2511
2512     rbb.hwndChild = hSizeListWnd;
2513     rbb.cx = 50;
2514     rbb.fStyle ^= RBBS_BREAK;
2515     rbb.wID = BANDID_SIZELIST;
2516
2517     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
2518
2519     hFormatBarWnd = CreateToolbarEx(hReBarWnd,
2520          CCS_NOPARENTALIGN | CCS_NOMOVEY | WS_VISIBLE | TBSTYLE_TOOLTIPS | TBSTYLE_BUTTON,
2521          IDC_FORMATBAR, 7, hInstance, IDB_FORMATBAR, NULL, 0, 16, 16, 16, 16, sizeof(TBBUTTON));
2522
2523     AddButton(hFormatBarWnd, 0, ID_FORMAT_BOLD);
2524     AddButton(hFormatBarWnd, 1, ID_FORMAT_ITALIC);
2525     AddButton(hFormatBarWnd, 2, ID_FORMAT_UNDERLINE);
2526     AddSeparator(hFormatBarWnd);
2527     AddButton(hFormatBarWnd, 3, ID_ALIGN_LEFT);
2528     AddButton(hFormatBarWnd, 4, ID_ALIGN_CENTER);
2529     AddButton(hFormatBarWnd, 5, ID_ALIGN_RIGHT);
2530     AddSeparator(hFormatBarWnd);
2531     AddButton(hFormatBarWnd, 6, ID_BULLET);
2532
2533     SendMessageW(hFormatBarWnd, TB_AUTOSIZE, 0, 0);
2534
2535     rbb.hwndChild = hFormatBarWnd;
2536     rbb.wID = BANDID_FORMATBAR;
2537
2538     SendMessageW(hReBarWnd, RB_INSERTBAND, -1, (LPARAM)&rbb);
2539
2540     hDLL = LoadLibraryW(wszRichEditDll);
2541     if(!hDLL)
2542     {
2543         MessageBoxW(hWnd, MAKEINTRESOURCEW(STRING_LOAD_RICHED_FAILED), wszAppTitle,
2544                     MB_OK | MB_ICONEXCLAMATION);
2545         PostQuitMessage(1);
2546     }
2547
2548     hEditorWnd = CreateWindowExW(WS_EX_CLIENTEDGE, wszRichEditClass, NULL,
2549       WS_CHILD|WS_VISIBLE|ECO_SELECTIONBAR|ES_MULTILINE|ES_AUTOVSCROLL|ES_WANTRETURN|WS_VSCROLL,
2550       0, 0, 1000, 100, hWnd, (HMENU)IDC_EDITOR, hInstance, NULL);
2551
2552     if (!hEditorWnd)
2553     {
2554         fprintf(stderr, "Error code %u\n", GetLastError());
2555         return -1;
2556     }
2557     assert(hEditorWnd);
2558
2559     SetFocus(hEditorWnd);
2560     SendMessageW(hEditorWnd, EM_SETEVENTMASK, 0, ENM_SELCHANGE);
2561
2562     set_default_font();
2563
2564     populate_font_list(hFontListWnd);
2565     populate_size_list(hSizeListWnd);
2566     DoLoadStrings();
2567     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
2568
2569     ID_FINDMSGSTRING = RegisterWindowMessageW(FINDMSGSTRINGW);
2570
2571     registry_read_filelist(hWnd);
2572     registry_read_formatopts_all();
2573     registry_read_options();
2574     DragAcceptFiles(hWnd, TRUE);
2575
2576     return 0;
2577 }
2578
2579 static LRESULT OnUser( HWND hWnd, WPARAM wParam, LPARAM lParam)
2580 {
2581     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2582     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
2583     HWND hwndToolBar = GetDlgItem(hwndReBar, IDC_TOOLBAR);
2584     HWND hwndFormatBar = GetDlgItem(hwndReBar, IDC_FORMATBAR);
2585     int from, to;
2586     CHARFORMAT2W fmt;
2587     PARAFORMAT2 pf;
2588     GETTEXTLENGTHEX gt;
2589
2590     ZeroMemory(&fmt, sizeof(fmt));
2591     fmt.cbSize = sizeof(fmt);
2592
2593     ZeroMemory(&pf, sizeof(pf));
2594     pf.cbSize = sizeof(pf);
2595
2596     gt.flags = GTL_NUMCHARS;
2597     gt.codepage = 1200;
2598
2599     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_FIND,
2600                  SendMessageW(hwndEditor, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0) ? 1 : 0);
2601
2602     SendMessageW(hwndEditor, EM_GETCHARFORMAT, TRUE, (LPARAM)&fmt);
2603
2604     SendMessageW(hwndEditor, EM_GETSEL, (WPARAM)&from, (LPARAM)&to);
2605     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_UNDO,
2606       SendMessageW(hwndEditor, EM_CANUNDO, 0, 0));
2607     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_REDO,
2608       SendMessageW(hwndEditor, EM_CANREDO, 0, 0));
2609     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_CUT, from == to ? 0 : 1);
2610     SendMessageW(hwndToolBar, TB_ENABLEBUTTON, ID_EDIT_COPY, from == to ? 0 : 1);
2611
2612     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_BOLD, (fmt.dwMask & CFM_BOLD) &&
2613             (fmt.dwEffects & CFE_BOLD));
2614     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_BOLD, !(fmt.dwMask & CFM_BOLD));
2615     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_ITALIC, (fmt.dwMask & CFM_ITALIC) &&
2616             (fmt.dwEffects & CFE_ITALIC));
2617     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_ITALIC, !(fmt.dwMask & CFM_ITALIC));
2618     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_FORMAT_UNDERLINE, (fmt.dwMask & CFM_UNDERLINE) &&
2619             (fmt.dwEffects & CFE_UNDERLINE));
2620     SendMessageW(hwndFormatBar, TB_INDETERMINATE, ID_FORMAT_UNDERLINE, !(fmt.dwMask & CFM_UNDERLINE));
2621
2622     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2623     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_LEFT, (pf.wAlignment == PFA_LEFT));
2624     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_CENTER, (pf.wAlignment == PFA_CENTER));
2625     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_ALIGN_RIGHT, (pf.wAlignment == PFA_RIGHT));
2626
2627     SendMessageW(hwndFormatBar, TB_CHECKBUTTON, ID_BULLET, (pf.wNumbering & PFN_BULLET));
2628     return 0;
2629 }
2630
2631 static LRESULT OnNotify( HWND hWnd, WPARAM wParam, LPARAM lParam)
2632 {
2633     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2634     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
2635     NMHDR *pHdr = (NMHDR *)lParam;
2636     HWND hwndFontList = GetDlgItem(hwndReBar, IDC_FONTLIST);
2637     HWND hwndSizeList = GetDlgItem(hwndReBar, IDC_SIZELIST);
2638     WCHAR sizeBuffer[MAX_PATH];
2639
2640     if (pHdr->hwndFrom == hwndFontList || pHdr->hwndFrom == hwndSizeList)
2641     {
2642         if (pHdr->code == CBEN_ENDEDITW)
2643         {
2644             CHARFORMAT2W format;
2645             NMCBEENDEDIT *endEdit = (NMCBEENDEDIT *)lParam;
2646
2647             ZeroMemory(&format, sizeof(format));
2648             format.cbSize = sizeof(format);
2649             SendMessageW(hwndEditor, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&format);
2650
2651             if(pHdr->hwndFrom == hwndFontList)
2652             {
2653                 if(lstrcmpW(format.szFaceName, (LPWSTR)endEdit->szText))
2654                     set_font((LPCWSTR) endEdit->szText);
2655             } else if (pHdr->hwndFrom == hwndSizeList)
2656             {
2657                 wsprintfW(sizeBuffer, stringFormat, format.yHeight / 20);
2658                 if(lstrcmpW(sizeBuffer, (LPWSTR)endEdit->szText))
2659                 {
2660                     float size = 0;
2661                     if(number_from_string((LPWSTR)endEdit->szText, &size, FALSE))
2662                     {
2663                         set_size(size);
2664                     } else
2665                     {
2666                         SetWindowTextW(hwndSizeList, sizeBuffer);
2667                         MessageBoxW(hMainWnd, MAKEINTRESOURCEW(STRING_INVALID_NUMBER), wszAppTitle, MB_OK | MB_ICONINFORMATION);
2668                     }
2669                 }
2670             }
2671         }
2672         return 0;
2673     }
2674
2675     if (pHdr->hwndFrom != hwndEditor)
2676         return 0;
2677
2678     if (pHdr->code == EN_SELCHANGE)
2679     {
2680         SELCHANGE *pSC = (SELCHANGE *)lParam;
2681         char buf[128];
2682
2683         update_font_list();
2684
2685         sprintf( buf,"selection = %d..%d, line count=%ld",
2686                  pSC->chrg.cpMin, pSC->chrg.cpMax,
2687         SendMessage(hwndEditor, EM_GETLINECOUNT, 0, 0));
2688         SetWindowText(GetDlgItem(hWnd, IDC_STATUSBAR), buf);
2689         SendMessage(hWnd, WM_USER, 0, 0);
2690         return 1;
2691     }
2692     return 0;
2693 }
2694
2695 static LRESULT OnCommand( HWND hWnd, WPARAM wParam, LPARAM lParam)
2696 {
2697     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
2698     static FINDREPLACEW findreplace;
2699
2700     if ((HWND)lParam == hwndEditor)
2701         return 0;
2702
2703     switch(LOWORD(wParam))
2704     {
2705
2706     case ID_FILE_EXIT:
2707         PostMessageW(hWnd, WM_CLOSE, 0, 0);
2708         break;
2709
2710     case ID_FILE_NEW:
2711         {
2712             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
2713             int ret = DialogBox(hInstance, MAKEINTRESOURCE(IDD_NEWFILE), hWnd,
2714                                 (DLGPROC)newfile_proc);
2715
2716             if(ret != ID_NEWFILE_ABORT)
2717             {
2718                 if(prompt_save_changes())
2719                 {
2720                     SETTEXTEX st;
2721
2722                     set_caption(NULL);
2723                     wszFileName[0] = '\0';
2724
2725                     clear_formatting();
2726
2727                     st.flags = ST_DEFAULT;
2728                     st.codepage = 1200;
2729                     SendMessageW(hEditorWnd, EM_SETTEXTEX, (WPARAM)&st, 0);
2730
2731                     SendMessageW(hEditorWnd, EM_SETMODIFY, FALSE, 0);
2732                     set_fileformat(ret);
2733                     update_font_list();
2734                 }
2735             }
2736         }
2737         break;
2738
2739     case ID_FILE_OPEN:
2740         DialogOpenFile();
2741         break;
2742
2743     case ID_FILE_SAVE:
2744         if(wszFileName[0])
2745         {
2746             DoSaveFile(wszFileName, fileFormat);
2747             break;
2748         }
2749         /* Fall through */
2750
2751     case ID_FILE_SAVEAS:
2752         DialogSaveFile();
2753         break;
2754
2755     case ID_FILE_RECENT1:
2756     case ID_FILE_RECENT2:
2757     case ID_FILE_RECENT3:
2758     case ID_FILE_RECENT4:
2759         {
2760             HMENU hMenu = GetMenu(hWnd);
2761             MENUITEMINFOW mi;
2762
2763             mi.cbSize = sizeof(MENUITEMINFOW);
2764             mi.fMask = MIIM_DATA;
2765             if(GetMenuItemInfoW(hMenu, LOWORD(wParam), FALSE, &mi))
2766                 DoOpenFile((LPWSTR)mi.dwItemData);
2767         }
2768         break;
2769
2770     case ID_FIND:
2771         dialog_find(&findreplace, FALSE);
2772         break;
2773
2774     case ID_FIND_NEXT:
2775         handle_findmsg(&findreplace);
2776         break;
2777
2778     case ID_REPLACE:
2779         dialog_find(&findreplace, TRUE);
2780         break;
2781
2782     case ID_FONTSETTINGS:
2783         dialog_choose_font();
2784         break;
2785
2786     case ID_PRINT:
2787         dialog_print();
2788         break;
2789
2790     case ID_PRINT_QUICK:
2791         print_quick();
2792         break;
2793
2794     case ID_PREVIEW:
2795         {
2796             int index = reg_formatindex(fileFormat);
2797             DWORD tmp = barState[index];
2798             barState[index] = 0;
2799             set_bar_states();
2800             barState[index] = tmp;
2801             ShowWindow(hEditorWnd, FALSE);
2802             preview_bar_show(TRUE);
2803
2804             preview.page = 1;
2805             preview.hdc = 0;
2806             SetMenu(hWnd, NULL);
2807             InvalidateRect(0, 0, TRUE);
2808         }
2809         break;
2810
2811     case ID_PRINTSETUP:
2812         dialog_printsetup();
2813         break;
2814
2815     case ID_FORMAT_BOLD:
2816     case ID_FORMAT_ITALIC:
2817     case ID_FORMAT_UNDERLINE:
2818         {
2819         CHARFORMAT2W fmt;
2820         int effects = CFE_BOLD;
2821
2822         ZeroMemory(&fmt, sizeof(fmt));
2823         fmt.cbSize = sizeof(fmt);
2824         SendMessageW(hwndEditor, EM_GETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
2825
2826         fmt.dwMask = CFM_BOLD;
2827
2828         if (LOWORD(wParam) == ID_FORMAT_ITALIC)
2829         {
2830             effects = CFE_ITALIC;
2831             fmt.dwMask = CFM_ITALIC;
2832         } else if (LOWORD(wParam) == ID_FORMAT_UNDERLINE)
2833         {
2834             effects = CFE_UNDERLINE;
2835             fmt.dwMask = CFM_UNDERLINE;
2836         }
2837
2838         fmt.dwEffects ^= effects;
2839
2840         SendMessageW(hwndEditor, EM_SETCHARFORMAT, SCF_SELECTION, (LPARAM)&fmt);
2841         break;
2842         }
2843
2844     case ID_EDIT_CUT:
2845         PostMessageW(hwndEditor, WM_CUT, 0, 0);
2846         break;
2847
2848     case ID_EDIT_COPY:
2849         PostMessageW(hwndEditor, WM_COPY, 0, 0);
2850         break;
2851
2852     case ID_EDIT_PASTE:
2853         PostMessageW(hwndEditor, WM_PASTE, 0, 0);
2854         break;
2855
2856     case ID_EDIT_CLEAR:
2857         PostMessageW(hwndEditor, WM_CLEAR, 0, 0);
2858         break;
2859
2860     case ID_EDIT_SELECTALL:
2861         {
2862         CHARRANGE range = {0, -1};
2863         SendMessageW(hwndEditor, EM_EXSETSEL, 0, (LPARAM)&range);
2864         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2865         return 0;
2866         }
2867
2868     case ID_EDIT_GETTEXT:
2869         {
2870         int nLen = GetWindowTextLengthW(hwndEditor);
2871         LPWSTR data = HeapAlloc( GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR) );
2872         TEXTRANGEW tr;
2873
2874         GetWindowTextW(hwndEditor, data, nLen+1);
2875         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
2876
2877         HeapFree( GetProcessHeap(), 0, data);
2878         data = HeapAlloc(GetProcessHeap(), 0, (nLen+1)*sizeof(WCHAR));
2879         tr.chrg.cpMin = 0;
2880         tr.chrg.cpMax = nLen;
2881         tr.lpstrText = data;
2882         SendMessage (hwndEditor, EM_GETTEXTRANGE, 0, (LPARAM)&tr);
2883         MessageBoxW(NULL, data, xszAppTitle, MB_OK);
2884         HeapFree( GetProcessHeap(), 0, data );
2885
2886         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2887         return 0;
2888         }
2889
2890     case ID_EDIT_CHARFORMAT:
2891     case ID_EDIT_DEFCHARFORMAT:
2892         {
2893         CHARFORMAT2W cf;
2894         LRESULT i;
2895         ZeroMemory(&cf, sizeof(cf));
2896         cf.cbSize = sizeof(cf);
2897         cf.dwMask = 0;
2898         i = SendMessageW(hwndEditor, EM_GETCHARFORMAT,
2899                         LOWORD(wParam) == ID_EDIT_CHARFORMAT, (LPARAM)&cf);
2900         return 0;
2901         }
2902
2903     case ID_EDIT_PARAFORMAT:
2904         {
2905         PARAFORMAT2 pf;
2906         ZeroMemory(&pf, sizeof(pf));
2907         pf.cbSize = sizeof(pf);
2908         SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2909         return 0;
2910         }
2911
2912     case ID_EDIT_SELECTIONINFO:
2913         {
2914         CHARRANGE range = {0, -1};
2915         char buf[128];
2916         WCHAR *data = NULL;
2917
2918         SendMessage(hwndEditor, EM_EXGETSEL, 0, (LPARAM)&range);
2919         data = HeapAlloc(GetProcessHeap(), 0, sizeof(*data) * (range.cpMax-range.cpMin+1));
2920         SendMessage(hwndEditor, EM_GETSELTEXT, 0, (LPARAM)data);
2921         sprintf(buf, "Start = %d, End = %d", range.cpMin, range.cpMax);
2922         MessageBoxA(hWnd, buf, "Editor", MB_OK);
2923         MessageBoxW(hWnd, data, xszAppTitle, MB_OK);
2924         HeapFree( GetProcessHeap(), 0, data);
2925         /* SendMessage(hwndEditor, EM_SETSEL, 0, -1); */
2926         return 0;
2927         }
2928
2929     case ID_EDIT_READONLY:
2930         {
2931         long nStyle = GetWindowLong(hwndEditor, GWL_STYLE);
2932         if (nStyle & ES_READONLY)
2933             SendMessageW(hwndEditor, EM_SETREADONLY, 0, 0);
2934         else
2935             SendMessageW(hwndEditor, EM_SETREADONLY, 1, 0);
2936         return 0;
2937         }
2938
2939     case ID_EDIT_MODIFIED:
2940         if (SendMessageW(hwndEditor, EM_GETMODIFY, 0, 0))
2941             SendMessageW(hwndEditor, EM_SETMODIFY, 0, 0);
2942         else
2943             SendMessageW(hwndEditor, EM_SETMODIFY, 1, 0);
2944         return 0;
2945
2946     case ID_EDIT_UNDO:
2947         SendMessageW(hwndEditor, EM_UNDO, 0, 0);
2948         return 0;
2949
2950     case ID_EDIT_REDO:
2951         SendMessageW(hwndEditor, EM_REDO, 0, 0);
2952         return 0;
2953
2954     case ID_BULLET:
2955         {
2956             PARAFORMAT pf;
2957
2958             pf.cbSize = sizeof(pf);
2959             pf.dwMask = PFM_NUMBERING;
2960             SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
2961
2962             pf.dwMask |=  PFM_OFFSET;
2963
2964             if(pf.wNumbering == PFN_BULLET)
2965             {
2966                 pf.wNumbering = 0;
2967                 pf.dxOffset = 0;
2968             } else
2969             {
2970                 pf.wNumbering = PFN_BULLET;
2971                 pf.dxOffset = 720;
2972             }
2973
2974             SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2975         }
2976         break;
2977
2978     case ID_ALIGN_LEFT:
2979     case ID_ALIGN_CENTER:
2980     case ID_ALIGN_RIGHT:
2981         {
2982         PARAFORMAT2 pf;
2983
2984         pf.cbSize = sizeof(pf);
2985         pf.dwMask = PFM_ALIGNMENT;
2986         switch(LOWORD(wParam)) {
2987         case ID_ALIGN_LEFT: pf.wAlignment = PFA_LEFT; break;
2988         case ID_ALIGN_CENTER: pf.wAlignment = PFA_CENTER; break;
2989         case ID_ALIGN_RIGHT: pf.wAlignment = PFA_RIGHT; break;
2990         }
2991         SendMessageW(hwndEditor, EM_SETPARAFORMAT, 0, (LPARAM)&pf);
2992         break;
2993         }
2994
2995     case ID_BACK_1:
2996         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 1, 0);
2997         break;
2998
2999     case ID_BACK_2:
3000         SendMessageW(hwndEditor, EM_SETBKGNDCOLOR, 0, RGB(255,255,192));
3001         break;
3002
3003     case ID_TOGGLE_TOOLBAR:
3004         set_toolbar_state(BANDID_TOOLBAR, !is_bar_visible(BANDID_TOOLBAR));
3005         update_window();
3006         break;
3007
3008     case ID_TOGGLE_FORMATBAR:
3009         set_toolbar_state(BANDID_FONTLIST, !is_bar_visible(BANDID_FORMATBAR));
3010         set_toolbar_state(BANDID_SIZELIST, !is_bar_visible(BANDID_FORMATBAR));
3011         set_toolbar_state(BANDID_FORMATBAR, !is_bar_visible(BANDID_FORMATBAR));
3012         update_window();
3013         break;
3014
3015     case ID_TOGGLE_STATUSBAR:
3016         set_statusbar_state(!is_bar_visible(BANDID_STATUSBAR));
3017         update_window();
3018         break;
3019
3020     case ID_DATETIME:
3021         {
3022         HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
3023         DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_DATETIME), hWnd, (DLGPROC)datetime_proc);
3024         break;
3025         }
3026
3027     case ID_PARAFORMAT:
3028         {
3029             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
3030             DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_PARAFORMAT), hWnd,
3031                        paraformat_proc);
3032         }
3033         break;
3034
3035     case ID_TABSTOPS:
3036         {
3037             HINSTANCE hInstance = (HINSTANCE)GetWindowLongPtr(hWnd, GWLP_HINSTANCE);
3038             DialogBoxW(hInstance, MAKEINTRESOURCEW(IDD_TABSTOPS), hWnd, tabstops_proc);
3039         }
3040         break;
3041
3042     case ID_ABOUT:
3043         dialog_about();
3044         break;
3045
3046     case ID_VIEWPROPERTIES:
3047         dialog_viewproperties();
3048         break;
3049
3050     default:
3051         SendMessageW(hwndEditor, WM_COMMAND, wParam, lParam);
3052         break;
3053     }
3054     return 0;
3055 }
3056
3057 static LRESULT OnInitPopupMenu( HWND hWnd, WPARAM wParam, LPARAM lParam )
3058 {
3059     HMENU hMenu = (HMENU)wParam;
3060     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
3061     HWND hwndStatus = GetDlgItem(hWnd, IDC_STATUSBAR);
3062     PARAFORMAT pf;
3063     int nAlignment = -1;
3064     int selFrom, selTo;
3065     GETTEXTLENGTHEX gt;
3066     LRESULT textLength;
3067     MENUITEMINFOW mi;
3068
3069     SendMessageW(hEditorWnd, EM_GETSEL, (WPARAM)&selFrom, (LPARAM)&selTo);
3070     EnableMenuItem(hMenu, ID_EDIT_COPY, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
3071     EnableMenuItem(hMenu, ID_EDIT_CUT, MF_BYCOMMAND|(selFrom == selTo) ? MF_GRAYED : MF_ENABLED);
3072
3073     pf.cbSize = sizeof(PARAFORMAT);
3074     SendMessageW(hwndEditor, EM_GETPARAFORMAT, 0, (LPARAM)&pf);
3075     CheckMenuItem(hMenu, ID_EDIT_READONLY,
3076       MF_BYCOMMAND|(GetWindowLong(hwndEditor, GWL_STYLE)&ES_READONLY ? MF_CHECKED : MF_UNCHECKED));
3077     CheckMenuItem(hMenu, ID_EDIT_MODIFIED,
3078       MF_BYCOMMAND|(SendMessage(hwndEditor, EM_GETMODIFY, 0, 0) ? MF_CHECKED : MF_UNCHECKED));
3079     if (pf.dwMask & PFM_ALIGNMENT)
3080         nAlignment = pf.wAlignment;
3081     CheckMenuItem(hMenu, ID_ALIGN_LEFT, MF_BYCOMMAND|(nAlignment == PFA_LEFT) ?
3082             MF_CHECKED : MF_UNCHECKED);
3083     CheckMenuItem(hMenu, ID_ALIGN_CENTER, MF_BYCOMMAND|(nAlignment == PFA_CENTER) ?
3084             MF_CHECKED : MF_UNCHECKED);
3085     CheckMenuItem(hMenu, ID_ALIGN_RIGHT, MF_BYCOMMAND|(nAlignment == PFA_RIGHT) ?
3086             MF_CHECKED : MF_UNCHECKED);
3087     CheckMenuItem(hMenu, ID_BULLET, MF_BYCOMMAND | ((pf.wNumbering == PFN_BULLET) ?
3088             MF_CHECKED : MF_UNCHECKED));
3089     EnableMenuItem(hMenu, ID_EDIT_UNDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANUNDO, 0, 0)) ?
3090             MF_ENABLED : MF_GRAYED);
3091     EnableMenuItem(hMenu, ID_EDIT_REDO, MF_BYCOMMAND|(SendMessageW(hwndEditor, EM_CANREDO, 0, 0)) ?
3092             MF_ENABLED : MF_GRAYED);
3093
3094     CheckMenuItem(hMenu, ID_TOGGLE_TOOLBAR, MF_BYCOMMAND|(is_bar_visible(BANDID_TOOLBAR)) ?
3095             MF_CHECKED : MF_UNCHECKED);
3096
3097     CheckMenuItem(hMenu, ID_TOGGLE_FORMATBAR, MF_BYCOMMAND|(is_bar_visible(BANDID_FORMATBAR)) ?
3098             MF_CHECKED : MF_UNCHECKED);
3099
3100     CheckMenuItem(hMenu, ID_TOGGLE_STATUSBAR, MF_BYCOMMAND|IsWindowVisible(hwndStatus) ?
3101             MF_CHECKED : MF_UNCHECKED);
3102
3103     gt.flags = GTL_NUMCHARS;
3104     gt.codepage = 1200;
3105     textLength = SendMessageW(hEditorWnd, EM_GETTEXTLENGTHEX, (WPARAM)&gt, 0);
3106     EnableMenuItem(hMenu, ID_FIND, MF_BYCOMMAND|(textLength ? MF_ENABLED : MF_GRAYED));
3107
3108     mi.cbSize = sizeof(mi);
3109     mi.fMask = MIIM_DATA;
3110
3111     GetMenuItemInfoW(hMenu, ID_FIND_NEXT, FALSE, &mi);
3112
3113     EnableMenuItem(hMenu, ID_FIND_NEXT, MF_BYCOMMAND|((textLength && mi.dwItemData) ?
3114                    MF_ENABLED : MF_GRAYED));
3115
3116     EnableMenuItem(hMenu, ID_REPLACE, MF_BYCOMMAND|(textLength ? MF_ENABLED : MF_GRAYED));
3117
3118     return 0;
3119 }
3120
3121 static LRESULT OnSize( HWND hWnd, WPARAM wParam, LPARAM lParam )
3122 {
3123     int nStatusSize = 0;
3124     RECT rc;
3125     HWND hwndEditor = GetDlgItem(hWnd, IDC_EDITOR);
3126     HWND hwndStatusBar = GetDlgItem(hWnd, IDC_STATUSBAR);
3127     HWND hwndReBar = GetDlgItem(hWnd, IDC_REBAR);
3128     int rebarHeight = 0;
3129     int rebarRows = 2;
3130
3131     if (hwndStatusBar)
3132     {
3133         SendMessageW(hwndStatusBar, WM_SIZE, 0, 0);
3134         if (IsWindowVisible(hwndStatusBar))
3135         {
3136             GetClientRect(hwndStatusBar, &rc);
3137             nStatusSize = rc.bottom - rc.top;
3138         } else
3139         {
3140             nStatusSize = 0;
3141         }
3142     }
3143     if (hwndReBar)
3144     {
3145         if(!is_bar_visible(BANDID_TOOLBAR))
3146             rebarRows--;
3147
3148         if(!is_bar_visible(BANDID_FORMATBAR))
3149             rebarRows--;
3150
3151         rebarHeight = rebarRows ? SendMessageW(hwndReBar, RB_GETBARHEIGHT, 0, 0) : 0;
3152
3153         MoveWindow(hwndReBar, 0, 0, LOWORD(lParam), rebarHeight, TRUE);
3154     }
3155     if (hwndEditor)
3156     {
3157         GetClientRect(hWnd, &rc);
3158         MoveWindow(hwndEditor, 0, rebarHeight, rc.right, rc.bottom-nStatusSize-rebarHeight, TRUE);
3159     }
3160
3161     return DefWindowProcW(hWnd, WM_SIZE, wParam, lParam);
3162 }
3163
3164 static LRESULT CALLBACK WndProc(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam)
3165 {
3166     if(msg == ID_FINDMSGSTRING)
3167         return handle_findmsg((LPFINDREPLACEW)lParam);
3168
3169     switch(msg)
3170     {
3171     case WM_CREATE:
3172         return OnCreate( hWnd, wParam, lParam );
3173
3174     case WM_USER:
3175         return OnUser( hWnd, wParam, lParam );
3176
3177     case WM_NOTIFY:
3178         return OnNotify( hWnd, wParam, lParam );
3179
3180     case WM_COMMAND:
3181         if(preview.page)
3182             return preview_command( hWnd, wParam, lParam );
3183         else
3184             return OnCommand( hWnd, wParam, lParam );
3185
3186     case WM_DESTROY:
3187         PostQuitMessage(0);
3188         break;
3189
3190     case WM_CLOSE:
3191         if(preview.page)
3192         {
3193             preview_exit();
3194         } else if(prompt_save_changes())
3195         {
3196             registry_set_options();
3197             registry_set_formatopts_all();
3198             PostQuitMessage(0);
3199         }
3200         break;
3201
3202     case WM_ACTIVATE:
3203         if (LOWORD(wParam))
3204             SetFocus(GetDlgItem(hWnd, IDC_EDITOR));
3205         return 0;
3206
3207     case WM_INITMENUPOPUP:
3208         return OnInitPopupMenu( hWnd, wParam, lParam );
3209
3210     case WM_SIZE:
3211         return OnSize( hWnd, wParam, lParam );
3212
3213     case WM_CONTEXTMENU:
3214         if((HWND)wParam == hEditorWnd)
3215             return context_menu(lParam);
3216         else
3217             return DefWindowProcW(hWnd, msg, wParam, lParam);
3218
3219     case WM_DROPFILES:
3220         {
3221             WCHAR file[MAX_PATH];
3222             DragQueryFileW((HDROP)wParam, 0, file, MAX_PATH);
3223             DragFinish((HDROP)wParam);
3224
3225             if(prompt_save_changes())
3226                 DoOpenFile(file);
3227         }
3228         break;
3229     case WM_PAINT:
3230         if(preview.page)
3231             return print_preview();
3232         else
3233             return DefWindowProcW(hWnd, msg, wParam, lParam);
3234
3235     default:
3236         return DefWindowProcW(hWnd, msg, wParam, lParam);
3237     }
3238
3239     return 0;
3240 }
3241
3242 int CALLBACK WinMain(HINSTANCE hInstance, HINSTANCE hOldInstance, LPSTR szCmdParagraph, int res)
3243 {
3244     INITCOMMONCONTROLSEX classes = {8, ICC_BAR_CLASSES|ICC_COOL_CLASSES|ICC_USEREX_CLASSES};
3245     HACCEL hAccel;
3246     WNDCLASSW wc;
3247     MSG msg;
3248     RECT rc;
3249     static const WCHAR wszAccelTable[] = {'M','A','I','N','A','C','C','E','L',
3250                                           'T','A','B','L','E','\0'};
3251
3252     InitCommonControlsEx(&classes);
3253
3254     hAccel = LoadAcceleratorsW(hInstance, wszAccelTable);
3255
3256     wc.style = CS_HREDRAW | CS_VREDRAW;
3257     wc.lpfnWndProc = WndProc;
3258     wc.cbClsExtra = 0;
3259     wc.cbWndExtra = 4;
3260     wc.hInstance = hInstance;
3261     wc.hIcon = LoadIconW(hInstance, MAKEINTRESOURCEW(IDI_WORDPAD));
3262     wc.hCursor = LoadCursor(NULL, IDC_IBEAM);
3263     wc.hbrBackground = GetSysColorBrush(COLOR_WINDOW);
3264     wc.lpszMenuName = xszMainMenu;
3265     wc.lpszClassName = wszMainWndClass;
3266     RegisterClassW(&wc);
3267
3268     rc = registry_read_winrect();
3269     hMainWnd = CreateWindowExW(0, wszMainWndClass, wszAppTitle, WS_CLIPCHILDREN|WS_OVERLAPPEDWINDOW,
3270       rc.left, rc.top, rc.right-rc.left, rc.bottom-rc.top, NULL, NULL, hInstance, NULL);
3271     ShowWindow(hMainWnd, SW_SHOWDEFAULT);
3272
3273     set_caption(NULL);
3274     set_bar_states();
3275     set_fileformat(SF_RTF);
3276     hPopupMenu = LoadMenuW(hInstance, MAKEINTRESOURCEW(IDM_POPUP));
3277     get_default_printer_opts();
3278     target_device();
3279
3280     HandleCommandLine(GetCommandLineW());
3281
3282     while(GetMessageW(&msg,0,0,0))
3283     {
3284         if (IsDialogMessage(hFindWnd, &msg))
3285             continue;
3286
3287         if (TranslateAcceleratorW(hMainWnd, hAccel, &msg))
3288             continue;
3289         TranslateMessage(&msg);
3290         DispatchMessageW(&msg);
3291         if (!PeekMessageW(&msg, 0, 0, 0, PM_NOREMOVE))
3292             SendMessageW(hMainWnd, WM_USER, 0, 0);
3293     }
3294
3295     return 0;
3296 }