Release 1.5.29.
[wine] / 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 dump_fields(DWORD fields)
152 {
153     int add_space = 0;
154
155 #define CHECK_FIELD(flag) \
156 do \
157 { \
158     if (fields & flag) \
159     { \
160         if (add_space++) DPRINTF(" "); \
161         TRACE(#flag); \
162         fields &= ~flag; \
163     } \
164 } \
165 while (0)
166
167     CHECK_FIELD(DM_ORIENTATION);
168     CHECK_FIELD(DM_PAPERSIZE);
169     CHECK_FIELD(DM_PAPERLENGTH);
170     CHECK_FIELD(DM_PAPERWIDTH);
171     CHECK_FIELD(DM_SCALE);
172     CHECK_FIELD(DM_POSITION);
173     CHECK_FIELD(DM_NUP);
174     CHECK_FIELD(DM_DISPLAYORIENTATION);
175     CHECK_FIELD(DM_COPIES);
176     CHECK_FIELD(DM_DEFAULTSOURCE);
177     CHECK_FIELD(DM_PRINTQUALITY);
178     CHECK_FIELD(DM_COLOR);
179     CHECK_FIELD(DM_DUPLEX);
180     CHECK_FIELD(DM_YRESOLUTION);
181     CHECK_FIELD(DM_TTOPTION);
182     CHECK_FIELD(DM_COLLATE);
183     CHECK_FIELD(DM_FORMNAME);
184     CHECK_FIELD(DM_LOGPIXELS);
185     CHECK_FIELD(DM_BITSPERPEL);
186     CHECK_FIELD(DM_PELSWIDTH);
187     CHECK_FIELD(DM_PELSHEIGHT);
188     CHECK_FIELD(DM_DISPLAYFLAGS);
189     CHECK_FIELD(DM_DISPLAYFREQUENCY);
190     CHECK_FIELD(DM_ICMMETHOD);
191     CHECK_FIELD(DM_ICMINTENT);
192     CHECK_FIELD(DM_MEDIATYPE);
193     CHECK_FIELD(DM_DITHERTYPE);
194     CHECK_FIELD(DM_PANNINGWIDTH);
195     CHECK_FIELD(DM_PANNINGHEIGHT);
196     if (fields) TRACE(" %#x", fields);
197     TRACE("\n");
198 #undef CHECK_FIELD
199 }
200
201 /* Dump DEVMODE structure without a device specific part.
202  * Some applications and drivers fail to specify correct field
203  * flags (like DM_FORMNAME), so dump everything.
204  */
205 static void dump_devmode(const DEVMODEW *dm)
206 {
207     if (!TRACE_ON(psdrv)) return;
208
209     TRACE("dmDeviceName: %s\n", debugstr_w(dm->dmDeviceName));
210     TRACE("dmSpecVersion: 0x%04x\n", dm->dmSpecVersion);
211     TRACE("dmDriverVersion: 0x%04x\n", dm->dmDriverVersion);
212     TRACE("dmSize: 0x%04x\n", dm->dmSize);
213     TRACE("dmDriverExtra: 0x%04x\n", dm->dmDriverExtra);
214     TRACE("dmFields: 0x%04x\n", dm->dmFields);
215     dump_fields(dm->dmFields);
216     TRACE("dmOrientation: %d\n", dm->u1.s1.dmOrientation);
217     TRACE("dmPaperSize: %d\n", dm->u1.s1.dmPaperSize);
218     TRACE("dmPaperLength: %d\n", dm->u1.s1.dmPaperLength);
219     TRACE("dmPaperWidth: %d\n", dm->u1.s1.dmPaperWidth);
220     TRACE("dmScale: %d\n", dm->u1.s1.dmScale);
221     TRACE("dmCopies: %d\n", dm->u1.s1.dmCopies);
222     TRACE("dmDefaultSource: %d\n", dm->u1.s1.dmDefaultSource);
223     TRACE("dmPrintQuality: %d\n", dm->u1.s1.dmPrintQuality);
224     TRACE("dmColor: %d\n", dm->dmColor);
225     TRACE("dmDuplex: %d\n", dm->dmDuplex);
226     TRACE("dmYResolution: %d\n", dm->dmYResolution);
227     TRACE("dmTTOption: %d\n", dm->dmTTOption);
228     TRACE("dmCollate: %d\n", dm->dmCollate);
229     TRACE("dmFormName: %s\n", debugstr_w(dm->dmFormName));
230     TRACE("dmLogPixels %u\n", dm->dmLogPixels);
231     TRACE("dmBitsPerPel %u\n", dm->dmBitsPerPel);
232     TRACE("dmPelsWidth %u\n", dm->dmPelsWidth);
233     TRACE("dmPelsHeight %u\n", dm->dmPelsHeight);
234 }
235
236 static void PSDRV_UpdateDevCaps( PSDRV_PDEVICE *physDev )
237 {
238     PAGESIZE *page;
239     RESOLUTION *res;
240     INT width = 0, height = 0, resx = 0, resy = 0;
241
242     dump_devmode(&physDev->Devmode->dmPublic);
243
244     if (physDev->Devmode->dmPublic.dmFields & (DM_PRINTQUALITY | DM_YRESOLUTION | DM_LOGPIXELS))
245     {
246         if (physDev->Devmode->dmPublic.dmFields & DM_PRINTQUALITY)
247             resx = resy = physDev->Devmode->dmPublic.u1.s1.dmPrintQuality;
248
249         if (physDev->Devmode->dmPublic.dmFields & DM_YRESOLUTION)
250             resy = physDev->Devmode->dmPublic.dmYResolution;
251
252         if (physDev->Devmode->dmPublic.dmFields & DM_LOGPIXELS)
253             resx = resy = physDev->Devmode->dmPublic.dmLogPixels;
254
255         LIST_FOR_EACH_ENTRY(res, &physDev->pi->ppd->Resolutions, RESOLUTION, entry)
256         {
257             if (res->resx == resx && res->resy == resy)
258             {
259                 physDev->logPixelsX = resx;
260                 physDev->logPixelsY = resy;
261                 break;
262             }
263         }
264
265         if (&res->entry == &physDev->pi->ppd->Resolutions)
266         {
267             WARN("Requested resolution %dx%d is not supported by device\n", resx, resy);
268             physDev->logPixelsX = physDev->pi->ppd->DefaultResolution;
269             physDev->logPixelsY = physDev->logPixelsX;
270         }
271     }
272     else
273     {
274         WARN("Using default device resolution %d\n", physDev->pi->ppd->DefaultResolution);
275         physDev->logPixelsX = physDev->pi->ppd->DefaultResolution;
276         physDev->logPixelsY = physDev->logPixelsX;
277     }
278
279     if(physDev->Devmode->dmPublic.dmFields & DM_PAPERSIZE) {
280         LIST_FOR_EACH_ENTRY(page, &physDev->pi->ppd->PageSizes, PAGESIZE, entry) {
281             if(page->WinPage == physDev->Devmode->dmPublic.u1.s1.dmPaperSize)
282                 break;
283         }
284
285         if(&page->entry == &physDev->pi->ppd->PageSizes) {
286             FIXME("Can't find page\n");
287             physDev->ImageableArea.left = 0;
288             physDev->ImageableArea.right = 0;
289             physDev->ImageableArea.bottom = 0;
290             physDev->ImageableArea.top = 0;
291             physDev->PageSize.cx = 0;
292             physDev->PageSize.cy = 0;
293         } else if(page->ImageableArea) {
294           /* physDev sizes in device units; ppd sizes in 1/72" */
295             physDev->ImageableArea.left = page->ImageableArea->llx *
296               physDev->logPixelsX / 72;
297             physDev->ImageableArea.right = page->ImageableArea->urx *
298               physDev->logPixelsX / 72;
299             physDev->ImageableArea.bottom = page->ImageableArea->lly *
300               physDev->logPixelsY / 72;
301             physDev->ImageableArea.top = page->ImageableArea->ury *
302               physDev->logPixelsY / 72;
303             physDev->PageSize.cx = page->PaperDimension->x *
304               physDev->logPixelsX / 72;
305             physDev->PageSize.cy = page->PaperDimension->y *
306               physDev->logPixelsY / 72;
307         } else {
308             physDev->ImageableArea.left = physDev->ImageableArea.bottom = 0;
309             physDev->ImageableArea.right = physDev->PageSize.cx =
310               page->PaperDimension->x * physDev->logPixelsX / 72;
311             physDev->ImageableArea.top = physDev->PageSize.cy =
312               page->PaperDimension->y * physDev->logPixelsY / 72;
313         }
314     } else if((physDev->Devmode->dmPublic.dmFields & DM_PAPERLENGTH) &&
315               (physDev->Devmode->dmPublic.dmFields & DM_PAPERWIDTH)) {
316       /* physDev sizes in device units; Devmode sizes in 1/10 mm */
317         physDev->ImageableArea.left = physDev->ImageableArea.bottom = 0;
318         physDev->ImageableArea.right = physDev->PageSize.cx =
319           physDev->Devmode->dmPublic.u1.s1.dmPaperWidth *
320           physDev->logPixelsX / 254;
321         physDev->ImageableArea.top = physDev->PageSize.cy =
322           physDev->Devmode->dmPublic.u1.s1.dmPaperLength *
323           physDev->logPixelsY / 254;
324     } else {
325         FIXME("Odd dmFields %x\n", physDev->Devmode->dmPublic.dmFields);
326         physDev->ImageableArea.left = 0;
327         physDev->ImageableArea.right = 0;
328         physDev->ImageableArea.bottom = 0;
329         physDev->ImageableArea.top = 0;
330         physDev->PageSize.cx = 0;
331         physDev->PageSize.cy = 0;
332     }
333
334     TRACE("ImageableArea = %d,%d - %d,%d: PageSize = %dx%d\n",
335           physDev->ImageableArea.left, physDev->ImageableArea.bottom,
336           physDev->ImageableArea.right, physDev->ImageableArea.top,
337           physDev->PageSize.cx, physDev->PageSize.cy);
338
339     /* these are in device units */
340     width = physDev->ImageableArea.right - physDev->ImageableArea.left;
341     height = physDev->ImageableArea.top - physDev->ImageableArea.bottom;
342
343     if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_PORTRAIT) {
344         physDev->horzRes = width;
345         physDev->vertRes = height;
346     } else {
347         physDev->horzRes = height;
348         physDev->vertRes = width;
349     }
350
351     /* these are in mm */
352     physDev->horzSize = (physDev->horzRes * 25.4) / physDev->logPixelsX;
353     physDev->vertSize = (physDev->vertRes * 25.4) / physDev->logPixelsY;
354
355     TRACE("devcaps: horzSize = %dmm, vertSize = %dmm, "
356           "horzRes = %d, vertRes = %d\n",
357           physDev->horzSize, physDev->vertSize,
358           physDev->horzRes, physDev->vertRes);
359 }
360
361 static PSDRV_PDEVICE *create_psdrv_physdev( PRINTERINFO *pi )
362 {
363     PSDRV_PDEVICE *physDev;
364
365     physDev = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(*physDev) );
366     if (!physDev) return NULL;
367
368     physDev->Devmode = HeapAlloc( GetProcessHeap(), 0, sizeof(PSDRV_DEVMODE) );
369     if (!physDev->Devmode)
370     {
371         HeapFree( GetProcessHeap(), 0, physDev );
372         return NULL;
373     }
374
375     *physDev->Devmode = *pi->Devmode;
376     physDev->pi = pi;
377     physDev->logPixelsX = pi->ppd->DefaultResolution;
378     physDev->logPixelsY = pi->ppd->DefaultResolution;
379     return physDev;
380 }
381
382 /**********************************************************************
383  *           PSDRV_CreateDC
384  */
385 static BOOL PSDRV_CreateDC( PHYSDEV *pdev, LPCWSTR driver, LPCWSTR device,
386                             LPCWSTR output, const DEVMODEW* initData )
387 {
388     PSDRV_PDEVICE *physDev;
389     PRINTERINFO *pi;
390
391     TRACE("(%s %s %s %p)\n", debugstr_w(driver), debugstr_w(device),
392                              debugstr_w(output), initData);
393
394     if (!device) return FALSE;
395     pi = PSDRV_FindPrinterInfo( device );
396     if(!pi) return FALSE;
397
398     if(!pi->Fonts) {
399         RASTERIZER_STATUS status;
400         if(!GetRasterizerCaps(&status, sizeof(status)) ||
401            !(status.wFlags & TT_AVAILABLE) ||
402            !(status.wFlags & TT_ENABLED)) {
403             MESSAGE("Disabling printer %s since it has no builtin fonts and there are no TrueType fonts available.\n",
404                     debugstr_w(device));
405             return FALSE;
406         }
407     }
408
409     if (!(physDev = create_psdrv_physdev( pi ))) return FALSE;
410
411     if (output && *output) physDev->job.output = strdupW( output );
412
413     if(initData)
414     {
415         dump_devmode(initData);
416         PSDRV_MergeDevmodes(physDev->Devmode, (const PSDRV_DEVMODE *)initData, pi);
417     }
418
419     PSDRV_UpdateDevCaps(physDev);
420     SelectObject( (*pdev)->hdc, PSDRV_DefaultFont );
421     push_dc_driver( pdev, &physDev->dev, &psdrv_funcs );
422     return TRUE;
423 }
424
425
426 /**********************************************************************
427  *           PSDRV_CreateCompatibleDC
428  */
429 static BOOL PSDRV_CreateCompatibleDC( PHYSDEV orig, PHYSDEV *pdev )
430 {
431     HDC hdc = (*pdev)->hdc;
432     PSDRV_PDEVICE *physDev, *orig_dev = get_psdrv_dev( orig );
433     PRINTERINFO *pi = PSDRV_FindPrinterInfo( orig_dev->pi->friendly_name );
434
435     if (!pi) return FALSE;
436     if (!(physDev = create_psdrv_physdev( pi ))) return FALSE;
437     PSDRV_MergeDevmodes( physDev->Devmode, orig_dev->Devmode, pi );
438     PSDRV_UpdateDevCaps(physDev);
439     SelectObject( hdc, PSDRV_DefaultFont );
440     push_dc_driver( pdev, &physDev->dev, &psdrv_funcs );
441     return TRUE;
442 }
443
444
445
446 /**********************************************************************
447  *           PSDRV_DeleteDC
448  */
449 static BOOL PSDRV_DeleteDC( PHYSDEV dev )
450 {
451     PSDRV_PDEVICE *physDev = get_psdrv_dev( dev );
452
453     TRACE("\n");
454
455     HeapFree( GetProcessHeap(), 0, physDev->Devmode );
456     HeapFree( GetProcessHeap(), 0, physDev->job.output );
457     HeapFree( GetProcessHeap(), 0, physDev );
458
459     return TRUE;
460 }
461
462
463 /**********************************************************************
464  *           ResetDC   (WINEPS.@)
465  */
466 static HDC PSDRV_ResetDC( PHYSDEV dev, const DEVMODEW *lpInitData )
467 {
468     PSDRV_PDEVICE *physDev = get_psdrv_dev( dev );
469
470     if (lpInitData)
471     {
472         PSDRV_MergeDevmodes(physDev->Devmode, (const PSDRV_DEVMODE *)lpInitData, physDev->pi);
473         PSDRV_UpdateDevCaps(physDev);
474     }
475     return dev->hdc;
476 }
477
478 /***********************************************************************
479  *           GetDeviceCaps    (WINEPS.@)
480  */
481 static INT PSDRV_GetDeviceCaps( PHYSDEV dev, INT cap )
482 {
483     PSDRV_PDEVICE *physDev = get_psdrv_dev( dev );
484
485     TRACE("%p,%d\n", dev->hdc, cap);
486
487     switch(cap)
488     {
489     case DRIVERVERSION:
490         return 0;
491     case TECHNOLOGY:
492         return DT_RASPRINTER;
493     case HORZSIZE:
494         return MulDiv(physDev->horzSize, 100,
495                       physDev->Devmode->dmPublic.u1.s1.dmScale);
496     case VERTSIZE:
497         return MulDiv(physDev->vertSize, 100,
498                       physDev->Devmode->dmPublic.u1.s1.dmScale);
499     case HORZRES:
500     case DESKTOPHORZRES:
501         return physDev->horzRes;
502     case VERTRES:
503     case DESKTOPVERTRES:
504         return physDev->vertRes;
505     case BITSPIXEL:
506         return (physDev->pi->ppd->ColorDevice != CD_False) ? 32 : 1;
507     case PLANES:
508         return 1;
509     case NUMBRUSHES:
510         return -1;
511     case NUMPENS:
512         return 10;
513     case NUMMARKERS:
514         return 0;
515     case NUMFONTS:
516         return 39;
517     case NUMCOLORS:
518         return -1;
519     case PDEVICESIZE:
520         return sizeof(PSDRV_PDEVICE);
521     case CURVECAPS:
522         return (CC_CIRCLES | CC_PIE | CC_CHORD | CC_ELLIPSES | CC_WIDE |
523                 CC_STYLED | CC_WIDESTYLED | CC_INTERIORS | CC_ROUNDRECT);
524     case LINECAPS:
525         return (LC_POLYLINE | LC_MARKER | LC_POLYMARKER | LC_WIDE |
526                 LC_STYLED | LC_WIDESTYLED | LC_INTERIORS);
527     case POLYGONALCAPS:
528         return (PC_POLYGON | PC_RECTANGLE | PC_WINDPOLYGON | PC_SCANLINE |
529                 PC_WIDE | PC_STYLED | PC_WIDESTYLED | PC_INTERIORS);
530     case TEXTCAPS:
531         return TC_CR_ANY | TC_VA_ABLE; /* psdrv 0x59f7 */
532     case CLIPCAPS:
533         return CP_RECTANGLE;
534     case RASTERCAPS:
535         return (RC_BITBLT | RC_BITMAP64 | RC_GDI20_OUTPUT | RC_DIBTODEV |
536                 RC_STRETCHBLT | RC_STRETCHDIB); /* psdrv 0x6e99 */
537     case ASPECTX:
538         return physDev->logPixelsX;
539     case ASPECTY:
540         return physDev->logPixelsY;
541     case ASPECTXY:
542         return (int)hypot( (double)physDev->logPixelsX,
543                            (double)physDev->logPixelsY );
544     case LOGPIXELSX:
545         return MulDiv(physDev->logPixelsX,
546                       physDev->Devmode->dmPublic.u1.s1.dmScale, 100);
547     case LOGPIXELSY:
548         return MulDiv(physDev->logPixelsY,
549                       physDev->Devmode->dmPublic.u1.s1.dmScale, 100);
550     case SIZEPALETTE:
551         return 0;
552     case NUMRESERVED:
553         return 0;
554     case COLORRES:
555         return 0;
556     case PHYSICALWIDTH:
557         return (physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) ?
558           physDev->PageSize.cy : physDev->PageSize.cx;
559     case PHYSICALHEIGHT:
560         return (physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) ?
561           physDev->PageSize.cx : physDev->PageSize.cy;
562     case PHYSICALOFFSETX:
563       if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) {
564           if(physDev->pi->ppd->LandscapeOrientation == -90)
565               return physDev->PageSize.cy - physDev->ImageableArea.top;
566           else
567               return physDev->ImageableArea.bottom;
568       }
569       return physDev->ImageableArea.left;
570
571     case PHYSICALOFFSETY:
572       if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) {
573           if(physDev->pi->ppd->LandscapeOrientation == -90)
574               return physDev->PageSize.cx - physDev->ImageableArea.right;
575           else
576               return physDev->ImageableArea.left;
577       }
578       return physDev->PageSize.cy - physDev->ImageableArea.top;
579
580     case SCALINGFACTORX:
581     case SCALINGFACTORY:
582     case VREFRESH:
583     case BLTALIGNMENT:
584         return 0;
585     case SHADEBLENDCAPS:
586         return SB_NONE;
587     default:
588         FIXME("(%p): unsupported capability %d, will return 0\n", dev->hdc, cap );
589         return 0;
590     }
591 }
592
593 static PRINTER_ENUM_VALUESA *load_font_sub_table( HANDLE printer, DWORD *num_entries )
594 {
595     DWORD res, needed, num;
596     PRINTER_ENUM_VALUESA *table = NULL;
597     static const char fontsubkey[] = "PrinterDriverData\\FontSubTable";
598
599     *num_entries = 0;
600
601     res = EnumPrinterDataExA( printer, fontsubkey, NULL, 0, &needed, &num );
602     if (res != ERROR_MORE_DATA) return NULL;
603
604     table = HeapAlloc( PSDRV_Heap, 0, needed );
605     if (!table) return NULL;
606
607     res = EnumPrinterDataExA( printer, fontsubkey, (LPBYTE)table, needed, &needed, &num );
608     if (res != ERROR_SUCCESS)
609     {
610         HeapFree( PSDRV_Heap, 0, table );
611         return NULL;
612     }
613
614     *num_entries = num;
615     return table;
616 }
617
618 static PSDRV_DEVMODE *get_printer_devmode( HANDLE printer )
619 {
620     DWORD needed, dm_size;
621     BOOL res;
622     PRINTER_INFO_9W *info;
623     PSDRV_DEVMODE *dm;
624
625     GetPrinterW( printer, 9, NULL, 0, &needed );
626     if (GetLastError() != ERROR_INSUFFICIENT_BUFFER) return NULL;
627
628     info = HeapAlloc( PSDRV_Heap, 0, needed );
629     res = GetPrinterW( printer, 9, (BYTE *)info, needed, &needed );
630     if (!res || !info->pDevMode)
631     {
632         HeapFree( PSDRV_Heap, 0, info );
633         return NULL;
634     }
635
636     /* sanity check the sizes */
637     dm_size = info->pDevMode->dmSize + info->pDevMode->dmDriverExtra;
638     if ((char *)info->pDevMode - (char *)info + dm_size > needed)
639     {
640         HeapFree( PSDRV_Heap, 0, info );
641         return NULL;
642     }
643
644     dm = (PSDRV_DEVMODE*)info;
645     memmove( dm, info->pDevMode, dm_size );
646     return dm;
647 }
648
649 static PSDRV_DEVMODE *get_devmode( HANDLE printer, const WCHAR *name, BOOL *is_default )
650 {
651     PSDRV_DEVMODE *dm = get_printer_devmode( printer );
652
653     *is_default = FALSE;
654
655     if (dm && dm->dmPublic.dmSize + dm->dmPublic.dmDriverExtra >= sizeof(DefaultDevmode))
656     {
657         TRACE( "Retrieved devmode from winspool\n" );
658         return dm;
659     }
660     HeapFree( PSDRV_Heap, 0, dm );
661
662     TRACE( "Using default devmode\n" );
663     dm = HeapAlloc( PSDRV_Heap, 0, sizeof(DefaultDevmode) );
664     if (dm)
665     {
666         *dm = DefaultDevmode;
667         lstrcpynW( (WCHAR *)dm->dmPublic.dmDeviceName, name, CCHDEVICENAME );
668         *is_default = TRUE;
669     }
670     return dm;
671 }
672
673 static BOOL set_devmode( HANDLE printer, PSDRV_DEVMODE *dm )
674 {
675     PRINTER_INFO_9W info;
676     info.pDevMode = &dm->dmPublic;
677
678     return SetPrinterW( printer, 9, (BYTE *)&info, 0 );
679 }
680
681 static WCHAR *get_ppd_filename( HANDLE printer )
682 {
683     DWORD needed;
684     DRIVER_INFO_2W *info;
685     WCHAR *name;
686
687     GetPrinterDriverW( printer, NULL, 2, NULL, 0, &needed );
688     if (GetLastError() != ERROR_INSUFFICIENT_BUFFER) return NULL;
689     info = HeapAlloc( GetProcessHeap(), 0, needed );
690     if (!info) return NULL;
691     GetPrinterDriverW( printer, NULL, 2, (BYTE*)info, needed, &needed );
692     name = (WCHAR *)info;
693     memmove( name, info->pDataFile, (strlenW( info->pDataFile ) + 1) * sizeof(WCHAR) );
694     return name;
695 }
696
697 static struct list printer_list = LIST_INIT( printer_list );
698
699 /**********************************************************************
700  *              PSDRV_FindPrinterInfo
701  */
702 PRINTERINFO *PSDRV_FindPrinterInfo(LPCWSTR name)
703 {
704     PRINTERINFO *pi;
705     FONTNAME *font;
706     const AFM *afm;
707     HANDLE hPrinter = 0;
708     WCHAR *ppd_filename = NULL;
709     char *nameA = NULL;
710     BOOL using_default_devmode = FALSE;
711     int len;
712
713     TRACE("'%s'\n", debugstr_w(name));
714
715     LIST_FOR_EACH_ENTRY( pi, &printer_list, PRINTERINFO, entry )
716     {
717         if (!strcmpW( pi->friendly_name, name ))
718             return pi;
719     }
720
721     pi = HeapAlloc( PSDRV_Heap, HEAP_ZERO_MEMORY, sizeof(*pi) );
722     if (pi == NULL) return NULL;
723
724     if (!(pi->friendly_name = HeapAlloc( PSDRV_Heap, 0, (strlenW(name)+1)*sizeof(WCHAR) ))) goto fail;
725     strcpyW( pi->friendly_name, name );
726
727     if (OpenPrinterW( pi->friendly_name, &hPrinter, NULL ) == 0) {
728         ERR ("OpenPrinter failed with code %i\n", GetLastError ());
729         goto fail;
730     }
731
732     len = WideCharToMultiByte( CP_ACP, 0, name, -1, NULL, 0, NULL, NULL );
733     nameA = HeapAlloc( GetProcessHeap(), 0, len );
734     WideCharToMultiByte( CP_ACP, 0, name, -1, nameA, len, NULL, NULL );
735
736     pi->Devmode = get_devmode( hPrinter, name, &using_default_devmode );
737     if (!pi->Devmode) goto fail;
738
739     ppd_filename = get_ppd_filename( hPrinter );
740     if (!ppd_filename) goto fail;
741
742     pi->ppd = PSDRV_ParsePPD( ppd_filename, hPrinter );
743     if (!pi->ppd)
744     {
745         WARN( "Couldn't parse PPD file %s\n", debugstr_w(ppd_filename) );
746         goto fail;
747     }
748
749     if(using_default_devmode) {
750         DWORD papersize;
751
752         if(GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_IPAPERSIZE | LOCALE_RETURN_NUMBER,
753                           (LPWSTR)&papersize, sizeof(papersize)/sizeof(WCHAR))) {
754             PSDRV_DEVMODE dm;
755             memset(&dm, 0, sizeof(dm));
756             dm.dmPublic.dmFields = DM_PAPERSIZE;
757             dm.dmPublic.u1.s1.dmPaperSize = papersize;
758             PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
759         }
760     }
761
762     if(pi->ppd->DefaultPageSize) { /* We'll let the ppd override the devmode */
763         PSDRV_DEVMODE dm;
764         memset(&dm, 0, sizeof(dm));
765         dm.dmPublic.dmFields = DM_PAPERSIZE;
766         dm.dmPublic.u1.s1.dmPaperSize = pi->ppd->DefaultPageSize->WinPage;
767         PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
768     }
769
770     /* Duplex is indicated by the setting of the DM_DUPLEX bit in dmFields.
771        WinDuplex == 0 is a special case which means that the ppd has a
772        *DefaultDuplex: NotCapable entry.  In this case we'll try not to confuse
773        apps and set dmDuplex to DMDUP_SIMPLEX but leave the DM_DUPLEX clear.
774        PSDRV_WriteHeader understands this and copes. */
775     pi->Devmode->dmPublic.dmFields &= ~DM_DUPLEX;
776     if(pi->ppd->DefaultDuplex) {
777         pi->Devmode->dmPublic.dmDuplex = pi->ppd->DefaultDuplex->WinDuplex;
778         if(pi->Devmode->dmPublic.dmDuplex != 0)
779             pi->Devmode->dmPublic.dmFields |= DM_DUPLEX;
780         else
781             pi->Devmode->dmPublic.dmDuplex = DMDUP_SIMPLEX;
782     }
783
784     set_devmode( hPrinter, pi->Devmode );
785
786     pi->FontSubTable = load_font_sub_table( hPrinter, &pi->FontSubTableSize );
787
788     LIST_FOR_EACH_ENTRY( font, &pi->ppd->InstalledFonts, FONTNAME, entry )
789     {
790         afm = PSDRV_FindAFMinList(PSDRV_AFMFontList, font->Name);
791         if(!afm) {
792             TRACE( "Couldn't find AFM file for installed printer font '%s' - "
793                     "ignoring\n", font->Name);
794         }
795         else {
796             BOOL added;
797             if (PSDRV_AddAFMtoList(&pi->Fonts, afm, &added) == FALSE) {
798                 PSDRV_FreeAFMList(pi->Fonts);
799                 goto fail;
800             }
801         }
802
803     }
804     ClosePrinter( hPrinter );
805     HeapFree( GetProcessHeap(), 0, nameA );
806     HeapFree( GetProcessHeap(), 0, ppd_filename );
807     list_add_head( &printer_list, &pi->entry );
808     return pi;
809
810 fail:
811     if (hPrinter) ClosePrinter( hPrinter );
812     HeapFree(PSDRV_Heap, 0, pi->FontSubTable);
813     HeapFree(PSDRV_Heap, 0, pi->friendly_name);
814     HeapFree(PSDRV_Heap, 0, pi->Devmode);
815     HeapFree(PSDRV_Heap, 0, pi);
816     HeapFree( GetProcessHeap(), 0, nameA );
817     HeapFree( GetProcessHeap(), 0, ppd_filename );
818     return NULL;
819 }
820
821
822 static const struct gdi_dc_funcs psdrv_funcs =
823 {
824     NULL,                               /* pAbortDoc */
825     NULL,                               /* pAbortPath */
826     NULL,                               /* pAlphaBlend */
827     NULL,                               /* pAngleArc */
828     PSDRV_Arc,                          /* pArc */
829     NULL,                               /* pArcTo */
830     NULL,                               /* pBeginPath */
831     NULL,                               /* pBlendImage */
832     PSDRV_Chord,                        /* pChord */
833     NULL,                               /* pCloseFigure */
834     PSDRV_CreateCompatibleDC,           /* pCreateCompatibleDC */
835     PSDRV_CreateDC,                     /* pCreateDC */
836     PSDRV_DeleteDC,                     /* pDeleteDC */
837     NULL,                               /* pDeleteObject */
838     PSDRV_DeviceCapabilities,           /* pDeviceCapabilities */
839     PSDRV_Ellipse,                      /* pEllipse */
840     PSDRV_EndDoc,                       /* pEndDoc */
841     PSDRV_EndPage,                      /* pEndPage */
842     NULL,                               /* pEndPath */
843     PSDRV_EnumFonts,                    /* pEnumFonts */
844     NULL,                               /* pEnumICMProfiles */
845     NULL,                               /* pExcludeClipRect */
846     PSDRV_ExtDeviceMode,                /* pExtDeviceMode */
847     PSDRV_ExtEscape,                    /* pExtEscape */
848     NULL,                               /* pExtFloodFill */
849     NULL,                               /* pExtSelectClipRgn */
850     PSDRV_ExtTextOut,                   /* pExtTextOut */
851     PSDRV_FillPath,                     /* pFillPath */
852     NULL,                               /* pFillRgn */
853     NULL,                               /* pFlattenPath */
854     NULL,                               /* pFontIsLinked */
855     NULL,                               /* pFrameRgn */
856     NULL,                               /* pGdiComment */
857     NULL,                               /* pGdiRealizationInfo */
858     NULL,                               /* pGetBoundsRect */
859     NULL,                               /* pGetCharABCWidths */
860     NULL,                               /* pGetCharABCWidthsI */
861     PSDRV_GetCharWidth,                 /* pGetCharWidth */
862     PSDRV_GetDeviceCaps,                /* pGetDeviceCaps */
863     NULL,                               /* pGetDeviceGammaRamp */
864     NULL,                               /* pGetFontData */
865     NULL,                               /* pGetFontUnicodeRanges */
866     NULL,                               /* pGetGlyphIndices */
867     NULL,                               /* pGetGlyphOutline */
868     NULL,                               /* pGetICMProfile */
869     NULL,                               /* pGetImage */
870     NULL,                               /* pGetKerningPairs */
871     NULL,                               /* pGetNearestColor */
872     NULL,                               /* pGetOutlineTextMetrics */
873     NULL,                               /* pGetPixel */
874     NULL,                               /* pGetSystemPaletteEntries */
875     NULL,                               /* pGetTextCharsetInfo */
876     PSDRV_GetTextExtentExPoint,         /* pGetTextExtentExPoint */
877     NULL,                               /* pGetTextExtentExPointI */
878     NULL,                               /* pGetTextFace */
879     PSDRV_GetTextMetrics,               /* pGetTextMetrics */
880     NULL,                               /* pGradientFill */
881     NULL,                               /* pIntersectClipRect */
882     NULL,                               /* pInvertRgn */
883     PSDRV_LineTo,                       /* pLineTo */
884     NULL,                               /* pModifyWorldTransform */
885     NULL,                               /* pMoveTo */
886     NULL,                               /* pOffsetClipRgn */
887     NULL,                               /* pOffsetViewportOrg */
888     NULL,                               /* pOffsetWindowOrg */
889     PSDRV_PaintRgn,                     /* pPaintRgn */
890     PSDRV_PatBlt,                       /* pPatBlt */
891     PSDRV_Pie,                          /* pPie */
892     PSDRV_PolyBezier,                   /* pPolyBezier */
893     PSDRV_PolyBezierTo,                 /* pPolyBezierTo */
894     NULL,                               /* pPolyDraw */
895     PSDRV_PolyPolygon,                  /* pPolyPolygon */
896     PSDRV_PolyPolyline,                 /* pPolyPolyline */
897     NULL,                               /* pPolygon */
898     NULL,                               /* pPolyline */
899     NULL,                               /* pPolylineTo */
900     PSDRV_PutImage,                     /* pPutImage */
901     NULL,                               /* pRealizeDefaultPalette */
902     NULL,                               /* pRealizePalette */
903     PSDRV_Rectangle,                    /* pRectangle */
904     PSDRV_ResetDC,                      /* pResetDC */
905     NULL,                               /* pRestoreDC */
906     PSDRV_RoundRect,                    /* pRoundRect */
907     NULL,                               /* pSaveDC */
908     NULL,                               /* pScaleViewportExt */
909     NULL,                               /* pScaleWindowExt */
910     NULL,                               /* pSelectBitmap */
911     PSDRV_SelectBrush,                  /* pSelectBrush */
912     NULL,                               /* pSelectClipPath */
913     PSDRV_SelectFont,                   /* pSelectFont */
914     NULL,                               /* pSelectPalette */
915     PSDRV_SelectPen,                    /* pSelectPen */
916     NULL,                               /* pSetArcDirection */
917     PSDRV_SetBkColor,                   /* pSetBkColor */
918     NULL,                               /* pSetBkMode */
919     NULL,                               /* pSetBoundsRect */
920     PSDRV_SetDCBrushColor,              /* pSetDCBrushColor */
921     PSDRV_SetDCPenColor,                /* pSetDCPenColor */
922     NULL,                               /* pSetDIBitsToDevice */
923     NULL,                               /* pSetDeviceClipping */
924     NULL,                               /* pSetDeviceGammaRamp */
925     NULL,                               /* pSetLayout */
926     NULL,                               /* pSetMapMode */
927     NULL,                               /* pSetMapperFlags */
928     PSDRV_SetPixel,                     /* pSetPixel */
929     NULL,                               /* pSetPolyFillMode */
930     NULL,                               /* pSetROP2 */
931     NULL,                               /* pSetRelAbs */
932     NULL,                               /* pSetStretchBltMode */
933     NULL,                               /* pSetTextAlign */
934     NULL,                               /* pSetTextCharacterExtra */
935     PSDRV_SetTextColor,                 /* pSetTextColor */
936     NULL,                               /* pSetTextJustification */
937     NULL,                               /* pSetViewportExt */
938     NULL,                               /* pSetViewportOrg */
939     NULL,                               /* pSetWindowExt */
940     NULL,                               /* pSetWindowOrg */
941     NULL,                               /* pSetWorldTransform */
942     PSDRV_StartDoc,                     /* pStartDoc */
943     PSDRV_StartPage,                    /* pStartPage */
944     NULL,                               /* pStretchBlt */
945     NULL,                               /* pStretchDIBits */
946     PSDRV_StrokeAndFillPath,            /* pStrokeAndFillPath */
947     PSDRV_StrokePath,                   /* pStrokePath */
948     NULL,                               /* pUnrealizePalette */
949     NULL,                               /* pWidenPath */
950     NULL,                               /* wine_get_wgl_driver */
951     GDI_PRIORITY_GRAPHICS_DRV           /* priority */
952 };
953
954
955 /******************************************************************************
956  *      PSDRV_get_gdi_driver
957  */
958 const struct gdi_dc_funcs * CDECL PSDRV_get_gdi_driver( unsigned int version )
959 {
960     if (version != WINE_GDI_DRIVER_VERSION)
961     {
962         ERR( "version mismatch, gdi32 wants %u but wineps has %u\n", version, WINE_GDI_DRIVER_VERSION );
963         return NULL;
964     }
965     return &psdrv_funcs;
966 }