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 "unixlib.h"
  32 #include "psdrv.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   { /* dmDocPrivate */
  86     /* dummy */ 0
  87   },
  88   { /* dmDrvPrivate */
  89     /* numInstalledOptions */ 0
  90   }
  91 };
  92
  93 HINSTANCE PSDRV_hInstance = 0;
  94 HANDLE PSDRV_Heap = 0;
  95
  96 static HFONT PSDRV_DefaultFont = 0;
  97 static const LOGFONTA DefaultLogFont = {
  98     100, 0, 0, 0, FW_NORMAL, FALSE, FALSE, FALSE, ANSI_CHARSET, 0, 0,
  99     DEFAULT_QUALITY, FIXED_PITCH | FF_MODERN, ""
 100 };
 101
 102 static struct gdi_dc_funcs psdrv_funcs;
 103
 104 /*********************************************************************
 105  *           DllMain
 106  *
 107  * Initializes font metrics and registers driver. wineps dll entry point.
 108  *
 109  */
 110 BOOL WINAPI DllMain( HINSTANCE hinst, DWORD reason, LPVOID reserved )
 111 {
 112     TRACE("(%p, %ld, %p)\n", hinst, reason, reserved);
 113
 114     switch(reason) {
 115
 116         case DLL_PROCESS_ATTACH:
 117         {
 118             struct init_dc_params params = { &psdrv_funcs };
 119
 120             PSDRV_hInstance = hinst;
 121             DisableThreadLibraryCalls(hinst);
 122
 123             if (__wine_init_unix_call())
 124                 return FALSE;
 125             if (!WINE_UNIX_CALL( unix_init_dc, &params ))
 126                 return FALSE;
 127
 128
 129             PSDRV_Heap = HeapCreate(0, 0x10000, 0);
 130             if (PSDRV_Heap == NULL)
 131                 return FALSE;
 132
 133             if (PSDRV_GetFontMetrics() == FALSE) {
 134                 HeapDestroy(PSDRV_Heap);
 135                 return FALSE;
 136             }
 137
 138             PSDRV_DefaultFont = CreateFontIndirectA(&DefaultLogFont);
 139             if (PSDRV_DefaultFont == NULL) {
 140                 HeapDestroy(PSDRV_Heap);
 141                 return FALSE;
 142             }
 143             break;
 144         }
 145
 146         case DLL_PROCESS_DETACH:
 147             if (reserved) break;
 148             DeleteObject( PSDRV_DefaultFont );
 149             HeapDestroy( PSDRV_Heap );
 150             break;
 151     }
 152
 153     return TRUE;
 154 }
 155
 156 static void dump_fields(DWORD fields)
 157 {
 158     int add_space = 0;
 159
 160 #define CHECK_FIELD(flag) \
 161 do \
 162 { \
 163     if (fields & flag) \
 164     { \
 165         if (add_space++) TRACE(" "); \
 166         TRACE(#flag); \
 167         fields &= ~flag; \
 168     } \
 169 } \
 170 while (0)
 171
 172     CHECK_FIELD(DM_ORIENTATION);
 173     CHECK_FIELD(DM_PAPERSIZE);
 174     CHECK_FIELD(DM_PAPERLENGTH);
 175     CHECK_FIELD(DM_PAPERWIDTH);
 176     CHECK_FIELD(DM_SCALE);
 177     CHECK_FIELD(DM_POSITION);
 178     CHECK_FIELD(DM_NUP);
 179     CHECK_FIELD(DM_DISPLAYORIENTATION);
 180     CHECK_FIELD(DM_COPIES);
 181     CHECK_FIELD(DM_DEFAULTSOURCE);
 182     CHECK_FIELD(DM_PRINTQUALITY);
 183     CHECK_FIELD(DM_COLOR);
 184     CHECK_FIELD(DM_DUPLEX);
 185     CHECK_FIELD(DM_YRESOLUTION);
 186     CHECK_FIELD(DM_TTOPTION);
 187     CHECK_FIELD(DM_COLLATE);
 188     CHECK_FIELD(DM_FORMNAME);
 189     CHECK_FIELD(DM_LOGPIXELS);
 190     CHECK_FIELD(DM_BITSPERPEL);
 191     CHECK_FIELD(DM_PELSWIDTH);
 192     CHECK_FIELD(DM_PELSHEIGHT);
 193     CHECK_FIELD(DM_DISPLAYFLAGS);
 194     CHECK_FIELD(DM_DISPLAYFREQUENCY);
 195     CHECK_FIELD(DM_ICMMETHOD);
 196     CHECK_FIELD(DM_ICMINTENT);
 197     CHECK_FIELD(DM_MEDIATYPE);
 198     CHECK_FIELD(DM_DITHERTYPE);
 199     CHECK_FIELD(DM_PANNINGWIDTH);
 200     CHECK_FIELD(DM_PANNINGHEIGHT);
 201     if (fields) TRACE(" %#lx", fields);
 202     TRACE("\n");
 203 #undef CHECK_FIELD
 204 }
 205
 206 /* Dump DEVMODE structure without a device specific part.
 207  * Some applications and drivers fail to specify correct field
 208  * flags (like DM_FORMNAME), so dump everything.
 209  */
 210 static void dump_devmode(const DEVMODEW *dm)
 211 {
 212     if (!TRACE_ON(psdrv)) return;
 213
 214     TRACE("dmDeviceName: %s\n", debugstr_w(dm->dmDeviceName));
 215     TRACE("dmSpecVersion: 0x%04x\n", dm->dmSpecVersion);
 216     TRACE("dmDriverVersion: 0x%04x\n", dm->dmDriverVersion);
 217     TRACE("dmSize: 0x%04x\n", dm->dmSize);
 218     TRACE("dmDriverExtra: 0x%04x\n", dm->dmDriverExtra);
 219     TRACE("dmFields: 0x%04lx\n", dm->dmFields);
 220     dump_fields(dm->dmFields);
 221     TRACE("dmOrientation: %d\n", dm->dmOrientation);
 222     TRACE("dmPaperSize: %d\n", dm->dmPaperSize);
 223     TRACE("dmPaperLength: %d\n", dm->dmPaperLength);
 224     TRACE("dmPaperWidth: %d\n", dm->dmPaperWidth);
 225     TRACE("dmScale: %d\n", dm->dmScale);
 226     TRACE("dmCopies: %d\n", dm->dmCopies);
 227     TRACE("dmDefaultSource: %d\n", dm->dmDefaultSource);
 228     TRACE("dmPrintQuality: %d\n", dm->dmPrintQuality);
 229     TRACE("dmColor: %d\n", dm->dmColor);
 230     TRACE("dmDuplex: %d\n", dm->dmDuplex);
 231     TRACE("dmYResolution: %d\n", dm->dmYResolution);
 232     TRACE("dmTTOption: %d\n", dm->dmTTOption);
 233     TRACE("dmCollate: %d\n", dm->dmCollate);
 234     TRACE("dmFormName: %s\n", debugstr_w(dm->dmFormName));
 235     TRACE("dmLogPixels %u\n", dm->dmLogPixels);
 236     TRACE("dmBitsPerPel %lu\n", dm->dmBitsPerPel);
 237     TRACE("dmPelsWidth %lu\n", dm->dmPelsWidth);
 238     TRACE("dmPelsHeight %lu\n", dm->dmPelsHeight);
 239 }
 240
 241 static void PSDRV_UpdateDevCaps( PSDRV_PDEVICE *physDev )
 242 {
 243     PAGESIZE *page;
 244     RESOLUTION *res;
 245     INT width = 0, height = 0, resx = 0, resy = 0;
 246
 247     dump_devmode(&physDev->Devmode->dmPublic);
 248
 249     if (physDev->Devmode->dmPublic.dmFields & (DM_PRINTQUALITY | DM_YRESOLUTION | DM_LOGPIXELS))
 250     {
 251         if (physDev->Devmode->dmPublic.dmFields & DM_PRINTQUALITY)
 252             resx = resy = physDev->Devmode->dmPublic.dmPrintQuality;
 253
 254         if (physDev->Devmode->dmPublic.dmFields & DM_YRESOLUTION)
 255             resy = physDev->Devmode->dmPublic.dmYResolution;
 256
 257         if (physDev->Devmode->dmPublic.dmFields & DM_LOGPIXELS)
 258             resx = resy = physDev->Devmode->dmPublic.dmLogPixels;
 259
 260         LIST_FOR_EACH_ENTRY(res, &physDev->pi->ppd->Resolutions, RESOLUTION, entry)
 261         {
 262             if (res->resx == resx && res->resy == resy)
 263             {
 264                 physDev->logPixelsX = resx;
 265                 physDev->logPixelsY = resy;
 266                 break;
 267             }
 268         }
 269
 270         if (&res->entry == &physDev->pi->ppd->Resolutions)
 271         {
 272             WARN("Requested resolution %dx%d is not supported by device\n", resx, resy);
 273             physDev->logPixelsX = physDev->pi->ppd->DefaultResolution;
 274             physDev->logPixelsY = physDev->logPixelsX;
 275         }
 276     }
 277     else
 278     {
 279         WARN("Using default device resolution %d\n", physDev->pi->ppd->DefaultResolution);
 280         physDev->logPixelsX = physDev->pi->ppd->DefaultResolution;
 281         physDev->logPixelsY = physDev->logPixelsX;
 282     }
 283
 284     if(physDev->Devmode->dmPublic.dmFields & DM_PAPERSIZE) {
 285         LIST_FOR_EACH_ENTRY(page, &physDev->pi->ppd->PageSizes, PAGESIZE, entry) {
 286             if(page->WinPage == physDev->Devmode->dmPublic.dmPaperSize)
 287                 break;
 288         }
 289
 290         if(&page->entry == &physDev->pi->ppd->PageSizes) {
 291             FIXME("Can't find page\n");
 292             SetRectEmpty(&physDev->ImageableArea);
 293             physDev->PageSize.cx = 0;
 294             physDev->PageSize.cy = 0;
 295         } else if(page->ImageableArea) {
 296           /* physDev sizes in device units; ppd sizes in 1/72" */
 297             SetRect(&physDev->ImageableArea, page->ImageableArea->llx * physDev->logPixelsX / 72,
 298                     page->ImageableArea->ury * physDev->logPixelsY / 72,
 299                     page->ImageableArea->urx * physDev->logPixelsX / 72,
 300                     page->ImageableArea->lly * physDev->logPixelsY / 72);
 301             physDev->PageSize.cx = page->PaperDimension->x *
 302               physDev->logPixelsX / 72;
 303             physDev->PageSize.cy = page->PaperDimension->y *
 304               physDev->logPixelsY / 72;
 305         } else {
 306             physDev->ImageableArea.left = physDev->ImageableArea.bottom = 0;
 307             physDev->ImageableArea.right = physDev->PageSize.cx =
 308               page->PaperDimension->x * physDev->logPixelsX / 72;
 309             physDev->ImageableArea.top = physDev->PageSize.cy =
 310               page->PaperDimension->y * physDev->logPixelsY / 72;
 311         }
 312     } else if((physDev->Devmode->dmPublic.dmFields & DM_PAPERLENGTH) &&
 313               (physDev->Devmode->dmPublic.dmFields & DM_PAPERWIDTH)) {
 314       /* physDev sizes in device units; Devmode sizes in 1/10 mm */
 315         physDev->ImageableArea.left = physDev->ImageableArea.bottom = 0;
 316         physDev->ImageableArea.right = physDev->PageSize.cx =
 317           physDev->Devmode->dmPublic.dmPaperWidth * physDev->logPixelsX / 254;
 318         physDev->ImageableArea.top = physDev->PageSize.cy =
 319           physDev->Devmode->dmPublic.dmPaperLength * physDev->logPixelsY / 254;
 320     } else {
 321         FIXME("Odd dmFields %lx\n", physDev->Devmode->dmPublic.dmFields);
 322         SetRectEmpty(&physDev->ImageableArea);
 323         physDev->PageSize.cx = 0;
 324         physDev->PageSize.cy = 0;
 325     }
 326
 327     TRACE("ImageableArea = %s: PageSize = %ldx%ld\n", wine_dbgstr_rect(&physDev->ImageableArea),
 328           physDev->PageSize.cx, physDev->PageSize.cy);
 329
 330     /* these are in device units */
 331     width = physDev->ImageableArea.right - physDev->ImageableArea.left;
 332     height = physDev->ImageableArea.top - physDev->ImageableArea.bottom;
 333
 334     if(physDev->Devmode->dmPublic.dmOrientation == DMORIENT_PORTRAIT) {
 335         physDev->horzRes = width;
 336         physDev->vertRes = height;
 337     } else {
 338         physDev->horzRes = height;
 339         physDev->vertRes = width;
 340     }
 341
 342     /* these are in mm */
 343     physDev->horzSize = (physDev->horzRes * 25.4) / physDev->logPixelsX;
 344     physDev->vertSize = (physDev->vertRes * 25.4) / physDev->logPixelsY;
 345
 346     TRACE("devcaps: horzSize = %dmm, vertSize = %dmm, "
 347           "horzRes = %d, vertRes = %d\n",
 348           physDev->horzSize, physDev->vertSize,
 349           physDev->horzRes, physDev->vertRes);
 350 }
 351
 352 PSDRV_PDEVICE *create_psdrv_physdev( HDC hdc, const WCHAR *device,
 353                                      const PSDRV_DEVMODE *devmode )
 354 {
 355     PRINTERINFO *pi = PSDRV_FindPrinterInfo( device );
 356     PSDRV_PDEVICE *pdev;
 357
 358     if (!pi) return NULL;
 359     if (!pi->Fonts)
 360     {
 361         RASTERIZER_STATUS status;
 362         if (!GetRasterizerCaps( &status, sizeof(status) ) ||
 363                 !(status.wFlags & TT_AVAILABLE) ||
 364                 !(status.wFlags & TT_ENABLED))
 365         {
 366             MESSAGE( "Disabling printer %s since it has no builtin fonts and "
 367                     "there are no TrueType fonts available.\n", debugstr_w(device) );
 368             return FALSE;
 369         }
 370     }
 371
 372     pdev = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*pdev) );
 373     if (!pdev) return NULL;
 374
 375     pdev->Devmode = HeapAlloc( GetProcessHeap(), 0, sizeof(PSDRV_DEVMODE) );
 376     if (!pdev->Devmode)
 377     {
 378         HeapFree( GetProcessHeap(), 0, pdev );
 379         return NULL;
 380     }
 381
 382     *pdev->Devmode = *pi->Devmode;
 383     pdev->pi = pi;
 384     pdev->logPixelsX = pi->ppd->DefaultResolution;
 385     pdev->logPixelsY = pi->ppd->DefaultResolution;
 386
 387     if (devmode)
 388     {
 389         dump_devmode( &devmode->dmPublic );
 390         PSDRV_MergeDevmodes( pdev->Devmode, devmode, pi );
 391     }
 392
 393     PSDRV_UpdateDevCaps( pdev );
 394     SelectObject( hdc, PSDRV_DefaultFont );
 395     return pdev;
 396 }
 397
 398 /**********************************************************************
 399  *           PSDRV_CreateDC
 400  */
 401 static BOOL CDECL PSDRV_CreateDC( PHYSDEV *pdev, LPCWSTR device, LPCWSTR output,
 402                                   const DEVMODEW *initData )
 403 {
 404     PSDRV_PDEVICE *physDev;
 405
 406     TRACE("(%s %s %p)\n", debugstr_w(device), debugstr_w(output), initData);
 407
 408     if (!device) return FALSE;
 409     if (!(physDev = create_psdrv_physdev( (*pdev)->hdc, device,
 410                     (const PSDRV_DEVMODE *)initData ))) return FALSE;
 411     push_dc_driver( pdev, &physDev->dev, &psdrv_funcs );
 412     return TRUE;
 413 }
 414
 415
 416 /**********************************************************************
 417  *           PSDRV_CreateCompatibleDC
 418  */
 419 static BOOL CDECL PSDRV_CreateCompatibleDC( PHYSDEV orig, PHYSDEV *pdev )
 420 {
 421     PSDRV_PDEVICE *physDev, *orig_dev = get_psdrv_dev( orig );
 422
 423     if (!(physDev = create_psdrv_physdev( (*pdev)->hdc, orig_dev->pi->friendly_name,
 424                     orig_dev->Devmode ))) return FALSE;
 425     push_dc_driver( pdev, &physDev->dev, &psdrv_funcs );
 426     return TRUE;
 427 }
 428
 429
 430
 431 /**********************************************************************
 432  *           PSDRV_DeleteDC
 433  */
 434 static BOOL CDECL PSDRV_DeleteDC( PHYSDEV dev )
 435 {
 436     PSDRV_PDEVICE *physDev = get_psdrv_dev( dev );
 437
 438     TRACE("\n");
 439
 440     HeapFree( GetProcessHeap(), 0, physDev->Devmode );
 441     HeapFree( GetProcessHeap(), 0, physDev );
 442
 443     return TRUE;
 444 }
 445
 446
 447 /**********************************************************************
 448  *           ResetDC   (WINEPS.@)
 449  */
 450 BOOL CDECL PSDRV_ResetDC( PHYSDEV dev, const DEVMODEW *lpInitData )
 451 {
 452     PSDRV_PDEVICE *physDev = get_psdrv_dev( dev );
 453
 454     if (lpInitData)
 455     {
 456         PSDRV_MergeDevmodes(physDev->Devmode, (const PSDRV_DEVMODE *)lpInitData, physDev->pi);
 457         PSDRV_UpdateDevCaps(physDev);
 458     }
 459     return TRUE;
 460 }
 461
 462 static PRINTER_ENUM_VALUESW *load_font_sub_table( HANDLE printer, DWORD *num_entries )
 463 {
 464     DWORD res, needed, num;
 465     PRINTER_ENUM_VALUESW *table = NULL;
 466     static const WCHAR fontsubkey[] = L"PrinterDriverData\\FontSubTable";
 467
 468     *num_entries = 0;
 469
 470     res = EnumPrinterDataExW( printer, fontsubkey, NULL, 0, &needed, &num );
 471     if (res != ERROR_MORE_DATA) return NULL;
 472
 473     table = HeapAlloc( PSDRV_Heap, 0, needed );
 474     if (!table) return NULL;
 475
 476     res = EnumPrinterDataExW( printer, fontsubkey, (LPBYTE)table, needed, &needed, &num );
 477     if (res != ERROR_SUCCESS)
 478     {
 479         HeapFree( PSDRV_Heap, 0, table );
 480         return NULL;
 481     }
 482
 483     *num_entries = num;
 484     return table;
 485 }
 486
 487 static PSDRV_DEVMODE *get_printer_devmode( HANDLE printer )
 488 {
 489     DWORD needed, dm_size;
 490     BOOL res;
 491     PRINTER_INFO_9W *info;
 492     PSDRV_DEVMODE *dm;
 493
 494     GetPrinterW( printer, 9, NULL, 0, &needed );
 495     if (GetLastError() != ERROR_INSUFFICIENT_BUFFER) return NULL;
 496
 497     info = HeapAlloc( PSDRV_Heap, 0, needed );
 498     res = GetPrinterW( printer, 9, (BYTE *)info, needed, &needed );
 499     if (!res || !info->pDevMode)
 500     {
 501         HeapFree( PSDRV_Heap, 0, info );
 502         return NULL;
 503     }
 504
 505     /* sanity check the sizes */
 506     dm_size = info->pDevMode->dmSize + info->pDevMode->dmDriverExtra;
 507     if ((char *)info->pDevMode - (char *)info + dm_size > needed)
 508     {
 509         HeapFree( PSDRV_Heap, 0, info );
 510         return NULL;
 511     }
 512
 513     dm = (PSDRV_DEVMODE*)info;
 514     memmove( dm, info->pDevMode, dm_size );
 515     return dm;
 516 }
 517
 518 static PSDRV_DEVMODE *get_devmode( HANDLE printer, const WCHAR *name, BOOL *is_default )
 519 {
 520     PSDRV_DEVMODE *dm = get_printer_devmode( printer );
 521
 522     *is_default = FALSE;
 523
 524     if (dm && dm->dmPublic.dmSize + dm->dmPublic.dmDriverExtra >= sizeof(DefaultDevmode))
 525     {
 526         TRACE( "Retrieved devmode from winspool\n" );
 527         return dm;
 528     }
 529     HeapFree( PSDRV_Heap, 0, dm );
 530
 531     TRACE( "Using default devmode\n" );
 532     dm = HeapAlloc( PSDRV_Heap, 0, sizeof(DefaultDevmode) );
 533     if (dm)
 534     {
 535         *dm = DefaultDevmode;
 536         lstrcpynW( (WCHAR *)dm->dmPublic.dmDeviceName, name, CCHDEVICENAME );
 537         *is_default = TRUE;
 538     }
 539     return dm;
 540 }
 541
 542 static BOOL set_devmode( HANDLE printer, PSDRV_DEVMODE *dm )
 543 {
 544     PRINTER_INFO_9W info;
 545     info.pDevMode = &dm->dmPublic;
 546
 547     return SetPrinterW( printer, 9, (BYTE *)&info, 0 );
 548 }
 549
 550 static WCHAR *get_ppd_filename( HANDLE printer )
 551 {
 552     DWORD needed;
 553     DRIVER_INFO_2W *info;
 554     WCHAR *name;
 555
 556     GetPrinterDriverW( printer, NULL, 2, NULL, 0, &needed );
 557     if (GetLastError() != ERROR_INSUFFICIENT_BUFFER) return NULL;
 558     info = HeapAlloc( GetProcessHeap(), 0, needed );
 559     if (!info) return NULL;
 560     GetPrinterDriverW( printer, NULL, 2, (BYTE*)info, needed, &needed );
 561     name = (WCHAR *)info;
 562     memmove( name, info->pDataFile, (lstrlenW( info->pDataFile ) + 1) * sizeof(WCHAR) );
 563     return name;
 564 }
 565
 566 static struct list printer_list = LIST_INIT( printer_list );
 567
 568 /**********************************************************************
 569  *              PSDRV_FindPrinterInfo
 570  */
 571 PRINTERINFO *PSDRV_FindPrinterInfo(LPCWSTR name)
 572 {
 573     PRINTERINFO *pi;
 574     FONTNAME *font;
 575     const AFM *afm;
 576     HANDLE hPrinter = 0;
 577     WCHAR *ppd_filename = NULL;
 578     char *nameA = NULL;
 579     BOOL using_default_devmode = FALSE;
 580     int len;
 581
 582     TRACE("%s\n", debugstr_w(name));
 583
 584     LIST_FOR_EACH_ENTRY( pi, &printer_list, PRINTERINFO, entry )
 585     {
 586         if (!wcscmp( pi->friendly_name, name ))
 587             return pi;
 588     }
 589
 590     pi = HeapAlloc( PSDRV_Heap, HEAP_ZERO_MEMORY, sizeof(*pi) );
 591     if (pi == NULL) return NULL;
 592
 593     if (!(pi->friendly_name = HeapAlloc( PSDRV_Heap, 0, (lstrlenW(name)+1)*sizeof(WCHAR) ))) goto fail;
 594     lstrcpyW( pi->friendly_name, name );
 595
 596     if (OpenPrinterW( pi->friendly_name, &hPrinter, NULL ) == 0) {
 597         ERR ("OpenPrinter failed with code %li\n", GetLastError ());
 598         goto fail;
 599     }
 600
 601     len = WideCharToMultiByte( CP_ACP, 0, name, -1, NULL, 0, NULL, NULL );
 602     nameA = HeapAlloc( GetProcessHeap(), 0, len );
 603     WideCharToMultiByte( CP_ACP, 0, name, -1, nameA, len, NULL, NULL );
 604
 605     pi->Devmode = get_devmode( hPrinter, name, &using_default_devmode );
 606     if (!pi->Devmode) goto fail;
 607
 608     ppd_filename = get_ppd_filename( hPrinter );
 609     if (!ppd_filename) goto fail;
 610
 611     pi->ppd = PSDRV_ParsePPD( ppd_filename, hPrinter );
 612     if (!pi->ppd)
 613     {
 614         WARN( "Couldn't parse PPD file %s\n", debugstr_w(ppd_filename) );
 615         goto fail;
 616     }
 617
 618     if(using_default_devmode) {
 619         DWORD papersize;
 620
 621         if(GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_IPAPERSIZE | LOCALE_RETURN_NUMBER,
 622                           (LPWSTR)&papersize, sizeof(papersize)/sizeof(WCHAR))) {
 623             PSDRV_DEVMODE dm;
 624             memset(&dm, 0, sizeof(dm));
 625             dm.dmPublic.dmFields = DM_PAPERSIZE;
 626             dm.dmPublic.dmPaperSize = papersize;
 627             PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
 628         }
 629     }
 630
 631     if(pi->ppd->DefaultPageSize) { /* We'll let the ppd override the devmode */
 632         PSDRV_DEVMODE dm;
 633         memset(&dm, 0, sizeof(dm));
 634         dm.dmPublic.dmFields = DM_PAPERSIZE;
 635         dm.dmPublic.dmPaperSize = pi->ppd->DefaultPageSize->WinPage;
 636         PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
 637     }
 638
 639     /* Duplex is indicated by the setting of the DM_DUPLEX bit in dmFields.
 640        WinDuplex == 0 is a special case which means that the ppd has a
 641        *DefaultDuplex: NotCapable entry.  In this case we'll try not to confuse
 642        apps and set dmDuplex to DMDUP_SIMPLEX but leave the DM_DUPLEX clear.
 643        PSDRV_WriteHeader understands this and copes. */
 644     pi->Devmode->dmPublic.dmFields &= ~DM_DUPLEX;
 645     if(pi->ppd->DefaultDuplex) {
 646         pi->Devmode->dmPublic.dmDuplex = pi->ppd->DefaultDuplex->WinDuplex;
 647         if(pi->Devmode->dmPublic.dmDuplex != 0)
 648             pi->Devmode->dmPublic.dmFields |= DM_DUPLEX;
 649         else
 650             pi->Devmode->dmPublic.dmDuplex = DMDUP_SIMPLEX;
 651     }
 652
 653     set_devmode( hPrinter, pi->Devmode );
 654
 655     pi->FontSubTable = load_font_sub_table( hPrinter, &pi->FontSubTableSize );
 656
 657     LIST_FOR_EACH_ENTRY( font, &pi->ppd->InstalledFonts, FONTNAME, entry )
 658     {
 659         afm = PSDRV_FindAFMinList(PSDRV_AFMFontList, font->Name);
 660         if(!afm) {
 661             TRACE( "Couldn't find AFM file for installed printer font '%s' - "
 662                     "ignoring\n", font->Name);
 663         }
 664         else {
 665             BOOL added;
 666             if (PSDRV_AddAFMtoList(&pi->Fonts, afm, &added) == FALSE) {
 667                 PSDRV_FreeAFMList(pi->Fonts);
 668                 goto fail;
 669             }
 670         }
 671
 672     }
 673     ClosePrinter( hPrinter );
 674     HeapFree( GetProcessHeap(), 0, nameA );
 675     HeapFree( GetProcessHeap(), 0, ppd_filename );
 676     list_add_head( &printer_list, &pi->entry );
 677     return pi;
 678
 679 fail:
 680     if (hPrinter) ClosePrinter( hPrinter );
 681     HeapFree(PSDRV_Heap, 0, pi->FontSubTable);
 682     HeapFree(PSDRV_Heap, 0, pi->friendly_name);
 683     HeapFree(PSDRV_Heap, 0, pi->Devmode);
 684     HeapFree(PSDRV_Heap, 0, pi);
 685     HeapFree( GetProcessHeap(), 0, nameA );
 686     HeapFree( GetProcessHeap(), 0, ppd_filename );
 687     return NULL;
 688 }
 689
 690
 691 static struct gdi_dc_funcs psdrv_funcs =
 692 {
 693     .pCreateCompatibleDC = PSDRV_CreateCompatibleDC,
 694     .pCreateDC = PSDRV_CreateDC,
 695     .pDeleteDC = PSDRV_DeleteDC,
 696     .pEnumFonts = PSDRV_EnumFonts,
 697     .pGetCharWidth = PSDRV_GetCharWidth,
 698     .pGetTextExtentExPoint = PSDRV_GetTextExtentExPoint,
 699     .pGetTextMetrics = PSDRV_GetTextMetrics,
 700     .pSelectFont = PSDRV_SelectFont,
 701     .priority = GDI_PRIORITY_GRAPHICS_DRV
 702 };
 703
 704
 705 /******************************************************************************
 706  *      PSDRV_get_gdi_driver
 707  */
 708 const struct gdi_dc_funcs * CDECL PSDRV_get_gdi_driver( unsigned int version )
 709 {
 710     if (version != WINE_GDI_DRIVER_VERSION)
 711     {
 712         ERR( "version mismatch, gdi32 wants %u but wineps has %u\n", version, WINE_GDI_DRIVER_VERSION );
 713         return NULL;
 714     }
 715     return &psdrv_funcs;
 716 }