git.oblomov.eu Git - wine/blob - dlls/comdlg32/printdlg.c

   1 /*
   2  * COMMDLG - Print Dialog
   3  *
   4  * Copyright 1994 Martin Ayotte
   5  * Copyright 1996 Albrecht Kleine
   6  * Copyright 1999 Klaas van Gend
   7  * Copyright 2000 Huw D M Davies
   8  *
   9  * This library is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Lesser General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2.1 of the License, or (at your option) any later version.
  13  *
  14  * This library is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public
  20  * License along with this library; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  22  */
  23 #include <ctype.h>
  24 #include <stdlib.h>
  25 #include <stdarg.h>
  26 #include <stdio.h>
  27 #include <string.h>
  28 #include <assert.h>
  29
  30 #define NONAMELESSUNION
  31 #define NONAMELESSSTRUCT
  32 #include "windef.h"
  33 #include "winbase.h"
  34 #include "wingdi.h"
  35 #include "winuser.h"
  36 #include "winspool.h"
  37 #include "winerror.h"
  38
  39 #include "wine/unicode.h"
  40 #include "wine/debug.h"
  41
  42 #include "commdlg.h"
  43 #include "dlgs.h"
  44 #include "cderr.h"
  45 #include "cdlg.h"
  46
  47 WINE_DEFAULT_DEBUG_CHANNEL(commdlg);
  48
  49 /* Yes these constants are the same, but we're just copying win98 */
  50 #define UPDOWN_ID 0x270f
  51 #define MAX_COPIES 9999
  52
  53 /* This PRINTDLGA internal structure stores
  54  * pointers to several throughout useful structures.
  55  */
  56
  57 typedef struct
  58 {
  59   LPDEVMODEA        lpDevMode;
  60   LPPRINTDLGA       lpPrintDlg;
  61   LPPRINTER_INFO_2A lpPrinterInfo;
  62   LPDRIVER_INFO_3A  lpDriverInfo;
  63   UINT              HelpMessageID;
  64   HICON             hCollateIcon;    /* PrintDlg only */
  65   HICON             hNoCollateIcon;  /* PrintDlg only */
  66   HICON             hPortraitIcon;   /* PrintSetupDlg only */
  67   HICON             hLandscapeIcon;  /* PrintSetupDlg only */
  68   HWND              hwndUpDown;
  69 } PRINT_PTRA;
  70
  71 typedef struct
  72 {
  73   LPDEVMODEW        lpDevMode;
  74   LPPRINTDLGW       lpPrintDlg;
  75   LPPRINTER_INFO_2W lpPrinterInfo;
  76   LPDRIVER_INFO_3W  lpDriverInfo;
  77   UINT              HelpMessageID;
  78   HICON             hCollateIcon;    /* PrintDlg only */
  79   HICON             hNoCollateIcon;  /* PrintDlg only */
  80   HICON             hPortraitIcon;   /* PrintSetupDlg only */
  81   HICON             hLandscapeIcon;  /* PrintSetupDlg only */
  82   HWND              hwndUpDown;
  83 } PRINT_PTRW;
  84
  85 /* Debugging info */
  86 struct pd_flags
  87 {
  88   DWORD  flag;
  89   LPCSTR name;
  90 };
  91
  92 static const struct pd_flags psd_flags[] = {
  93   {PSD_MINMARGINS,"PSD_MINMARGINS"},
  94   {PSD_MARGINS,"PSD_MARGINS"},
  95   {PSD_INTHOUSANDTHSOFINCHES,"PSD_INTHOUSANDTHSOFINCHES"},
  96   {PSD_INHUNDREDTHSOFMILLIMETERS,"PSD_INHUNDREDTHSOFMILLIMETERS"},
  97   {PSD_DISABLEMARGINS,"PSD_DISABLEMARGINS"},
  98   {PSD_DISABLEPRINTER,"PSD_DISABLEPRINTER"},
  99   {PSD_NOWARNING,"PSD_NOWARNING"},
 100   {PSD_DISABLEORIENTATION,"PSD_DISABLEORIENTATION"},
 101   {PSD_RETURNDEFAULT,"PSD_RETURNDEFAULT"},
 102   {PSD_DISABLEPAPER,"PSD_DISABLEPAPER"},
 103   {PSD_SHOWHELP,"PSD_SHOWHELP"},
 104   {PSD_ENABLEPAGESETUPHOOK,"PSD_ENABLEPAGESETUPHOOK"},
 105   {PSD_ENABLEPAGESETUPTEMPLATE,"PSD_ENABLEPAGESETUPTEMPLATE"},
 106   {PSD_ENABLEPAGESETUPTEMPLATEHANDLE,"PSD_ENABLEPAGESETUPTEMPLATEHANDLE"},
 107   {PSD_ENABLEPAGEPAINTHOOK,"PSD_ENABLEPAGEPAINTHOOK"},
 108   {PSD_DISABLEPAGEPAINTING,"PSD_DISABLEPAGEPAINTING"},
 109   {-1, NULL}
 110 };
 111
 112 static const struct pd_flags pd_flags[] = {
 113   {PD_SELECTION, "PD_SELECTION "},
 114   {PD_PAGENUMS, "PD_PAGENUMS "},
 115   {PD_NOSELECTION, "PD_NOSELECTION "},
 116   {PD_NOPAGENUMS, "PD_NOPAGENUMS "},
 117   {PD_COLLATE, "PD_COLLATE "},
 118   {PD_PRINTTOFILE, "PD_PRINTTOFILE "},
 119   {PD_PRINTSETUP, "PD_PRINTSETUP "},
 120   {PD_NOWARNING, "PD_NOWARNING "},
 121   {PD_RETURNDC, "PD_RETURNDC "},
 122   {PD_RETURNIC, "PD_RETURNIC "},
 123   {PD_RETURNDEFAULT, "PD_RETURNDEFAULT "},
 124   {PD_SHOWHELP, "PD_SHOWHELP "},
 125   {PD_ENABLEPRINTHOOK, "PD_ENABLEPRINTHOOK "},
 126   {PD_ENABLESETUPHOOK, "PD_ENABLESETUPHOOK "},
 127   {PD_ENABLEPRINTTEMPLATE, "PD_ENABLEPRINTTEMPLATE "},
 128   {PD_ENABLESETUPTEMPLATE, "PD_ENABLESETUPTEMPLATE "},
 129   {PD_ENABLEPRINTTEMPLATEHANDLE, "PD_ENABLEPRINTTEMPLATEHANDLE "},
 130   {PD_ENABLESETUPTEMPLATEHANDLE, "PD_ENABLESETUPTEMPLATEHANDLE "},
 131   {PD_USEDEVMODECOPIES, "PD_USEDEVMODECOPIES[ANDCOLLATE] "},
 132   {PD_DISABLEPRINTTOFILE, "PD_DISABLEPRINTTOFILE "},
 133   {PD_HIDEPRINTTOFILE, "PD_HIDEPRINTTOFILE "},
 134   {PD_NONETWORKBUTTON, "PD_NONETWORKBUTTON "},
 135   {-1, NULL}
 136 };
 137 /* address of wndproc for subclassed Static control */
 138 static WNDPROC lpfnStaticWndProc;
 139 static WNDPROC edit_wndproc;
 140 /* the text of the fake document to render for the Page Setup dialog */
 141 static WCHAR wszFakeDocumentText[1024];
 142 static const WCHAR pd32_collateW[] = { 'P', 'D', '3', '2', '_', 'C', 'O', 'L', 'L', 'A', 'T', 'E', 0 };
 143 static const WCHAR pd32_nocollateW[] = { 'P', 'D', '3', '2', '_', 'N', 'O', 'C', 'O', 'L', 'L', 'A', 'T', 'E', 0 };
 144 static const WCHAR pd32_portraitW[] = { 'P', 'D', '3', '2', '_', 'P', 'O', 'R', 'T', 'R', 'A', 'I', 'T', 0 };
 145 static const WCHAR pd32_landscapeW[] = { 'P', 'D', '3', '2', '_', 'L', 'A', 'N', 'D', 'S', 'C', 'A', 'P', 'E', 0 };
 146 static const WCHAR printdlg_prop[] = {'_','_','W','I','N','E','_','P','R','I','N','T','D','L','G','D','A','T','A',0};
 147 static const WCHAR pagesetupdlg_prop[] = { '_', '_', 'W', 'I', 'N', 'E', '_', 'P', 'A', 'G', 'E',
 148                                            'S', 'E', 'T', 'U', 'P', 'D', 'L', 'G', 'D', 'A', 'T', 'A', 0 };
 149
 150
 151 static LPWSTR strdupW(LPCWSTR p)
 152 {
 153     LPWSTR ret;
 154     DWORD len;
 155
 156     if(!p) return NULL;
 157     len = (strlenW(p) + 1) * sizeof(WCHAR);
 158     ret = HeapAlloc(GetProcessHeap(), 0, len);
 159     memcpy(ret, p, len);
 160     return ret;
 161 }
 162
 163 /***********************************************************
 164  * convert_to_devmodeA
 165  *
 166  * Creates an ansi copy of supplied devmode
 167  */
 168 static DEVMODEA *convert_to_devmodeA(const DEVMODEW *dmW)
 169 {
 170     DEVMODEA *dmA;
 171     DWORD size;
 172
 173     if (!dmW) return NULL;
 174     size = dmW->dmSize - CCHDEVICENAME -
 175                         ((dmW->dmSize > FIELD_OFFSET(DEVMODEW, dmFormName)) ? CCHFORMNAME : 0);
 176
 177     dmA = HeapAlloc(GetProcessHeap(), 0, size + dmW->dmDriverExtra);
 178     if (!dmA) return NULL;
 179
 180     WideCharToMultiByte(CP_ACP, 0, dmW->dmDeviceName, -1,
 181                         (LPSTR)dmA->dmDeviceName, CCHDEVICENAME, NULL, NULL);
 182
 183     if (FIELD_OFFSET(DEVMODEW, dmFormName) >= dmW->dmSize)
 184     {
 185         memcpy(&dmA->dmSpecVersion, &dmW->dmSpecVersion,
 186                dmW->dmSize - FIELD_OFFSET(DEVMODEW, dmSpecVersion));
 187     }
 188     else
 189     {
 190         memcpy(&dmA->dmSpecVersion, &dmW->dmSpecVersion,
 191                FIELD_OFFSET(DEVMODEW, dmFormName) - FIELD_OFFSET(DEVMODEW, dmSpecVersion));
 192         WideCharToMultiByte(CP_ACP, 0, dmW->dmFormName, -1,
 193                             (LPSTR)dmA->dmFormName, CCHFORMNAME, NULL, NULL);
 194
 195         memcpy(&dmA->dmLogPixels, &dmW->dmLogPixels, dmW->dmSize - FIELD_OFFSET(DEVMODEW, dmLogPixels));
 196     }
 197
 198     dmA->dmSize = size;
 199     memcpy((char *)dmA + dmA->dmSize, (const char *)dmW + dmW->dmSize, dmW->dmDriverExtra);
 200     return dmA;
 201 }
 202
 203 /***********************************************************************
 204  *    PRINTDLG_OpenDefaultPrinter
 205  *
 206  * Returns a winspool printer handle to the default printer in *hprn
 207  * Caller must call ClosePrinter on the handle
 208  *
 209  * Returns TRUE on success else FALSE
 210  */
 211 static BOOL PRINTDLG_OpenDefaultPrinter(HANDLE *hprn)
 212 {
 213     WCHAR buf[260];
 214     DWORD dwBufLen = sizeof(buf) / sizeof(buf[0]);
 215     BOOL res;
 216     if(!GetDefaultPrinterW(buf, &dwBufLen))
 217         return FALSE;
 218     res = OpenPrinterW(buf, hprn, NULL);
 219     if (!res)
 220         WARN("Could not open printer %s\n", debugstr_w(buf));
 221     return res;
 222 }
 223
 224 /***********************************************************************
 225  *    PRINTDLG_SetUpPrinterListCombo
 226  *
 227  * Initializes printer list combox.
 228  * hDlg:  HWND of dialog
 229  * id:    Control id of combo
 230  * name:  Name of printer to select
 231  *
 232  * Initializes combo with list of available printers.  Selects printer 'name'
 233  * If name is NULL or does not exist select the default printer.
 234  *
 235  * Returns number of printers added to list.
 236  */
 237 static INT PRINTDLG_SetUpPrinterListComboA(HWND hDlg, UINT id, LPCSTR name)
 238 {
 239     DWORD needed, num;
 240     INT i;
 241     LPPRINTER_INFO_2A pi;
 242     EnumPrintersA(PRINTER_ENUM_LOCAL, NULL, 2, NULL, 0, &needed, &num);
 243     pi = HeapAlloc(GetProcessHeap(), 0, needed);
 244     EnumPrintersA(PRINTER_ENUM_LOCAL, NULL, 2, (LPBYTE)pi, needed, &needed,
 245                   &num);
 246
 247     SendDlgItemMessageA(hDlg, id, CB_RESETCONTENT, 0, 0);
 248
 249     for(i = 0; i < num; i++) {
 250         SendDlgItemMessageA(hDlg, id, CB_ADDSTRING, 0,
 251                             (LPARAM)pi[i].pPrinterName );
 252     }
 253     HeapFree(GetProcessHeap(), 0, pi);
 254     if(!name ||
 255        (i = SendDlgItemMessageA(hDlg, id, CB_FINDSTRINGEXACT, -1,
 256                                 (LPARAM)name)) == CB_ERR) {
 257
 258         char buf[260];
 259         DWORD dwBufLen = sizeof(buf);
 260         if (name != NULL)
 261             WARN("Can't find %s in printer list so trying to find default\n",
 262                 debugstr_a(name));
 263         if(!GetDefaultPrinterA(buf, &dwBufLen))
 264             return num;
 265         i = SendDlgItemMessageA(hDlg, id, CB_FINDSTRINGEXACT, -1, (LPARAM)buf);
 266         if(i == CB_ERR)
 267             FIXME("Can't find default printer in printer list\n");
 268     }
 269     SendDlgItemMessageA(hDlg, id, CB_SETCURSEL, i, 0);
 270     return num;
 271 }
 272
 273 static INT PRINTDLG_SetUpPrinterListComboW(HWND hDlg, UINT id, LPCWSTR name)
 274 {
 275     DWORD needed, num;
 276     INT i;
 277     LPPRINTER_INFO_2W pi;
 278     EnumPrintersW(PRINTER_ENUM_LOCAL, NULL, 2, NULL, 0, &needed, &num);
 279     pi = HeapAlloc(GetProcessHeap(), 0, needed);
 280     EnumPrintersW(PRINTER_ENUM_LOCAL, NULL, 2, (LPBYTE)pi, needed, &needed,
 281                   &num);
 282
 283     for(i = 0; i < num; i++) {
 284         SendDlgItemMessageW(hDlg, id, CB_ADDSTRING, 0,
 285                             (LPARAM)pi[i].pPrinterName );
 286     }
 287     HeapFree(GetProcessHeap(), 0, pi);
 288     if(!name ||
 289        (i = SendDlgItemMessageW(hDlg, id, CB_FINDSTRINGEXACT, -1,
 290                                 (LPARAM)name)) == CB_ERR) {
 291         WCHAR buf[260];
 292         DWORD dwBufLen = sizeof(buf)/sizeof(buf[0]);
 293         if (name != NULL)
 294             WARN("Can't find %s in printer list so trying to find default\n",
 295                 debugstr_w(name));
 296         if(!GetDefaultPrinterW(buf, &dwBufLen))
 297             return num;
 298         i = SendDlgItemMessageW(hDlg, id, CB_FINDSTRINGEXACT, -1, (LPARAM)buf);
 299         if(i == CB_ERR)
 300             TRACE("Can't find default printer in printer list\n");
 301     }
 302     SendDlgItemMessageW(hDlg, id, CB_SETCURSEL, i, 0);
 303     return num;
 304 }
 305
 306 /***********************************************************************
 307  *             PRINTDLG_CreateDevNames          [internal]
 308  *
 309  *
 310  *   creates a DevNames structure.
 311  *
 312  *  (NB. when we handle unicode the offsets will be in wchars).
 313  */
 314 static BOOL PRINTDLG_CreateDevNames(HGLOBAL *hmem, const char* DeviceDriverName,
 315                                     const char* DeviceName, const char* OutputPort)
 316 {
 317     long size;
 318     char*   pDevNamesSpace;
 319     char*   pTempPtr;
 320     LPDEVNAMES lpDevNames;
 321     char buf[260];
 322     DWORD dwBufLen = sizeof(buf);
 323
 324     size = strlen(DeviceDriverName) + 1
 325             + strlen(DeviceName) + 1
 326             + strlen(OutputPort) + 1
 327             + sizeof(DEVNAMES);
 328
 329     if(*hmem)
 330         *hmem = GlobalReAlloc(*hmem, size, GMEM_MOVEABLE);
 331     else
 332         *hmem = GlobalAlloc(GMEM_MOVEABLE, size);
 333     if (*hmem == 0)
 334         return FALSE;
 335
 336     pDevNamesSpace = GlobalLock(*hmem);
 337     lpDevNames = (LPDEVNAMES) pDevNamesSpace;
 338
 339     pTempPtr = pDevNamesSpace + sizeof(DEVNAMES);
 340     strcpy(pTempPtr, DeviceDriverName);
 341     lpDevNames->wDriverOffset = pTempPtr - pDevNamesSpace;
 342
 343     pTempPtr += strlen(DeviceDriverName) + 1;
 344     strcpy(pTempPtr, DeviceName);
 345     lpDevNames->wDeviceOffset = pTempPtr - pDevNamesSpace;
 346
 347     pTempPtr += strlen(DeviceName) + 1;
 348     strcpy(pTempPtr, OutputPort);
 349     lpDevNames->wOutputOffset = pTempPtr - pDevNamesSpace;
 350
 351     GetDefaultPrinterA(buf, &dwBufLen);
 352     lpDevNames->wDefault = (strcmp(buf, DeviceName) == 0) ? 1 : 0;
 353     GlobalUnlock(*hmem);
 354     return TRUE;
 355 }
 356
 357 static BOOL PRINTDLG_CreateDevNamesW(HGLOBAL *hmem, LPCWSTR DeviceDriverName,
 358                                     LPCWSTR DeviceName, LPCWSTR OutputPort)
 359 {
 360     long size;
 361     LPWSTR   pDevNamesSpace;
 362     LPWSTR   pTempPtr;
 363     LPDEVNAMES lpDevNames;
 364     WCHAR bufW[260];
 365     DWORD dwBufLen = sizeof(bufW) / sizeof(WCHAR);
 366
 367     size = sizeof(WCHAR)*lstrlenW(DeviceDriverName) + 2
 368             + sizeof(WCHAR)*lstrlenW(DeviceName) + 2
 369             + sizeof(WCHAR)*lstrlenW(OutputPort) + 2
 370             + sizeof(DEVNAMES);
 371
 372     if(*hmem)
 373         *hmem = GlobalReAlloc(*hmem, size, GMEM_MOVEABLE);
 374     else
 375         *hmem = GlobalAlloc(GMEM_MOVEABLE, size);
 376     if (*hmem == 0)
 377         return FALSE;
 378
 379     pDevNamesSpace = GlobalLock(*hmem);
 380     lpDevNames = (LPDEVNAMES) pDevNamesSpace;
 381
 382     pTempPtr = (LPWSTR)((LPDEVNAMES)pDevNamesSpace + 1);
 383     lstrcpyW(pTempPtr, DeviceDriverName);
 384     lpDevNames->wDriverOffset = pTempPtr - pDevNamesSpace;
 385
 386     pTempPtr += lstrlenW(DeviceDriverName) + 1;
 387     lstrcpyW(pTempPtr, DeviceName);
 388     lpDevNames->wDeviceOffset = pTempPtr - pDevNamesSpace;
 389
 390     pTempPtr += lstrlenW(DeviceName) + 1;
 391     lstrcpyW(pTempPtr, OutputPort);
 392     lpDevNames->wOutputOffset = pTempPtr - pDevNamesSpace;
 393
 394     GetDefaultPrinterW(bufW, &dwBufLen);
 395     lpDevNames->wDefault = (lstrcmpW(bufW, DeviceName) == 0) ? 1 : 0;
 396     GlobalUnlock(*hmem);
 397     return TRUE;
 398 }
 399
 400 /***********************************************************************
 401  *             PRINTDLG_UpdatePrintDlg          [internal]
 402  *
 403  *
 404  *   updates the PrintDlg structure for return values.
 405  *
 406  * RETURNS
 407  *   FALSE if user is not allowed to close (i.e. wrong nTo or nFrom values)
 408  *   TRUE  if successful.
 409  */
 410 static BOOL PRINTDLG_UpdatePrintDlgA(HWND hDlg,
 411                                     PRINT_PTRA* PrintStructures)
 412 {
 413     LPPRINTDLGA       lppd = PrintStructures->lpPrintDlg;
 414     PDEVMODEA         lpdm = PrintStructures->lpDevMode;
 415     LPPRINTER_INFO_2A pi = PrintStructures->lpPrinterInfo;
 416
 417
 418     if(!lpdm) {
 419         FIXME("No lpdm ptr?\n");
 420         return FALSE;
 421     }
 422
 423
 424     if(!(lppd->Flags & PD_PRINTSETUP)) {
 425         /* check whether nFromPage and nToPage are within range defined by
 426          * nMinPage and nMaxPage
 427          */
 428         if (IsDlgButtonChecked(hDlg, rad3) == BST_CHECKED) { /* Pages */
 429             WORD nToPage;
 430             WORD nFromPage;
 431             BOOL translated;
 432             nFromPage = GetDlgItemInt(hDlg, edt1, NULL, FALSE);
 433             nToPage   = GetDlgItemInt(hDlg, edt2, &translated, FALSE);
 434
 435             /* if no ToPage value is entered, use the FromPage value */
 436             if(!translated) nToPage = nFromPage;
 437
 438             if (nFromPage < lppd->nMinPage || nFromPage > lppd->nMaxPage ||
 439                 nToPage < lppd->nMinPage || nToPage > lppd->nMaxPage) {
 440                 WCHAR resourcestr[256];
 441                 WCHAR resultstr[256];
 442                 LoadStringW(COMDLG32_hInstance, PD32_INVALID_PAGE_RANGE, resourcestr, 255);
 443                 wsprintfW(resultstr,resourcestr, lppd->nMinPage, lppd->nMaxPage);
 444                 LoadStringW(COMDLG32_hInstance, PD32_PRINT_TITLE, resourcestr, 255);
 445                 MessageBoxW(hDlg, resultstr, resourcestr, MB_OK | MB_ICONWARNING);
 446                 return FALSE;
 447             }
 448             lppd->nFromPage = nFromPage;
 449             lppd->nToPage   = nToPage;
 450             lppd->Flags |= PD_PAGENUMS;
 451         }
 452         else
 453             lppd->Flags &= ~PD_PAGENUMS;
 454
 455         if (IsDlgButtonChecked(hDlg, rad2) == BST_CHECKED) /* Selection */
 456             lppd->Flags |= PD_SELECTION;
 457         else
 458             lppd->Flags &= ~PD_SELECTION;
 459
 460         if (IsDlgButtonChecked(hDlg, chx1) == BST_CHECKED) {/* Print to file */
 461             static char file[] = "FILE:";
 462             lppd->Flags |= PD_PRINTTOFILE;
 463             pi->pPortName = file;
 464         }
 465
 466         if (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED) { /* Collate */
 467             FIXME("Collate lppd not yet implemented as output\n");
 468         }
 469
 470         /* set PD_Collate and nCopies */
 471         if (lppd->Flags & PD_USEDEVMODECOPIESANDCOLLATE) {
 472           /*  The application doesn't support multiple copies or collate...
 473            */
 474             lppd->Flags &= ~PD_COLLATE;
 475             lppd->nCopies = 1;
 476           /* if the printer driver supports it... store info there
 477            * otherwise no collate & multiple copies !
 478            */
 479             if (lpdm->dmFields & DM_COLLATE)
 480                 lpdm->dmCollate =
 481                   (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED);
 482             if (lpdm->dmFields & DM_COPIES)
 483                 lpdm->u1.s1.dmCopies = GetDlgItemInt(hDlg, edt3, NULL, FALSE);
 484         } else {
 485             /* Application is responsible for multiple copies */
 486             if (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED)
 487                 lppd->Flags |= PD_COLLATE;
 488             else
 489                lppd->Flags &= ~PD_COLLATE;
 490             lppd->nCopies = GetDlgItemInt(hDlg, edt3, NULL, FALSE);
 491             /* multiple copies already included in the document. Driver must print only one copy */
 492             lpdm->u1.s1.dmCopies = 1;
 493         }
 494
 495         /* Print quality, PrintDlg16 */
 496         if(GetDlgItem(hDlg, cmb1))
 497         {
 498             HWND hQuality = GetDlgItem(hDlg, cmb1);
 499             int Sel = SendMessageA(hQuality, CB_GETCURSEL, 0, 0);
 500
 501             if(Sel != CB_ERR)
 502             {
 503                 LONG dpi = SendMessageA(hQuality, CB_GETITEMDATA, Sel, 0);
 504                 lpdm->dmFields |= DM_PRINTQUALITY | DM_YRESOLUTION;
 505                 lpdm->u1.s1.dmPrintQuality = LOWORD(dpi);
 506                 lpdm->dmYResolution = HIWORD(dpi);
 507             }
 508         }
 509     }
 510     return TRUE;
 511 }
 512
 513 static BOOL PRINTDLG_UpdatePrintDlgW(HWND hDlg,
 514                                     PRINT_PTRW* PrintStructures)
 515 {
 516     LPPRINTDLGW       lppd = PrintStructures->lpPrintDlg;
 517     PDEVMODEW         lpdm = PrintStructures->lpDevMode;
 518     LPPRINTER_INFO_2W pi = PrintStructures->lpPrinterInfo;
 519
 520
 521     if(!lpdm) {
 522         FIXME("No lpdm ptr?\n");
 523         return FALSE;
 524     }
 525
 526
 527     if(!(lppd->Flags & PD_PRINTSETUP)) {
 528         /* check whether nFromPage and nToPage are within range defined by
 529          * nMinPage and nMaxPage
 530          */
 531         if (IsDlgButtonChecked(hDlg, rad3) == BST_CHECKED) { /* Pages */
 532             WORD nToPage;
 533             WORD nFromPage;
 534             BOOL translated;
 535             nFromPage = GetDlgItemInt(hDlg, edt1, NULL, FALSE);
 536             nToPage   = GetDlgItemInt(hDlg, edt2, &translated, FALSE);
 537
 538             /* if no ToPage value is entered, use the FromPage value */
 539             if(!translated) nToPage = nFromPage;
 540
 541             if (nFromPage < lppd->nMinPage || nFromPage > lppd->nMaxPage ||
 542                 nToPage < lppd->nMinPage || nToPage > lppd->nMaxPage) {
 543                 WCHAR resourcestr[256];
 544                 WCHAR resultstr[256];
 545                 LoadStringW(COMDLG32_hInstance, PD32_INVALID_PAGE_RANGE,
 546                             resourcestr, 255);
 547                 wsprintfW(resultstr,resourcestr, lppd->nMinPage, lppd->nMaxPage);
 548                 LoadStringW(COMDLG32_hInstance, PD32_PRINT_TITLE,
 549                             resourcestr, 255);
 550                 MessageBoxW(hDlg, resultstr, resourcestr,
 551                             MB_OK | MB_ICONWARNING);
 552                 return FALSE;
 553             }
 554             lppd->nFromPage = nFromPage;
 555             lppd->nToPage   = nToPage;
 556             lppd->Flags |= PD_PAGENUMS;
 557         }
 558         else
 559             lppd->Flags &= ~PD_PAGENUMS;
 560
 561         if (IsDlgButtonChecked(hDlg, rad2) == BST_CHECKED) /* Selection */
 562             lppd->Flags |= PD_SELECTION;
 563         else
 564             lppd->Flags &= ~PD_SELECTION;
 565
 566         if (IsDlgButtonChecked(hDlg, chx1) == BST_CHECKED) {/* Print to file */
 567             static WCHAR file[] = {'F','I','L','E',':',0};
 568             lppd->Flags |= PD_PRINTTOFILE;
 569             pi->pPortName = file;
 570         }
 571
 572         if (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED) { /* Collate */
 573             FIXME("Collate lppd not yet implemented as output\n");
 574         }
 575
 576         /* set PD_Collate and nCopies */
 577         if (lppd->Flags & PD_USEDEVMODECOPIESANDCOLLATE) {
 578           /*  The application doesn't support multiple copies or collate...
 579            */
 580             lppd->Flags &= ~PD_COLLATE;
 581             lppd->nCopies = 1;
 582           /* if the printer driver supports it... store info there
 583            * otherwise no collate & multiple copies !
 584            */
 585             if (lpdm->dmFields & DM_COLLATE)
 586                 lpdm->dmCollate =
 587                   (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED);
 588             if (lpdm->dmFields & DM_COPIES)
 589                 lpdm->u1.s1.dmCopies = GetDlgItemInt(hDlg, edt3, NULL, FALSE);
 590         } else {
 591             if (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED)
 592                 lppd->Flags |= PD_COLLATE;
 593             else
 594                lppd->Flags &= ~PD_COLLATE;
 595             lppd->nCopies = GetDlgItemInt(hDlg, edt3, NULL, FALSE);
 596         }
 597     }
 598     return TRUE;
 599 }
 600
 601 /************************************************************************
 602  * PRINTDLG_SetUpPaperComboBox
 603  *
 604  * Initialize either the papersize or inputslot combos of the Printer Setup
 605  * dialog.  We store the associated word (eg DMPAPER_A4) as the item data.
 606  * We also try to re-select the old selection.
 607  */
 608 static BOOL PRINTDLG_SetUpPaperComboBoxA(HWND hDlg,
 609                                         int   nIDComboBox,
 610                                         char* PrinterName,
 611                                         char* PortName,
 612                                         LPDEVMODEA dm)
 613 {
 614     int     i;
 615     int     NrOfEntries;
 616     char*   Names;
 617     WORD*   Words;
 618     DWORD   Sel;
 619     WORD    oldWord = 0;
 620     int     NamesSize;
 621     int     fwCapability_Names;
 622     int     fwCapability_Words;
 623
 624     TRACE(" Printer: %s, Port: %s, ComboID: %d\n",PrinterName,PortName,nIDComboBox);
 625
 626     /* query the dialog box for the current selected value */
 627     Sel = SendDlgItemMessageA(hDlg, nIDComboBox, CB_GETCURSEL, 0, 0);
 628     if(Sel != CB_ERR) {
 629         /* we enter here only if a different printer is selected after
 630          * the Print Setup dialog is opened. The current settings are
 631          * stored into the newly selected printer.
 632          */
 633         oldWord = SendDlgItemMessageA(hDlg, nIDComboBox, CB_GETITEMDATA,
 634                                       Sel, 0);
 635         if (dm) {
 636             if (nIDComboBox == cmb2)
 637                 dm->u1.s1.dmPaperSize = oldWord;
 638             else
 639                 dm->u1.s1.dmDefaultSource = oldWord;
 640         }
 641     }
 642     else {
 643         /* we enter here only when the Print setup dialog is initially
 644          * opened. In this case the settings are restored from when
 645          * the dialog was last closed.
 646          */
 647         if (dm) {
 648             if (nIDComboBox == cmb2)
 649                 oldWord = dm->u1.s1.dmPaperSize;
 650             else
 651                 oldWord = dm->u1.s1.dmDefaultSource;
 652         }
 653     }
 654
 655     if (nIDComboBox == cmb2) {
 656          NamesSize          = 64;
 657          fwCapability_Names = DC_PAPERNAMES;
 658          fwCapability_Words = DC_PAPERS;
 659     } else {
 660          nIDComboBox        = cmb3;
 661          NamesSize          = 24;
 662          fwCapability_Names = DC_BINNAMES;
 663          fwCapability_Words = DC_BINS;
 664     }
 665
 666     NrOfEntries = DeviceCapabilitiesA(PrinterName, PortName,
 667                                       fwCapability_Names, NULL, dm);
 668     if (NrOfEntries == 0)
 669          WARN("no Name Entries found!\n");
 670     else if (NrOfEntries < 0)
 671          return FALSE;
 672
 673     if(DeviceCapabilitiesA(PrinterName, PortName, fwCapability_Words, NULL, dm)
 674        != NrOfEntries) {
 675         ERR("Number of caps is different\n");
 676         NrOfEntries = 0;
 677     }
 678
 679     Names = HeapAlloc(GetProcessHeap(),0, NrOfEntries*sizeof(char)*NamesSize);
 680     Words = HeapAlloc(GetProcessHeap(),0, NrOfEntries*sizeof(WORD));
 681     NrOfEntries = DeviceCapabilitiesA(PrinterName, PortName,
 682                                       fwCapability_Names, Names, dm);
 683     NrOfEntries = DeviceCapabilitiesA(PrinterName, PortName,
 684                                       fwCapability_Words, (LPSTR)Words, dm);
 685
 686     /* reset any current content in the combobox */
 687     SendDlgItemMessageA(hDlg, nIDComboBox, CB_RESETCONTENT, 0, 0);
 688
 689     /* store new content */
 690     for (i = 0; i < NrOfEntries; i++) {
 691         DWORD pos = SendDlgItemMessageA(hDlg, nIDComboBox, CB_ADDSTRING, 0,
 692                                         (LPARAM)(&Names[i*NamesSize]) );
 693         SendDlgItemMessageA(hDlg, nIDComboBox, CB_SETITEMDATA, pos,
 694                             Words[i]);
 695     }
 696
 697     /* Look for old selection - can't do this is previous loop since
 698        item order will change as more items are added */
 699     Sel = 0;
 700     for (i = 0; i < NrOfEntries; i++) {
 701         if(SendDlgItemMessageA(hDlg, nIDComboBox, CB_GETITEMDATA, i, 0) ==
 702            oldWord) {
 703             Sel = i;
 704             break;
 705         }
 706     }
 707     SendDlgItemMessageA(hDlg, nIDComboBox, CB_SETCURSEL, Sel, 0);
 708
 709     HeapFree(GetProcessHeap(),0,Words);
 710     HeapFree(GetProcessHeap(),0,Names);
 711     return TRUE;
 712 }
 713
 714 static BOOL PRINTDLG_SetUpPaperComboBoxW(HWND hDlg,
 715                                         int   nIDComboBox,
 716                                         const WCHAR* PrinterName,
 717                                         const WCHAR* PortName,
 718                                         LPDEVMODEW dm)
 719 {
 720     int     i;
 721     int     NrOfEntries;
 722     WCHAR*  Names;
 723     WORD*   Words;
 724     DWORD   Sel;
 725     WORD    oldWord = 0;
 726     int     NamesSize;
 727     int     fwCapability_Names;
 728     int     fwCapability_Words;
 729
 730     TRACE(" Printer: %s, Port: %s, ComboID: %d\n",debugstr_w(PrinterName),debugstr_w(PortName),nIDComboBox);
 731
 732     /* query the dialog box for the current selected value */
 733     Sel = SendDlgItemMessageW(hDlg, nIDComboBox, CB_GETCURSEL, 0, 0);
 734     if(Sel != CB_ERR) {
 735         /* we enter here only if a different printer is selected after
 736          * the Print Setup dialog is opened. The current settings are
 737          * stored into the newly selected printer.
 738          */
 739         oldWord = SendDlgItemMessageW(hDlg, nIDComboBox, CB_GETITEMDATA,
 740                                       Sel, 0);
 741         if (dm) {
 742             if (nIDComboBox == cmb2)
 743                 dm->u1.s1.dmPaperSize = oldWord;
 744             else
 745                 dm->u1.s1.dmDefaultSource = oldWord;
 746         }
 747     }
 748     else {
 749         /* we enter here only when the Print setup dialog is initially
 750          * opened. In this case the settings are restored from when
 751          * the dialog was last closed.
 752          */
 753         if (dm) {
 754             if (nIDComboBox == cmb2)
 755                 oldWord = dm->u1.s1.dmPaperSize;
 756             else
 757                 oldWord = dm->u1.s1.dmDefaultSource;
 758         }
 759     }
 760
 761     if (nIDComboBox == cmb2) {
 762          NamesSize          = 64;
 763          fwCapability_Names = DC_PAPERNAMES;
 764          fwCapability_Words = DC_PAPERS;
 765     } else {
 766          nIDComboBox        = cmb3;
 767          NamesSize          = 24;
 768          fwCapability_Names = DC_BINNAMES;
 769          fwCapability_Words = DC_BINS;
 770     }
 771
 772     NrOfEntries = DeviceCapabilitiesW(PrinterName, PortName,
 773                                       fwCapability_Names, NULL, dm);
 774     if (NrOfEntries == 0)
 775          WARN("no Name Entries found!\n");
 776     else if (NrOfEntries < 0)
 777          return FALSE;
 778
 779     if(DeviceCapabilitiesW(PrinterName, PortName, fwCapability_Words, NULL, dm)
 780        != NrOfEntries) {
 781         ERR("Number of caps is different\n");
 782         NrOfEntries = 0;
 783     }
 784
 785     Names = HeapAlloc(GetProcessHeap(),0, NrOfEntries*sizeof(WCHAR)*NamesSize);
 786     Words = HeapAlloc(GetProcessHeap(),0, NrOfEntries*sizeof(WORD));
 787     NrOfEntries = DeviceCapabilitiesW(PrinterName, PortName,
 788                                       fwCapability_Names, Names, dm);
 789     NrOfEntries = DeviceCapabilitiesW(PrinterName, PortName,
 790                                       fwCapability_Words, Words, dm);
 791
 792     /* reset any current content in the combobox */
 793     SendDlgItemMessageW(hDlg, nIDComboBox, CB_RESETCONTENT, 0, 0);
 794
 795     /* store new content */
 796     for (i = 0; i < NrOfEntries; i++) {
 797         DWORD pos = SendDlgItemMessageW(hDlg, nIDComboBox, CB_ADDSTRING, 0,
 798                                         (LPARAM)(&Names[i*NamesSize]) );
 799         SendDlgItemMessageW(hDlg, nIDComboBox, CB_SETITEMDATA, pos,
 800                             Words[i]);
 801     }
 802
 803     /* Look for old selection - can't do this is previous loop since
 804        item order will change as more items are added */
 805     Sel = 0;
 806     for (i = 0; i < NrOfEntries; i++) {
 807         if(SendDlgItemMessageW(hDlg, nIDComboBox, CB_GETITEMDATA, i, 0) ==
 808            oldWord) {
 809             Sel = i;
 810             break;
 811         }
 812     }
 813     SendDlgItemMessageW(hDlg, nIDComboBox, CB_SETCURSEL, Sel, 0);
 814
 815     HeapFree(GetProcessHeap(),0,Words);
 816     HeapFree(GetProcessHeap(),0,Names);
 817     return TRUE;
 818 }
 819
 820
 821 /***********************************************************************
 822  *               PRINTDLG_UpdatePrinterInfoTexts               [internal]
 823  */
 824 static void PRINTDLG_UpdatePrinterInfoTextsA(HWND hDlg, const PRINTER_INFO_2A *pi)
 825 {
 826     char   StatusMsg[256];
 827     char   ResourceString[256];
 828     int    i;
 829
 830     /* Status Message */
 831     StatusMsg[0]='\0';
 832
 833     /* add all status messages */
 834     for (i = 0; i < 25; i++) {
 835         if (pi->Status & (1<<i)) {
 836             LoadStringA(COMDLG32_hInstance, PD32_PRINTER_STATUS_PAUSED+i,
 837                         ResourceString, 255);
 838             strcat(StatusMsg,ResourceString);
 839         }
 840     }
 841     /* append "ready" */
 842     /* FIXME: status==ready must only be appended if really so.
 843               but how to detect? */
 844     LoadStringA(COMDLG32_hInstance, PD32_PRINTER_STATUS_READY,
 845                 ResourceString, 255);
 846     strcat(StatusMsg,ResourceString);
 847     SetDlgItemTextA(hDlg, stc12, StatusMsg);
 848
 849     /* set all other printer info texts */
 850     SetDlgItemTextA(hDlg, stc11, pi->pDriverName);
 851
 852     if (pi->pLocation != NULL && pi->pLocation[0] != '\0')
 853         SetDlgItemTextA(hDlg, stc14, pi->pLocation);
 854     else
 855         SetDlgItemTextA(hDlg, stc14, pi->pPortName);
 856     SetDlgItemTextA(hDlg, stc13, pi->pComment ? pi->pComment : "");
 857     return;
 858 }
 859
 860 static void PRINTDLG_UpdatePrinterInfoTextsW(HWND hDlg, const PRINTER_INFO_2W *pi)
 861 {
 862     WCHAR   StatusMsg[256];
 863     WCHAR   ResourceString[256];
 864     static const WCHAR emptyW[] = {0};
 865     int    i;
 866
 867     /* Status Message */
 868     StatusMsg[0]='\0';
 869
 870     /* add all status messages */
 871     for (i = 0; i < 25; i++) {
 872         if (pi->Status & (1<<i)) {
 873             LoadStringW(COMDLG32_hInstance, PD32_PRINTER_STATUS_PAUSED+i,
 874                         ResourceString, 255);
 875             lstrcatW(StatusMsg,ResourceString);
 876         }
 877     }
 878     /* append "ready" */
 879     /* FIXME: status==ready must only be appended if really so.
 880               but how to detect? */
 881     LoadStringW(COMDLG32_hInstance, PD32_PRINTER_STATUS_READY,
 882                 ResourceString, 255);
 883     lstrcatW(StatusMsg,ResourceString);
 884     SetDlgItemTextW(hDlg, stc12, StatusMsg);
 885
 886     /* set all other printer info texts */
 887     SetDlgItemTextW(hDlg, stc11, pi->pDriverName);
 888     if (pi->pLocation != NULL && pi->pLocation[0] != '\0')
 889         SetDlgItemTextW(hDlg, stc14, pi->pLocation);
 890     else
 891         SetDlgItemTextW(hDlg, stc14, pi->pPortName);
 892     SetDlgItemTextW(hDlg, stc13, pi->pComment ? pi->pComment : emptyW);
 893 }
 894
 895
 896 /*******************************************************************
 897  *
 898  *                 PRINTDLG_ChangePrinter
 899  *
 900  */
 901 static BOOL PRINTDLG_ChangePrinterA(HWND hDlg, char *name, PRINT_PTRA *PrintStructures)
 902 {
 903     LPPRINTDLGA lppd = PrintStructures->lpPrintDlg;
 904     LPDEVMODEA lpdm = NULL;
 905     LONG dmSize;
 906     DWORD needed;
 907     HANDLE hprn;
 908
 909     HeapFree(GetProcessHeap(),0, PrintStructures->lpPrinterInfo);
 910     HeapFree(GetProcessHeap(),0, PrintStructures->lpDriverInfo);
 911     if(!OpenPrinterA(name, &hprn, NULL)) {
 912         ERR("Can't open printer %s\n", name);
 913         return FALSE;
 914     }
 915     GetPrinterA(hprn, 2, NULL, 0, &needed);
 916     PrintStructures->lpPrinterInfo = HeapAlloc(GetProcessHeap(),0,needed);
 917     GetPrinterA(hprn, 2, (LPBYTE)PrintStructures->lpPrinterInfo, needed,
 918                 &needed);
 919     GetPrinterDriverA(hprn, NULL, 3, NULL, 0, &needed);
 920     PrintStructures->lpDriverInfo = HeapAlloc(GetProcessHeap(),0,needed);
 921     if (!GetPrinterDriverA(hprn, NULL, 3, (LPBYTE)PrintStructures->lpDriverInfo,
 922             needed, &needed)) {
 923         ERR("GetPrinterDriverA failed for %s, fix your config!\n",PrintStructures->lpPrinterInfo->pPrinterName);
 924         return FALSE;
 925     }
 926     ClosePrinter(hprn);
 927
 928     PRINTDLG_UpdatePrinterInfoTextsA(hDlg, PrintStructures->lpPrinterInfo);
 929
 930     HeapFree(GetProcessHeap(), 0, PrintStructures->lpDevMode);
 931     PrintStructures->lpDevMode = NULL;
 932
 933     dmSize = DocumentPropertiesA(0, 0, name, NULL, NULL, 0);
 934     if(dmSize == -1) {
 935         ERR("DocumentProperties fails on %s\n", debugstr_a(name));
 936         return FALSE;
 937     }
 938     PrintStructures->lpDevMode = HeapAlloc(GetProcessHeap(), 0, dmSize);
 939     dmSize = DocumentPropertiesA(0, 0, name, PrintStructures->lpDevMode, NULL,
 940                                  DM_OUT_BUFFER);
 941     if(lppd->hDevMode && (lpdm = GlobalLock(lppd->hDevMode)) &&
 942                           !lstrcmpA( (LPSTR) lpdm->dmDeviceName,
 943                                      (LPSTR) PrintStructures->lpDevMode->dmDeviceName)) {
 944       /* Supplied devicemode matches current printer so try to use it */
 945         DocumentPropertiesA(0, 0, name, PrintStructures->lpDevMode, lpdm,
 946                             DM_OUT_BUFFER | DM_IN_BUFFER);
 947     }
 948     if(lpdm)
 949         GlobalUnlock(lppd->hDevMode);
 950
 951     lpdm = PrintStructures->lpDevMode;  /* use this as a shortcut */
 952
 953     if(!(lppd->Flags & PD_PRINTSETUP)) {
 954         /* Print range (All/Range/Selection) */
 955         if(lppd->nFromPage != 0xffff)
 956             SetDlgItemInt(hDlg, edt1, lppd->nFromPage, FALSE);
 957         if(lppd->nToPage != 0xffff)
 958             SetDlgItemInt(hDlg, edt2, lppd->nToPage, FALSE);
 959
 960         CheckRadioButton(hDlg, rad1, rad3, rad1);               /* default */
 961         if (lppd->Flags & PD_NOSELECTION)
 962             EnableWindow(GetDlgItem(hDlg, rad2), FALSE);
 963         else
 964             if (lppd->Flags & PD_SELECTION)
 965                 CheckRadioButton(hDlg, rad1, rad3, rad2);
 966         if (lppd->Flags & PD_NOPAGENUMS) {
 967             EnableWindow(GetDlgItem(hDlg, rad3), FALSE);
 968             EnableWindow(GetDlgItem(hDlg, stc2),FALSE);
 969             EnableWindow(GetDlgItem(hDlg, edt1), FALSE);
 970             EnableWindow(GetDlgItem(hDlg, stc3),FALSE);
 971             EnableWindow(GetDlgItem(hDlg, edt2), FALSE);
 972         } else {
 973             if (lppd->Flags & PD_PAGENUMS)
 974                 CheckRadioButton(hDlg, rad1, rad3, rad3);
 975         }
 976
 977         /* Collate pages
 978          *
 979          * FIXME: The ico3 is not displayed for some reason. I don't know why.
 980          */
 981         if (lppd->Flags & PD_COLLATE) {
 982             SendDlgItemMessageA(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
 983                                 (LPARAM)PrintStructures->hCollateIcon);
 984             CheckDlgButton(hDlg, chx2, 1);
 985         } else {
 986             SendDlgItemMessageA(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
 987                                 (LPARAM)PrintStructures->hNoCollateIcon);
 988             CheckDlgButton(hDlg, chx2, 0);
 989         }
 990
 991         if (lppd->Flags & PD_USEDEVMODECOPIESANDCOLLATE) {
 992           /* if printer doesn't support it: no Collate */
 993             if (!(lpdm->dmFields & DM_COLLATE)) {
 994                 EnableWindow(GetDlgItem(hDlg, chx2), FALSE);
 995                 EnableWindow(GetDlgItem(hDlg, ico3), FALSE);
 996             }
 997         }
 998
 999         /* nCopies */
1000         {
1001           INT copies;
1002           if (lppd->hDevMode == 0)
1003               copies = lppd->nCopies;
1004           else
1005               copies = lpdm->u1.s1.dmCopies;
1006           if(copies == 0) copies = 1;
1007           else if(copies < 0) copies = MAX_COPIES;
1008           SetDlgItemInt(hDlg, edt3, copies, FALSE);
1009         }
1010
1011         if (lppd->Flags & PD_USEDEVMODECOPIESANDCOLLATE) {
1012           /* if printer doesn't support it: no nCopies */
1013             if (!(lpdm->dmFields & DM_COPIES)) {
1014                 EnableWindow(GetDlgItem(hDlg, edt3), FALSE);
1015                 EnableWindow(GetDlgItem(hDlg, stc5), FALSE);
1016             }
1017         }
1018
1019         /* print to file */
1020         CheckDlgButton(hDlg, chx1, (lppd->Flags & PD_PRINTTOFILE) ? 1 : 0);
1021         if (lppd->Flags & PD_DISABLEPRINTTOFILE)
1022             EnableWindow(GetDlgItem(hDlg, chx1), FALSE);
1023         if (lppd->Flags & PD_HIDEPRINTTOFILE)
1024             ShowWindow(GetDlgItem(hDlg, chx1), SW_HIDE);
1025
1026         /* Fill print quality combo, PrintDlg16 */
1027         if(GetDlgItem(hDlg, cmb1))
1028         {
1029             DWORD numResolutions = DeviceCapabilitiesA(PrintStructures->lpPrinterInfo->pPrinterName,
1030                                                        PrintStructures->lpPrinterInfo->pPortName,
1031                                                        DC_ENUMRESOLUTIONS, NULL, lpdm);
1032
1033             if(numResolutions != -1)
1034             {
1035                 HWND hQuality = GetDlgItem(hDlg, cmb1);
1036                 LONG* Resolutions;
1037                 char buf[255];
1038                 DWORD i;
1039                 int dpiX, dpiY;
1040                 HDC hPrinterDC = CreateDCA(PrintStructures->lpPrinterInfo->pDriverName,
1041                                            PrintStructures->lpPrinterInfo->pPrinterName,
1042                                            0, lpdm);
1043
1044                 Resolutions = HeapAlloc(GetProcessHeap(), 0, numResolutions*sizeof(LONG)*2);
1045                 DeviceCapabilitiesA(PrintStructures->lpPrinterInfo->pPrinterName,
1046                                     PrintStructures->lpPrinterInfo->pPortName,
1047                                     DC_ENUMRESOLUTIONS, (LPSTR)Resolutions, lpdm);
1048
1049                 dpiX = GetDeviceCaps(hPrinterDC, LOGPIXELSX);
1050                 dpiY = GetDeviceCaps(hPrinterDC, LOGPIXELSY);
1051                 DeleteDC(hPrinterDC);
1052
1053                 SendMessageA(hQuality, CB_RESETCONTENT, 0, 0);
1054                 for(i = 0; i < (numResolutions * 2); i += 2)
1055                 {
1056                     BOOL IsDefault = FALSE;
1057                     LRESULT Index;
1058
1059                     if(Resolutions[i] == Resolutions[i+1])
1060                     {
1061                         if(dpiX == Resolutions[i])
1062                             IsDefault = TRUE;
1063                         sprintf(buf, "%d dpi", Resolutions[i]);
1064                     } else
1065                     {
1066                         if(dpiX == Resolutions[i] && dpiY == Resolutions[i+1])
1067                             IsDefault = TRUE;
1068                         sprintf(buf, "%d dpi x %d dpi", Resolutions[i], Resolutions[i+1]);
1069                     }
1070
1071                     Index = SendMessageA(hQuality, CB_ADDSTRING, 0, (LPARAM)buf);
1072
1073                     if(IsDefault)
1074                         SendMessageA(hQuality, CB_SETCURSEL, Index, 0);
1075
1076                     SendMessageA(hQuality, CB_SETITEMDATA, Index, MAKELONG(dpiX,dpiY));
1077                 }
1078                 HeapFree(GetProcessHeap(), 0, Resolutions);
1079             }
1080         }
1081     } else { /* PD_PRINTSETUP */
1082       BOOL bPortrait = (lpdm->u1.s1.dmOrientation == DMORIENT_PORTRAIT);
1083
1084       PRINTDLG_SetUpPaperComboBoxA(hDlg, cmb2,
1085                                   PrintStructures->lpPrinterInfo->pPrinterName,
1086                                   PrintStructures->lpPrinterInfo->pPortName,
1087                                   lpdm);
1088       PRINTDLG_SetUpPaperComboBoxA(hDlg, cmb3,
1089                                   PrintStructures->lpPrinterInfo->pPrinterName,
1090                                   PrintStructures->lpPrinterInfo->pPortName,
1091                                   lpdm);
1092       CheckRadioButton(hDlg, rad1, rad2, bPortrait ? rad1: rad2);
1093       SendDlgItemMessageA(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1094                           (LPARAM)(bPortrait ? PrintStructures->hPortraitIcon :
1095                                    PrintStructures->hLandscapeIcon));
1096
1097     }
1098
1099     /* help button */
1100     if ((lppd->Flags & PD_SHOWHELP)==0) {
1101         /* hide if PD_SHOWHELP not specified */
1102         ShowWindow(GetDlgItem(hDlg, pshHelp), SW_HIDE);
1103     }
1104     return TRUE;
1105 }
1106
1107 static BOOL PRINTDLG_ChangePrinterW(HWND hDlg, WCHAR *name,
1108                                    PRINT_PTRW *PrintStructures)
1109 {
1110     LPPRINTDLGW lppd = PrintStructures->lpPrintDlg;
1111     LPDEVMODEW lpdm = NULL;
1112     LONG dmSize;
1113     DWORD needed;
1114     HANDLE hprn;
1115
1116     HeapFree(GetProcessHeap(),0, PrintStructures->lpPrinterInfo);
1117     HeapFree(GetProcessHeap(),0, PrintStructures->lpDriverInfo);
1118     if(!OpenPrinterW(name, &hprn, NULL)) {
1119         ERR("Can't open printer %s\n", debugstr_w(name));
1120         return FALSE;
1121     }
1122     GetPrinterW(hprn, 2, NULL, 0, &needed);
1123     PrintStructures->lpPrinterInfo = HeapAlloc(GetProcessHeap(),0,needed);
1124     GetPrinterW(hprn, 2, (LPBYTE)PrintStructures->lpPrinterInfo, needed,
1125                 &needed);
1126     GetPrinterDriverW(hprn, NULL, 3, NULL, 0, &needed);
1127     PrintStructures->lpDriverInfo = HeapAlloc(GetProcessHeap(),0,needed);
1128     if (!GetPrinterDriverW(hprn, NULL, 3, (LPBYTE)PrintStructures->lpDriverInfo,
1129             needed, &needed)) {
1130         ERR("GetPrinterDriverA failed for %s, fix your config!\n",debugstr_w(PrintStructures->lpPrinterInfo->pPrinterName));
1131         return FALSE;
1132     }
1133     ClosePrinter(hprn);
1134
1135     PRINTDLG_UpdatePrinterInfoTextsW(hDlg, PrintStructures->lpPrinterInfo);
1136
1137     HeapFree(GetProcessHeap(), 0, PrintStructures->lpDevMode);
1138     PrintStructures->lpDevMode = NULL;
1139
1140     dmSize = DocumentPropertiesW(0, 0, name, NULL, NULL, 0);
1141     if(dmSize == -1) {
1142         ERR("DocumentProperties fails on %s\n", debugstr_w(name));
1143         return FALSE;
1144     }
1145     PrintStructures->lpDevMode = HeapAlloc(GetProcessHeap(), 0, dmSize);
1146     dmSize = DocumentPropertiesW(0, 0, name, PrintStructures->lpDevMode, NULL,
1147                                  DM_OUT_BUFFER);
1148     if(lppd->hDevMode && (lpdm = GlobalLock(lppd->hDevMode)) &&
1149                           !lstrcmpW(lpdm->dmDeviceName,
1150                                   PrintStructures->lpDevMode->dmDeviceName)) {
1151       /* Supplied devicemode matches current printer so try to use it */
1152         DocumentPropertiesW(0, 0, name, PrintStructures->lpDevMode, lpdm,
1153                             DM_OUT_BUFFER | DM_IN_BUFFER);
1154     }
1155     if(lpdm)
1156         GlobalUnlock(lppd->hDevMode);
1157
1158     lpdm = PrintStructures->lpDevMode;  /* use this as a shortcut */
1159
1160     if(!(lppd->Flags & PD_PRINTSETUP)) {
1161         /* Print range (All/Range/Selection) */
1162         if(lppd->nFromPage != 0xffff)
1163             SetDlgItemInt(hDlg, edt1, lppd->nFromPage, FALSE);
1164         if(lppd->nToPage != 0xffff)
1165             SetDlgItemInt(hDlg, edt2, lppd->nToPage, FALSE);
1166
1167         CheckRadioButton(hDlg, rad1, rad3, rad1);               /* default */
1168         if (lppd->Flags & PD_NOSELECTION)
1169             EnableWindow(GetDlgItem(hDlg, rad2), FALSE);
1170         else
1171             if (lppd->Flags & PD_SELECTION)
1172                 CheckRadioButton(hDlg, rad1, rad3, rad2);
1173         if (lppd->Flags & PD_NOPAGENUMS) {
1174             EnableWindow(GetDlgItem(hDlg, rad3), FALSE);
1175             EnableWindow(GetDlgItem(hDlg, stc2),FALSE);
1176             EnableWindow(GetDlgItem(hDlg, edt1), FALSE);
1177             EnableWindow(GetDlgItem(hDlg, stc3),FALSE);
1178             EnableWindow(GetDlgItem(hDlg, edt2), FALSE);
1179         } else {
1180             if (lppd->Flags & PD_PAGENUMS)
1181                 CheckRadioButton(hDlg, rad1, rad3, rad3);
1182         }
1183
1184         /* Collate pages
1185          *
1186          * FIXME: The ico3 is not displayed for some reason. I don't know why.
1187          */
1188         if (lppd->Flags & PD_COLLATE) {
1189             SendDlgItemMessageW(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
1190                                 (LPARAM)PrintStructures->hCollateIcon);
1191             CheckDlgButton(hDlg, chx2, 1);
1192         } else {
1193             SendDlgItemMessageW(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
1194                                 (LPARAM)PrintStructures->hNoCollateIcon);
1195             CheckDlgButton(hDlg, chx2, 0);
1196         }
1197
1198         if (lppd->Flags & PD_USEDEVMODECOPIESANDCOLLATE) {
1199           /* if printer doesn't support it: no Collate */
1200             if (!(lpdm->dmFields & DM_COLLATE)) {
1201                 EnableWindow(GetDlgItem(hDlg, chx2), FALSE);
1202                 EnableWindow(GetDlgItem(hDlg, ico3), FALSE);
1203             }
1204         }
1205
1206         /* nCopies */
1207         {
1208           INT copies;
1209           if (lppd->hDevMode == 0)
1210               copies = lppd->nCopies;
1211           else
1212               copies = lpdm->u1.s1.dmCopies;
1213           if(copies == 0) copies = 1;
1214           else if(copies < 0) copies = MAX_COPIES;
1215           SetDlgItemInt(hDlg, edt3, copies, FALSE);
1216         }
1217
1218         if (lppd->Flags & PD_USEDEVMODECOPIESANDCOLLATE) {
1219           /* if printer doesn't support it: no nCopies */
1220             if (!(lpdm->dmFields & DM_COPIES)) {
1221                 EnableWindow(GetDlgItem(hDlg, edt3), FALSE);
1222                 EnableWindow(GetDlgItem(hDlg, stc5), FALSE);
1223             }
1224         }
1225
1226         /* print to file */
1227         CheckDlgButton(hDlg, chx1, (lppd->Flags & PD_PRINTTOFILE) ? 1 : 0);
1228         if (lppd->Flags & PD_DISABLEPRINTTOFILE)
1229             EnableWindow(GetDlgItem(hDlg, chx1), FALSE);
1230         if (lppd->Flags & PD_HIDEPRINTTOFILE)
1231             ShowWindow(GetDlgItem(hDlg, chx1), SW_HIDE);
1232
1233     } else { /* PD_PRINTSETUP */
1234       BOOL bPortrait = (lpdm->u1.s1.dmOrientation == DMORIENT_PORTRAIT);
1235
1236       PRINTDLG_SetUpPaperComboBoxW(hDlg, cmb2,
1237                                   PrintStructures->lpPrinterInfo->pPrinterName,
1238                                   PrintStructures->lpPrinterInfo->pPortName,
1239                                   lpdm);
1240       PRINTDLG_SetUpPaperComboBoxW(hDlg, cmb3,
1241                                   PrintStructures->lpPrinterInfo->pPrinterName,
1242                                   PrintStructures->lpPrinterInfo->pPortName,
1243                                   lpdm);
1244       CheckRadioButton(hDlg, rad1, rad2, bPortrait ? rad1: rad2);
1245       SendDlgItemMessageW(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1246                           (LPARAM)(bPortrait ? PrintStructures->hPortraitIcon :
1247                                    PrintStructures->hLandscapeIcon));
1248
1249     }
1250
1251     /* help button */
1252     if ((lppd->Flags & PD_SHOWHELP)==0) {
1253         /* hide if PD_SHOWHELP not specified */
1254         ShowWindow(GetDlgItem(hDlg, pshHelp), SW_HIDE);
1255     }
1256     return TRUE;
1257 }
1258
1259  /***********************************************************************
1260  *           check_printer_setup                        [internal]
1261  */
1262 static LRESULT check_printer_setup(HWND hDlg)
1263 {
1264     DWORD needed,num;
1265     WCHAR resourcestr[256],resultstr[256];
1266
1267     EnumPrintersW(PRINTER_ENUM_LOCAL, NULL, 2, NULL, 0, &needed, &num);
1268     if(needed == 0)
1269     {
1270           EnumPrintersW(PRINTER_ENUM_CONNECTIONS, NULL, 2, NULL, 0, &needed, &num);
1271     }
1272     if(needed > 0)
1273           return TRUE;
1274     else
1275     {
1276           LoadStringW(COMDLG32_hInstance, PD32_NO_DEVICES,resultstr, 255);
1277           LoadStringW(COMDLG32_hInstance, PD32_PRINT_TITLE,resourcestr, 255);
1278           MessageBoxW(hDlg, resultstr, resourcestr,MB_OK | MB_ICONWARNING);
1279           return FALSE;
1280     }
1281 }
1282
1283 /***********************************************************************
1284  *           PRINTDLG_WMInitDialog                      [internal]
1285  */
1286 static LRESULT PRINTDLG_WMInitDialog(HWND hDlg, WPARAM wParam,
1287                                      PRINT_PTRA* PrintStructures)
1288 {
1289     LPPRINTDLGA lppd = PrintStructures->lpPrintDlg;
1290     DEVNAMES *pdn;
1291     DEVMODEA *pdm;
1292     char *name = NULL;
1293     UINT comboID = (lppd->Flags & PD_PRINTSETUP) ? cmb1 : cmb4;
1294
1295     /* load Collate ICONs */
1296     /* We load these with LoadImage because they are not a standard
1297        size and we don't want them rescaled */
1298     PrintStructures->hCollateIcon =
1299       LoadImageA(COMDLG32_hInstance, "PD32_COLLATE", IMAGE_ICON, 0, 0, 0);
1300     PrintStructures->hNoCollateIcon =
1301       LoadImageA(COMDLG32_hInstance, "PD32_NOCOLLATE", IMAGE_ICON, 0, 0, 0);
1302
1303     /* These can be done with LoadIcon */
1304     PrintStructures->hPortraitIcon =
1305       LoadIconA(COMDLG32_hInstance, "PD32_PORTRAIT");
1306     PrintStructures->hLandscapeIcon =
1307       LoadIconA(COMDLG32_hInstance, "PD32_LANDSCAPE");
1308
1309     /* display the collate/no_collate icon */
1310     SendDlgItemMessageA(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
1311                         (LPARAM)PrintStructures->hNoCollateIcon);
1312
1313     if(PrintStructures->hCollateIcon == 0 ||
1314        PrintStructures->hNoCollateIcon == 0 ||
1315        PrintStructures->hPortraitIcon == 0 ||
1316        PrintStructures->hLandscapeIcon == 0) {
1317         ERR("no icon in resourcefile\n");
1318         COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
1319         EndDialog(hDlg, FALSE);
1320     }
1321
1322     /*
1323      * if lppd->Flags PD_SHOWHELP is specified, a HELPMESGSTRING message
1324      * must be registered and the Help button must be shown.
1325      */
1326     if (lppd->Flags & PD_SHOWHELP) {
1327         if((PrintStructures->HelpMessageID =
1328             RegisterWindowMessageA(HELPMSGSTRINGA)) == 0) {
1329             COMDLG32_SetCommDlgExtendedError(CDERR_REGISTERMSGFAIL);
1330             return FALSE;
1331         }
1332     } else
1333         PrintStructures->HelpMessageID = 0;
1334
1335     if(!(lppd->Flags &PD_PRINTSETUP)) {
1336         PrintStructures->hwndUpDown =
1337           CreateUpDownControl(WS_CHILD | WS_VISIBLE | WS_BORDER |
1338                               UDS_NOTHOUSANDS | UDS_ARROWKEYS |
1339                               UDS_ALIGNRIGHT | UDS_SETBUDDYINT, 0, 0, 0, 0,
1340                               hDlg, UPDOWN_ID, COMDLG32_hInstance,
1341                               GetDlgItem(hDlg, edt3), MAX_COPIES, 1, 1);
1342     }
1343
1344     /* FIXME: I allow more freedom than either Win95 or WinNT,
1345      *        which do not agree to what errors should be thrown or not
1346      *        in case nToPage or nFromPage is out-of-range.
1347      */
1348     if (lppd->nMaxPage < lppd->nMinPage)
1349         lppd->nMaxPage = lppd->nMinPage;
1350     if (lppd->nMinPage == lppd->nMaxPage)
1351         lppd->Flags |= PD_NOPAGENUMS;
1352     if (lppd->nToPage < lppd->nMinPage)
1353         lppd->nToPage = lppd->nMinPage;
1354     if (lppd->nToPage > lppd->nMaxPage)
1355         lppd->nToPage = lppd->nMaxPage;
1356     if (lppd->nFromPage < lppd->nMinPage)
1357         lppd->nFromPage = lppd->nMinPage;
1358     if (lppd->nFromPage > lppd->nMaxPage)
1359         lppd->nFromPage = lppd->nMaxPage;
1360
1361     /* if we have the combo box, fill it */
1362     if (GetDlgItem(hDlg,comboID)) {
1363         /* Fill Combobox
1364          */
1365         pdn = GlobalLock(lppd->hDevNames);
1366         pdm = GlobalLock(lppd->hDevMode);
1367         if(pdn)
1368             name = (char*)pdn + pdn->wDeviceOffset;
1369         else if(pdm)
1370             name = (char*)pdm->dmDeviceName;
1371         PRINTDLG_SetUpPrinterListComboA(hDlg, comboID, name);
1372         if(pdm) GlobalUnlock(lppd->hDevMode);
1373         if(pdn) GlobalUnlock(lppd->hDevNames);
1374
1375         /* Now find selected printer and update rest of dlg */
1376         name = HeapAlloc(GetProcessHeap(),0,256);
1377         if (GetDlgItemTextA(hDlg, comboID, name, 255))
1378             PRINTDLG_ChangePrinterA(hDlg, name, PrintStructures);
1379         HeapFree(GetProcessHeap(),0,name);
1380     } else {
1381         /* else use default printer */
1382         char name[200];
1383         DWORD dwBufLen = sizeof(name);
1384         BOOL ret = GetDefaultPrinterA(name, &dwBufLen);
1385
1386         if (ret)
1387             PRINTDLG_ChangePrinterA(hDlg, name, PrintStructures);
1388         else
1389             FIXME("No default printer found, expect problems!\n");
1390     }
1391     return TRUE;
1392 }
1393
1394 static LRESULT PRINTDLG_WMInitDialogW(HWND hDlg, WPARAM wParam,
1395                                      PRINT_PTRW* PrintStructures)
1396 {
1397     LPPRINTDLGW lppd = PrintStructures->lpPrintDlg;
1398     DEVNAMES *pdn;
1399     DEVMODEW *pdm;
1400     WCHAR *name = NULL;
1401     UINT comboID = (lppd->Flags & PD_PRINTSETUP) ? cmb1 : cmb4;
1402
1403     /* load Collate ICONs */
1404     /* We load these with LoadImage because they are not a standard
1405        size and we don't want them rescaled */
1406     PrintStructures->hCollateIcon =
1407       LoadImageW(COMDLG32_hInstance, pd32_collateW, IMAGE_ICON, 0, 0, 0);
1408     PrintStructures->hNoCollateIcon =
1409       LoadImageW(COMDLG32_hInstance, pd32_nocollateW, IMAGE_ICON, 0, 0, 0);
1410
1411     /* These can be done with LoadIcon */
1412     PrintStructures->hPortraitIcon =
1413       LoadIconW(COMDLG32_hInstance, pd32_portraitW);
1414     PrintStructures->hLandscapeIcon =
1415       LoadIconW(COMDLG32_hInstance, pd32_landscapeW);
1416
1417     /* display the collate/no_collate icon */
1418     SendDlgItemMessageW(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
1419                         (LPARAM)PrintStructures->hNoCollateIcon);
1420
1421     if(PrintStructures->hCollateIcon == 0 ||
1422        PrintStructures->hNoCollateIcon == 0 ||
1423        PrintStructures->hPortraitIcon == 0 ||
1424        PrintStructures->hLandscapeIcon == 0) {
1425         ERR("no icon in resourcefile\n");
1426         COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
1427         EndDialog(hDlg, FALSE);
1428     }
1429
1430     /*
1431      * if lppd->Flags PD_SHOWHELP is specified, a HELPMESGSTRING message
1432      * must be registered and the Help button must be shown.
1433      */
1434     if (lppd->Flags & PD_SHOWHELP) {
1435         if((PrintStructures->HelpMessageID =
1436             RegisterWindowMessageW(HELPMSGSTRINGW)) == 0) {
1437             COMDLG32_SetCommDlgExtendedError(CDERR_REGISTERMSGFAIL);
1438             return FALSE;
1439         }
1440     } else
1441         PrintStructures->HelpMessageID = 0;
1442
1443     if(!(lppd->Flags &PD_PRINTSETUP)) {
1444         PrintStructures->hwndUpDown =
1445           CreateUpDownControl(WS_CHILD | WS_VISIBLE | WS_BORDER |
1446                               UDS_NOTHOUSANDS | UDS_ARROWKEYS |
1447                               UDS_ALIGNRIGHT | UDS_SETBUDDYINT, 0, 0, 0, 0,
1448                               hDlg, UPDOWN_ID, COMDLG32_hInstance,
1449                               GetDlgItem(hDlg, edt3), MAX_COPIES, 1, 1);
1450     }
1451
1452     /* FIXME: I allow more freedom than either Win95 or WinNT,
1453      *        which do not agree to what errors should be thrown or not
1454      *        in case nToPage or nFromPage is out-of-range.
1455      */
1456     if (lppd->nMaxPage < lppd->nMinPage)
1457         lppd->nMaxPage = lppd->nMinPage;
1458     if (lppd->nMinPage == lppd->nMaxPage)
1459         lppd->Flags |= PD_NOPAGENUMS;
1460     if (lppd->nToPage < lppd->nMinPage)
1461         lppd->nToPage = lppd->nMinPage;
1462     if (lppd->nToPage > lppd->nMaxPage)
1463         lppd->nToPage = lppd->nMaxPage;
1464     if (lppd->nFromPage < lppd->nMinPage)
1465         lppd->nFromPage = lppd->nMinPage;
1466     if (lppd->nFromPage > lppd->nMaxPage)
1467         lppd->nFromPage = lppd->nMaxPage;
1468
1469     /* if we have the combo box, fill it */
1470     if (GetDlgItem(hDlg,comboID)) {
1471         /* Fill Combobox
1472          */
1473         pdn = GlobalLock(lppd->hDevNames);
1474         pdm = GlobalLock(lppd->hDevMode);
1475         if(pdn)
1476             name = (WCHAR*)pdn + pdn->wDeviceOffset;
1477         else if(pdm)
1478             name = pdm->dmDeviceName;
1479         PRINTDLG_SetUpPrinterListComboW(hDlg, comboID, name);
1480         if(pdm) GlobalUnlock(lppd->hDevMode);
1481         if(pdn) GlobalUnlock(lppd->hDevNames);
1482
1483         /* Now find selected printer and update rest of dlg */
1484         /* ansi is ok here */
1485         name = HeapAlloc(GetProcessHeap(),0,256*sizeof(WCHAR));
1486         if (GetDlgItemTextW(hDlg, comboID, name, 255))
1487             PRINTDLG_ChangePrinterW(hDlg, name, PrintStructures);
1488         HeapFree(GetProcessHeap(),0,name);
1489     } else {
1490         /* else use default printer */
1491         WCHAR name[200];
1492         DWORD dwBufLen = sizeof(name) / sizeof(WCHAR);
1493         BOOL ret = GetDefaultPrinterW(name, &dwBufLen);
1494
1495         if (ret)
1496             PRINTDLG_ChangePrinterW(hDlg, name, PrintStructures);
1497         else
1498             FIXME("No default printer found, expect problems!\n");
1499     }
1500     return TRUE;
1501 }
1502
1503 /***********************************************************************
1504  *                              PRINTDLG_WMCommand               [internal]
1505  */
1506 static LRESULT PRINTDLG_WMCommandA(HWND hDlg, WPARAM wParam,
1507                                    LPARAM lParam, PRINT_PTRA* PrintStructures)
1508 {
1509     LPPRINTDLGA lppd = PrintStructures->lpPrintDlg;
1510     UINT PrinterComboID = (lppd->Flags & PD_PRINTSETUP) ? cmb1 : cmb4;
1511     LPDEVMODEA lpdm = PrintStructures->lpDevMode;
1512
1513     switch (LOWORD(wParam))  {
1514     case IDOK:
1515         TRACE(" OK button was hit\n");
1516         if (!PRINTDLG_UpdatePrintDlgA(hDlg, PrintStructures)) {
1517             FIXME("Update printdlg was not successful!\n");
1518             return(FALSE);
1519         }
1520         EndDialog(hDlg, TRUE);
1521         return(TRUE);
1522
1523     case IDCANCEL:
1524         TRACE(" CANCEL button was hit\n");
1525         EndDialog(hDlg, FALSE);
1526         return(FALSE);
1527
1528      case pshHelp:
1529         TRACE(" HELP button was hit\n");
1530         SendMessageA(lppd->hwndOwner, PrintStructures->HelpMessageID,
1531                                 (WPARAM) hDlg, (LPARAM) lppd);
1532         break;
1533
1534      case chx2:                         /* collate pages checkbox */
1535         if (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED)
1536             SendDlgItemMessageA(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
1537                                     (LPARAM)PrintStructures->hCollateIcon);
1538         else
1539             SendDlgItemMessageA(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
1540                                     (LPARAM)PrintStructures->hNoCollateIcon);
1541         break;
1542      case edt1:                         /* from page nr editbox */
1543      case edt2:                         /* to page nr editbox */
1544         if (HIWORD(wParam)==EN_CHANGE) {
1545             WORD nToPage;
1546             WORD nFromPage;
1547             nFromPage = GetDlgItemInt(hDlg, edt1, NULL, FALSE);
1548             nToPage   = GetDlgItemInt(hDlg, edt2, NULL, FALSE);
1549             if (nFromPage != lppd->nFromPage || nToPage != lppd->nToPage)
1550                 CheckRadioButton(hDlg, rad1, rad3, rad3);
1551         }
1552         break;
1553
1554     case edt3:
1555         if(HIWORD(wParam) == EN_CHANGE) {
1556             INT copies = GetDlgItemInt(hDlg, edt3, NULL, FALSE);
1557             if(copies <= 1)
1558                 EnableWindow(GetDlgItem(hDlg, chx2), FALSE);
1559             else
1560                 EnableWindow(GetDlgItem(hDlg, chx2), TRUE);
1561         }
1562         break;
1563
1564 #if 0
1565      case psh1:                       /* Print Setup */
1566         {
1567             PRINTDLG16  pdlg;
1568
1569             if (!PrintStructures->dlg.lpPrintDlg16) {
1570                 FIXME("The 32bit print dialog does not have this button!?\n");
1571                 break;
1572             }
1573
1574             memcpy(&pdlg,PrintStructures->dlg.lpPrintDlg16,sizeof(pdlg));
1575             pdlg.Flags |= PD_PRINTSETUP;
1576             pdlg.hwndOwner = HWND_16(hDlg);
1577             if (!PrintDlg16(&pdlg))
1578                 break;
1579         }
1580         break;
1581 #endif
1582      case psh2:                       /* Properties button */
1583        {
1584          HANDLE hPrinter;
1585          char   PrinterName[256];
1586
1587          GetDlgItemTextA(hDlg, PrinterComboID, PrinterName, 255);
1588          if (!OpenPrinterA(PrinterName, &hPrinter, NULL)) {
1589              FIXME(" Call to OpenPrinter did not succeed!\n");
1590              break;
1591          }
1592          DocumentPropertiesA(hDlg, hPrinter, PrinterName,
1593                              PrintStructures->lpDevMode,
1594                              PrintStructures->lpDevMode,
1595                              DM_IN_BUFFER | DM_OUT_BUFFER | DM_IN_PROMPT);
1596          ClosePrinter(hPrinter);
1597          break;
1598        }
1599
1600     case rad1: /* Paperorientation */
1601         if (lppd->Flags & PD_PRINTSETUP)
1602         {
1603               lpdm->u1.s1.dmOrientation = DMORIENT_PORTRAIT;
1604               SendDlgItemMessageA(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1605                           (LPARAM)(PrintStructures->hPortraitIcon));
1606         }
1607         break;
1608
1609     case rad2: /* Paperorientation */
1610         if (lppd->Flags & PD_PRINTSETUP)
1611         {
1612               lpdm->u1.s1.dmOrientation = DMORIENT_LANDSCAPE;
1613               SendDlgItemMessageA(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1614                           (LPARAM)(PrintStructures->hLandscapeIcon));
1615         }
1616         break;
1617
1618     case cmb1: /* Printer Combobox in PRINT SETUP, quality combobox in PRINT16 */
1619          if (PrinterComboID != LOWORD(wParam)) {
1620              break;
1621          }
1622          /* FALLTHROUGH */
1623     case cmb4:                         /* Printer combobox */
1624          if (HIWORD(wParam)==CBN_SELCHANGE) {
1625              char   PrinterName[256];
1626              GetDlgItemTextA(hDlg, LOWORD(wParam), PrinterName, 255);
1627              PRINTDLG_ChangePrinterA(hDlg, PrinterName, PrintStructures);
1628          }
1629          break;
1630
1631     case cmb2: /* Papersize */
1632       {
1633           DWORD Sel = SendDlgItemMessageA(hDlg, cmb2, CB_GETCURSEL, 0, 0);
1634           if(Sel != CB_ERR)
1635               lpdm->u1.s1.dmPaperSize = SendDlgItemMessageA(hDlg, cmb2,
1636                                                             CB_GETITEMDATA,
1637                                                             Sel, 0);
1638       }
1639       break;
1640
1641     case cmb3: /* Bin */
1642       {
1643           DWORD Sel = SendDlgItemMessageA(hDlg, cmb3, CB_GETCURSEL, 0, 0);
1644           if(Sel != CB_ERR)
1645               lpdm->u1.s1.dmDefaultSource = SendDlgItemMessageA(hDlg, cmb3,
1646                                                           CB_GETITEMDATA, Sel,
1647                                                           0);
1648       }
1649       break;
1650     }
1651     if(lppd->Flags & PD_PRINTSETUP) {
1652         switch (LOWORD(wParam)) {
1653         case rad1:                         /* orientation */
1654         case rad2:
1655             if (IsDlgButtonChecked(hDlg, rad1) == BST_CHECKED) {
1656                 if(lpdm->u1.s1.dmOrientation != DMORIENT_PORTRAIT) {
1657                     lpdm->u1.s1.dmOrientation = DMORIENT_PORTRAIT;
1658                     SendDlgItemMessageA(hDlg, stc10, STM_SETIMAGE, IMAGE_ICON,
1659                                         (LPARAM)PrintStructures->hPortraitIcon);
1660                     SendDlgItemMessageA(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1661                                         (LPARAM)PrintStructures->hPortraitIcon);
1662                 }
1663             } else {
1664                 if(lpdm->u1.s1.dmOrientation != DMORIENT_LANDSCAPE) {
1665                     lpdm->u1.s1.dmOrientation = DMORIENT_LANDSCAPE;
1666                     SendDlgItemMessageA(hDlg, stc10, STM_SETIMAGE, IMAGE_ICON,
1667                                         (LPARAM)PrintStructures->hLandscapeIcon);
1668                     SendDlgItemMessageA(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1669                                         (LPARAM)PrintStructures->hLandscapeIcon);
1670                 }
1671             }
1672             break;
1673         }
1674     }
1675     return FALSE;
1676 }
1677
1678 static LRESULT PRINTDLG_WMCommandW(HWND hDlg, WPARAM wParam,
1679                         LPARAM lParam, PRINT_PTRW* PrintStructures)
1680 {
1681     LPPRINTDLGW lppd = PrintStructures->lpPrintDlg;
1682     UINT PrinterComboID = (lppd->Flags & PD_PRINTSETUP) ? cmb1 : cmb4;
1683     LPDEVMODEW lpdm = PrintStructures->lpDevMode;
1684
1685     switch (LOWORD(wParam))  {
1686     case IDOK:
1687         TRACE(" OK button was hit\n");
1688         if (!PRINTDLG_UpdatePrintDlgW(hDlg, PrintStructures)) {
1689             FIXME("Update printdlg was not successful!\n");
1690             return(FALSE);
1691         }
1692         EndDialog(hDlg, TRUE);
1693         return(TRUE);
1694
1695     case IDCANCEL:
1696         TRACE(" CANCEL button was hit\n");
1697         EndDialog(hDlg, FALSE);
1698         return(FALSE);
1699
1700      case pshHelp:
1701         TRACE(" HELP button was hit\n");
1702         SendMessageW(lppd->hwndOwner, PrintStructures->HelpMessageID,
1703                                 (WPARAM) hDlg, (LPARAM) lppd);
1704         break;
1705
1706      case chx2:                         /* collate pages checkbox */
1707         if (IsDlgButtonChecked(hDlg, chx2) == BST_CHECKED)
1708             SendDlgItemMessageW(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
1709                                     (LPARAM)PrintStructures->hCollateIcon);
1710         else
1711             SendDlgItemMessageW(hDlg, ico3, STM_SETIMAGE, IMAGE_ICON,
1712                                     (LPARAM)PrintStructures->hNoCollateIcon);
1713         break;
1714      case edt1:                         /* from page nr editbox */
1715      case edt2:                         /* to page nr editbox */
1716         if (HIWORD(wParam)==EN_CHANGE) {
1717             WORD nToPage;
1718             WORD nFromPage;
1719             nFromPage = GetDlgItemInt(hDlg, edt1, NULL, FALSE);
1720             nToPage   = GetDlgItemInt(hDlg, edt2, NULL, FALSE);
1721             if (nFromPage != lppd->nFromPage || nToPage != lppd->nToPage)
1722                 CheckRadioButton(hDlg, rad1, rad3, rad3);
1723         }
1724         break;
1725
1726     case edt3:
1727         if(HIWORD(wParam) == EN_CHANGE) {
1728             INT copies = GetDlgItemInt(hDlg, edt3, NULL, FALSE);
1729             if(copies <= 1)
1730                 EnableWindow(GetDlgItem(hDlg, chx2), FALSE);
1731             else
1732                 EnableWindow(GetDlgItem(hDlg, chx2), TRUE);
1733         }
1734         break;
1735
1736      case psh1:                       /* Print Setup */
1737         {
1738                 ERR("psh1 is called from 16bit code only, we should not get here.\n");
1739         }
1740         break;
1741      case psh2:                       /* Properties button */
1742        {
1743          HANDLE hPrinter;
1744          WCHAR  PrinterName[256];
1745
1746          if (!GetDlgItemTextW(hDlg, PrinterComboID, PrinterName, 255)) break;
1747          if (!OpenPrinterW(PrinterName, &hPrinter, NULL)) {
1748              FIXME(" Call to OpenPrinter did not succeed!\n");
1749              break;
1750          }
1751          DocumentPropertiesW(hDlg, hPrinter, PrinterName,
1752                              PrintStructures->lpDevMode,
1753                              PrintStructures->lpDevMode,
1754                              DM_IN_BUFFER | DM_OUT_BUFFER | DM_IN_PROMPT);
1755          ClosePrinter(hPrinter);
1756          break;
1757        }
1758
1759     case rad1: /* Paperorientation */
1760         if (lppd->Flags & PD_PRINTSETUP)
1761         {
1762               lpdm->u1.s1.dmOrientation = DMORIENT_PORTRAIT;
1763               SendDlgItemMessageW(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1764                           (LPARAM)(PrintStructures->hPortraitIcon));
1765         }
1766         break;
1767
1768     case rad2: /* Paperorientation */
1769         if (lppd->Flags & PD_PRINTSETUP)
1770         {
1771               lpdm->u1.s1.dmOrientation = DMORIENT_LANDSCAPE;
1772               SendDlgItemMessageW(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1773                           (LPARAM)(PrintStructures->hLandscapeIcon));
1774         }
1775         break;
1776
1777     case cmb1: /* Printer Combobox in PRINT SETUP */
1778          /* FALLTHROUGH */
1779     case cmb4:                         /* Printer combobox */
1780          if (HIWORD(wParam)==CBN_SELCHANGE) {
1781              WCHAR   PrinterName[256];
1782              GetDlgItemTextW(hDlg, LOWORD(wParam), PrinterName, 255);
1783              PRINTDLG_ChangePrinterW(hDlg, PrinterName, PrintStructures);
1784          }
1785          break;
1786
1787     case cmb2: /* Papersize */
1788       {
1789           DWORD Sel = SendDlgItemMessageW(hDlg, cmb2, CB_GETCURSEL, 0, 0);
1790           if(Sel != CB_ERR)
1791               lpdm->u1.s1.dmPaperSize = SendDlgItemMessageW(hDlg, cmb2,
1792                                                             CB_GETITEMDATA,
1793                                                             Sel, 0);
1794       }
1795       break;
1796
1797     case cmb3: /* Bin */
1798       {
1799           DWORD Sel = SendDlgItemMessageW(hDlg, cmb3, CB_GETCURSEL, 0, 0);
1800           if(Sel != CB_ERR)
1801               lpdm->u1.s1.dmDefaultSource = SendDlgItemMessageW(hDlg, cmb3,
1802                                                           CB_GETITEMDATA, Sel,
1803                                                           0);
1804       }
1805       break;
1806     }
1807     if(lppd->Flags & PD_PRINTSETUP) {
1808         switch (LOWORD(wParam)) {
1809         case rad1:                         /* orientation */
1810         case rad2:
1811             if (IsDlgButtonChecked(hDlg, rad1) == BST_CHECKED) {
1812                 if(lpdm->u1.s1.dmOrientation != DMORIENT_PORTRAIT) {
1813                     lpdm->u1.s1.dmOrientation = DMORIENT_PORTRAIT;
1814                     SendDlgItemMessageW(hDlg, stc10, STM_SETIMAGE, IMAGE_ICON,
1815                                         (LPARAM)PrintStructures->hPortraitIcon);
1816                     SendDlgItemMessageW(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1817                                         (LPARAM)PrintStructures->hPortraitIcon);
1818                 }
1819             } else {
1820                 if(lpdm->u1.s1.dmOrientation != DMORIENT_LANDSCAPE) {
1821                     lpdm->u1.s1.dmOrientation = DMORIENT_LANDSCAPE;
1822                     SendDlgItemMessageW(hDlg, stc10, STM_SETIMAGE, IMAGE_ICON,
1823                                         (LPARAM)PrintStructures->hLandscapeIcon);
1824                     SendDlgItemMessageW(hDlg, ico1, STM_SETIMAGE, IMAGE_ICON,
1825                                         (LPARAM)PrintStructures->hLandscapeIcon);
1826                 }
1827             }
1828             break;
1829         }
1830     }
1831     return FALSE;
1832 }
1833
1834 /***********************************************************************
1835  *           PrintDlgProcA                      [internal]
1836  */
1837 static INT_PTR CALLBACK PrintDlgProcA(HWND hDlg, UINT uMsg, WPARAM wParam,
1838                                       LPARAM lParam)
1839 {
1840     PRINT_PTRA* PrintStructures;
1841     INT_PTR res = FALSE;
1842
1843     if (uMsg!=WM_INITDIALOG) {
1844         PrintStructures = GetPropW(hDlg, printdlg_prop);
1845         if (!PrintStructures)
1846             return FALSE;
1847     } else {
1848         PrintStructures = (PRINT_PTRA*) lParam;
1849         SetPropW(hDlg, printdlg_prop, PrintStructures);
1850         if(!check_printer_setup(hDlg))
1851         {
1852             EndDialog(hDlg,FALSE);
1853             return FALSE;
1854         }
1855         res = PRINTDLG_WMInitDialog(hDlg, wParam, PrintStructures);
1856
1857         if(PrintStructures->lpPrintDlg->Flags & PD_ENABLEPRINTHOOK)
1858             res = PrintStructures->lpPrintDlg->lpfnPrintHook(
1859                 hDlg, uMsg, wParam, (LPARAM)PrintStructures->lpPrintDlg
1860             );
1861         return res;
1862     }
1863
1864     if(PrintStructures->lpPrintDlg->Flags & PD_ENABLEPRINTHOOK) {
1865         res = PrintStructures->lpPrintDlg->lpfnPrintHook(hDlg,uMsg,wParam,
1866                                                          lParam);
1867         if(res) return res;
1868     }
1869
1870     switch (uMsg) {
1871     case WM_COMMAND:
1872         return PRINTDLG_WMCommandA(hDlg, wParam, lParam, PrintStructures);
1873
1874     case WM_DESTROY:
1875         DestroyIcon(PrintStructures->hCollateIcon);
1876         DestroyIcon(PrintStructures->hNoCollateIcon);
1877         DestroyIcon(PrintStructures->hPortraitIcon);
1878         DestroyIcon(PrintStructures->hLandscapeIcon);
1879         if(PrintStructures->hwndUpDown)
1880             DestroyWindow(PrintStructures->hwndUpDown);
1881         return FALSE;
1882     }
1883     return res;
1884 }
1885
1886 static INT_PTR CALLBACK PrintDlgProcW(HWND hDlg, UINT uMsg, WPARAM wParam,
1887                                       LPARAM lParam)
1888 {
1889     PRINT_PTRW* PrintStructures;
1890     INT_PTR res = FALSE;
1891
1892     if (uMsg!=WM_INITDIALOG) {
1893         PrintStructures = GetPropW(hDlg, printdlg_prop);
1894         if (!PrintStructures)
1895             return FALSE;
1896     } else {
1897         PrintStructures = (PRINT_PTRW*) lParam;
1898         SetPropW(hDlg, printdlg_prop, PrintStructures);
1899         if(!check_printer_setup(hDlg))
1900         {
1901             EndDialog(hDlg,FALSE);
1902             return FALSE;
1903         }
1904         res = PRINTDLG_WMInitDialogW(hDlg, wParam, PrintStructures);
1905
1906         if(PrintStructures->lpPrintDlg->Flags & PD_ENABLEPRINTHOOK)
1907             res = PrintStructures->lpPrintDlg->lpfnPrintHook(hDlg, uMsg, wParam, (LPARAM)PrintStructures->lpPrintDlg);
1908         return res;
1909     }
1910
1911     if(PrintStructures->lpPrintDlg->Flags & PD_ENABLEPRINTHOOK) {
1912         res = PrintStructures->lpPrintDlg->lpfnPrintHook(hDlg,uMsg,wParam, lParam);
1913         if(res) return res;
1914     }
1915
1916     switch (uMsg) {
1917     case WM_COMMAND:
1918         return PRINTDLG_WMCommandW(hDlg, wParam, lParam, PrintStructures);
1919
1920     case WM_DESTROY:
1921         DestroyIcon(PrintStructures->hCollateIcon);
1922         DestroyIcon(PrintStructures->hNoCollateIcon);
1923         DestroyIcon(PrintStructures->hPortraitIcon);
1924         DestroyIcon(PrintStructures->hLandscapeIcon);
1925         if(PrintStructures->hwndUpDown)
1926             DestroyWindow(PrintStructures->hwndUpDown);
1927         return FALSE;
1928     }
1929     return res;
1930 }
1931
1932 /************************************************************
1933  *
1934  *      PRINTDLG_GetDlgTemplate
1935  *
1936  */
1937 static HGLOBAL PRINTDLG_GetDlgTemplateA(const PRINTDLGA *lppd)
1938 {
1939     HRSRC hResInfo;
1940     HGLOBAL hDlgTmpl;
1941
1942     if (lppd->Flags & PD_PRINTSETUP) {
1943         if(lppd->Flags & PD_ENABLESETUPTEMPLATEHANDLE) {
1944             hDlgTmpl = lppd->hSetupTemplate;
1945         } else if(lppd->Flags & PD_ENABLESETUPTEMPLATE) {
1946             hResInfo = FindResourceA(lppd->hInstance,
1947                                      lppd->lpSetupTemplateName, (LPSTR)RT_DIALOG);
1948             hDlgTmpl = LoadResource(lppd->hInstance, hResInfo);
1949         } else {
1950             hResInfo = FindResourceA(COMDLG32_hInstance, "PRINT32_SETUP",
1951                                      (LPSTR)RT_DIALOG);
1952             hDlgTmpl = LoadResource(COMDLG32_hInstance, hResInfo);
1953         }
1954     } else {
1955         if(lppd->Flags & PD_ENABLEPRINTTEMPLATEHANDLE) {
1956             hDlgTmpl = lppd->hPrintTemplate;
1957         } else if(lppd->Flags & PD_ENABLEPRINTTEMPLATE) {
1958             hResInfo = FindResourceA(lppd->hInstance,
1959                                      lppd->lpPrintTemplateName,
1960                                      (LPSTR)RT_DIALOG);
1961             hDlgTmpl = LoadResource(lppd->hInstance, hResInfo);
1962         } else {
1963             hResInfo = FindResourceA(COMDLG32_hInstance, "PRINT32",
1964                                      (LPSTR)RT_DIALOG);
1965             hDlgTmpl = LoadResource(COMDLG32_hInstance, hResInfo);
1966         }
1967     }
1968     return hDlgTmpl;
1969 }
1970
1971 static HGLOBAL PRINTDLG_GetDlgTemplateW(const PRINTDLGW *lppd)
1972 {
1973     HRSRC hResInfo;
1974     HGLOBAL hDlgTmpl;
1975     static const WCHAR xpsetup[] = { 'P','R','I','N','T','3','2','_','S','E','T','U','P',0};
1976     static const WCHAR xprint[] = { 'P','R','I','N','T','3','2',0};
1977
1978     if (lppd->Flags & PD_PRINTSETUP) {
1979         if(lppd->Flags & PD_ENABLESETUPTEMPLATEHANDLE) {
1980             hDlgTmpl = lppd->hSetupTemplate;
1981         } else if(lppd->Flags & PD_ENABLESETUPTEMPLATE) {
1982             hResInfo = FindResourceW(lppd->hInstance,
1983                                      lppd->lpSetupTemplateName, (LPWSTR)RT_DIALOG);
1984             hDlgTmpl = LoadResource(lppd->hInstance, hResInfo);
1985         } else {
1986             hResInfo = FindResourceW(COMDLG32_hInstance, xpsetup, (LPWSTR)RT_DIALOG);
1987             hDlgTmpl = LoadResource(COMDLG32_hInstance, hResInfo);
1988         }
1989     } else {
1990         if(lppd->Flags & PD_ENABLEPRINTTEMPLATEHANDLE) {
1991             hDlgTmpl = lppd->hPrintTemplate;
1992         } else if(lppd->Flags & PD_ENABLEPRINTTEMPLATE) {
1993             hResInfo = FindResourceW(lppd->hInstance,
1994                                      lppd->lpPrintTemplateName,
1995                                      (LPWSTR)RT_DIALOG);
1996             hDlgTmpl = LoadResource(lppd->hInstance, hResInfo);
1997         } else {
1998             hResInfo = FindResourceW(COMDLG32_hInstance, xprint, (LPWSTR)RT_DIALOG);
1999             hDlgTmpl = LoadResource(COMDLG32_hInstance, hResInfo);
2000         }
2001     }
2002     return hDlgTmpl;
2003 }
2004
2005 /***********************************************************************
2006  *
2007  *      PRINTDLG_CreateDC
2008  *
2009  */
2010 static BOOL PRINTDLG_CreateDCA(LPPRINTDLGA lppd)
2011 {
2012     DEVNAMES *pdn = GlobalLock(lppd->hDevNames);
2013     DEVMODEA *pdm = GlobalLock(lppd->hDevMode);
2014
2015     if(lppd->Flags & PD_RETURNDC) {
2016         lppd->hDC = CreateDCA((char*)pdn + pdn->wDriverOffset,
2017                               (char*)pdn + pdn->wDeviceOffset,
2018                               (char*)pdn + pdn->wOutputOffset,
2019                               pdm );
2020     } else if(lppd->Flags & PD_RETURNIC) {
2021         lppd->hDC = CreateICA((char*)pdn + pdn->wDriverOffset,
2022                               (char*)pdn + pdn->wDeviceOffset,
2023                               (char*)pdn + pdn->wOutputOffset,
2024                               pdm );
2025     }
2026     GlobalUnlock(lppd->hDevNames);
2027     GlobalUnlock(lppd->hDevMode);
2028     return lppd->hDC ? TRUE : FALSE;
2029 }
2030
2031 static BOOL PRINTDLG_CreateDCW(LPPRINTDLGW lppd)
2032 {
2033     DEVNAMES *pdn = GlobalLock(lppd->hDevNames);
2034     DEVMODEW *pdm = GlobalLock(lppd->hDevMode);
2035
2036     if(lppd->Flags & PD_RETURNDC) {
2037         lppd->hDC = CreateDCW((WCHAR*)pdn + pdn->wDriverOffset,
2038                               (WCHAR*)pdn + pdn->wDeviceOffset,
2039                               (WCHAR*)pdn + pdn->wOutputOffset,
2040                               pdm );
2041     } else if(lppd->Flags & PD_RETURNIC) {
2042         lppd->hDC = CreateICW((WCHAR*)pdn + pdn->wDriverOffset,
2043                               (WCHAR*)pdn + pdn->wDeviceOffset,
2044                               (WCHAR*)pdn + pdn->wOutputOffset,
2045                               pdm );
2046     }
2047     GlobalUnlock(lppd->hDevNames);
2048     GlobalUnlock(lppd->hDevMode);
2049     return lppd->hDC ? TRUE : FALSE;
2050 }
2051
2052 /***********************************************************************
2053  *           PrintDlgA   (COMDLG32.@)
2054  *
2055  *  Displays the PRINT dialog box, which enables the user to specify
2056  *  specific properties of the print job.
2057  *
2058  * PARAMS
2059  *  lppd  [IO] ptr to PRINTDLG32 struct
2060  *
2061  * RETURNS
2062  *  nonzero if the user pressed the OK button
2063  *  zero    if the user cancelled the window or an error occurred
2064  *
2065  * BUGS
2066  *  PrintDlg:
2067  *  * The Collate Icons do not display, even though they are in the code.
2068  *  * The Properties Button(s) should call DocumentPropertiesA().
2069  */
2070
2071 BOOL WINAPI PrintDlgA(LPPRINTDLGA lppd)
2072 {
2073     BOOL      bRet = FALSE;
2074     LPVOID    ptr;
2075     HINSTANCE hInst;
2076
2077     if (!lppd)
2078     {
2079         COMDLG32_SetCommDlgExtendedError(CDERR_INITIALIZATION);
2080         return FALSE;
2081     }
2082
2083     if(TRACE_ON(commdlg)) {
2084         char flagstr[1000] = "";
2085         const struct pd_flags *pflag = pd_flags;
2086         for( ; pflag->name; pflag++) {
2087             if(lppd->Flags & pflag->flag)
2088                 strcat(flagstr, pflag->name);
2089         }
2090         TRACE("(%p): hwndOwner = %p, hDevMode = %p, hDevNames = %p\n"
2091               "pp. %d-%d, min p %d, max p %d, copies %d, hinst %p\n"
2092               "flags %08x (%s)\n",
2093               lppd, lppd->hwndOwner, lppd->hDevMode, lppd->hDevNames,
2094               lppd->nFromPage, lppd->nToPage, lppd->nMinPage, lppd->nMaxPage,
2095               lppd->nCopies, lppd->hInstance, lppd->Flags, flagstr);
2096     }
2097
2098     if(lppd->lStructSize != sizeof(PRINTDLGA)) {
2099         WARN("structure size failure !!!\n");
2100         COMDLG32_SetCommDlgExtendedError(CDERR_STRUCTSIZE);
2101         return FALSE;
2102     }
2103
2104     if(lppd->Flags & PD_RETURNDEFAULT) {
2105         PRINTER_INFO_2A *pbuf;
2106         DRIVER_INFO_3A  *dbuf;
2107         HANDLE hprn;
2108         DWORD needed;
2109
2110         if(lppd->hDevMode || lppd->hDevNames) {
2111             WARN("hDevMode or hDevNames non-zero for PD_RETURNDEFAULT\n");
2112             COMDLG32_SetCommDlgExtendedError(PDERR_RETDEFFAILURE);
2113             return FALSE;
2114         }
2115         if(!PRINTDLG_OpenDefaultPrinter(&hprn)) {
2116             WARN("Can't find default printer\n");
2117             COMDLG32_SetCommDlgExtendedError(PDERR_NODEFAULTPRN);
2118             return FALSE;
2119         }
2120
2121         GetPrinterA(hprn, 2, NULL, 0, &needed);
2122         pbuf = HeapAlloc(GetProcessHeap(), 0, needed);
2123         GetPrinterA(hprn, 2, (LPBYTE)pbuf, needed, &needed);
2124
2125         GetPrinterDriverA(hprn, NULL, 3, NULL, 0, &needed);
2126         dbuf = HeapAlloc(GetProcessHeap(),0,needed);
2127         if (!GetPrinterDriverA(hprn, NULL, 3, (LPBYTE)dbuf, needed, &needed)) {
2128             ERR("GetPrinterDriverA failed, le %d, fix your config for printer %s!\n",
2129                 GetLastError(),pbuf->pPrinterName);
2130             HeapFree(GetProcessHeap(), 0, dbuf);
2131             HeapFree(GetProcessHeap(), 0, pbuf);
2132             COMDLG32_SetCommDlgExtendedError(PDERR_RETDEFFAILURE);
2133             return FALSE;
2134         }
2135         ClosePrinter(hprn);
2136
2137         PRINTDLG_CreateDevNames(&(lppd->hDevNames),
2138                                   dbuf->pDriverPath,
2139                                   pbuf->pPrinterName,
2140                                   pbuf->pPortName);
2141         lppd->hDevMode = GlobalAlloc(GMEM_MOVEABLE, pbuf->pDevMode->dmSize +
2142                                      pbuf->pDevMode->dmDriverExtra);
2143         ptr = GlobalLock(lppd->hDevMode);
2144         memcpy(ptr, pbuf->pDevMode, pbuf->pDevMode->dmSize +
2145                pbuf->pDevMode->dmDriverExtra);
2146         GlobalUnlock(lppd->hDevMode);
2147         HeapFree(GetProcessHeap(), 0, pbuf);
2148         HeapFree(GetProcessHeap(), 0, dbuf);
2149         bRet = TRUE;
2150     } else {
2151         HGLOBAL hDlgTmpl;
2152         PRINT_PTRA *PrintStructures;
2153
2154     /* load Dialog resources,
2155      * depending on Flags indicates Print32 or Print32_setup dialog
2156      */
2157         hDlgTmpl = PRINTDLG_GetDlgTemplateA(lppd);
2158         if (!hDlgTmpl) {
2159             COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
2160             return FALSE;
2161         }
2162         ptr = LockResource( hDlgTmpl );
2163         if (!ptr) {
2164             COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
2165             return FALSE;
2166         }
2167
2168         PrintStructures = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
2169                                     sizeof(PRINT_PTRA));
2170         PrintStructures->lpPrintDlg = lppd;
2171
2172         /* and create & process the dialog .
2173          * -1 is failure, 0 is broken hwnd, everything else is ok.
2174          */
2175         hInst = COMDLG32_hInstance;
2176         if (lppd->Flags & (PD_ENABLESETUPTEMPLATE | PD_ENABLEPRINTTEMPLATE)) hInst = lppd->hInstance;
2177         bRet = (0<DialogBoxIndirectParamA(hInst, ptr, lppd->hwndOwner,
2178                                            PrintDlgProcA,
2179                                            (LPARAM)PrintStructures));
2180
2181         if(bRet) {
2182             DEVMODEA *lpdm = PrintStructures->lpDevMode, *lpdmReturn;
2183             PRINTER_INFO_2A *pi = PrintStructures->lpPrinterInfo;
2184             DRIVER_INFO_3A *di = PrintStructures->lpDriverInfo;
2185
2186             if (lppd->hDevMode == 0) {
2187                 TRACE(" No hDevMode yet... Need to create my own\n");
2188                 lppd->hDevMode = GlobalAlloc(GMEM_MOVEABLE,
2189                                         lpdm->dmSize + lpdm->dmDriverExtra);
2190             } else {
2191                 lppd->hDevMode = GlobalReAlloc(lppd->hDevMode,
2192                                                lpdm->dmSize + lpdm->dmDriverExtra,
2193                                                GMEM_MOVEABLE);
2194             }
2195             lpdmReturn = GlobalLock(lppd->hDevMode);
2196             memcpy(lpdmReturn, lpdm, lpdm->dmSize + lpdm->dmDriverExtra);
2197
2198             PRINTDLG_CreateDevNames(&(lppd->hDevNames),
2199                     di->pDriverPath,
2200                     pi->pPrinterName,
2201                     pi->pPortName
2202             );
2203             GlobalUnlock(lppd->hDevMode);
2204         }
2205         HeapFree(GetProcessHeap(), 0, PrintStructures->lpDevMode);
2206         HeapFree(GetProcessHeap(), 0, PrintStructures->lpPrinterInfo);
2207         HeapFree(GetProcessHeap(), 0, PrintStructures->lpDriverInfo);
2208         HeapFree(GetProcessHeap(), 0, PrintStructures);
2209     }
2210     if(bRet && (lppd->Flags & PD_RETURNDC || lppd->Flags & PD_RETURNIC))
2211         bRet = PRINTDLG_CreateDCA(lppd);
2212
2213     TRACE("exit! (%d)\n", bRet);
2214     return bRet;
2215 }
2216
2217 /***********************************************************************
2218  *           PrintDlgW   (COMDLG32.@)
2219  *
2220  * See PrintDlgA.
2221  */
2222 BOOL WINAPI PrintDlgW(LPPRINTDLGW lppd)
2223 {
2224     BOOL      bRet = FALSE;
2225     LPVOID    ptr;
2226     HINSTANCE hInst;
2227
2228     if (!lppd)
2229     {
2230         COMDLG32_SetCommDlgExtendedError(CDERR_INITIALIZATION);
2231         return FALSE;
2232     }
2233
2234     if(TRACE_ON(commdlg)) {
2235         char flagstr[1000] = "";
2236         const struct pd_flags *pflag = pd_flags;
2237         for( ; pflag->name; pflag++) {
2238             if(lppd->Flags & pflag->flag)
2239                 strcat(flagstr, pflag->name);
2240         }
2241         TRACE("(%p): hwndOwner = %p, hDevMode = %p, hDevNames = %p\n"
2242               "pp. %d-%d, min p %d, max p %d, copies %d, hinst %p\n"
2243               "flags %08x (%s)\n",
2244               lppd, lppd->hwndOwner, lppd->hDevMode, lppd->hDevNames,
2245               lppd->nFromPage, lppd->nToPage, lppd->nMinPage, lppd->nMaxPage,
2246               lppd->nCopies, lppd->hInstance, lppd->Flags, flagstr);
2247     }
2248
2249     if(lppd->lStructSize != sizeof(PRINTDLGW)) {
2250         WARN("structure size failure !!!\n");
2251         COMDLG32_SetCommDlgExtendedError(CDERR_STRUCTSIZE);
2252         return FALSE;
2253     }
2254
2255     if(lppd->Flags & PD_RETURNDEFAULT) {
2256         PRINTER_INFO_2W *pbuf;
2257         DRIVER_INFO_3W  *dbuf;
2258         HANDLE hprn;
2259         DWORD needed;
2260
2261         if(lppd->hDevMode || lppd->hDevNames) {
2262             WARN("hDevMode or hDevNames non-zero for PD_RETURNDEFAULT\n");
2263             COMDLG32_SetCommDlgExtendedError(PDERR_RETDEFFAILURE);
2264             return FALSE;
2265         }
2266         if(!PRINTDLG_OpenDefaultPrinter(&hprn)) {
2267             WARN("Can't find default printer\n");
2268             COMDLG32_SetCommDlgExtendedError(PDERR_NODEFAULTPRN);
2269             return FALSE;
2270         }
2271
2272         GetPrinterW(hprn, 2, NULL, 0, &needed);
2273         pbuf = HeapAlloc(GetProcessHeap(), 0, needed);
2274         GetPrinterW(hprn, 2, (LPBYTE)pbuf, needed, &needed);
2275
2276         GetPrinterDriverW(hprn, NULL, 3, NULL, 0, &needed);
2277         dbuf = HeapAlloc(GetProcessHeap(),0,needed);
2278         if (!GetPrinterDriverW(hprn, NULL, 3, (LPBYTE)dbuf, needed, &needed)) {
2279             ERR("GetPrinterDriverA failed, le %d, fix your config for printer %s!\n",
2280                 GetLastError(),debugstr_w(pbuf->pPrinterName));
2281             HeapFree(GetProcessHeap(), 0, dbuf);
2282             HeapFree(GetProcessHeap(), 0, pbuf);
2283             COMDLG32_SetCommDlgExtendedError(PDERR_RETDEFFAILURE);
2284             return FALSE;
2285         }
2286         ClosePrinter(hprn);
2287
2288         PRINTDLG_CreateDevNamesW(&(lppd->hDevNames),
2289                                   dbuf->pDriverPath,
2290                                   pbuf->pPrinterName,
2291                                   pbuf->pPortName);
2292         lppd->hDevMode = GlobalAlloc(GMEM_MOVEABLE, pbuf->pDevMode->dmSize +
2293                                      pbuf->pDevMode->dmDriverExtra);
2294         ptr = GlobalLock(lppd->hDevMode);
2295         memcpy(ptr, pbuf->pDevMode, pbuf->pDevMode->dmSize +
2296                pbuf->pDevMode->dmDriverExtra);
2297         GlobalUnlock(lppd->hDevMode);
2298         HeapFree(GetProcessHeap(), 0, pbuf);
2299         HeapFree(GetProcessHeap(), 0, dbuf);
2300         bRet = TRUE;
2301     } else {
2302         HGLOBAL hDlgTmpl;
2303         PRINT_PTRW *PrintStructures;
2304
2305     /* load Dialog resources,
2306      * depending on Flags indicates Print32 or Print32_setup dialog
2307      */
2308         hDlgTmpl = PRINTDLG_GetDlgTemplateW(lppd);
2309         if (!hDlgTmpl) {
2310             COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
2311             return FALSE;
2312         }
2313         ptr = LockResource( hDlgTmpl );
2314         if (!ptr) {
2315             COMDLG32_SetCommDlgExtendedError(CDERR_LOADRESFAILURE);
2316             return FALSE;
2317         }
2318
2319         PrintStructures = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
2320                                     sizeof(PRINT_PTRW));
2321         PrintStructures->lpPrintDlg = lppd;
2322
2323         /* and create & process the dialog .
2324          * -1 is failure, 0 is broken hwnd, everything else is ok.
2325          */
2326         hInst = COMDLG32_hInstance;
2327         if (lppd->Flags & (PD_ENABLESETUPTEMPLATE | PD_ENABLEPRINTTEMPLATE)) hInst = lppd->hInstance;
2328         bRet = (0<DialogBoxIndirectParamW(hInst, ptr, lppd->hwndOwner,
2329                                            PrintDlgProcW,
2330                                            (LPARAM)PrintStructures));
2331
2332         if(bRet) {
2333             DEVMODEW *lpdm = PrintStructures->lpDevMode, *lpdmReturn;
2334             PRINTER_INFO_2W *pi = PrintStructures->lpPrinterInfo;
2335             DRIVER_INFO_3W *di = PrintStructures->lpDriverInfo;
2336
2337             if (lppd->hDevMode == 0) {
2338                 TRACE(" No hDevMode yet... Need to create my own\n");
2339                 lppd->hDevMode = GlobalAlloc(GMEM_MOVEABLE,
2340                                         lpdm->dmSize + lpdm->dmDriverExtra);
2341             } else {
2342                 WORD locks;
2343                 if((locks = (GlobalFlags(lppd->hDevMode) & GMEM_LOCKCOUNT))) {
2344                     WARN("hDevMode has %d locks on it. Unlocking it now\n", locks);
2345                     while(locks--) {
2346                         GlobalUnlock(lppd->hDevMode);
2347                         TRACE("Now got %d locks\n", locks);
2348                     }
2349                 }
2350                 lppd->hDevMode = GlobalReAlloc(lppd->hDevMode,
2351                                                lpdm->dmSize + lpdm->dmDriverExtra,
2352                                                GMEM_MOVEABLE);
2353             }
2354             lpdmReturn = GlobalLock(lppd->hDevMode);
2355             memcpy(lpdmReturn, lpdm, lpdm->dmSize + lpdm->dmDriverExtra);
2356
2357             if (lppd->hDevNames != 0) {
2358                 WORD locks;
2359                 if((locks = (GlobalFlags(lppd->hDevNames) & GMEM_LOCKCOUNT))) {
2360                     WARN("hDevNames has %d locks on it. Unlocking it now\n", locks);
2361                     while(locks--)
2362                         GlobalUnlock(lppd->hDevNames);
2363                 }
2364             }
2365             PRINTDLG_CreateDevNamesW(&(lppd->hDevNames),
2366                     di->pDriverPath,
2367                     pi->pPrinterName,
2368                     pi->pPortName
2369             );
2370             GlobalUnlock(lppd->hDevMode);
2371         }
2372         HeapFree(GetProcessHeap(), 0, PrintStructures->lpDevMode);
2373         HeapFree(GetProcessHeap(), 0, PrintStructures->lpPrinterInfo);
2374         HeapFree(GetProcessHeap(), 0, PrintStructures->lpDriverInfo);
2375         HeapFree(GetProcessHeap(), 0, PrintStructures);
2376     }
2377     if(bRet && (lppd->Flags & PD_RETURNDC || lppd->Flags & PD_RETURNIC))
2378         bRet = PRINTDLG_CreateDCW(lppd);
2379
2380     TRACE("exit! (%d)\n", bRet);
2381     return bRet;
2382 }
2383
2384 /***********************************************************************
2385  *
2386  *          PageSetupDlg
2387  * rad1 - portrait
2388  * rad2 - landscape
2389  * cmb1 - printer select (not in standard dialog template)
2390  * cmb2 - paper size
2391  * cmb3 - source (tray?)
2392  * edt4 - border left
2393  * edt5 - border top
2394  * edt6 - border right
2395  * edt7 - border bottom
2396  * psh3 - "Printer..."
2397  */
2398
2399 typedef struct
2400 {
2401     BOOL unicode;
2402     union
2403     {
2404         LPPAGESETUPDLGA dlga;
2405         LPPAGESETUPDLGW dlgw;
2406     } u;
2407     HWND hDlg;                /* Page Setup dialog handle */
2408     RECT rtDrawRect;          /* Drawing rect for page */
2409 } pagesetup_data;
2410
2411 static inline DWORD pagesetup_get_flags(const pagesetup_data *data)
2412 {
2413     return data->u.dlgw->Flags;
2414 }
2415
2416 static inline BOOL is_metric(const pagesetup_data *data)
2417 {
2418     return pagesetup_get_flags(data) & PSD_INHUNDREDTHSOFMILLIMETERS;
2419 }
2420
2421 static inline LONG tenths_mm_to_size(const pagesetup_data *data, LONG size)
2422 {
2423     if (is_metric(data))
2424         return 10 * size;
2425     else
2426         return 10 * size * 100 / 254;
2427 }
2428
2429 static inline LONG thousandths_inch_to_size(const pagesetup_data *data, LONG size)
2430 {
2431     if (is_metric(data))
2432         return size * 254 / 100;
2433     else
2434         return size;
2435 }
2436
2437 static WCHAR get_decimal_sep(void)
2438 {
2439     static WCHAR sep;
2440
2441     if(!sep)
2442     {
2443         WCHAR buf[2] = {'.',0};
2444         GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SDECIMAL, buf, sizeof(buf) / sizeof(buf[0]));
2445         sep = buf[0];
2446     }
2447     return sep;
2448 }
2449
2450 static void size2str(const pagesetup_data *data, DWORD size, LPWSTR strout)
2451 {
2452     WCHAR integer_fmt[] = {'%','d',0};
2453     WCHAR hundredths_fmt[] = {'%','d','%','c','%','0','2','d',0};
2454     WCHAR thousandths_fmt[] = {'%','d','%','c','%','0','3','d',0};
2455
2456     /* FIXME use LOCALE_SDECIMAL when the edit parsing code can cope */
2457
2458     if (is_metric(data))
2459     {
2460         if(size % 100)
2461             wsprintfW(strout, hundredths_fmt, size / 100, get_decimal_sep(), size % 100);
2462         else
2463             wsprintfW(strout, integer_fmt, size / 100);
2464     }
2465     else
2466     {
2467         if(size % 1000)
2468             wsprintfW(strout, thousandths_fmt, size / 1000, get_decimal_sep(), size % 1000);
2469         else
2470             wsprintfW(strout, integer_fmt, size / 1000);
2471
2472     }
2473 }
2474
2475 static inline BOOL is_default_metric(void)
2476 {
2477     DWORD system;
2478     GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_IMEASURE | LOCALE_RETURN_NUMBER,
2479                    (LPWSTR)&system, sizeof(system));
2480     return system == 0;
2481 }
2482
2483 /**********************************************
2484  *           rotate_rect
2485  * Cyclically permute the four members of rc
2486  * If sense is TRUE l -> t -> r -> b
2487  * otherwise        l <- t <- r <- b
2488  */
2489 static inline void rotate_rect(RECT *rc, BOOL sense)
2490 {
2491     INT tmp;
2492     if(sense)
2493     {
2494         tmp        = rc->bottom;
2495         rc->bottom = rc->right;
2496         rc->right  = rc->top;
2497         rc->top    = rc->left;
2498         rc->left   = tmp;
2499     }
2500     else
2501     {
2502         tmp        = rc->left;
2503         rc->left   = rc->top;
2504         rc->top    = rc->right;
2505         rc->right  = rc->bottom;
2506         rc->bottom = tmp;
2507     }
2508 }
2509
2510 static void pagesetup_set_orientation(pagesetup_data *data, WORD orient)
2511 {
2512     DEVMODEW *dm = GlobalLock(data->u.dlgw->hDevMode);
2513
2514     assert(orient == DMORIENT_PORTRAIT || orient == DMORIENT_LANDSCAPE);
2515
2516     if(data->unicode)
2517         dm->u1.s1.dmOrientation = orient;
2518     else
2519     {
2520         DEVMODEA *dmA = (DEVMODEA *)dm;
2521         dmA->u1.s1.dmOrientation = orient;
2522     }
2523     GlobalUnlock(data->u.dlgw->hDevMode);
2524 }
2525
2526 static WORD pagesetup_get_orientation(const pagesetup_data *data)
2527 {
2528     DEVMODEW *dm = GlobalLock(data->u.dlgw->hDevMode);
2529     WORD orient;
2530
2531     if(data->unicode)
2532         orient = dm->u1.s1.dmOrientation;
2533     else
2534     {
2535         DEVMODEA *dmA = (DEVMODEA *)dm;
2536         orient = dmA->u1.s1.dmOrientation;
2537     }
2538     GlobalUnlock(data->u.dlgw->hDevMode);
2539     return orient;
2540 }
2541
2542 static void pagesetup_set_papersize(pagesetup_data *data, WORD paper)
2543 {
2544     DEVMODEW *dm = GlobalLock(data->u.dlgw->hDevMode);
2545
2546     if(data->unicode)
2547         dm->u1.s1.dmPaperSize = paper;
2548     else
2549     {
2550         DEVMODEA *dmA = (DEVMODEA *)dm;
2551         dmA->u1.s1.dmPaperSize = paper;
2552     }
2553     GlobalUnlock(data->u.dlgw->hDevMode);
2554 }
2555
2556 static WORD pagesetup_get_papersize(const pagesetup_data *data)
2557 {
2558     DEVMODEW *dm = GlobalLock(data->u.dlgw->hDevMode);
2559     WORD paper;
2560
2561     if(data->unicode)
2562         paper = dm->u1.s1.dmPaperSize;
2563     else
2564     {
2565         DEVMODEA *dmA = (DEVMODEA *)dm;
2566         paper = dmA->u1.s1.dmPaperSize;
2567     }
2568     GlobalUnlock(data->u.dlgw->hDevMode);
2569     return paper;
2570 }
2571
2572 static void pagesetup_set_defaultsource(pagesetup_data *data, WORD source)
2573 {
2574     DEVMODEW *dm = GlobalLock(data->u.dlgw->hDevMode);
2575
2576     if(data->unicode)
2577         dm->u1.s1.dmDefaultSource = source;
2578     else
2579     {
2580         DEVMODEA *dmA = (DEVMODEA *)dm;
2581         dmA->u1.s1.dmDefaultSource = source;
2582     }
2583     GlobalUnlock(data->u.dlgw->hDevMode);
2584 }
2585
2586 typedef enum
2587 {
2588     devnames_driver_name,
2589     devnames_device_name,
2590     devnames_output_name
2591 } devnames_name;
2592
2593
2594 static inline WORD get_devname_offset(const DEVNAMES *dn, devnames_name which)
2595 {
2596     switch(which)
2597     {
2598     case devnames_driver_name: return dn->wDriverOffset;
2599     case devnames_device_name: return dn->wDeviceOffset;
2600     case devnames_output_name: return dn->wOutputOffset;
2601     }
2602     ERR("Souldn't be here\n");
2603     return 0;
2604 }
2605
2606 static WCHAR *pagesetup_get_a_devname(const pagesetup_data *data, devnames_name which)
2607 {
2608     DEVNAMES *dn;
2609     WCHAR *name;
2610
2611     dn = GlobalLock(data->u.dlgw->hDevNames);
2612     if(data->unicode)
2613         name = strdupW((WCHAR *)dn + get_devname_offset(dn, which));
2614     else
2615     {
2616         int len = MultiByteToWideChar(CP_ACP, 0, (char*)dn + get_devname_offset(dn, which), -1, NULL, 0);
2617         name = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
2618         MultiByteToWideChar(CP_ACP, 0, (char*)dn + get_devname_offset(dn, which), -1, name, len);
2619     }
2620     GlobalUnlock(data->u.dlgw->hDevNames);
2621     return name;
2622 }
2623
2624 static WCHAR *pagesetup_get_drvname(const pagesetup_data *data)
2625 {
2626     return pagesetup_get_a_devname(data, devnames_driver_name);
2627 }
2628
2629 static WCHAR *pagesetup_get_devname(const pagesetup_data *data)
2630 {
2631     return pagesetup_get_a_devname(data, devnames_device_name);
2632 }
2633
2634 static WCHAR *pagesetup_get_portname(const pagesetup_data *data)
2635 {
2636     return pagesetup_get_a_devname(data, devnames_output_name);
2637 }
2638
2639 static void pagesetup_release_a_devname(const pagesetup_data *data, WCHAR *name)
2640 {
2641     HeapFree(GetProcessHeap(), 0, name);
2642 }
2643
2644 static void pagesetup_set_devnames(pagesetup_data *data, LPCWSTR drv, LPCWSTR devname, LPCWSTR port)
2645 {
2646     DEVNAMES *dn;
2647     WCHAR def[256];
2648     DWORD len = sizeof(DEVNAMES), drv_len, dev_len, port_len;
2649
2650     if(data->unicode)
2651     {
2652         drv_len  = (strlenW(drv) + 1) * sizeof(WCHAR);
2653         dev_len  = (strlenW(devname) + 1) * sizeof(WCHAR);
2654         port_len = (strlenW(port) + 1) * sizeof(WCHAR);
2655     }
2656     else
2657     {
2658         drv_len = WideCharToMultiByte(CP_ACP, 0, drv, -1, NULL, 0, NULL, NULL);
2659         dev_len = WideCharToMultiByte(CP_ACP, 0, devname, -1, NULL, 0, NULL, NULL);
2660         port_len = WideCharToMultiByte(CP_ACP, 0, port, -1, NULL, 0, NULL, NULL);
2661     }
2662     len += drv_len + dev_len + port_len;
2663
2664     if(data->u.dlgw->hDevNames)
2665         data->u.dlgw->hDevNames = GlobalReAlloc(data->u.dlgw->hDevNames, len, GMEM_MOVEABLE);
2666     else
2667         data->u.dlgw->hDevNames = GlobalAlloc(GMEM_MOVEABLE, len);
2668
2669     dn = GlobalLock(data->u.dlgw->hDevNames);
2670
2671     if(data->unicode)
2672     {
2673         WCHAR *ptr = (WCHAR *)(dn + 1);
2674         len = sizeof(DEVNAMES) / sizeof(WCHAR);
2675         dn->wDriverOffset = len;
2676         strcpyW(ptr, drv);
2677         ptr += drv_len / sizeof(WCHAR);
2678         len += drv_len / sizeof(WCHAR);
2679         dn->wDeviceOffset = len;
2680         strcpyW(ptr, devname);
2681         ptr += dev_len / sizeof(WCHAR);
2682         len += dev_len / sizeof(WCHAR);
2683         dn->wOutputOffset = len;
2684         strcpyW(ptr, port);
2685     }
2686     else
2687     {
2688         char *ptr = (char *)(dn + 1);
2689         len = sizeof(DEVNAMES);
2690         dn->wDriverOffset = len;
2691         WideCharToMultiByte(CP_ACP, 0, drv, -1, ptr, drv_len, NULL, NULL);
2692         ptr += drv_len;
2693         len += drv_len;
2694         dn->wDeviceOffset = len;
2695         WideCharToMultiByte(CP_ACP, 0, devname, -1, ptr, dev_len, NULL, NULL);
2696         ptr += dev_len;
2697         len += dev_len;
2698         dn->wOutputOffset = len;
2699         WideCharToMultiByte(CP_ACP, 0, port, -1, ptr, port_len, NULL, NULL);
2700     }
2701
2702     dn->wDefault = 0;
2703     len = sizeof(def) / sizeof(def[0]);
2704     GetDefaultPrinterW(def, &len);
2705     if(!lstrcmpW(def, devname))
2706         dn->wDefault = 1;
2707
2708     GlobalUnlock(data->u.dlgw->hDevNames);
2709 }
2710
2711 static DEVMODEW *pagesetup_get_devmode(const pagesetup_data *data)
2712 {
2713     DEVMODEW *dm = GlobalLock(data->u.dlgw->hDevMode);
2714     DEVMODEW *ret;
2715
2716     if(data->unicode)
2717     {
2718         /* We make a copy even in the unicode case because the ptr
2719            may get passed back to us in pagesetup_set_devmode. */
2720         ret = HeapAlloc(GetProcessHeap(), 0, dm->dmSize + dm->dmDriverExtra);
2721         memcpy(ret, dm, dm->dmSize + dm->dmDriverExtra);
2722     }
2723     else
2724         ret = GdiConvertToDevmodeW((DEVMODEA *)dm);
2725
2726     GlobalUnlock(data->u.dlgw->hDevMode);
2727     return ret;
2728 }
2729
2730 static void pagesetup_release_devmode(const pagesetup_data *data, DEVMODEW *dm)
2731 {
2732     HeapFree(GetProcessHeap(), 0, dm);
2733 }
2734
2735 static void pagesetup_set_devmode(pagesetup_data *data, DEVMODEW *dm)
2736 {
2737     DEVMODEA *dmA = NULL;
2738     void *src, *dst;
2739     DWORD size;
2740
2741     if(data->unicode)
2742     {
2743         size = dm->dmSize + dm->dmDriverExtra;
2744         src = dm;
2745     }
2746     else
2747     {
2748         dmA = convert_to_devmodeA(dm);
2749         size = dmA->dmSize + dmA->dmDriverExtra;
2750         src = dmA;
2751     }
2752
2753     if(data->u.dlgw->hDevMode)
2754         data->u.dlgw->hDevMode = GlobalReAlloc(data->u.dlgw->hDevMode, size,
2755                                                GMEM_MOVEABLE);
2756     else
2757         data->u.dlgw->hDevMode = GlobalAlloc(GMEM_MOVEABLE, size);
2758
2759     dst = GlobalLock(data->u.dlgw->hDevMode);
2760     memcpy(dst, src, size);
2761     GlobalUnlock(data->u.dlgw->hDevMode);
2762     HeapFree(GetProcessHeap(), 0, dmA);
2763 }
2764
2765 static inline POINT *pagesetup_get_papersize_pt(const pagesetup_data *data)
2766 {
2767     return &data->u.dlgw->ptPaperSize;
2768 }
2769
2770 static inline RECT *pagesetup_get_margin_rect(const pagesetup_data *data)
2771 {
2772     return &data->u.dlgw->rtMargin;
2773 }
2774
2775 typedef enum
2776 {
2777     page_setup_hook,
2778     page_paint_hook
2779 } hook_type;
2780
2781 static inline LPPAGESETUPHOOK pagesetup_get_hook(const pagesetup_data *data, hook_type which)
2782 {
2783     switch(which)
2784     {
2785     case page_setup_hook: return data->u.dlgw->lpfnPageSetupHook;
2786     case page_paint_hook: return data->u.dlgw->lpfnPagePaintHook;
2787     }
2788     return NULL;
2789 }
2790
2791 /* This should only be used in calls to hook procs so we return the ptr
2792    already cast to LPARAM */
2793 static inline LPARAM pagesetup_get_dlg_struct(const pagesetup_data *data)
2794 {
2795     return (LPARAM)data->u.dlgw;
2796 }
2797
2798 static inline void swap_point(POINT *pt)
2799 {
2800     LONG tmp = pt->x;
2801     pt->x = pt->y;
2802     pt->y = tmp;
2803 }
2804
2805 static BOOL pagesetup_update_papersize(pagesetup_data *data)
2806 {
2807     DEVMODEW *dm;
2808     LPWSTR devname, portname;
2809     int i, num;
2810     WORD *words = NULL, paperword;
2811     POINT *points = NULL;
2812     BOOL retval = FALSE;
2813
2814     dm       = pagesetup_get_devmode(data);
2815     devname  = pagesetup_get_devname(data);
2816     portname = pagesetup_get_portname(data);
2817
2818     num = DeviceCapabilitiesW(devname, portname, DC_PAPERS, NULL, dm);
2819     if (num <= 0)
2820     {
2821         FIXME("No papernames found for %s/%s\n", debugstr_w(devname), debugstr_w(portname));
2822         goto end;
2823     }
2824
2825     words = HeapAlloc(GetProcessHeap(), 0, num * sizeof(WORD));
2826     points = HeapAlloc(GetProcessHeap(), 0, num * sizeof(POINT));
2827
2828     if (num != DeviceCapabilitiesW(devname, portname, DC_PAPERS, (LPWSTR)words, dm))
2829     {
2830         FIXME("Number of returned words is not %d\n", num);
2831         goto end;
2832     }
2833
2834     if (num != DeviceCapabilitiesW(devname, portname, DC_PAPERSIZE, (LPWSTR)points, dm))
2835     {
2836         FIXME("Number of returned sizes is not %d\n", num);
2837         goto end;
2838     }
2839
2840     paperword = pagesetup_get_papersize(data);
2841
2842     for (i = 0; i < num; i++)
2843         if (words[i] == paperword)
2844             break;
2845
2846     if (i == num)
2847     {
2848         FIXME("Papersize %d not found in list?\n", paperword);
2849         goto end;
2850     }
2851
2852     /* this is _10ths_ of a millimeter */
2853     pagesetup_get_papersize_pt(data)->x = tenths_mm_to_size(data, points[i].x);
2854     pagesetup_get_papersize_pt(data)->y = tenths_mm_to_size(data, points[i].y);
2855
2856     if(pagesetup_get_orientation(data) == DMORIENT_LANDSCAPE)
2857         swap_point(pagesetup_get_papersize_pt(data));
2858
2859     retval = TRUE;
2860
2861 end:
2862     HeapFree(GetProcessHeap(), 0, words);
2863     HeapFree(GetProcessHeap(), 0, points);
2864     pagesetup_release_a_devname(data, portname);
2865     pagesetup_release_a_devname(data, devname);
2866     pagesetup_release_devmode(data, dm);
2867
2868     return retval;
2869 }
2870
2871 /**********************************************************************************************
2872  * pagesetup_change_printer
2873  *
2874  * Redefines hDevMode and hDevNames HANDLES and initialises it.
2875  *
2876  */
2877 static BOOL pagesetup_change_printer(LPWSTR name, pagesetup_data *data)
2878 {
2879     HANDLE hprn;
2880     DWORD needed;
2881     PRINTER_INFO_2W *prn_info = NULL;
2882     DRIVER_INFO_3W *drv_info = NULL;
2883     DEVMODEW *dm = NULL;
2884     BOOL retval = FALSE;
2885
2886     if(!OpenPrinterW(name, &hprn, NULL))
2887     {
2888         ERR("Can't open printer %s\n", debugstr_w(name));
2889         goto end;
2890     }
2891
2892     GetPrinterW(hprn, 2, NULL, 0, &needed);
2893     prn_info = HeapAlloc(GetProcessHeap(), 0, needed);
2894     GetPrinterW(hprn, 2, (LPBYTE)prn_info, needed, &needed);
2895     GetPrinterDriverW(hprn, NULL, 3, NULL, 0, &needed);
2896     drv_info = HeapAlloc(GetProcessHeap(), 0, needed);
2897     if(!GetPrinterDriverW(hprn, NULL, 3, (LPBYTE)drv_info, needed, &needed))
2898     {
2899         ERR("GetPrinterDriverA failed for %s, fix your config!\n", debugstr_w(prn_info->pPrinterName));
2900         goto end;
2901     }
2902     ClosePrinter(hprn);
2903
2904     needed = DocumentPropertiesW(0, 0, name, NULL, NULL, 0);
2905     if(needed == -1)
2906     {
2907         ERR("DocumentProperties fails on %s\n", debugstr_w(name));
2908         goto end;
2909     }
2910
2911     dm = HeapAlloc(GetProcessHeap(), 0, needed);
2912     DocumentPropertiesW(0, 0, name, dm, NULL, DM_OUT_BUFFER);
2913
2914     pagesetup_set_devmode(data, dm);
2915     pagesetup_set_devnames(data, drv_info->pDriverPath, prn_info->pPrinterName,
2916                            prn_info->pPortName);
2917
2918     retval = TRUE;
2919 end:
2920     HeapFree(GetProcessHeap(), 0, dm);
2921     HeapFree(GetProcessHeap(), 0, prn_info);
2922     HeapFree(GetProcessHeap(), 0, drv_info);
2923     return retval;
2924 }
2925
2926 /****************************************************************************************
2927  *  pagesetup_init_combos
2928  *
2929  *  Fills Printers, Paper and Source combos
2930  *
2931  */
2932 static void pagesetup_init_combos(HWND hDlg, pagesetup_data *data)
2933 {
2934     DEVMODEW *dm;
2935     LPWSTR devname, portname;
2936
2937     dm       = pagesetup_get_devmode(data);
2938     devname  = pagesetup_get_devname(data);
2939     portname = pagesetup_get_portname(data);
2940
2941     PRINTDLG_SetUpPrinterListComboW(hDlg, cmb1, devname);
2942     PRINTDLG_SetUpPaperComboBoxW(hDlg, cmb2, devname, portname, dm);
2943     PRINTDLG_SetUpPaperComboBoxW(hDlg, cmb3, devname, portname, dm);
2944
2945     pagesetup_release_a_devname(data, portname);
2946     pagesetup_release_a_devname(data, devname);
2947     pagesetup_release_devmode(data, dm);
2948 }
2949
2950
2951 /****************************************************************************************
2952  *  pagesetup_change_printer_dialog
2953  *
2954  *  Pops up another dialog that lets the user pick another printer.
2955  *
2956  *  For now we display the PrintDlg, this should display a striped down version of it.
2957  */
2958 static void pagesetup_change_printer_dialog(HWND hDlg, pagesetup_data *data)
2959 {
2960     PRINTDLGW prnt;
2961     LPWSTR drvname, devname, portname;
2962     DEVMODEW *tmp_dm, *dm;
2963
2964     memset(&prnt, 0, sizeof(prnt));
2965     prnt.lStructSize = sizeof(prnt);
2966     prnt.Flags     = 0;
2967     prnt.hwndOwner = hDlg;
2968
2969     drvname = pagesetup_get_drvname(data);
2970     devname = pagesetup_get_devname(data);
2971     portname = pagesetup_get_portname(data);
2972     prnt.hDevNames = 0;
2973     PRINTDLG_CreateDevNamesW(&prnt.hDevNames, drvname, devname, portname);
2974     pagesetup_release_a_devname(data, portname);
2975     pagesetup_release_a_devname(data, devname);
2976     pagesetup_release_a_devname(data, drvname);
2977
2978     tmp_dm = pagesetup_get_devmode(data);
2979     prnt.hDevMode = GlobalAlloc(GMEM_MOVEABLE, tmp_dm->dmSize + tmp_dm->dmDriverExtra);
2980     dm = GlobalLock(prnt.hDevMode);
2981     memcpy(dm, tmp_dm, tmp_dm->dmSize + tmp_dm->dmDriverExtra);
2982     GlobalUnlock(prnt.hDevMode);
2983     pagesetup_release_devmode(data, tmp_dm);
2984
2985     if (PrintDlgW(&prnt))
2986     {
2987         DEVMODEW *dm = GlobalLock(prnt.hDevMode);
2988         DEVNAMES *dn = GlobalLock(prnt.hDevNames);
2989
2990         pagesetup_set_devnames(data, (WCHAR*)dn + dn->wDriverOffset,
2991                                (WCHAR*)dn + dn->wDeviceOffset, (WCHAR *)dn + dn->wOutputOffset);
2992         pagesetup_set_devmode(data, dm);
2993         GlobalUnlock(prnt.hDevNames);
2994         GlobalUnlock(prnt.hDevMode);
2995         pagesetup_init_combos(hDlg, data);
2996     }
2997
2998     GlobalFree(prnt.hDevMode);
2999     GlobalFree(prnt.hDevNames);
3000
3001 }
3002
3003 /******************************************************************************************
3004  * pagesetup_change_preview
3005  *
3006  * Changes paper preview size / position
3007  *
3008  */
3009 static void pagesetup_change_preview(const pagesetup_data *data)
3010 {
3011     LONG width, height, x, y;
3012     RECT tmp;
3013     const int shadow = 4;
3014
3015     if(pagesetup_get_orientation(data) == DMORIENT_LANDSCAPE)
3016     {
3017         width  = data->rtDrawRect.right - data->rtDrawRect.left;
3018         height = pagesetup_get_papersize_pt(data)->y * width / pagesetup_get_papersize_pt(data)->x;
3019     }
3020     else
3021     {
3022         height = data->rtDrawRect.bottom - data->rtDrawRect.top;
3023         width  = pagesetup_get_papersize_pt(data)->x * height / pagesetup_get_papersize_pt(data)->y;
3024     }
3025     x = (data->rtDrawRect.right + data->rtDrawRect.left - width) / 2;
3026     y = (data->rtDrawRect.bottom + data->rtDrawRect.top - height) / 2;
3027     TRACE("draw rect %s x=%d, y=%d, w=%d, h=%d\n",
3028           wine_dbgstr_rect(&data->rtDrawRect), x, y, width, height);
3029
3030     MoveWindow(GetDlgItem(data->hDlg, rct2), x + width, y + shadow, shadow, height, FALSE);
3031     MoveWindow(GetDlgItem(data->hDlg, rct3), x + shadow, y + height, width, shadow, FALSE);
3032     MoveWindow(GetDlgItem(data->hDlg, rct1), x, y, width, height, FALSE);
3033
3034     tmp = data->rtDrawRect;
3035     tmp.right  += shadow;
3036     tmp.bottom += shadow;
3037     InvalidateRect(data->hDlg, &tmp, TRUE);
3038 }
3039
3040 static inline LONG *element_from_margin_id(RECT *rc, WORD id)
3041 {
3042     switch(id)
3043     {
3044     case edt4: return &rc->left;
3045     case edt5: return &rc->top;
3046     case edt6: return &rc->right;
3047     case edt7: return &rc->bottom;
3048     }
3049     return NULL;
3050 }
3051
3052 static void update_margin_edits(HWND hDlg, const pagesetup_data *data, WORD id)
3053 {
3054     WCHAR str[100];
3055     WORD idx;
3056
3057     for(idx = edt4; idx <= edt7; idx++)
3058     {
3059         if(id == 0 || id == idx)
3060         {
3061             size2str(data, *element_from_margin_id(pagesetup_get_margin_rect(data), idx), str);
3062             SetDlgItemTextW(hDlg, idx, str);
3063         }
3064     }
3065 }
3066
3067 static void margin_edit_notification(HWND hDlg, const pagesetup_data *data, WORD msg, WORD id)
3068 {
3069     switch (msg)
3070     {
3071     case EN_CHANGE:
3072       {
3073         WCHAR buf[10];
3074         LONG val = 0;
3075         LONG *value = element_from_margin_id(pagesetup_get_margin_rect(data), id);
3076
3077         if (GetDlgItemTextW(hDlg, id, buf, sizeof(buf) / sizeof(buf[0])) != 0)
3078         {
3079             WCHAR *end;
3080             WCHAR decimal = get_decimal_sep();
3081
3082             val = strtolW(buf, &end, 10);
3083             if(end != buf || *end == decimal)
3084             {
3085                 int mult = is_metric(data) ? 100 : 1000;
3086                 val *= mult;
3087                 if(*end == decimal)
3088                 {
3089                     while(mult > 1)
3090                     {
3091                         end++;
3092                         mult /= 10;
3093                         if(isdigitW(*end))
3094                             val += (*end - '0') * mult;
3095                         else
3096                             break;
3097                     }
3098                 }
3099             }
3100         }
3101         *value = val;
3102         return;
3103       }
3104
3105     case EN_KILLFOCUS:
3106         update_margin_edits(hDlg, data, id);
3107         return;
3108     }
3109 }
3110
3111 static void set_margin_groupbox_title(HWND hDlg, const pagesetup_data *data)
3112 {
3113     WCHAR title[256];
3114
3115     if(LoadStringW(COMDLG32_hInstance, is_metric(data) ? PD32_MARGINS_IN_MILLIMETERS : PD32_MARGINS_IN_INCHES,
3116                    title, sizeof(title)/sizeof(title[0])))
3117         SetDlgItemTextW(hDlg, grp4, title);
3118 }
3119
3120 static void pagesetup_update_orientation_buttons(HWND hDlg, const pagesetup_data *data)
3121 {
3122     if (pagesetup_get_orientation(data) == DMORIENT_LANDSCAPE)
3123         CheckRadioButton(hDlg, rad1, rad2, rad2);
3124     else
3125         CheckRadioButton(hDlg, rad1, rad2, rad1);
3126 }
3127
3128 /****************************************************************************************
3129  *  pagesetup_printer_properties
3130  *
3131  *  Handle invocation of the 'Properties' button (not present in the default template).
3132  */
3133 static void pagesetup_printer_properties(HWND hDlg, pagesetup_data *data)
3134 {
3135     HANDLE hprn;
3136     LPWSTR devname;
3137     DEVMODEW *dm;
3138     LRESULT count;
3139     int i;
3140
3141     devname = pagesetup_get_devname(data);
3142
3143     if (!OpenPrinterW(devname, &hprn, NULL))
3144     {
3145         FIXME("Call to OpenPrinter did not succeed!\n");
3146         pagesetup_release_a_devname(data, devname);
3147         return;
3148     }
3149
3150     dm = pagesetup_get_devmode(data);
3151     DocumentPropertiesW(hDlg, hprn, devname, dm, dm, DM_IN_BUFFER | DM_OUT_BUFFER | DM_IN_PROMPT);
3152     pagesetup_set_devmode(data, dm);
3153     pagesetup_release_devmode(data, dm);
3154     pagesetup_release_a_devname(data, devname);
3155     ClosePrinter(hprn);
3156
3157     /* Changing paper */
3158     pagesetup_update_papersize(data);
3159     pagesetup_update_orientation_buttons(hDlg, data);
3160
3161     /* Changing paper preview */
3162     pagesetup_change_preview(data);
3163
3164     /* Selecting paper in combo */
3165     count = SendDlgItemMessageW(hDlg, cmb2, CB_GETCOUNT, 0, 0);
3166     if(count != CB_ERR)
3167     {
3168         WORD paperword = pagesetup_get_papersize(data);
3169         for(i = 0; i < count; i++)
3170         {
3171             if(SendDlgItemMessageW(hDlg, cmb2, CB_GETITEMDATA, i, 0) == paperword) {
3172                 SendDlgItemMessageW(hDlg, cmb2, CB_SETCURSEL, i, 0);
3173                 break;
3174             }
3175         }
3176     }
3177 }
3178
3179 /********************************************************************************
3180  * pagesetup_wm_command
3181  * process WM_COMMAND message for PageSetupDlg
3182  *
3183  * PARAMS
3184  *  hDlg        [in]    Main dialog HANDLE
3185  *  wParam      [in]    WM_COMMAND wParam
3186  *  lParam      [in]    WM_COMMAND lParam
3187  *  pda         [in/out] ptr to PageSetupDataA
3188  */
3189
3190 static BOOL pagesetup_wm_command(HWND hDlg, WPARAM wParam, LPARAM lParam, pagesetup_data *data)
3191 {
3192     WORD msg = HIWORD(wParam);
3193     WORD id  = LOWORD(wParam);
3194
3195     TRACE("loword (lparam) %d, wparam 0x%lx, lparam %08lx\n",
3196             LOWORD(lParam),wParam,lParam);
3197     switch (id)  {
3198     case IDOK:
3199         EndDialog(hDlg, TRUE);
3200         return TRUE ;
3201
3202     case IDCANCEL:
3203         EndDialog(hDlg, FALSE);
3204         return FALSE ;
3205
3206     case psh3: /* Printer... */
3207         pagesetup_change_printer_dialog(hDlg, data);
3208         return TRUE;
3209
3210     case rad1: /* Portrait */
3211     case rad2: /* Landscape */
3212         if((id == rad1 && pagesetup_get_orientation(data) == DMORIENT_LANDSCAPE) ||
3213            (id == rad2 && pagesetup_get_orientation(data) == DMORIENT_PORTRAIT))
3214         {
3215             pagesetup_set_orientation(data, (id == rad1) ? DMORIENT_PORTRAIT : DMORIENT_LANDSCAPE);
3216             pagesetup_update_papersize(data);
3217             rotate_rect(pagesetup_get_margin_rect(data), (id == rad2));
3218             update_margin_edits(hDlg, data, 0);
3219             pagesetup_change_preview(data);
3220         }
3221         break;
3222     case cmb1: /* Printer combo */
3223         if(msg == CBN_SELCHANGE)
3224         {
3225             WCHAR name[256];
3226             GetDlgItemTextW(hDlg, id, name, sizeof(name) / sizeof(name[0]));
3227             pagesetup_change_printer(name, data);
3228             pagesetup_init_combos(hDlg, data);
3229         }
3230         break;
3231     case cmb2: /* Paper combo */
3232         if(msg == CBN_SELCHANGE)
3233         {
3234             DWORD paperword = SendDlgItemMessageW(hDlg, cmb2, CB_GETITEMDATA,
3235                                                   SendDlgItemMessageW(hDlg, cmb2, CB_GETCURSEL, 0, 0), 0);
3236             if (paperword != CB_ERR)
3237             {
3238                 pagesetup_set_papersize(data, paperword);
3239                 pagesetup_update_papersize(data);
3240                 pagesetup_change_preview(data);
3241             } else
3242                 FIXME("could not get dialog text for papersize cmbbox?\n");
3243         }
3244         break;
3245     case cmb3: /* Paper Source */
3246         if(msg == CBN_SELCHANGE)
3247         {
3248             WORD source = SendDlgItemMessageW(hDlg, cmb3, CB_GETITEMDATA,
3249                                               SendDlgItemMessageW(hDlg, cmb3, CB_GETCURSEL, 0, 0), 0);
3250             pagesetup_set_defaultsource(data, source);
3251         }
3252         break;
3253     case psh2: /* Printer Properties button */
3254         pagesetup_printer_properties(hDlg, data);
3255         break;
3256     case edt4:
3257     case edt5:
3258     case edt6:
3259     case edt7:
3260         margin_edit_notification(hDlg, data, msg, id);
3261         break;
3262     }
3263     InvalidateRect(GetDlgItem(hDlg, rct1), NULL, TRUE);
3264     return FALSE;
3265 }
3266
3267 /***********************************************************************
3268  *           default_page_paint_hook
3269  * Default hook paint procedure that receives WM_PSD_* messages from the dialog box
3270  * whenever the sample page is redrawn.
3271  */
3272 static UINT_PTR default_page_paint_hook(HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam,
3273                                         const pagesetup_data *data)
3274 {
3275     LPRECT lprc = (LPRECT) lParam;
3276     HDC hdc = (HDC) wParam;
3277     HPEN hpen, holdpen;
3278     LOGFONTW lf;
3279     HFONT hfont, holdfont;
3280     INT oldbkmode;
3281     TRACE("uMsg: WM_USER+%d\n",uMsg-WM_USER);
3282     /* Call user paint hook if enable */
3283     if (pagesetup_get_flags(data) & PSD_ENABLEPAGEPAINTHOOK)
3284         if (pagesetup_get_hook(data, page_paint_hook)(hwndDlg, uMsg, wParam, lParam))
3285             return TRUE;
3286
3287     switch (uMsg) {
3288        /* LPPAGESETUPDLG in lParam */
3289        case WM_PSD_PAGESETUPDLG:
3290        /* Inform about the sample page rectangle */
3291        case WM_PSD_FULLPAGERECT:
3292        /* Inform about the margin rectangle */
3293        case WM_PSD_MINMARGINRECT:
3294             return FALSE;
3295
3296         /* Draw dashed rectangle showing margins */
3297         case WM_PSD_MARGINRECT:
3298             hpen = CreatePen(PS_DASH, 1, GetSysColor(COLOR_3DSHADOW));
3299             holdpen = SelectObject(hdc, hpen);
3300             Rectangle(hdc, lprc->left, lprc->top, lprc->right, lprc->bottom);
3301             DeleteObject(SelectObject(hdc, holdpen));
3302             return TRUE;
3303         /* Draw the fake document */
3304         case WM_PSD_GREEKTEXTRECT:
3305             /* select a nice scalable font, because we want the text really small */
3306             SystemParametersInfoW(SPI_GETICONTITLELOGFONT, sizeof(lf), &lf, 0);
3307             lf.lfHeight = 6; /* value chosen based on visual effect */
3308             hfont = CreateFontIndirectW(&lf);
3309             holdfont = SelectObject(hdc, hfont);
3310
3311             /* if text not loaded, then do so now */
3312             if (wszFakeDocumentText[0] == '\0')
3313                  LoadStringW(COMDLG32_hInstance,
3314                         IDS_FAKEDOCTEXT,
3315                         wszFakeDocumentText,
3316                         sizeof(wszFakeDocumentText)/sizeof(wszFakeDocumentText[0]));
3317
3318             oldbkmode = SetBkMode(hdc, TRANSPARENT);
3319             DrawTextW(hdc, wszFakeDocumentText, -1, lprc, DT_TOP|DT_LEFT|DT_NOPREFIX|DT_WORDBREAK);
3320             SetBkMode(hdc, oldbkmode);
3321
3322             DeleteObject(SelectObject(hdc, holdfont));
3323             return TRUE;
3324
3325         /* Envelope stamp */
3326         case WM_PSD_ENVSTAMPRECT:
3327         /* Return address */
3328         case WM_PSD_YAFULLPAGERECT:
3329             FIXME("envelope/stamp is not implemented\n");
3330             return FALSE;
3331         default:
3332             FIXME("Unknown message %x\n",uMsg);
3333             return FALSE;
3334     }
3335     return TRUE;
3336 }
3337
3338 /***********************************************************************
3339  *           PagePaintProc
3340  * The main paint procedure for the PageSetupDlg function.
3341  * The Page Setup dialog box includes an image of a sample page that shows how
3342  * the user's selections affect the appearance of the printed output.
3343  * The image consists of a rectangle that represents the selected paper
3344  * or envelope type, with a dotted-line rectangle representing
3345  * the current margins, and partial (Greek text) characters
3346  * to show how text looks on the printed page.
3347  *
3348  * The following messages in the order sends to user hook procedure:
3349  *   WM_PSD_PAGESETUPDLG    Draw the contents of the sample page
3350  *   WM_PSD_FULLPAGERECT    Inform about the bounding rectangle
3351  *   WM_PSD_MINMARGINRECT   Inform about the margin rectangle (min margin?)
3352  *   WM_PSD_MARGINRECT      Draw the margin rectangle
3353  *   WM_PSD_GREEKTEXTRECT   Draw the Greek text inside the margin rectangle
3354  * If any of first three messages returns TRUE, painting done.
3355  *
3356  * PARAMS:
3357  *   hWnd   [in] Handle to the Page Setup dialog box
3358  *   uMsg   [in] Received message
3359  *
3360  * TODO:
3361  *   WM_PSD_ENVSTAMPRECT    Draw in the envelope-stamp rectangle (for envelopes only)
3362  *   WM_PSD_YAFULLPAGERECT  Draw the return address portion (for envelopes and other paper sizes)
3363  *
3364  * RETURNS:
3365  *   FALSE if all done correctly
3366  *
3367  */
3368
3369
3370 static LRESULT CALLBACK
3371 PRINTDLG_PagePaintProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
3372 {
3373     PAINTSTRUCT ps;
3374     RECT rcClient, rcMargin;
3375     HPEN hpen, holdpen;
3376     HDC hdc;
3377     HBRUSH hbrush, holdbrush;
3378     pagesetup_data *data;
3379     int papersize=0, orientation=0; /* FIXME: set this values for user paint hook */
3380     double scalx, scaly;
3381
3382     if (uMsg != WM_PAINT)
3383         return CallWindowProcA(lpfnStaticWndProc, hWnd, uMsg, wParam, lParam);
3384
3385     /* Processing WM_PAINT message */
3386     data = GetPropW(hWnd, pagesetupdlg_prop);
3387     if (!data) {
3388         WARN("__WINE_PAGESETUPDLGDATA prop not set?\n");
3389         return FALSE;
3390     }
3391     if (default_page_paint_hook(hWnd, WM_PSD_PAGESETUPDLG, MAKELONG(papersize, orientation),
3392                                 pagesetup_get_dlg_struct(data), data))
3393         return FALSE;
3394
3395     hdc = BeginPaint(hWnd, &ps);
3396     GetClientRect(hWnd, &rcClient);
3397
3398     scalx = rcClient.right  / (double)pagesetup_get_papersize_pt(data)->x;
3399     scaly = rcClient.bottom / (double)pagesetup_get_papersize_pt(data)->y;
3400     rcMargin = rcClient;
3401
3402     rcMargin.left   += pagesetup_get_margin_rect(data)->left   * scalx;
3403     rcMargin.top    += pagesetup_get_margin_rect(data)->top    * scaly;
3404     rcMargin.right  -= pagesetup_get_margin_rect(data)->right  * scalx;
3405     rcMargin.bottom -= pagesetup_get_margin_rect(data)->bottom * scaly;
3406
3407     /* if the space is too small then we make sure to not draw anything */
3408     rcMargin.left = min(rcMargin.left, rcMargin.right);
3409     rcMargin.top = min(rcMargin.top, rcMargin.bottom);
3410
3411     if (!default_page_paint_hook(hWnd, WM_PSD_FULLPAGERECT, (WPARAM)hdc, (LPARAM)&rcClient, data) &&
3412         !default_page_paint_hook(hWnd, WM_PSD_MINMARGINRECT, (WPARAM)hdc, (LPARAM)&rcMargin, data) )
3413     {
3414         /* fill background */
3415         hbrush = GetSysColorBrush(COLOR_3DHIGHLIGHT);
3416         FillRect(hdc, &rcClient, hbrush);
3417         holdbrush = SelectObject(hdc, hbrush);
3418
3419         hpen = CreatePen(PS_SOLID, 1, GetSysColor(COLOR_3DSHADOW));
3420         holdpen = SelectObject(hdc, hpen);
3421
3422         /* paint left edge */
3423         MoveToEx(hdc, rcClient.left, rcClient.top, NULL);
3424         LineTo(hdc, rcClient.left, rcClient.bottom-1);
3425
3426         /* paint top edge */
3427         MoveToEx(hdc, rcClient.left, rcClient.top, NULL);
3428         LineTo(hdc, rcClient.right, rcClient.top);
3429
3430         hpen = CreatePen(PS_SOLID, 1, GetSysColor(COLOR_3DDKSHADOW));
3431         DeleteObject(SelectObject(hdc, hpen));
3432
3433         /* paint right edge */
3434         MoveToEx(hdc, rcClient.right-1, rcClient.top, NULL);
3435         LineTo(hdc, rcClient.right-1, rcClient.bottom);
3436
3437         /* paint bottom edge */
3438         MoveToEx(hdc, rcClient.left, rcClient.bottom-1, NULL);
3439         LineTo(hdc, rcClient.right, rcClient.bottom-1);
3440
3441         DeleteObject(SelectObject(hdc, holdpen));
3442         DeleteObject(SelectObject(hdc, holdbrush));
3443
3444         default_page_paint_hook(hWnd, WM_PSD_MARGINRECT, (WPARAM)hdc, (LPARAM)&rcMargin, data);
3445
3446         /* give text a bit of a space from the frame */
3447         rcMargin.left += 2;
3448         rcMargin.top += 2;
3449         rcMargin.right -= 2;
3450         rcMargin.bottom -= 2;
3451
3452         /* if the space is too small then we make sure to not draw anything */
3453         rcMargin.left = min(rcMargin.left, rcMargin.right);
3454         rcMargin.top = min(rcMargin.top, rcMargin.bottom);
3455
3456         default_page_paint_hook(hWnd, WM_PSD_GREEKTEXTRECT, (WPARAM)hdc, (LPARAM)&rcMargin, data);
3457     }
3458
3459     EndPaint(hWnd, &ps);
3460     return FALSE;
3461 }
3462
3463 /*******************************************************
3464  * The margin edit controls are subclassed to filter
3465  * anything other than numbers and the decimal separator.
3466  */
3467 static LRESULT CALLBACK pagesetup_margin_editproc(HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam)
3468 {
3469     if (msg == WM_CHAR)
3470     {
3471         WCHAR decimal = get_decimal_sep();
3472         WCHAR wc = (WCHAR)wparam;
3473         if(!isdigitW(wc) && wc != decimal && wc != VK_BACK) return 0;
3474     }
3475     return CallWindowProcW(edit_wndproc, hwnd, msg, wparam, lparam);
3476 }
3477
3478 static void subclass_margin_edits(HWND hDlg)
3479 {
3480     int id;
3481     WNDPROC old_proc;
3482
3483     for(id = edt4; id <= edt7; id++)
3484     {
3485         old_proc = (WNDPROC)SetWindowLongPtrW(GetDlgItem(hDlg, id),
3486                                               GWLP_WNDPROC,
3487                                               (ULONG_PTR)pagesetup_margin_editproc);
3488         InterlockedCompareExchangePointer((void**)&edit_wndproc, old_proc, NULL);
3489     }
3490 }
3491
3492 /***********************************************************************
3493  *           pagesetup_dlg_proc
3494  *
3495  * Message handler for PageSetupDlg
3496  */
3497 static INT_PTR CALLBACK pagesetup_dlg_proc(HWND hDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)
3498 {
3499     pagesetup_data *data;
3500     INT_PTR             res = FALSE;
3501     HWND                hDrawWnd;
3502
3503     if (uMsg == WM_INITDIALOG) { /*Init dialog*/
3504         data = (pagesetup_data *)lParam;
3505         data->hDlg = hDlg;
3506
3507         hDrawWnd = GetDlgItem(hDlg, rct1);
3508         TRACE("set property to %p\n", data);
3509         SetPropW(hDlg, pagesetupdlg_prop, data);
3510         SetPropW(hDrawWnd, pagesetupdlg_prop, data);
3511         GetWindowRect(hDrawWnd, &data->rtDrawRect); /* Calculating rect in client coordinates where paper draws */
3512         ScreenToClient(hDlg, (LPPOINT)&data->rtDrawRect);
3513         ScreenToClient(hDlg, (LPPOINT)(&data->rtDrawRect.right));
3514         lpfnStaticWndProc = (WNDPROC)SetWindowLongPtrW(
3515             hDrawWnd,
3516             GWLP_WNDPROC,
3517             (ULONG_PTR)PRINTDLG_PagePaintProc);
3518
3519         /* FIXME: Paint hook. Must it be at begin of initialization or at end? */
3520         res = TRUE;
3521         if (pagesetup_get_flags(data) & PSD_ENABLEPAGESETUPHOOK)
3522         {
3523             if (!pagesetup_get_hook(data, page_setup_hook)(hDlg, uMsg, wParam,
3524                                                            pagesetup_get_dlg_struct(data)))
3525                 FIXME("Setup page hook failed?\n");
3526         }
3527
3528         /* if printer button disabled */
3529         if (pagesetup_get_flags(data) & PSD_DISABLEPRINTER)
3530             EnableWindow(GetDlgItem(hDlg, psh3), FALSE);
3531         /* if margin edit boxes disabled */
3532         if (pagesetup_get_flags(data) & PSD_DISABLEMARGINS)
3533         {
3534             EnableWindow(GetDlgItem(hDlg, edt4), FALSE);
3535             EnableWindow(GetDlgItem(hDlg, edt5), FALSE);
3536             EnableWindow(GetDlgItem(hDlg, edt6), FALSE);
3537             EnableWindow(GetDlgItem(hDlg, edt7), FALSE);
3538         }
3539
3540         /* Set orientation radiobuttons properly */
3541         pagesetup_update_orientation_buttons(hDlg, data);
3542
3543         /* if orientation disabled */
3544         if (pagesetup_get_flags(data) & PSD_DISABLEORIENTATION)
3545         {
3546             EnableWindow(GetDlgItem(hDlg,rad1),FALSE);
3547             EnableWindow(GetDlgItem(hDlg,rad2),FALSE);
3548         }
3549
3550         /* We fill them out enabled or not */
3551         if (!(pagesetup_get_flags(data) & PSD_MARGINS))
3552         {
3553             /* default is 1 inch */
3554             LONG size = thousandths_inch_to_size(data, 1000);
3555             SetRect(pagesetup_get_margin_rect(data), size, size, size, size);
3556         }
3557         update_margin_edits(hDlg, data, 0);
3558         subclass_margin_edits(hDlg);
3559         set_margin_groupbox_title(hDlg, data);
3560
3561         /* if paper disabled */
3562         if (pagesetup_get_flags(data) & PSD_DISABLEPAPER)
3563         {
3564             EnableWindow(GetDlgItem(hDlg,cmb2),FALSE);
3565             EnableWindow(GetDlgItem(hDlg,cmb3),FALSE);
3566         }
3567
3568         /* filling combos: printer, paper, source. selecting current printer (from DEVMODEA) */
3569         pagesetup_init_combos(hDlg, data);
3570         pagesetup_update_papersize(data);
3571         pagesetup_set_defaultsource(data, DMBIN_FORMSOURCE); /* FIXME: This is the auto select bin. Is this correct? */
3572
3573         /* Drawing paper prev */
3574         pagesetup_change_preview(data);
3575         return TRUE;
3576     } else {
3577         data = GetPropW(hDlg, pagesetupdlg_prop);
3578         if (!data)
3579         {
3580             WARN("__WINE_PAGESETUPDLGDATA prop not set?\n");
3581             return FALSE;
3582         }
3583         if (pagesetup_get_flags(data) & PSD_ENABLEPAGESETUPHOOK)
3584         {
3585             res = pagesetup_get_hook(data, page_setup_hook)(hDlg, uMsg, wParam, lParam);
3586             if (res) return res;
3587         }
3588     }
3589     switch (uMsg) {
3590     case WM_COMMAND:
3591         return pagesetup_wm_command(hDlg, wParam, lParam, data);
3592     }
3593     return FALSE;
3594 }
3595
3596 static WCHAR *get_default_printer(void)
3597 {
3598     WCHAR *name = NULL;
3599     DWORD len = 0;
3600
3601     GetDefaultPrinterW(NULL, &len);
3602     if(len)
3603     {
3604         name = HeapAlloc(GetProcessHeap(), 0, len * sizeof(WCHAR));
3605         GetDefaultPrinterW(name, &len);
3606     }
3607     return name;
3608 }
3609
3610 static void pagesetup_dump_dlg_struct(pagesetup_data *data)
3611 {
3612     if(TRACE_ON(commdlg))
3613     {
3614         char flagstr[1000] = "";
3615         const struct pd_flags *pflag = psd_flags;
3616         for( ; pflag->name; pflag++)
3617         {
3618             if(pagesetup_get_flags(data) & pflag->flag)
3619             {
3620                 strcat(flagstr, pflag->name);
3621                 strcat(flagstr, "|");
3622             }
3623         }
3624         TRACE("%s: (%p): hwndOwner = %p, hDevMode = %p, hDevNames = %p\n"
3625               "hinst %p, flags %08x (%s)\n",
3626               data->unicode ? "unicode" : "ansi",
3627               data->u.dlgw, data->u.dlgw->hwndOwner, data->u.dlgw->hDevMode,
3628               data->u.dlgw->hDevNames, data->u.dlgw->hInstance,
3629               pagesetup_get_flags(data), flagstr);
3630     }
3631 }
3632
3633 static void *pagesetup_get_template(pagesetup_data *data)
3634 {
3635     HRSRC res;
3636     HGLOBAL tmpl_handle;
3637
3638     if(pagesetup_get_flags(data) & PSD_ENABLEPAGESETUPTEMPLATEHANDLE)
3639     {
3640         tmpl_handle = data->u.dlgw->hPageSetupTemplate;
3641     }
3642     else if(pagesetup_get_flags(data) & PSD_ENABLEPAGESETUPTEMPLATE)
3643     {
3644         if(data->unicode)
3645             res = FindResourceW(data->u.dlgw->hInstance,
3646                                 data->u.dlgw->lpPageSetupTemplateName, MAKEINTRESOURCEW(RT_DIALOG));
3647         else
3648             res = FindResourceA(data->u.dlga->hInstance,
3649                                 data->u.dlga->lpPageSetupTemplateName, MAKEINTRESOURCEA(RT_DIALOG));
3650         tmpl_handle = LoadResource(data->u.dlgw->hInstance, res);
3651     }
3652     else
3653     {
3654         res = FindResourceW(COMDLG32_hInstance, MAKEINTRESOURCEW(PAGESETUPDLGORD),
3655                             MAKEINTRESOURCEW(RT_DIALOG));
3656         tmpl_handle = LoadResource(COMDLG32_hInstance, res);
3657     }
3658     return LockResource(tmpl_handle);
3659 }
3660
3661 static BOOL pagesetup_common(pagesetup_data *data)
3662 {
3663     BOOL ret;
3664     void *tmpl;
3665
3666     if(!pagesetup_get_dlg_struct(data))
3667     {
3668         COMDLG32_SetCommDlgExtendedError(CDERR_INITIALIZATION);
3669         return FALSE;
3670     }
3671
3672     pagesetup_dump_dlg_struct(data);
3673
3674     if(data->u.dlgw->lStructSize != sizeof(PAGESETUPDLGW))
3675     {
3676         COMDLG32_SetCommDlgExtendedError(CDERR_STRUCTSIZE);
3677         return FALSE;
3678     }
3679
3680     if ((pagesetup_get_flags(data) & PSD_ENABLEPAGEPAINTHOOK) &&
3681         (pagesetup_get_hook(data, page_paint_hook) == NULL))
3682     {
3683         COMDLG32_SetCommDlgExtendedError(CDERR_NOHOOK);
3684         return FALSE;
3685     }
3686
3687     if(!(pagesetup_get_flags(data) & (PSD_INTHOUSANDTHSOFINCHES | PSD_INHUNDREDTHSOFMILLIMETERS)))
3688         data->u.dlgw->Flags |= is_default_metric() ?
3689             PSD_INHUNDREDTHSOFMILLIMETERS : PSD_INTHOUSANDTHSOFINCHES;
3690
3691     if (!data->u.dlgw->hDevMode || !data->u.dlgw->hDevNames)
3692     {
3693         WCHAR *def = get_default_printer();
3694         if(!def)
3695         {
3696             if (!(pagesetup_get_flags(data) & PSD_NOWARNING))
3697             {
3698                 WCHAR errstr[256];
3699                 LoadStringW(COMDLG32_hInstance, PD32_NO_DEFAULT_PRINTER, errstr, 255);
3700                 MessageBoxW(data->u.dlgw->hwndOwner, errstr, 0, MB_OK | MB_ICONERROR);
3701             }
3702             COMDLG32_SetCommDlgExtendedError(PDERR_NODEFAULTPRN);
3703             return FALSE;
3704         }
3705         pagesetup_change_printer(def, data);
3706         HeapFree(GetProcessHeap(), 0, def);
3707     }
3708
3709     if (pagesetup_get_flags(data) & PSD_RETURNDEFAULT)
3710     {
3711         pagesetup_update_papersize(data);
3712         return TRUE;
3713     }
3714
3715     tmpl = pagesetup_get_template(data);
3716
3717     ret = DialogBoxIndirectParamW(data->u.dlgw->hInstance, tmpl,
3718                                   data->u.dlgw->hwndOwner,
3719                                   pagesetup_dlg_proc, (LPARAM)data) > 0;
3720     return ret;
3721 }
3722
3723 /***********************************************************************
3724  *            PageSetupDlgA  (COMDLG32.@)
3725  *
3726  *  Displays the PAGE SETUP dialog box, which enables the user to specify
3727  *  specific properties of a printed page such as
3728  *  size, source, orientation and the width of the page margins.
3729  *
3730  * PARAMS
3731  *  setupdlg [IO] PAGESETUPDLGA struct
3732  *
3733  * RETURNS
3734  *  TRUE    if the user pressed the OK button
3735  *  FALSE   if the user cancelled the window or an error occurred
3736  *
3737  * NOTES
3738  *    The values of hDevMode and hDevNames are filled on output and can be
3739  *    changed in PAGESETUPDLG when they are passed in PageSetupDlg.
3740  *
3741  */
3742 BOOL WINAPI PageSetupDlgA(LPPAGESETUPDLGA setupdlg)
3743 {
3744     pagesetup_data data;
3745
3746     data.unicode = FALSE;
3747     data.u.dlga  = setupdlg;
3748
3749     return pagesetup_common(&data);
3750 }
3751
3752 /***********************************************************************
3753  *            PageSetupDlgW  (COMDLG32.@)
3754  *
3755  * See PageSetupDlgA.
3756  */
3757 BOOL WINAPI PageSetupDlgW(LPPAGESETUPDLGW setupdlg)
3758 {
3759     pagesetup_data data;
3760
3761     data.unicode = TRUE;
3762     data.u.dlgw  = setupdlg;
3763
3764     return pagesetup_common(&data);
3765 }
3766
3767 /***********************************************************************
3768  * PrintDlgExA (COMDLG32.@)
3769  *
3770  * See PrintDlgExW.
3771  *
3772  * BUGS
3773  *   Only a Stub
3774  *
3775  */
3776 HRESULT WINAPI PrintDlgExA(LPPRINTDLGEXA lppd)
3777 {
3778
3779     FIXME("(%p) stub\n", lppd);
3780     if ((lppd == NULL) || (lppd->lStructSize != sizeof(PRINTDLGEXA))) {
3781         return E_INVALIDARG;
3782     }
3783
3784     if (!IsWindow(lppd->hwndOwner)) {
3785         return E_HANDLE;
3786     }
3787
3788     return E_NOTIMPL;
3789 }
3790
3791 /***********************************************************************
3792  * PrintDlgExW (COMDLG32.@)
3793  *
3794  * Display the property sheet style PRINT dialog box
3795  *
3796  * PARAMS
3797  *  lppd  [IO] ptr to PRINTDLGEX struct
3798  *
3799  * RETURNS
3800  *  Success: S_OK
3801  *  Failure: One of the following COM error codes:
3802  *    E_OUTOFMEMORY Insufficient memory.
3803  *    E_INVALIDARG  One or more arguments are invalid.
3804  *    E_POINTER     Invalid pointer.
3805  *    E_HANDLE      Invalid handle.
3806  *    E_FAIL        Unspecified error.
3807  *
3808  * NOTES
3809  * This Dialog enables the user to specify specific properties of the print job.
3810  * The property sheet can also have additional application-specific and
3811  * driver-specific property pages.
3812  *
3813  * BUGS
3814  *   Not fully implemented
3815  *
3816  */
3817 HRESULT WINAPI PrintDlgExW(LPPRINTDLGEXW lppd)
3818 {
3819     DWORD     ret = E_FAIL;
3820     LPVOID    ptr;
3821
3822     FIXME("(%p) not fully implemented\n", lppd);
3823
3824     if ((lppd == NULL) || (lppd->lStructSize != sizeof(PRINTDLGEXW))) {
3825         return E_INVALIDARG;
3826     }
3827
3828     if (!IsWindow(lppd->hwndOwner)) {
3829         return E_HANDLE;
3830     }
3831
3832     if (lppd->Flags & PD_RETURNDEFAULT) {
3833         PRINTER_INFO_2W *pbuf;
3834         DRIVER_INFO_2W  *dbuf;
3835         HANDLE hprn;
3836         DWORD needed = 1024;
3837         BOOL bRet;
3838
3839         if (lppd->hDevMode || lppd->hDevNames) {
3840             WARN("hDevMode or hDevNames non-zero for PD_RETURNDEFAULT\n");
3841             COMDLG32_SetCommDlgExtendedError(PDERR_RETDEFFAILURE);
3842             return E_INVALIDARG;
3843         }
3844         if (!PRINTDLG_OpenDefaultPrinter(&hprn)) {
3845             WARN("Can't find default printer\n");
3846             COMDLG32_SetCommDlgExtendedError(PDERR_NODEFAULTPRN);
3847             return E_FAIL;
3848         }
3849
3850         pbuf = HeapAlloc(GetProcessHeap(), 0, needed);
3851         bRet = GetPrinterW(hprn, 2, (LPBYTE)pbuf, needed, &needed);
3852         if (!bRet && (GetLastError() == ERROR_INSUFFICIENT_BUFFER)) {
3853             HeapFree(GetProcessHeap(), 0, pbuf);
3854             pbuf = HeapAlloc(GetProcessHeap(), 0, needed);
3855             bRet = GetPrinterW(hprn, 2, (LPBYTE)pbuf, needed, &needed);
3856         }
3857         if (!bRet) {
3858             HeapFree(GetProcessHeap(), 0, pbuf);
3859             ClosePrinter(hprn);
3860             return E_FAIL;
3861         }
3862
3863         needed = 1024;
3864         dbuf = HeapAlloc(GetProcessHeap(), 0, needed);
3865         bRet = GetPrinterDriverW(hprn, NULL, 3, (LPBYTE)dbuf, needed, &needed);
3866         if (!bRet && (GetLastError() == ERROR_INSUFFICIENT_BUFFER)) {
3867             HeapFree(GetProcessHeap(), 0, dbuf);
3868             dbuf = HeapAlloc(GetProcessHeap(), 0, needed);
3869             bRet = GetPrinterDriverW(hprn, NULL, 3, (LPBYTE)dbuf, needed, &needed);
3870         }
3871         if (!bRet) {
3872             ERR("GetPrinterDriverW failed, last error %d, fix your config for printer %s!\n",
3873                 GetLastError(), debugstr_w(pbuf->pPrinterName));
3874             HeapFree(GetProcessHeap(), 0, dbuf);
3875             HeapFree(GetProcessHeap(), 0, pbuf);
3876             COMDLG32_SetCommDlgExtendedError(PDERR_RETDEFFAILURE);
3877             ClosePrinter(hprn);
3878             return E_FAIL;
3879         }
3880         ClosePrinter(hprn);
3881
3882         PRINTDLG_CreateDevNamesW(&(lppd->hDevNames),
3883                       dbuf->pDriverPath,
3884                       pbuf->pPrinterName,
3885                       pbuf->pPortName);
3886         lppd->hDevMode = GlobalAlloc(GMEM_MOVEABLE, pbuf->pDevMode->dmSize +
3887                          pbuf->pDevMode->dmDriverExtra);
3888         if (lppd->hDevMode) {
3889             ptr = GlobalLock(lppd->hDevMode);
3890             if (ptr) {
3891                 memcpy(ptr, pbuf->pDevMode, pbuf->pDevMode->dmSize +
3892                     pbuf->pDevMode->dmDriverExtra);
3893                 GlobalUnlock(lppd->hDevMode);
3894                 ret = S_OK;
3895             }
3896         }
3897         HeapFree(GetProcessHeap(), 0, pbuf);
3898         HeapFree(GetProcessHeap(), 0, dbuf);
3899
3900         return ret;
3901     }
3902
3903     return E_NOTIMPL;
3904 }