dlls/wineps.drv/init.c

   1 /*
   2  *      PostScript driver initialization functions
   3  *
   4  *      Copyright 1998 Huw D M Davies
   5  *      Copyright 2001 Marcus Meissner
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #include <stdarg.h>
  23 #include <string.h>
  24
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "winerror.h"
  28 #include "winreg.h"
  29 #include "winnls.h"
  30 #include "winuser.h"
  31 #include "psdrv.h"
  32 #include "unixlib.h"
  33 #include "winspool.h"
  34 #include "wine/debug.h"
  35
  36 WINE_DEFAULT_DEBUG_CHANNEL(psdrv);
  37
  38 static const PSDRV_DEVMODE DefaultDevmode =
  39 {
  40   { /* dmPublic */
  41 /* dmDeviceName */      L"Wine PostScript Driver",
  42 /* dmSpecVersion */     0x30a,
  43 /* dmDriverVersion */   0x001,
  44 /* dmSize */            sizeof(DEVMODEW),
  45 /* dmDriverExtra */     sizeof(PSDRV_DEVMODE)-sizeof(DEVMODEW),
  46 /* dmFields */          DM_ORIENTATION | DM_PAPERSIZE | DM_PAPERLENGTH | DM_PAPERWIDTH |
  47                         DM_SCALE | DM_COPIES | DM_DEFAULTSOURCE | DM_PRINTQUALITY |
  48                         DM_COLOR | DM_DUPLEX | DM_YRESOLUTION | DM_TTOPTION |
  49                         DM_COLLATE | DM_FORMNAME,
  50    { /* u1 */
  51      { /* s1 */
  52 /* dmOrientation */     DMORIENT_PORTRAIT,
  53 /* dmPaperSize */       DMPAPER_LETTER,
  54 /* dmPaperLength */     2794,
  55 /* dmPaperWidth */      2159,
  56 /* dmScale */           100,
  57 /* dmCopies */          1,
  58 /* dmDefaultSource */   DMBIN_AUTO,
  59 /* dmPrintQuality */    300
  60      }
  61    },
  62 /* dmColor */           DMCOLOR_COLOR,
  63 /* dmDuplex */          DMDUP_SIMPLEX,
  64 /* dmYResolution */     300,
  65 /* dmTTOption */        DMTT_SUBDEV,
  66 /* dmCollate */         DMCOLLATE_FALSE,
  67 /* dmFormName */        L"Letter",
  68 /* dmLogPixels */       0,
  69 /* dmBitsPerPel */      0,
  70 /* dmPelsWidth */       0,
  71 /* dmPelsHeight */      0,
  72    { /* u2 */
  73 /* dmDisplayFlags */    0
  74    },
  75 /* dmDisplayFrequency */ 0,
  76 /* dmICMMethod */       0,
  77 /* dmICMIntent */       0,
  78 /* dmMediaType */       0,
  79 /* dmDitherType */      0,
  80 /* dmReserved1 */       0,
  81 /* dmReserved2 */       0,
  82 /* dmPanningWidth */    0,
  83 /* dmPanningHeight */   0
  84   },
  85 };
  86
  87 HINSTANCE PSDRV_hInstance = 0;
  88 HANDLE PSDRV_Heap = 0;
  89
  90 /*********************************************************************
  91  *           DllMain
  92  *
  93  * Initializes font metrics and registers driver. wineps dll entry point.
  94  *
  95  */
  96 BOOL WINAPI DllMain( HINSTANCE hinst, DWORD reason, LPVOID reserved )
  97 {
  98     TRACE("(%p, %ld, %p)\n", hinst, reason, reserved);
  99
 100     switch(reason) {
 101
 102         case DLL_PROCESS_ATTACH:
 103         {
 104             PSDRV_hInstance = hinst;
 105             DisableThreadLibraryCalls(hinst);
 106
 107             if (__wine_init_unix_call())
 108                 return FALSE;
 109
 110             PSDRV_Heap = HeapCreate(0, 0x10000, 0);
 111             if (PSDRV_Heap == NULL)
 112                 return FALSE;
 113
 114             if (PSDRV_GetFontMetrics() == FALSE) {
 115                 HeapDestroy(PSDRV_Heap);
 116                 return FALSE;
 117             }
 118             break;
 119         }
 120
 121         case DLL_PROCESS_DETACH:
 122             if (reserved) break;
 123             WINE_UNIX_CALL(unix_free_printer_info, NULL);
 124             HeapDestroy( PSDRV_Heap );
 125             break;
 126     }
 127
 128     return TRUE;
 129 }
 130
 131 static void dump_fields(DWORD fields)
 132 {
 133     int add_space = 0;
 134
 135 #define CHECK_FIELD(flag) \
 136 do \
 137 { \
 138     if (fields & flag) \
 139     { \
 140         if (add_space++) TRACE(" "); \
 141         TRACE(#flag); \
 142         fields &= ~flag; \
 143     } \
 144 } \
 145 while (0)
 146
 147     CHECK_FIELD(DM_ORIENTATION);
 148     CHECK_FIELD(DM_PAPERSIZE);
 149     CHECK_FIELD(DM_PAPERLENGTH);
 150     CHECK_FIELD(DM_PAPERWIDTH);
 151     CHECK_FIELD(DM_SCALE);
 152     CHECK_FIELD(DM_POSITION);
 153     CHECK_FIELD(DM_NUP);
 154     CHECK_FIELD(DM_DISPLAYORIENTATION);
 155     CHECK_FIELD(DM_COPIES);
 156     CHECK_FIELD(DM_DEFAULTSOURCE);
 157     CHECK_FIELD(DM_PRINTQUALITY);
 158     CHECK_FIELD(DM_COLOR);
 159     CHECK_FIELD(DM_DUPLEX);
 160     CHECK_FIELD(DM_YRESOLUTION);
 161     CHECK_FIELD(DM_TTOPTION);
 162     CHECK_FIELD(DM_COLLATE);
 163     CHECK_FIELD(DM_FORMNAME);
 164     CHECK_FIELD(DM_LOGPIXELS);
 165     CHECK_FIELD(DM_BITSPERPEL);
 166     CHECK_FIELD(DM_PELSWIDTH);
 167     CHECK_FIELD(DM_PELSHEIGHT);
 168     CHECK_FIELD(DM_DISPLAYFLAGS);
 169     CHECK_FIELD(DM_DISPLAYFREQUENCY);
 170     CHECK_FIELD(DM_ICMMETHOD);
 171     CHECK_FIELD(DM_ICMINTENT);
 172     CHECK_FIELD(DM_MEDIATYPE);
 173     CHECK_FIELD(DM_DITHERTYPE);
 174     CHECK_FIELD(DM_PANNINGWIDTH);
 175     CHECK_FIELD(DM_PANNINGHEIGHT);
 176     if (fields) TRACE(" %#lx", fields);
 177     TRACE("\n");
 178 #undef CHECK_FIELD
 179 }
 180
 181 /* Dump DEVMODE structure without a device specific part.
 182  * Some applications and drivers fail to specify correct field
 183  * flags (like DM_FORMNAME), so dump everything.
 184  */
 185 static void dump_devmode(const DEVMODEW *dm)
 186 {
 187     if (!TRACE_ON(psdrv)) return;
 188
 189     TRACE("dmDeviceName: %s\n", debugstr_w(dm->dmDeviceName));
 190     TRACE("dmSpecVersion: 0x%04x\n", dm->dmSpecVersion);
 191     TRACE("dmDriverVersion: 0x%04x\n", dm->dmDriverVersion);
 192     TRACE("dmSize: 0x%04x\n", dm->dmSize);
 193     TRACE("dmDriverExtra: 0x%04x\n", dm->dmDriverExtra);
 194     TRACE("dmFields: 0x%04lx\n", dm->dmFields);
 195     dump_fields(dm->dmFields);
 196     TRACE("dmOrientation: %d\n", dm->dmOrientation);
 197     TRACE("dmPaperSize: %d\n", dm->dmPaperSize);
 198     TRACE("dmPaperLength: %d\n", dm->dmPaperLength);
 199     TRACE("dmPaperWidth: %d\n", dm->dmPaperWidth);
 200     TRACE("dmScale: %d\n", dm->dmScale);
 201     TRACE("dmCopies: %d\n", dm->dmCopies);
 202     TRACE("dmDefaultSource: %d\n", dm->dmDefaultSource);
 203     TRACE("dmPrintQuality: %d\n", dm->dmPrintQuality);
 204     TRACE("dmColor: %d\n", dm->dmColor);
 205     TRACE("dmDuplex: %d\n", dm->dmDuplex);
 206     TRACE("dmYResolution: %d\n", dm->dmYResolution);
 207     TRACE("dmTTOption: %d\n", dm->dmTTOption);
 208     TRACE("dmCollate: %d\n", dm->dmCollate);
 209     TRACE("dmFormName: %s\n", debugstr_w(dm->dmFormName));
 210     TRACE("dmLogPixels %u\n", dm->dmLogPixels);
 211     TRACE("dmBitsPerPel %lu\n", dm->dmBitsPerPel);
 212     TRACE("dmPelsWidth %lu\n", dm->dmPelsWidth);
 213     TRACE("dmPelsHeight %lu\n", dm->dmPelsHeight);
 214 }
 215
 216 static void PSDRV_UpdateDevCaps( print_ctx *ctx )
 217 {
 218     PAGESIZE *page;
 219     RESOLUTION *res;
 220     INT width = 0, height = 0, resx = 0, resy = 0;
 221
 222     dump_devmode(&ctx->Devmode->dmPublic);
 223
 224     if (ctx->Devmode->dmPublic.dmFields & (DM_PRINTQUALITY | DM_YRESOLUTION | DM_LOGPIXELS))
 225     {
 226         if (ctx->Devmode->dmPublic.dmFields & DM_PRINTQUALITY)
 227             resx = resy = ctx->Devmode->dmPublic.dmPrintQuality;
 228
 229         if (ctx->Devmode->dmPublic.dmFields & DM_YRESOLUTION)
 230             resy = ctx->Devmode->dmPublic.dmYResolution;
 231
 232         if (ctx->Devmode->dmPublic.dmFields & DM_LOGPIXELS)
 233             resx = resy = ctx->Devmode->dmPublic.dmLogPixels;
 234
 235         LIST_FOR_EACH_ENTRY(res, &ctx->pi->ppd->Resolutions, RESOLUTION, entry)
 236         {
 237             if (res->resx == resx && res->resy == resy)
 238             {
 239                 ctx->logPixelsX = resx;
 240                 ctx->logPixelsY = resy;
 241                 break;
 242             }
 243         }
 244
 245         if (&res->entry == &ctx->pi->ppd->Resolutions)
 246         {
 247             WARN("Requested resolution %dx%d is not supported by device\n", resx, resy);
 248             ctx->logPixelsX = ctx->pi->ppd->DefaultResolution;
 249             ctx->logPixelsY = ctx->logPixelsX;
 250         }
 251     }
 252     else
 253     {
 254         WARN("Using default device resolution %d\n", ctx->pi->ppd->DefaultResolution);
 255         ctx->logPixelsX = ctx->pi->ppd->DefaultResolution;
 256         ctx->logPixelsY = ctx->logPixelsX;
 257     }
 258
 259     if(ctx->Devmode->dmPublic.dmFields & DM_PAPERSIZE) {
 260         LIST_FOR_EACH_ENTRY(page, &ctx->pi->ppd->PageSizes, PAGESIZE, entry) {
 261             if(page->WinPage == ctx->Devmode->dmPublic.dmPaperSize)
 262                 break;
 263         }
 264
 265         if(&page->entry == &ctx->pi->ppd->PageSizes) {
 266             FIXME("Can't find page\n");
 267             SetRectEmpty(&ctx->ImageableArea);
 268             ctx->PageSize.cx = 0;
 269             ctx->PageSize.cy = 0;
 270         } else if(page->ImageableArea) {
 271           /* ctx sizes in device units; ppd sizes in 1/72" */
 272             SetRect(&ctx->ImageableArea, page->ImageableArea->llx * ctx->logPixelsX / 72,
 273                     page->ImageableArea->ury * ctx->logPixelsY / 72,
 274                     page->ImageableArea->urx * ctx->logPixelsX / 72,
 275                     page->ImageableArea->lly * ctx->logPixelsY / 72);
 276             ctx->PageSize.cx = page->PaperDimension->x *
 277               ctx->logPixelsX / 72;
 278             ctx->PageSize.cy = page->PaperDimension->y *
 279               ctx->logPixelsY / 72;
 280         } else {
 281             ctx->ImageableArea.left = ctx->ImageableArea.bottom = 0;
 282             ctx->ImageableArea.right = ctx->PageSize.cx =
 283               page->PaperDimension->x * ctx->logPixelsX / 72;
 284             ctx->ImageableArea.top = ctx->PageSize.cy =
 285               page->PaperDimension->y * ctx->logPixelsY / 72;
 286         }
 287     } else if((ctx->Devmode->dmPublic.dmFields & DM_PAPERLENGTH) &&
 288               (ctx->Devmode->dmPublic.dmFields & DM_PAPERWIDTH)) {
 289       /* ctx sizes in device units; Devmode sizes in 1/10 mm */
 290         ctx->ImageableArea.left = ctx->ImageableArea.bottom = 0;
 291         ctx->ImageableArea.right = ctx->PageSize.cx =
 292           ctx->Devmode->dmPublic.dmPaperWidth * ctx->logPixelsX / 254;
 293         ctx->ImageableArea.top = ctx->PageSize.cy =
 294           ctx->Devmode->dmPublic.dmPaperLength * ctx->logPixelsY / 254;
 295     } else {
 296         FIXME("Odd dmFields %lx\n", ctx->Devmode->dmPublic.dmFields);
 297         SetRectEmpty(&ctx->ImageableArea);
 298         ctx->PageSize.cx = 0;
 299         ctx->PageSize.cy = 0;
 300     }
 301
 302     TRACE("ImageableArea = %s: PageSize = %ldx%ld\n", wine_dbgstr_rect(&ctx->ImageableArea),
 303           ctx->PageSize.cx, ctx->PageSize.cy);
 304
 305     /* these are in device units */
 306     width = ctx->ImageableArea.right - ctx->ImageableArea.left;
 307     height = ctx->ImageableArea.top - ctx->ImageableArea.bottom;
 308
 309     if(ctx->Devmode->dmPublic.dmOrientation == DMORIENT_PORTRAIT) {
 310         ctx->horzRes = width;
 311         ctx->vertRes = height;
 312     } else {
 313         ctx->horzRes = height;
 314         ctx->vertRes = width;
 315     }
 316
 317     /* these are in mm */
 318     ctx->horzSize = (ctx->horzRes * 25.4) / ctx->logPixelsX;
 319     ctx->vertSize = (ctx->vertRes * 25.4) / ctx->logPixelsY;
 320
 321     TRACE("devcaps: horzSize = %dmm, vertSize = %dmm, "
 322           "horzRes = %d, vertRes = %d\n",
 323           ctx->horzSize, ctx->vertSize,
 324           ctx->horzRes, ctx->vertRes);
 325 }
 326
 327 print_ctx *create_print_ctx( HDC hdc, const WCHAR *device,
 328                                      const DEVMODEW *devmode )
 329 {
 330     PRINTERINFO *pi = PSDRV_FindPrinterInfo( device );
 331     print_ctx *ctx;
 332
 333     if (!pi) return NULL;
 334     if (!pi->Fonts)
 335     {
 336         RASTERIZER_STATUS status;
 337         if (!GetRasterizerCaps( &status, sizeof(status) ) ||
 338                 !(status.wFlags & TT_AVAILABLE) ||
 339                 !(status.wFlags & TT_ENABLED))
 340         {
 341             MESSAGE( "Disabling printer %s since it has no builtin fonts and "
 342                     "there are no TrueType fonts available.\n", debugstr_w(device) );
 343             return FALSE;
 344         }
 345     }
 346
 347     ctx = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*ctx) );
 348     if (!ctx) return NULL;
 349
 350     ctx->Devmode = HeapAlloc( GetProcessHeap(), 0,
 351             pi->Devmode->dmPublic.dmSize + pi->Devmode->dmPublic.dmDriverExtra );
 352     if (!ctx->Devmode)
 353     {
 354         HeapFree( GetProcessHeap(), 0, ctx );
 355         return NULL;
 356     }
 357
 358     memcpy( ctx->Devmode, pi->Devmode,
 359             pi->Devmode->dmPublic.dmSize + pi->Devmode->dmPublic.dmDriverExtra );
 360     ctx->pi = pi;
 361     ctx->logPixelsX = pi->ppd->DefaultResolution;
 362     ctx->logPixelsY = pi->ppd->DefaultResolution;
 363
 364     if (devmode)
 365     {
 366         dump_devmode( devmode );
 367         PSDRV_MergeDevmodes( ctx->Devmode, devmode, pi );
 368     }
 369
 370     PSDRV_UpdateDevCaps( ctx );
 371     ctx->hdc = hdc;
 372     SelectObject( hdc, GetStockObject( DEVICE_DEFAULT_FONT ));
 373     return ctx;
 374 }
 375
 376 /**********************************************************************
 377  *           ResetDC   (WINEPS.@)
 378  */
 379 BOOL CDECL PSDRV_ResetDC( print_ctx *ctx, const DEVMODEW *lpInitData )
 380 {
 381     if (lpInitData)
 382     {
 383         PSDRV_MergeDevmodes(ctx->Devmode, lpInitData, ctx->pi);
 384         PSDRV_UpdateDevCaps(ctx);
 385     }
 386     return TRUE;
 387 }
 388
 389 static PRINTER_ENUM_VALUESW *load_font_sub_table( HANDLE printer, DWORD *num_entries )
 390 {
 391     DWORD res, needed, num;
 392     PRINTER_ENUM_VALUESW *table = NULL;
 393     static const WCHAR fontsubkey[] = L"PrinterDriverData\\FontSubTable";
 394
 395     *num_entries = 0;
 396
 397     res = EnumPrinterDataExW( printer, fontsubkey, NULL, 0, &needed, &num );
 398     if (res != ERROR_MORE_DATA) return NULL;
 399
 400     table = HeapAlloc( PSDRV_Heap, 0, needed );
 401     if (!table) return NULL;
 402
 403     res = EnumPrinterDataExW( printer, fontsubkey, (LPBYTE)table, needed, &needed, &num );
 404     if (res != ERROR_SUCCESS)
 405     {
 406         HeapFree( PSDRV_Heap, 0, table );
 407         return NULL;
 408     }
 409
 410     *num_entries = num;
 411     return table;
 412 }
 413
 414 static PSDRV_DEVMODE *get_printer_devmode( HANDLE printer )
 415 {
 416     DWORD needed, dm_size;
 417     BOOL res;
 418     PRINTER_INFO_9W *info;
 419     PSDRV_DEVMODE *dm;
 420
 421     GetPrinterW( printer, 9, NULL, 0, &needed );
 422     if (GetLastError() != ERROR_INSUFFICIENT_BUFFER) return NULL;
 423
 424     info = HeapAlloc( PSDRV_Heap, 0, needed );
 425     res = GetPrinterW( printer, 9, (BYTE *)info, needed, &needed );
 426     if (!res || !info->pDevMode)
 427     {
 428         HeapFree( PSDRV_Heap, 0, info );
 429         return NULL;
 430     }
 431
 432     /* sanity check the sizes */
 433     dm_size = info->pDevMode->dmSize + info->pDevMode->dmDriverExtra;
 434     if ((char *)info->pDevMode - (char *)info + dm_size > needed)
 435     {
 436         HeapFree( PSDRV_Heap, 0, info );
 437         return NULL;
 438     }
 439
 440     dm = (PSDRV_DEVMODE*)info;
 441     memmove( dm, info->pDevMode, dm_size );
 442     return dm;
 443 }
 444
 445 static PSDRV_DEVMODE *get_devmode( HANDLE printer, const WCHAR *name, BOOL *is_default )
 446 {
 447     PSDRV_DEVMODE *dm = get_printer_devmode( printer );
 448
 449     *is_default = FALSE;
 450
 451     if (dm && dm->dmPublic.dmSize + dm->dmPublic.dmDriverExtra >= sizeof(DefaultDevmode))
 452     {
 453         TRACE( "Retrieved devmode from winspool\n" );
 454         return dm;
 455     }
 456     HeapFree( PSDRV_Heap, 0, dm );
 457
 458     TRACE( "Using default devmode\n" );
 459     dm = HeapAlloc( PSDRV_Heap, 0, sizeof(DefaultDevmode) );
 460     if (dm)
 461     {
 462         *dm = DefaultDevmode;
 463         lstrcpynW( (WCHAR *)dm->dmPublic.dmDeviceName, name, CCHDEVICENAME );
 464         *is_default = TRUE;
 465     }
 466     return dm;
 467 }
 468
 469 static BOOL set_devmode( HANDLE printer, PSDRV_DEVMODE *dm )
 470 {
 471     PRINTER_INFO_9W info;
 472     info.pDevMode = &dm->dmPublic;
 473
 474     return SetPrinterW( printer, 9, (BYTE *)&info, 0 );
 475 }
 476
 477 static WCHAR *get_ppd_filename( HANDLE printer )
 478 {
 479     DWORD needed;
 480     DRIVER_INFO_2W *info;
 481     WCHAR *name;
 482
 483     GetPrinterDriverW( printer, NULL, 2, NULL, 0, &needed );
 484     if (GetLastError() != ERROR_INSUFFICIENT_BUFFER) return NULL;
 485     info = HeapAlloc( GetProcessHeap(), 0, needed );
 486     if (!info) return NULL;
 487     GetPrinterDriverW( printer, NULL, 2, (BYTE*)info, needed, &needed );
 488     name = (WCHAR *)info;
 489     memmove( name, info->pDataFile, (lstrlenW( info->pDataFile ) + 1) * sizeof(WCHAR) );
 490     return name;
 491 }
 492
 493 static struct list printer_list = LIST_INIT( printer_list );
 494
 495 /**********************************************************************
 496  *              PSDRV_FindPrinterInfo
 497  */
 498 PRINTERINFO *PSDRV_FindPrinterInfo(LPCWSTR name)
 499 {
 500     PRINTERINFO *pi;
 501     FONTNAME *font;
 502     const AFM *afm;
 503     HANDLE hPrinter = 0;
 504     WCHAR *ppd_filename = NULL;
 505     char *nameA = NULL;
 506     BOOL using_default_devmode = FALSE;
 507     int len;
 508
 509     TRACE("%s\n", debugstr_w(name));
 510
 511     LIST_FOR_EACH_ENTRY( pi, &printer_list, PRINTERINFO, entry )
 512     {
 513         if (!wcscmp( pi->friendly_name, name ))
 514             return pi;
 515     }
 516
 517     pi = HeapAlloc( PSDRV_Heap, HEAP_ZERO_MEMORY, sizeof(*pi) );
 518     if (pi == NULL) return NULL;
 519
 520     if (!(pi->friendly_name = HeapAlloc( PSDRV_Heap, 0, (lstrlenW(name)+1)*sizeof(WCHAR) ))) goto fail;
 521     lstrcpyW( pi->friendly_name, name );
 522
 523     if (OpenPrinterW( pi->friendly_name, &hPrinter, NULL ) == 0) {
 524         ERR ("OpenPrinter failed with code %li\n", GetLastError ());
 525         goto fail;
 526     }
 527
 528     len = WideCharToMultiByte( CP_ACP, 0, name, -1, NULL, 0, NULL, NULL );
 529     nameA = HeapAlloc( GetProcessHeap(), 0, len );
 530     WideCharToMultiByte( CP_ACP, 0, name, -1, nameA, len, NULL, NULL );
 531
 532     pi->Devmode = get_devmode( hPrinter, name, &using_default_devmode );
 533     if (!pi->Devmode) goto fail;
 534
 535     ppd_filename = get_ppd_filename( hPrinter );
 536     if (!ppd_filename) goto fail;
 537
 538     pi->ppd = PSDRV_ParsePPD( ppd_filename, hPrinter );
 539     if (!pi->ppd)
 540     {
 541         WARN( "Couldn't parse PPD file %s\n", debugstr_w(ppd_filename) );
 542         goto fail;
 543     }
 544
 545     if(using_default_devmode) {
 546         DWORD papersize;
 547
 548         if(GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_IPAPERSIZE | LOCALE_RETURN_NUMBER,
 549                           (LPWSTR)&papersize, sizeof(papersize)/sizeof(WCHAR))) {
 550             DEVMODEW dm;
 551             memset(&dm, 0, sizeof(dm));
 552             dm.dmFields = DM_PAPERSIZE;
 553             dm.dmPaperSize = papersize;
 554             PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
 555         }
 556     }
 557
 558     if(pi->ppd->DefaultPageSize) { /* We'll let the ppd override the devmode */
 559         DEVMODEW dm;
 560         memset(&dm, 0, sizeof(dm));
 561         dm.dmFields = DM_PAPERSIZE;
 562         dm.dmPaperSize = pi->ppd->DefaultPageSize->WinPage;
 563         PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
 564     }
 565
 566     /* Duplex is indicated by the setting of the DM_DUPLEX bit in dmFields.
 567        WinDuplex == 0 is a special case which means that the ppd has a
 568        *DefaultDuplex: NotCapable entry.  In this case we'll try not to confuse
 569        apps and set dmDuplex to DMDUP_SIMPLEX but leave the DM_DUPLEX clear.
 570        PSDRV_WriteHeader understands this and copes. */
 571     pi->Devmode->dmPublic.dmFields &= ~DM_DUPLEX;
 572     if(pi->ppd->DefaultDuplex) {
 573         pi->Devmode->dmPublic.dmDuplex = pi->ppd->DefaultDuplex->WinDuplex;
 574         if(pi->Devmode->dmPublic.dmDuplex != 0)
 575             pi->Devmode->dmPublic.dmFields |= DM_DUPLEX;
 576         else
 577             pi->Devmode->dmPublic.dmDuplex = DMDUP_SIMPLEX;
 578     }
 579
 580     set_devmode( hPrinter, pi->Devmode );
 581
 582     pi->FontSubTable = load_font_sub_table( hPrinter, &pi->FontSubTableSize );
 583
 584     LIST_FOR_EACH_ENTRY( font, &pi->ppd->InstalledFonts, FONTNAME, entry )
 585     {
 586         afm = PSDRV_FindAFMinList(PSDRV_AFMFontList, font->Name);
 587         if(!afm) {
 588             TRACE( "Couldn't find AFM file for installed printer font '%s' - "
 589                     "ignoring\n", font->Name);
 590         }
 591         else {
 592             BOOL added;
 593             if (PSDRV_AddAFMtoList(&pi->Fonts, afm, &added) == FALSE) {
 594                 PSDRV_FreeAFMList(pi->Fonts);
 595                 goto fail;
 596             }
 597         }
 598
 599     }
 600     ClosePrinter( hPrinter );
 601     HeapFree( GetProcessHeap(), 0, nameA );
 602     HeapFree( GetProcessHeap(), 0, ppd_filename );
 603     list_add_head( &printer_list, &pi->entry );
 604     return pi;
 605
 606 fail:
 607     if (hPrinter) ClosePrinter( hPrinter );
 608     HeapFree(PSDRV_Heap, 0, pi->FontSubTable);
 609     HeapFree(PSDRV_Heap, 0, pi->friendly_name);
 610     HeapFree(PSDRV_Heap, 0, pi->Devmode);
 611     HeapFree(PSDRV_Heap, 0, pi);
 612     HeapFree( GetProcessHeap(), 0, nameA );
 613     HeapFree( GetProcessHeap(), 0, ppd_filename );
 614     return NULL;
 615 }
 616
 617 /******************************************************************************
 618  *      PSDRV_get_gdi_driver
 619  */
 620 const struct gdi_dc_funcs * CDECL PSDRV_get_gdi_driver( unsigned int version, const WCHAR *name )
 621 {
 622     PRINTERINFO *pi = PSDRV_FindPrinterInfo( name );
 623     struct init_dc_params params = { NULL, pi, pi->friendly_name };
 624
 625     if (!pi)
 626         return NULL;
 627     if (version != WINE_GDI_DRIVER_VERSION)
 628     {
 629         ERR( "version mismatch, gdi32 wants %u but wineps has %u\n", version, WINE_GDI_DRIVER_VERSION );
 630         return NULL;
 631     }
 632     if (!WINE_UNIX_CALL( unix_init_dc, &params ))
 633         return FALSE;
 634     return params.funcs;
 635 }