git.oblomov.eu Git - wine/blob - 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 "config.h"
  23 #include "wine/port.h"
  24
  25 #include <stdarg.h>
  26 #include <string.h>
  27
  28 #define NONAMELESSUNION
  29 #define NONAMELESSSTRUCT
  30
  31 #include "windef.h"
  32 #include "winbase.h"
  33 #include "winerror.h"
  34 #include "winreg.h"
  35 #include "winnls.h"
  36 #include "psdrv.h"
  37 #include "winspool.h"
  38 #include "wine/library.h"
  39 #include "wine/debug.h"
  40
  41 WINE_DEFAULT_DEBUG_CHANNEL(psdrv);
  42
  43 static const PSDRV_DEVMODE DefaultDevmode =
  44 {
  45   { /* dmPublic */
  46 /* dmDeviceName */      {'W','i','n','e',' ','P','o','s','t','S','c','r','i','p','t',' ','D','r','i','v','e','r',0},
  47 /* dmSpecVersion */     0x30a,
  48 /* dmDriverVersion */   0x001,
  49 /* dmSize */            sizeof(DEVMODEW),
  50 /* dmDriverExtra */     sizeof(PSDRV_DEVMODE)-sizeof(DEVMODEW),
  51 /* dmFields */          DM_ORIENTATION | DM_PAPERSIZE | DM_PAPERLENGTH | DM_PAPERWIDTH |
  52                         DM_SCALE | DM_COPIES | DM_DEFAULTSOURCE | DM_PRINTQUALITY |
  53                         DM_COLOR | DM_DUPLEX | DM_YRESOLUTION | DM_TTOPTION |
  54                         DM_COLLATE | DM_FORMNAME,
  55    { /* u1 */
  56      { /* s1 */
  57 /* dmOrientation */     DMORIENT_PORTRAIT,
  58 /* dmPaperSize */       DMPAPER_LETTER,
  59 /* dmPaperLength */     2794,
  60 /* dmPaperWidth */      2159,
  61 /* dmScale */           100,
  62 /* dmCopies */          1,
  63 /* dmDefaultSource */   DMBIN_AUTO,
  64 /* dmPrintQuality */    300
  65      }
  66    },
  67 /* dmColor */           DMCOLOR_COLOR,
  68 /* dmDuplex */          DMDUP_SIMPLEX,
  69 /* dmYResolution */     300,
  70 /* dmTTOption */        DMTT_SUBDEV,
  71 /* dmCollate */         DMCOLLATE_FALSE,
  72 /* dmFormName */        {'L','e','t','t','e','r',0},
  73 /* dmLogPixels */       0,
  74 /* dmBitsPerPel */      0,
  75 /* dmPelsWidth */       0,
  76 /* dmPelsHeight */      0,
  77    { /* u2 */
  78 /* dmDisplayFlags */    0
  79    },
  80 /* dmDisplayFrequency */ 0,
  81 /* dmICMMethod */       0,
  82 /* dmICMIntent */       0,
  83 /* dmMediaType */       0,
  84 /* dmDitherType */      0,
  85 /* dmReserved1 */       0,
  86 /* dmReserved2 */       0,
  87 /* dmPanningWidth */    0,
  88 /* dmPanningHeight */   0
  89   },
  90   { /* dmDocPrivate */
  91     /* dummy */ 0
  92   },
  93   { /* dmDrvPrivate */
  94     /* numInstalledOptions */ 0
  95   }
  96 };
  97
  98 HINSTANCE PSDRV_hInstance = 0;
  99 HANDLE PSDRV_Heap = 0;
 100
 101 static HFONT PSDRV_DefaultFont = 0;
 102 static const LOGFONTA DefaultLogFont = {
 103     100, 0, 0, 0, FW_NORMAL, FALSE, FALSE, FALSE, ANSI_CHARSET, 0, 0,
 104     DEFAULT_QUALITY, FIXED_PITCH | FF_MODERN, ""
 105 };
 106
 107 static const struct gdi_dc_funcs psdrv_funcs;
 108
 109 /*********************************************************************
 110  *           DllMain
 111  *
 112  * Initializes font metrics and registers driver. wineps dll entry point.
 113  *
 114  */
 115 BOOL WINAPI DllMain( HINSTANCE hinst, DWORD reason, LPVOID reserved )
 116 {
 117     TRACE("(%p, %d, %p)\n", hinst, reason, reserved);
 118
 119     switch(reason) {
 120
 121         case DLL_PROCESS_ATTACH:
 122             PSDRV_hInstance = hinst;
 123             DisableThreadLibraryCalls(hinst);
 124
 125             PSDRV_Heap = HeapCreate(0, 0x10000, 0);
 126             if (PSDRV_Heap == NULL)
 127                 return FALSE;
 128
 129             if (PSDRV_GetFontMetrics() == FALSE) {
 130                 HeapDestroy(PSDRV_Heap);
 131                 return FALSE;
 132             }
 133
 134             PSDRV_DefaultFont = CreateFontIndirectA(&DefaultLogFont);
 135             if (PSDRV_DefaultFont == NULL) {
 136                 HeapDestroy(PSDRV_Heap);
 137                 return FALSE;
 138             }
 139             break;
 140
 141         case DLL_PROCESS_DETACH:
 142
 143             DeleteObject( PSDRV_DefaultFont );
 144             HeapDestroy( PSDRV_Heap );
 145             break;
 146     }
 147
 148     return TRUE;
 149 }
 150
 151 static void PSDRV_UpdateDevCaps( PSDRV_PDEVICE *physDev )
 152 {
 153     PAGESIZE *page;
 154     RESOLUTION *res;
 155     INT width = 0, height = 0, resx = 0, resy = 0;
 156
 157     if (physDev->Devmode->dmPublic.dmFields & (DM_PRINTQUALITY | DM_YRESOLUTION | DM_LOGPIXELS))
 158     {
 159         if (physDev->Devmode->dmPublic.dmFields & DM_PRINTQUALITY)
 160             resx = resy = physDev->Devmode->dmPublic.u1.s1.dmPrintQuality;
 161
 162         if (physDev->Devmode->dmPublic.dmFields & DM_YRESOLUTION)
 163             resy = physDev->Devmode->dmPublic.dmYResolution;
 164
 165         if (physDev->Devmode->dmPublic.dmFields & DM_LOGPIXELS)
 166             resx = resy = physDev->Devmode->dmPublic.dmLogPixels;
 167
 168         LIST_FOR_EACH_ENTRY(res, &physDev->pi->ppd->Resolutions, RESOLUTION, entry)
 169         {
 170             if (res->resx == resx && res->resy == resy)
 171             {
 172                 physDev->logPixelsX = resx;
 173                 physDev->logPixelsY = resy;
 174                 break;
 175             }
 176         }
 177
 178         if (&res->entry == &physDev->pi->ppd->Resolutions)
 179         {
 180             WARN("Requested resolution %dx%d is not supported by device\n", resx, resy);
 181             physDev->logPixelsX = physDev->pi->ppd->DefaultResolution;
 182             physDev->logPixelsY = physDev->logPixelsX;
 183         }
 184     }
 185     else
 186     {
 187         WARN("Using default device resolution %d\n", physDev->pi->ppd->DefaultResolution);
 188         physDev->logPixelsX = physDev->pi->ppd->DefaultResolution;
 189         physDev->logPixelsY = physDev->logPixelsX;
 190     }
 191
 192     if(physDev->Devmode->dmPublic.dmFields & DM_PAPERSIZE) {
 193         LIST_FOR_EACH_ENTRY(page, &physDev->pi->ppd->PageSizes, PAGESIZE, entry) {
 194             if(page->WinPage == physDev->Devmode->dmPublic.u1.s1.dmPaperSize)
 195                 break;
 196         }
 197
 198         if(&page->entry == &physDev->pi->ppd->PageSizes) {
 199             FIXME("Can't find page\n");
 200             physDev->ImageableArea.left = 0;
 201             physDev->ImageableArea.right = 0;
 202             physDev->ImageableArea.bottom = 0;
 203             physDev->ImageableArea.top = 0;
 204             physDev->PageSize.cx = 0;
 205             physDev->PageSize.cy = 0;
 206         } else if(page->ImageableArea) {
 207           /* physDev sizes in device units; ppd sizes in 1/72" */
 208             physDev->ImageableArea.left = page->ImageableArea->llx *
 209               physDev->logPixelsX / 72;
 210             physDev->ImageableArea.right = page->ImageableArea->urx *
 211               physDev->logPixelsX / 72;
 212             physDev->ImageableArea.bottom = page->ImageableArea->lly *
 213               physDev->logPixelsY / 72;
 214             physDev->ImageableArea.top = page->ImageableArea->ury *
 215               physDev->logPixelsY / 72;
 216             physDev->PageSize.cx = page->PaperDimension->x *
 217               physDev->logPixelsX / 72;
 218             physDev->PageSize.cy = page->PaperDimension->y *
 219               physDev->logPixelsY / 72;
 220         } else {
 221             physDev->ImageableArea.left = physDev->ImageableArea.bottom = 0;
 222             physDev->ImageableArea.right = physDev->PageSize.cx =
 223               page->PaperDimension->x * physDev->logPixelsX / 72;
 224             physDev->ImageableArea.top = physDev->PageSize.cy =
 225               page->PaperDimension->y * physDev->logPixelsY / 72;
 226         }
 227     } else if((physDev->Devmode->dmPublic.dmFields & DM_PAPERLENGTH) &&
 228               (physDev->Devmode->dmPublic.dmFields & DM_PAPERWIDTH)) {
 229       /* physDev sizes in device units; Devmode sizes in 1/10 mm */
 230         physDev->ImageableArea.left = physDev->ImageableArea.bottom = 0;
 231         physDev->ImageableArea.right = physDev->PageSize.cx =
 232           physDev->Devmode->dmPublic.u1.s1.dmPaperWidth *
 233           physDev->logPixelsX / 254;
 234         physDev->ImageableArea.top = physDev->PageSize.cy =
 235           physDev->Devmode->dmPublic.u1.s1.dmPaperLength *
 236           physDev->logPixelsY / 254;
 237     } else {
 238         FIXME("Odd dmFields %x\n", physDev->Devmode->dmPublic.dmFields);
 239         physDev->ImageableArea.left = 0;
 240         physDev->ImageableArea.right = 0;
 241         physDev->ImageableArea.bottom = 0;
 242         physDev->ImageableArea.top = 0;
 243         physDev->PageSize.cx = 0;
 244         physDev->PageSize.cy = 0;
 245     }
 246
 247     TRACE("ImageableArea = %d,%d - %d,%d: PageSize = %dx%d\n",
 248           physDev->ImageableArea.left, physDev->ImageableArea.bottom,
 249           physDev->ImageableArea.right, physDev->ImageableArea.top,
 250           physDev->PageSize.cx, physDev->PageSize.cy);
 251
 252     /* these are in device units */
 253     width = physDev->ImageableArea.right - physDev->ImageableArea.left;
 254     height = physDev->ImageableArea.top - physDev->ImageableArea.bottom;
 255
 256     if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_PORTRAIT) {
 257         physDev->horzRes = width;
 258         physDev->vertRes = height;
 259     } else {
 260         physDev->horzRes = height;
 261         physDev->vertRes = width;
 262     }
 263
 264     /* these are in mm */
 265     physDev->horzSize = (physDev->horzRes * 25.4) / physDev->logPixelsX;
 266     physDev->vertSize = (physDev->vertRes * 25.4) / physDev->logPixelsY;
 267
 268     TRACE("devcaps: horzSize = %dmm, vertSize = %dmm, "
 269           "horzRes = %d, vertRes = %d\n",
 270           physDev->horzSize, physDev->vertSize,
 271           physDev->horzRes, physDev->vertRes);
 272 }
 273
 274 static PSDRV_PDEVICE *create_psdrv_physdev( PRINTERINFO *pi )
 275 {
 276     PSDRV_PDEVICE *physDev;
 277
 278     physDev = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*physDev) );
 279     if (!physDev) return NULL;
 280
 281     physDev->Devmode = HeapAlloc( GetProcessHeap(), 0, sizeof(PSDRV_DEVMODE) );
 282     if (!physDev->Devmode)
 283     {
 284         HeapFree( GetProcessHeap(), 0, physDev );
 285         return NULL;
 286     }
 287
 288     *physDev->Devmode = *pi->Devmode;
 289     physDev->pi = pi;
 290     physDev->logPixelsX = pi->ppd->DefaultResolution;
 291     physDev->logPixelsY = pi->ppd->DefaultResolution;
 292     return physDev;
 293 }
 294
 295 /**********************************************************************
 296  *           PSDRV_CreateDC
 297  */
 298 static BOOL PSDRV_CreateDC( PHYSDEV *pdev, LPCWSTR driver, LPCWSTR device,
 299                             LPCWSTR output, const DEVMODEW* initData )
 300 {
 301     PSDRV_PDEVICE *physDev;
 302     PRINTERINFO *pi;
 303
 304     TRACE("(%s %s %s %p)\n", debugstr_w(driver), debugstr_w(device),
 305                              debugstr_w(output), initData);
 306
 307     if (!device) return FALSE;
 308     pi = PSDRV_FindPrinterInfo( device );
 309     if(!pi) return FALSE;
 310
 311     if(!pi->Fonts) {
 312         RASTERIZER_STATUS status;
 313         if(!GetRasterizerCaps(&status, sizeof(status)) ||
 314            !(status.wFlags & TT_AVAILABLE) ||
 315            !(status.wFlags & TT_ENABLED)) {
 316             MESSAGE("Disabling printer %s since it has no builtin fonts and there are no TrueType fonts available.\n",
 317                     debugstr_w(device));
 318             return FALSE;
 319         }
 320     }
 321
 322     if (!(physDev = create_psdrv_physdev( pi ))) return FALSE;
 323
 324     if (output && *output) physDev->job.output = strdupW( output );
 325
 326     if(initData)
 327         PSDRV_MergeDevmodes(physDev->Devmode, (PSDRV_DEVMODE *)initData, pi);
 328
 329     PSDRV_UpdateDevCaps(physDev);
 330     SelectObject( (*pdev)->hdc, PSDRV_DefaultFont );
 331     push_dc_driver( pdev, &physDev->dev, &psdrv_funcs );
 332     return TRUE;
 333 }
 334
 335
 336 /**********************************************************************
 337  *           PSDRV_CreateCompatibleDC
 338  */
 339 static BOOL PSDRV_CreateCompatibleDC( PHYSDEV orig, PHYSDEV *pdev )
 340 {
 341     HDC hdc = (*pdev)->hdc;
 342     PSDRV_PDEVICE *physDev, *orig_dev = get_psdrv_dev( orig );
 343     PRINTERINFO *pi = PSDRV_FindPrinterInfo( orig_dev->pi->friendly_name );
 344
 345     if (!pi) return FALSE;
 346     if (!(physDev = create_psdrv_physdev( pi ))) return FALSE;
 347     PSDRV_MergeDevmodes( physDev->Devmode, orig_dev->Devmode, pi );
 348     PSDRV_UpdateDevCaps(physDev);
 349     SelectObject( hdc, PSDRV_DefaultFont );
 350     push_dc_driver( pdev, &physDev->dev, &psdrv_funcs );
 351     return TRUE;
 352 }
 353
 354
 355
 356 /**********************************************************************
 357  *           PSDRV_DeleteDC
 358  */
 359 static BOOL PSDRV_DeleteDC( PHYSDEV dev )
 360 {
 361     PSDRV_PDEVICE *physDev = get_psdrv_dev( dev );
 362
 363     TRACE("\n");
 364
 365     HeapFree( GetProcessHeap(), 0, physDev->Devmode );
 366     HeapFree( GetProcessHeap(), 0, physDev->job.output );
 367     HeapFree( GetProcessHeap(), 0, physDev );
 368
 369     return TRUE;
 370 }
 371
 372
 373 /**********************************************************************
 374  *           ResetDC   (WINEPS.@)
 375  */
 376 static HDC PSDRV_ResetDC( PHYSDEV dev, const DEVMODEW *lpInitData )
 377 {
 378     PSDRV_PDEVICE *physDev = get_psdrv_dev( dev );
 379
 380     if (lpInitData)
 381     {
 382         PSDRV_MergeDevmodes(physDev->Devmode, (PSDRV_DEVMODE *)lpInitData, physDev->pi);
 383         PSDRV_UpdateDevCaps(physDev);
 384     }
 385     return dev->hdc;
 386 }
 387
 388 /***********************************************************************
 389  *           GetDeviceCaps    (WINEPS.@)
 390  */
 391 static INT PSDRV_GetDeviceCaps( PHYSDEV dev, INT cap )
 392 {
 393     PSDRV_PDEVICE *physDev = get_psdrv_dev( dev );
 394
 395     TRACE("%p,%d\n", dev->hdc, cap);
 396
 397     switch(cap)
 398     {
 399     case DRIVERVERSION:
 400         return 0;
 401     case TECHNOLOGY:
 402         return DT_RASPRINTER;
 403     case HORZSIZE:
 404         return MulDiv(physDev->horzSize, 100,
 405                       physDev->Devmode->dmPublic.u1.s1.dmScale);
 406     case VERTSIZE:
 407         return MulDiv(physDev->vertSize, 100,
 408                       physDev->Devmode->dmPublic.u1.s1.dmScale);
 409     case HORZRES:
 410     case DESKTOPHORZRES:
 411         return physDev->horzRes;
 412     case VERTRES:
 413     case DESKTOPVERTRES:
 414         return physDev->vertRes;
 415     case BITSPIXEL:
 416         return (physDev->pi->ppd->ColorDevice != CD_False) ? 32 : 1;
 417     case PLANES:
 418         return 1;
 419     case NUMBRUSHES:
 420         return -1;
 421     case NUMPENS:
 422         return 10;
 423     case NUMMARKERS:
 424         return 0;
 425     case NUMFONTS:
 426         return 39;
 427     case NUMCOLORS:
 428         return -1;
 429     case PDEVICESIZE:
 430         return sizeof(PSDRV_PDEVICE);
 431     case CURVECAPS:
 432         return (CC_CIRCLES | CC_PIE | CC_CHORD | CC_ELLIPSES | CC_WIDE |
 433                 CC_STYLED | CC_WIDESTYLED | CC_INTERIORS | CC_ROUNDRECT);
 434     case LINECAPS:
 435         return (LC_POLYLINE | LC_MARKER | LC_POLYMARKER | LC_WIDE |
 436                 LC_STYLED | LC_WIDESTYLED | LC_INTERIORS);
 437     case POLYGONALCAPS:
 438         return (PC_POLYGON | PC_RECTANGLE | PC_WINDPOLYGON | PC_SCANLINE |
 439                 PC_WIDE | PC_STYLED | PC_WIDESTYLED | PC_INTERIORS);
 440     case TEXTCAPS:
 441         return TC_CR_ANY | TC_VA_ABLE; /* psdrv 0x59f7 */
 442     case CLIPCAPS:
 443         return CP_RECTANGLE;
 444     case RASTERCAPS:
 445         return (RC_BITBLT | RC_BITMAP64 | RC_GDI20_OUTPUT | RC_DIBTODEV |
 446                 RC_STRETCHBLT | RC_STRETCHDIB); /* psdrv 0x6e99 */
 447     case ASPECTX:
 448         return physDev->logPixelsX;
 449     case ASPECTY:
 450         return physDev->logPixelsY;
 451     case ASPECTXY:
 452         return (int)hypot( (double)physDev->logPixelsX,
 453                            (double)physDev->logPixelsY );
 454     case LOGPIXELSX:
 455         return MulDiv(physDev->logPixelsX,
 456                       physDev->Devmode->dmPublic.u1.s1.dmScale, 100);
 457     case LOGPIXELSY:
 458         return MulDiv(physDev->logPixelsY,
 459                       physDev->Devmode->dmPublic.u1.s1.dmScale, 100);
 460     case SIZEPALETTE:
 461         return 0;
 462     case NUMRESERVED:
 463         return 0;
 464     case COLORRES:
 465         return 0;
 466     case PHYSICALWIDTH:
 467         return (physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) ?
 468           physDev->PageSize.cy : physDev->PageSize.cx;
 469     case PHYSICALHEIGHT:
 470         return (physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) ?
 471           physDev->PageSize.cx : physDev->PageSize.cy;
 472     case PHYSICALOFFSETX:
 473       if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) {
 474           if(physDev->pi->ppd->LandscapeOrientation == -90)
 475               return physDev->PageSize.cy - physDev->ImageableArea.top;
 476           else
 477               return physDev->ImageableArea.bottom;
 478       }
 479       return physDev->ImageableArea.left;
 480
 481     case PHYSICALOFFSETY:
 482       if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) {
 483           if(physDev->pi->ppd->LandscapeOrientation == -90)
 484               return physDev->PageSize.cx - physDev->ImageableArea.right;
 485           else
 486               return physDev->ImageableArea.left;
 487       }
 488       return physDev->PageSize.cy - physDev->ImageableArea.top;
 489
 490     case SCALINGFACTORX:
 491     case SCALINGFACTORY:
 492     case VREFRESH:
 493     case BLTALIGNMENT:
 494         return 0;
 495     case SHADEBLENDCAPS:
 496         return SB_NONE;
 497     default:
 498         FIXME("(%p): unsupported capability %d, will return 0\n", dev->hdc, cap );
 499         return 0;
 500     }
 501 }
 502
 503 static PRINTER_ENUM_VALUESA *load_font_sub_table( HANDLE printer, DWORD *num_entries )
 504 {
 505     DWORD res, needed, num;
 506     PRINTER_ENUM_VALUESA *table = NULL;
 507     static const char fontsubkey[] = "PrinterDriverData\\FontSubTable";
 508
 509     *num_entries = 0;
 510
 511     res = EnumPrinterDataExA( printer, fontsubkey, NULL, 0, &needed, &num );
 512     if (res != ERROR_MORE_DATA) return NULL;
 513
 514     table = HeapAlloc( PSDRV_Heap, 0, needed );
 515     if (!table) return NULL;
 516
 517     res = EnumPrinterDataExA( printer, fontsubkey, (LPBYTE)table, needed, &needed, &num );
 518     if (res != ERROR_SUCCESS)
 519     {
 520         HeapFree( PSDRV_Heap, 0, table );
 521         return NULL;
 522     }
 523
 524     *num_entries = num;
 525     return table;
 526 }
 527
 528 static PSDRV_DEVMODE *get_printer_devmode( HANDLE printer )
 529 {
 530     DWORD needed, dm_size;
 531     BOOL res;
 532     PRINTER_INFO_9W *info;
 533     PSDRV_DEVMODE *dm;
 534
 535     GetPrinterW( printer, 9, NULL, 0, &needed );
 536     if (GetLastError() != ERROR_INSUFFICIENT_BUFFER) return NULL;
 537
 538     info = HeapAlloc( PSDRV_Heap, 0, needed );
 539     res = GetPrinterW( printer, 9, (BYTE *)info, needed, &needed );
 540     if (!res || !info->pDevMode)
 541     {
 542         HeapFree( PSDRV_Heap, 0, info );
 543         return NULL;
 544     }
 545
 546     /* sanity check the sizes */
 547     dm_size = info->pDevMode->dmSize + info->pDevMode->dmDriverExtra;
 548     if ((char *)info->pDevMode - (char *)info + dm_size > needed)
 549     {
 550         HeapFree( PSDRV_Heap, 0, info );
 551         return NULL;
 552     }
 553
 554     dm = (PSDRV_DEVMODE*)info;
 555     memmove( dm, info->pDevMode, dm_size );
 556     return dm;
 557 }
 558
 559 static PSDRV_DEVMODE *get_devmode( HANDLE printer, const WCHAR *name, BOOL *is_default )
 560 {
 561     PSDRV_DEVMODE *dm = get_printer_devmode( printer );
 562
 563     *is_default = FALSE;
 564
 565     if (dm && dm->dmPublic.dmSize + dm->dmPublic.dmDriverExtra >= sizeof(DefaultDevmode))
 566     {
 567         TRACE( "Retrieved devmode from winspool\n" );
 568         return dm;
 569     }
 570     HeapFree( PSDRV_Heap, 0, dm );
 571
 572     TRACE( "Using default devmode\n" );
 573     dm = HeapAlloc( PSDRV_Heap, 0, sizeof(DefaultDevmode) );
 574     if (dm)
 575     {
 576         *dm = DefaultDevmode;
 577         lstrcpynW( (WCHAR *)dm->dmPublic.dmDeviceName, name, CCHDEVICENAME );
 578         *is_default = TRUE;
 579     }
 580     return dm;
 581 }
 582
 583 static BOOL set_devmode( HANDLE printer, PSDRV_DEVMODE *dm )
 584 {
 585     PRINTER_INFO_9W info;
 586     info.pDevMode = &dm->dmPublic;
 587
 588     return SetPrinterW( printer, 9, (BYTE *)&info, 0 );
 589 }
 590
 591 static char *get_ppd_filename( HANDLE printer )
 592 {
 593     DWORD needed;
 594     DRIVER_INFO_2W *info;
 595     char *unixname;
 596
 597     GetPrinterDriverW( printer, NULL, 2, NULL, 0, &needed );
 598     if (GetLastError() != ERROR_INSUFFICIENT_BUFFER) return NULL;
 599     info = HeapAlloc( GetProcessHeap(), 0, needed );
 600     if (!info) return NULL;
 601     GetPrinterDriverW( printer, NULL, 2, (BYTE*)info, needed, &needed );
 602     unixname = wine_get_unix_file_name( info->pDataFile );
 603     HeapFree( GetProcessHeap(), 0, info );
 604
 605     return unixname;
 606 }
 607
 608 static struct list printer_list = LIST_INIT( printer_list );
 609
 610 /**********************************************************************
 611  *              PSDRV_FindPrinterInfo
 612  */
 613 PRINTERINFO *PSDRV_FindPrinterInfo(LPCWSTR name)
 614 {
 615     DWORD needed, res, dwPaperSize;
 616     PRINTERINFO *pi;
 617     FONTNAME *font;
 618     const AFM *afm;
 619     HANDLE hPrinter = 0;
 620     char *ppd_filename = NULL, *nameA = NULL;
 621     BOOL using_default_devmode = FALSE;
 622     int len;
 623
 624     TRACE("'%s'\n", debugstr_w(name));
 625
 626     LIST_FOR_EACH_ENTRY( pi, &printer_list, PRINTERINFO, entry )
 627     {
 628         if (!strcmpW( pi->friendly_name, name ))
 629             return pi;
 630     }
 631
 632     pi = HeapAlloc( PSDRV_Heap, HEAP_ZERO_MEMORY, sizeof(*pi) );
 633     if (pi == NULL) return NULL;
 634
 635     if (!(pi->friendly_name = HeapAlloc( PSDRV_Heap, 0, (strlenW(name)+1)*sizeof(WCHAR) ))) goto fail;
 636     strcpyW( pi->friendly_name, name );
 637
 638     if (OpenPrinterW( pi->friendly_name, &hPrinter, NULL ) == 0) {
 639         ERR ("OpenPrinter failed with code %i\n", GetLastError ());
 640         goto fail;
 641     }
 642
 643     len = WideCharToMultiByte( CP_ACP, 0, name, -1, NULL, 0, NULL, NULL );
 644     nameA = HeapAlloc( GetProcessHeap(), 0, len );
 645     WideCharToMultiByte( CP_ACP, 0, name, -1, nameA, len, NULL, NULL );
 646
 647     pi->Devmode = get_devmode( hPrinter, name, &using_default_devmode );
 648     if (!pi->Devmode) goto fail;
 649
 650     ppd_filename = get_ppd_filename( hPrinter );
 651     if (!ppd_filename) goto fail;
 652
 653     pi->ppd = PSDRV_ParsePPD( ppd_filename, hPrinter );
 654     if (!pi->ppd)
 655     {
 656         WARN( "Couldn't parse PPD file '%s'\n", ppd_filename );
 657         goto fail;
 658     }
 659
 660     if(using_default_devmode) {
 661         DWORD papersize;
 662
 663         if(GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_IPAPERSIZE | LOCALE_RETURN_NUMBER,
 664                           (LPWSTR)&papersize, sizeof(papersize)/sizeof(WCHAR))) {
 665             PSDRV_DEVMODE dm;
 666             memset(&dm, 0, sizeof(dm));
 667             dm.dmPublic.dmFields = DM_PAPERSIZE;
 668             dm.dmPublic.u1.s1.dmPaperSize = papersize;
 669             PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
 670         }
 671     }
 672
 673     if(pi->ppd->DefaultPageSize) { /* We'll let the ppd override the devmode */
 674         PSDRV_DEVMODE dm;
 675         memset(&dm, 0, sizeof(dm));
 676         dm.dmPublic.dmFields = DM_PAPERSIZE;
 677         dm.dmPublic.u1.s1.dmPaperSize = pi->ppd->DefaultPageSize->WinPage;
 678         PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
 679     }
 680
 681     /*
 682      *  This is a hack.  The default paper size should be read in as part of
 683      *  the Devmode structure, but Wine doesn't currently provide a convenient
 684      *  way to configure printers.
 685      */
 686     res = GetPrinterDataExA(hPrinter, "PrinterDriverData", "Paper Size", NULL,
 687                             (LPBYTE)&dwPaperSize, sizeof(DWORD), &needed);
 688     if (res == ERROR_SUCCESS)
 689         pi->Devmode->dmPublic.u1.s1.dmPaperSize = (SHORT) dwPaperSize;
 690     else if (res == ERROR_FILE_NOT_FOUND)
 691         TRACE ("No 'Paper Size' for printer '%s'\n", debugstr_w(name));
 692     else {
 693         ERR ("GetPrinterDataA returned %i\n", res);
 694         goto fail;
 695     }
 696
 697     /* Duplex is indicated by the setting of the DM_DUPLEX bit in dmFields.
 698        WinDuplex == 0 is a special case which means that the ppd has a
 699        *DefaultDuplex: NotCapable entry.  In this case we'll try not to confuse
 700        apps and set dmDuplex to DMDUP_SIMPLEX but leave the DM_DUPLEX clear.
 701        PSDRV_WriteHeader understands this and copes. */
 702     pi->Devmode->dmPublic.dmFields &= ~DM_DUPLEX;
 703     if(pi->ppd->DefaultDuplex) {
 704         pi->Devmode->dmPublic.dmDuplex = pi->ppd->DefaultDuplex->WinDuplex;
 705         if(pi->Devmode->dmPublic.dmDuplex != 0)
 706             pi->Devmode->dmPublic.dmFields |= DM_DUPLEX;
 707         else
 708             pi->Devmode->dmPublic.dmDuplex = DMDUP_SIMPLEX;
 709     }
 710
 711     set_devmode( hPrinter, pi->Devmode );
 712
 713     pi->FontSubTable = load_font_sub_table( hPrinter, &pi->FontSubTableSize );
 714
 715     LIST_FOR_EACH_ENTRY( font, &pi->ppd->InstalledFonts, FONTNAME, entry )
 716     {
 717         afm = PSDRV_FindAFMinList(PSDRV_AFMFontList, font->Name);
 718         if(!afm) {
 719             TRACE( "Couldn't find AFM file for installed printer font '%s' - "
 720                     "ignoring\n", font->Name);
 721         }
 722         else {
 723             BOOL added;
 724             if (PSDRV_AddAFMtoList(&pi->Fonts, afm, &added) == FALSE) {
 725                 PSDRV_FreeAFMList(pi->Fonts);
 726                 goto fail;
 727             }
 728         }
 729
 730     }
 731     ClosePrinter( hPrinter );
 732     HeapFree( GetProcessHeap(), 0, nameA );
 733     HeapFree( GetProcessHeap(), 0, ppd_filename );
 734     list_add_head( &printer_list, &pi->entry );
 735     return pi;
 736
 737 fail:
 738     if (hPrinter) ClosePrinter( hPrinter );
 739     HeapFree(PSDRV_Heap, 0, pi->FontSubTable);
 740     HeapFree(PSDRV_Heap, 0, pi->friendly_name);
 741     HeapFree(PSDRV_Heap, 0, pi->Devmode);
 742     HeapFree(PSDRV_Heap, 0, pi);
 743     HeapFree( GetProcessHeap(), 0, nameA );
 744     HeapFree( GetProcessHeap(), 0, ppd_filename );
 745     return NULL;
 746 }
 747
 748
 749 static const struct gdi_dc_funcs psdrv_funcs =
 750 {
 751     NULL,                               /* pAbortDoc */
 752     NULL,                               /* pAbortPath */
 753     NULL,                               /* pAlphaBlend */
 754     NULL,                               /* pAngleArc */
 755     PSDRV_Arc,                          /* pArc */
 756     NULL,                               /* pArcTo */
 757     NULL,                               /* pBeginPath */
 758     NULL,                               /* pBlendImage */
 759     PSDRV_Chord,                        /* pChord */
 760     NULL,                               /* pCloseFigure */
 761     PSDRV_CreateCompatibleDC,           /* pCreateCompatibleDC */
 762     PSDRV_CreateDC,                     /* pCreateDC */
 763     PSDRV_DeleteDC,                     /* pDeleteDC */
 764     NULL,                               /* pDeleteObject */
 765     PSDRV_DeviceCapabilities,           /* pDeviceCapabilities */
 766     PSDRV_Ellipse,                      /* pEllipse */
 767     PSDRV_EndDoc,                       /* pEndDoc */
 768     PSDRV_EndPage,                      /* pEndPage */
 769     NULL,                               /* pEndPath */
 770     PSDRV_EnumFonts,                    /* pEnumFonts */
 771     NULL,                               /* pEnumICMProfiles */
 772     NULL,                               /* pExcludeClipRect */
 773     PSDRV_ExtDeviceMode,                /* pExtDeviceMode */
 774     PSDRV_ExtEscape,                    /* pExtEscape */
 775     NULL,                               /* pExtFloodFill */
 776     NULL,                               /* pExtSelectClipRgn */
 777     PSDRV_ExtTextOut,                   /* pExtTextOut */
 778     PSDRV_FillPath,                     /* pFillPath */
 779     NULL,                               /* pFillRgn */
 780     NULL,                               /* pFlattenPath */
 781     NULL,                               /* pFontIsLinked */
 782     NULL,                               /* pFrameRgn */
 783     NULL,                               /* pGdiComment */
 784     NULL,                               /* pGdiRealizationInfo */
 785     NULL,                               /* pGetBoundsRect */
 786     NULL,                               /* pGetCharABCWidths */
 787     NULL,                               /* pGetCharABCWidthsI */
 788     PSDRV_GetCharWidth,                 /* pGetCharWidth */
 789     PSDRV_GetDeviceCaps,                /* pGetDeviceCaps */
 790     NULL,                               /* pGetDeviceGammaRamp */
 791     NULL,                               /* pGetFontData */
 792     NULL,                               /* pGetFontUnicodeRanges */
 793     NULL,                               /* pGetGlyphIndices */
 794     NULL,                               /* pGetGlyphOutline */
 795     NULL,                               /* pGetICMProfile */
 796     NULL,                               /* pGetImage */
 797     NULL,                               /* pGetKerningPairs */
 798     NULL,                               /* pGetNearestColor */
 799     NULL,                               /* pGetOutlineTextMetrics */
 800     NULL,                               /* pGetPixel */
 801     NULL,                               /* pGetSystemPaletteEntries */
 802     NULL,                               /* pGetTextCharsetInfo */
 803     PSDRV_GetTextExtentExPoint,         /* pGetTextExtentExPoint */
 804     NULL,                               /* pGetTextExtentExPointI */
 805     NULL,                               /* pGetTextFace */
 806     PSDRV_GetTextMetrics,               /* pGetTextMetrics */
 807     NULL,                               /* pGradientFill */
 808     NULL,                               /* pIntersectClipRect */
 809     NULL,                               /* pInvertRgn */
 810     PSDRV_LineTo,                       /* pLineTo */
 811     NULL,                               /* pModifyWorldTransform */
 812     NULL,                               /* pMoveTo */
 813     NULL,                               /* pOffsetClipRgn */
 814     NULL,                               /* pOffsetViewportOrg */
 815     NULL,                               /* pOffsetWindowOrg */
 816     PSDRV_PaintRgn,                     /* pPaintRgn */
 817     PSDRV_PatBlt,                       /* pPatBlt */
 818     PSDRV_Pie,                          /* pPie */
 819     PSDRV_PolyBezier,                   /* pPolyBezier */
 820     PSDRV_PolyBezierTo,                 /* pPolyBezierTo */
 821     NULL,                               /* pPolyDraw */
 822     PSDRV_PolyPolygon,                  /* pPolyPolygon */
 823     PSDRV_PolyPolyline,                 /* pPolyPolyline */
 824     NULL,                               /* pPolygon */
 825     NULL,                               /* pPolyline */
 826     NULL,                               /* pPolylineTo */
 827     PSDRV_PutImage,                     /* pPutImage */
 828     NULL,                               /* pRealizeDefaultPalette */
 829     NULL,                               /* pRealizePalette */
 830     PSDRV_Rectangle,                    /* pRectangle */
 831     PSDRV_ResetDC,                      /* pResetDC */
 832     NULL,                               /* pRestoreDC */
 833     PSDRV_RoundRect,                    /* pRoundRect */
 834     NULL,                               /* pSaveDC */
 835     NULL,                               /* pScaleViewportExt */
 836     NULL,                               /* pScaleWindowExt */
 837     NULL,                               /* pSelectBitmap */
 838     PSDRV_SelectBrush,                  /* pSelectBrush */
 839     NULL,                               /* pSelectClipPath */
 840     PSDRV_SelectFont,                   /* pSelectFont */
 841     NULL,                               /* pSelectPalette */
 842     PSDRV_SelectPen,                    /* pSelectPen */
 843     NULL,                               /* pSetArcDirection */
 844     PSDRV_SetBkColor,                   /* pSetBkColor */
 845     NULL,                               /* pSetBkMode */
 846     NULL,                               /* pSetBoundsRect */
 847     PSDRV_SetDCBrushColor,              /* pSetDCBrushColor */
 848     PSDRV_SetDCPenColor,                /* pSetDCPenColor */
 849     NULL,                               /* pSetDIBitsToDevice */
 850     NULL,                               /* pSetDeviceClipping */
 851     NULL,                               /* pSetDeviceGammaRamp */
 852     NULL,                               /* pSetLayout */
 853     NULL,                               /* pSetMapMode */
 854     NULL,                               /* pSetMapperFlags */
 855     PSDRV_SetPixel,                     /* pSetPixel */
 856     NULL,                               /* pSetPolyFillMode */
 857     NULL,                               /* pSetROP2 */
 858     NULL,                               /* pSetRelAbs */
 859     NULL,                               /* pSetStretchBltMode */
 860     NULL,                               /* pSetTextAlign */
 861     NULL,                               /* pSetTextCharacterExtra */
 862     PSDRV_SetTextColor,                 /* pSetTextColor */
 863     NULL,                               /* pSetTextJustification */
 864     NULL,                               /* pSetViewportExt */
 865     NULL,                               /* pSetViewportOrg */
 866     NULL,                               /* pSetWindowExt */
 867     NULL,                               /* pSetWindowOrg */
 868     NULL,                               /* pSetWorldTransform */
 869     PSDRV_StartDoc,                     /* pStartDoc */
 870     PSDRV_StartPage,                    /* pStartPage */
 871     NULL,                               /* pStretchBlt */
 872     NULL,                               /* pStretchDIBits */
 873     PSDRV_StrokeAndFillPath,            /* pStrokeAndFillPath */
 874     PSDRV_StrokePath,                   /* pStrokePath */
 875     NULL,                               /* pUnrealizePalette */
 876     NULL,                               /* pWidenPath */
 877     NULL,                               /* wine_get_wgl_driver */
 878     GDI_PRIORITY_GRAPHICS_DRV           /* priority */
 879 };
 880
 881
 882 /******************************************************************************
 883  *      PSDRV_get_gdi_driver
 884  */
 885 const struct gdi_dc_funcs * CDECL PSDRV_get_gdi_driver( unsigned int version )
 886 {
 887     if (version != WINE_GDI_DRIVER_VERSION)
 888     {
 889         ERR( "version mismatch, gdi32 wants %u but wineps has %u\n", version, WINE_GDI_DRIVER_VERSION );
 890         return NULL;
 891     }
 892     return &psdrv_funcs;
 893 }