Added an unknown VxD error code.
[wine] / dlls / wineps / init.c
1 /*
2  *      PostScript driver initialization functions
3  *
4  *      Copyright 1998 Huw D M Davies
5  *      Copyright 2001 Marcus Meissner
6  *
7  */
8
9 #include <string.h>
10 #include <unistd.h>
11
12 #include "gdi.h"
13 #include "psdrv.h"
14 #include "debugtools.h"
15 #include "heap.h"
16 #include "winreg.h"
17 #include "winspool.h"
18 #include "winerror.h"
19 #include "options.h"
20
21 #ifdef HAVE_CUPS
22 # include <cups/cups.h>
23 #endif
24
25 DEFAULT_DEBUG_CHANNEL(psdrv);
26
27 static BOOL PSDRV_CreateDC( DC *dc, LPCSTR driver, LPCSTR device,
28                                LPCSTR output, const DEVMODEA* initData );
29 static BOOL PSDRV_DeleteDC( DC *dc );
30
31 static const DC_FUNCTIONS PSDRV_Funcs =
32 {
33     NULL,                            /* pAbortDoc */
34     NULL,                            /* pAbortPath */
35     NULL,                            /* pAngleArc */
36     PSDRV_Arc,                       /* pArc */
37     NULL,                            /* pArcTo */
38     NULL,                            /* pBeginPath */
39     NULL,                            /* pBitBlt */
40     NULL,                            /* pBitmapBits */
41     NULL,                            /* pChoosePixelFormat */
42     PSDRV_Chord,                     /* pChord */
43     NULL,                            /* pCloseFigure */
44     NULL,                            /* pCreateBitmap */
45     PSDRV_CreateDC,                  /* pCreateDC */
46     NULL,                            /* pCreateDIBSection */
47     NULL,                            /* pCreateDIBSection16 */
48     PSDRV_DeleteDC,                  /* pDeleteDC */
49     NULL,                            /* pDeleteObject */
50     NULL,                            /* pDescribePixelFormat */
51     PSDRV_DeviceCapabilities,        /* pDeviceCapabilities */
52     PSDRV_Ellipse,                   /* pEllipse */
53     PSDRV_EndDoc,                    /* pEndDoc */
54     PSDRV_EndPage,                   /* pEndPage */
55     NULL,                            /* pEndPath */
56     PSDRV_EnumDeviceFonts,           /* pEnumDeviceFonts */
57     PSDRV_Escape,                    /* pEscape */
58     NULL,                            /* pExcludeClipRect */
59     PSDRV_ExtDeviceMode,             /* pExtDeviceMode */
60     NULL,                            /* pExtFloodFill */
61     PSDRV_ExtTextOut,                /* pExtTextOut */
62     NULL,                            /* pFillPath */
63     NULL,                            /* pFillRgn */
64     NULL,                            /* pFlattenPath */
65     NULL,                            /* pFrameRgn */
66     PSDRV_GetCharWidth,              /* pGetCharWidth */
67     NULL,                            /* pGetDCOrgEx */
68     NULL,                            /* pGetDeviceGammaRamp */
69     NULL,                            /* pGetPixel */
70     NULL,                            /* pGetPixelFormat */
71     PSDRV_GetTextExtentPoint,        /* pGetTextExtentPoint */
72     PSDRV_GetTextMetrics,            /* pGetTextMetrics */
73     NULL,                            /* pIntersectClipRect */
74     NULL,                            /* pInvertRgn */
75     PSDRV_LineTo,                    /* pLineTo */
76     NULL,                            /* pMoveTo */
77     NULL,                            /* pOffsetClipRgn */
78     NULL,                            /* pOffsetViewportOrg (optional) */
79     NULL,                            /* pOffsetWindowOrg (optional) */
80     NULL,                            /* pPaintRgn */
81     PSDRV_PatBlt,                    /* pPatBlt */
82     PSDRV_Pie,                       /* pPie */
83     NULL,                            /* pPolyBezier */
84     NULL,                            /* pPolyBezierTo */
85     NULL,                            /* pPolyDraw */
86     PSDRV_PolyPolygon,               /* pPolyPolygon */
87     PSDRV_PolyPolyline,              /* pPolyPolyline */
88     PSDRV_Polygon,                   /* pPolygon */
89     PSDRV_Polyline,                  /* pPolyline */
90     NULL,                            /* pPolylineTo */
91     NULL,                            /* pRealizePalette */
92     PSDRV_Rectangle,                 /* pRectangle */
93     NULL,                            /* pRestoreDC */
94     PSDRV_RoundRect,                 /* pRoundRect */
95     NULL,                            /* pSaveDC */
96     NULL,                            /* pScaleViewportExt (optional) */
97     NULL,                            /* pScaleWindowExt (optional) */
98     NULL,                            /* pSelectClipPath */
99     NULL,                            /* pSelectClipRgn */
100     PSDRV_SelectObject,              /* pSelectObject */
101     NULL,                            /* pSelectPalette */
102     PSDRV_SetBkColor,                /* pSetBkColor */
103     NULL,                            /* pSetBkMode */
104     PSDRV_SetDeviceClipping,         /* pSetDeviceClipping */
105     NULL,                            /* pSetDeviceGammaRamp */
106     NULL,                            /* pSetDIBitsToDevice */
107     NULL,                            /* pSetMapMode (optional) */
108     NULL,                            /* pSetMapperFlags */
109     PSDRV_SetPixel,                  /* pSetPixel */
110     NULL,                            /* pSetPixelFormat */
111     NULL,                            /* pSetPolyFillMode */
112     NULL,                            /* pSetROP2 */
113     NULL,                            /* pSetRelAbs */
114     NULL,                            /* pSetStretchBltMode */
115     NULL,                            /* pSetTextAlign */
116     NULL,                            /* pSetTextCharacterExtra */
117     PSDRV_SetTextColor,              /* pSetTextColor */
118     NULL,                            /* pSetTextJustification */
119     NULL,                            /* pSetViewportExt (optional) */
120     NULL,                            /* pSetViewportOrg (optional) */
121     NULL,                            /* pSetWindowExt (optional) */
122     NULL,                            /* pSetWindowOrg (optional) */
123     PSDRV_StartDoc,                  /* pStartDoc */
124     PSDRV_StartPage,                 /* pStartPage */
125     NULL,                            /* pStretchBlt */
126     PSDRV_StretchDIBits,             /* pStretchDIBits */
127     NULL,                            /* pStrokeAndFillPath */
128     NULL,                            /* pStrokePath */
129     NULL,                            /* pSwapBuffers */
130     NULL                             /* pWidenPath */
131 };
132
133
134 /* Default entries for devcaps */
135
136 static DeviceCaps PSDRV_DevCaps = {
137 /* version */           0, 
138 /* technology */        DT_RASPRINTER,
139 /* horzSize */          210,
140 /* vertSize */          297,
141 /* horzRes */           4961,
142 /* vertRes */           7016, 
143 /* bitsPixel */         1,
144 /* planes */            1,
145 /* numBrushes */        -1,
146 /* numPens */           10,
147 /* numMarkers */        0,
148 /* numFonts */          39,
149 /* numColors */         0xffff,
150 /* pdeviceSize */       0,      
151 /* curveCaps */         CC_CIRCLES | CC_PIE | CC_CHORD | CC_ELLIPSES |
152                         CC_WIDE | CC_STYLED | CC_WIDESTYLED | CC_INTERIORS |
153                         CC_ROUNDRECT,
154 /* lineCaps */          LC_POLYLINE | LC_MARKER | LC_POLYMARKER | LC_WIDE |
155                         LC_STYLED | LC_WIDESTYLED | LC_INTERIORS,
156 /* polygoalnCaps */     PC_POLYGON | PC_RECTANGLE | PC_WINDPOLYGON |
157                         PC_SCANLINE | PC_WIDE | PC_STYLED | PC_WIDESTYLED |
158                         PC_INTERIORS,
159 /* textCaps */          TC_CR_ANY, /* psdrv 0x59f7 */
160 /* clipCaps */          CP_RECTANGLE,
161 /* rasterCaps */        RC_BITBLT | RC_BITMAP64 | RC_GDI20_OUTPUT |
162                         RC_DIBTODEV | RC_STRETCHBLT |
163                         RC_STRETCHDIB, /* psdrv 0x6e99 */
164 /* aspectX */           600,
165 /* aspectY */           600,
166 /* aspectXY */          848,
167 /* pad1 */              { 0 },
168 /* logPixelsX */        600,
169 /* logPixelsY */        600, 
170 /* pad2 */              { 0 },
171 /* palette size */      0,
172 /* ..etc */             0, 0 };
173
174 static PSDRV_DEVMODEA DefaultDevmode = 
175 {
176   { /* dmPublic */
177 /* dmDeviceName */      "Wine PostScript Driver",
178 /* dmSpecVersion */     0x30a,
179 /* dmDriverVersion */   0x001,
180 /* dmSize */            sizeof(DEVMODEA),
181 /* dmDriverExtra */     0,
182 /* dmFields */          DM_ORIENTATION | DM_PAPERSIZE | DM_SCALE | 
183                         DM_COPIES | DM_DEFAULTSOURCE | DM_COLOR | 
184                         DM_DUPLEX | DM_YRESOLUTION | DM_TTOPTION,
185    { /* u1 */
186      { /* s1 */
187 /* dmOrientation */     DMORIENT_PORTRAIT,
188 /* dmPaperSize */       DMPAPER_A4,
189 /* dmPaperLength */     2969,
190 /* dmPaperWidth */      2101
191      }
192    },
193 /* dmScale */           100, /* ?? */
194 /* dmCopies */          1,
195 /* dmDefaultSource */   DMBIN_AUTO,
196 /* dmPrintQuality */    0,
197 /* dmColor */           DMCOLOR_COLOR,
198 /* dmDuplex */          0,
199 /* dmYResolution */     0,
200 /* dmTTOption */        DMTT_SUBDEV,
201 /* dmCollate */         0,
202 /* dmFormName */        "",
203 /* dmUnusedPadding */   0,
204 /* dmBitsPerPel */      0,
205 /* dmPelsWidth */       0,
206 /* dmPelsHeight */      0,
207 /* dmDisplayFlags */    0,
208 /* dmDisplayFrequency */ 0,
209 /* dmICMMethod */       0,
210 /* dmICMIntent */       0,
211 /* dmMediaType */       0,
212 /* dmDitherType */      0,
213 /* dmReserved1 */       0,
214 /* dmReserved2 */       0,
215 /* dmPanningWidth */    0,
216 /* dmPanningHeight */   0
217   },
218   { /* dmDocPrivate */
219     /* dummy */ 0
220   },
221   { /* dmDrvPrivate */
222     /* numInstalledOptions */ 0 
223   }
224 };
225
226 HANDLE PSDRV_Heap = 0;
227
228 static HANDLE PSDRV_DefaultFont = 0;
229 static LOGFONTA DefaultLogFont = {
230     100, 0, 0, 0, FW_NORMAL, FALSE, FALSE, FALSE, ANSI_CHARSET, 0, 0,
231     DEFAULT_QUALITY, FIXED_PITCH | FF_MODERN, ""
232 };
233
234 /*********************************************************************
235  *           PSDRV_Init
236  *
237  * Initializes font metrics and registers driver. Called from GDI_Init()
238  *
239  */
240 BOOL WINAPI PSDRV_Init( HINSTANCE hinst, DWORD reason, LPVOID reserved )
241 {
242     TRACE("(0x%4x, 0x%08lx, %p)\n", hinst, reason, reserved);
243    
244     switch(reason) {
245
246         case DLL_PROCESS_ATTACH:
247
248             PSDRV_Heap = HeapCreate(0, 0x10000, 0);
249             if (PSDRV_Heap == (HANDLE)NULL)
250                 return FALSE;
251
252             if (PSDRV_GetFontMetrics() == FALSE) {
253                 HeapDestroy(PSDRV_Heap);
254                 return FALSE;
255             }
256
257             PSDRV_DefaultFont = CreateFontIndirectA(&DefaultLogFont);
258             if (PSDRV_DefaultFont == (HANDLE)NULL) {
259                 HeapDestroy(PSDRV_Heap);
260                 return FALSE;
261             }
262
263             /* Register driver as "WINEPS", "WINEPS.DLL" and "WINEPS.DRV"
264                 to allow an easy configuring for users */
265
266             if (DRIVER_RegisterDriver("WINEPS", &PSDRV_Funcs) == FALSE) {
267                 HeapDestroy(PSDRV_Heap);
268                 return FALSE;
269             }
270
271             if (DRIVER_RegisterDriver("WINEPS.DLL", &PSDRV_Funcs) == FALSE) {
272                 DRIVER_UnregisterDriver("WINEPS");
273                 HeapDestroy(PSDRV_Heap);
274                 return FALSE;
275             }
276
277             if (DRIVER_RegisterDriver("WINEPS.DRV", &PSDRV_Funcs) == FALSE) {
278                 DRIVER_UnregisterDriver("WINEPS");
279                 DRIVER_UnregisterDriver("WINEPS.DLL");
280                 HeapDestroy(PSDRV_Heap);
281                 return FALSE;
282             }
283
284             break;
285
286         case DLL_PROCESS_DETACH:
287
288             DeleteObject( PSDRV_DefaultFont );
289             HeapDestroy( PSDRV_Heap );
290             DRIVER_UnregisterDriver( "WINEPS" );
291             DRIVER_UnregisterDriver( "WINEPS.DLL" );
292             DRIVER_UnregisterDriver( "WINEPS.DRV" );
293
294             break;
295     }
296  
297     return TRUE;
298 }
299
300
301 /**********************************************************************
302  *           PSDRV_CreateDC
303  */
304 static BOOL PSDRV_CreateDC( DC *dc, LPCSTR driver, LPCSTR device,
305                                LPCSTR output, const DEVMODEA* initData )
306 {
307     PSDRV_PDEVICE *physDev;
308     PRINTERINFO *pi;
309     DeviceCaps *devCaps;
310     PAGESIZE *page;
311     INT width = 0, height = 0;
312
313     /* If no device name was specified, retrieve the device name
314      * from the DEVMODE structure from the DC's physDev.
315      * (See CreateCompatibleDC) */
316     if ( !device && dc->physDev )
317     {
318         physDev = (PSDRV_PDEVICE *)dc->physDev;
319         device = physDev->Devmode->dmPublic.dmDeviceName;
320     }
321     pi = PSDRV_FindPrinterInfo(device);
322         
323     TRACE("(%s %s %s %p)\n", driver, device, output, initData);
324
325     if(!pi) return FALSE;
326
327     if(!pi->Fonts) {
328         MESSAGE("To use WINEPS you need to install some AFM files.\n");
329         return FALSE;
330     }
331
332     physDev = (PSDRV_PDEVICE *)HeapAlloc( PSDRV_Heap, HEAP_ZERO_MEMORY,
333                                                      sizeof(*physDev) );
334     if (!physDev) return FALSE;
335     dc->physDev = physDev;
336
337     physDev->pi = pi;
338
339     physDev->Devmode = (PSDRV_DEVMODEA *)HeapAlloc( PSDRV_Heap, 0,
340                                                      sizeof(PSDRV_DEVMODEA) );
341     if(!physDev->Devmode) {
342         HeapFree( PSDRV_Heap, 0, physDev );
343         return FALSE;
344     }
345     
346     memcpy( physDev->Devmode, pi->Devmode, sizeof(PSDRV_DEVMODEA) );
347
348     if(initData) {
349         PSDRV_MergeDevmodes(physDev->Devmode, (PSDRV_DEVMODEA *)initData, pi);
350     }
351
352     
353     devCaps = HeapAlloc( PSDRV_Heap, 0, sizeof(PSDRV_DevCaps) );
354     memcpy(devCaps, &PSDRV_DevCaps, sizeof(PSDRV_DevCaps));
355
356     /* Are aspect[XY] and logPixels[XY] correct? */
357     /* Need to handle different res in x and y => fix ppd */
358     devCaps->aspectX = devCaps->logPixelsX = 
359                                 physDev->pi->ppd->DefaultResolution;
360     devCaps->aspectY = devCaps->logPixelsY = 
361                                 physDev->pi->ppd->DefaultResolution;
362     devCaps->aspectXY = (int)hypot( (double)devCaps->aspectX, 
363                                     (double)devCaps->aspectY );
364
365
366     for(page = pi->ppd->PageSizes; page; page = page->next) {
367         if(page->WinPage == physDev->Devmode->dmPublic.u1.s1.dmPaperSize)
368             break;
369     }
370     if(!page) {
371         FIXME("Can't find page\n");
372         physDev->PageSize.left = 0;
373         physDev->PageSize.right = 0;
374         physDev->PageSize.bottom = 0;
375         physDev->PageSize.top = 0;
376     } else if(page->ImageableArea) { /* PageSize is in device units */
377         physDev->PageSize.left = page->ImageableArea->llx *
378           devCaps->logPixelsX / 72;
379        physDev->PageSize.right = page->ImageableArea->urx *
380           devCaps->logPixelsX / 72;
381        physDev->PageSize.bottom = page->ImageableArea->lly *
382           devCaps->logPixelsY / 72;
383        physDev->PageSize.top = page->ImageableArea->ury *
384           devCaps->logPixelsY / 72;
385     } else {
386         physDev->PageSize.left = physDev->PageSize.bottom = 0;
387         physDev->PageSize.right = page->PaperDimension->x *
388           devCaps->logPixelsX / 72;
389         physDev->PageSize.top = page->PaperDimension->y *
390           devCaps->logPixelsY / 72;
391     }
392     TRACE("PageSize = (%d,%d - %d,%d)\n", physDev->PageSize.left, physDev->PageSize.bottom, physDev->PageSize.right, physDev->PageSize.top);
393
394     /* these are in device units */
395     width = physDev->PageSize.right - physDev->PageSize.left;
396     height = physDev->PageSize.top - physDev->PageSize.bottom;
397
398     if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_PORTRAIT) {
399         devCaps->horzRes = width;
400         devCaps->vertRes = height;
401     } else {
402         devCaps->horzRes = height;
403         devCaps->vertRes = width;
404     }
405
406     /* these are in mm */
407     devCaps->horzSize = (devCaps->horzRes * 25.4) / devCaps->logPixelsX;
408     devCaps->vertSize = (devCaps->vertRes * 25.4) / devCaps->logPixelsY;
409
410     TRACE("devcaps: horzSize = %dmm, vertSize = %dmm, "
411           "horzRes = %d, vertRes = %d\n",
412           devCaps->horzSize, devCaps->vertSize,
413           devCaps->horzRes, devCaps->vertRes);
414
415     if(physDev->pi->ppd->ColorDevice) {
416         devCaps->bitsPixel = 8;
417         devCaps->numColors = 256;
418         /* FIXME are these values OK? */
419     }
420
421     /* etc */
422
423     dc->devCaps = devCaps;
424
425     dc->hVisRgn = CreateRectRgn(0, 0, dc->devCaps->horzRes,
426                             dc->devCaps->vertRes);
427     
428     dc->hFont = PSDRV_DefaultFont;
429     physDev->job.output = output ?
430       HEAP_strdupA( PSDRV_Heap, 0, output ) :
431       HEAP_strdupA( PSDRV_Heap, 0, "LPT1:" );  /* HACK */
432     physDev->job.hJob = 0;
433     return TRUE;
434 }
435
436
437 /**********************************************************************
438  *           PSDRV_DeleteDC
439  */
440 static BOOL PSDRV_DeleteDC( DC *dc )
441 {
442     PSDRV_PDEVICE *physDev = (PSDRV_PDEVICE *)dc->physDev;
443     
444     TRACE("\n");
445
446     HeapFree( PSDRV_Heap, 0, physDev->Devmode );
447     HeapFree( PSDRV_Heap, 0, physDev->job.output );
448     HeapFree( PSDRV_Heap, 0, (void *)dc->devCaps );
449     HeapFree( PSDRV_Heap, 0, physDev );
450     dc->physDev = NULL;
451
452     return TRUE;
453 }
454
455
456 /**********************************************************************
457  *              PSDRV_FindPrinterInfo
458  */
459 PRINTERINFO *PSDRV_FindPrinterInfo(LPCSTR name) 
460 {
461     static PRINTERINFO *PSDRV_PrinterList;
462     DWORD type = REG_BINARY, needed, res, dwPaperSize;
463     PRINTERINFO *pi = PSDRV_PrinterList, **last = &PSDRV_PrinterList;
464     FONTNAME *font;
465     AFM *afm;
466     HANDLE hPrinter;
467     const char *ppd = NULL;
468     char ppdFileName[256];
469
470     TRACE("'%s'\n", name);
471     
472     /*
473      *  If this loop completes, last will point to the 'next' element of the
474      *  final PRINTERINFO in the list
475      */    
476     for( ; pi; last = &pi->next, pi = pi->next)
477         if(!strcmp(pi->FriendlyName, name))
478             return pi;
479
480     pi = *last = HeapAlloc( PSDRV_Heap, HEAP_ZERO_MEMORY, sizeof(*pi) );
481     if (pi == NULL)
482         return NULL;
483         
484     pi->FriendlyName = HEAP_strdupA( PSDRV_Heap, 0, name );
485     if (pi->FriendlyName == NULL)
486         goto fail;
487         
488     /* Use Get|SetPrinterDataExA instead? */
489     
490     res = DrvGetPrinterData16((LPSTR)name, (LPSTR)INT_PD_DEFAULT_DEVMODE, &type,
491                             NULL, 0, &needed );
492
493     if(res == ERROR_INVALID_PRINTER_NAME || needed != sizeof(DefaultDevmode)) {
494         pi->Devmode = HeapAlloc( PSDRV_Heap, 0, sizeof(DefaultDevmode) );
495         if (pi->Devmode == NULL)
496             goto cleanup;           
497         memcpy(pi->Devmode, &DefaultDevmode, sizeof(DefaultDevmode) );
498         strcpy(pi->Devmode->dmPublic.dmDeviceName,name);
499         DrvSetPrinterData16((LPSTR)name, (LPSTR)INT_PD_DEFAULT_DEVMODE,
500                  REG_BINARY, (LPBYTE)&DefaultDevmode, sizeof(DefaultDevmode) );
501
502         /* need to do something here AddPrinter?? */
503     }
504     else {
505         pi->Devmode = HeapAlloc( PSDRV_Heap, 0, needed );
506         DrvGetPrinterData16((LPSTR)name, (LPSTR)INT_PD_DEFAULT_DEVMODE, &type,
507                           (LPBYTE)pi->Devmode, needed, &needed);
508     }
509
510     if (OpenPrinterA (pi->FriendlyName, &hPrinter, NULL) == 0) {
511         ERR ("OpenPrinterA failed with code %li\n", GetLastError ());
512         goto cleanup;
513     }
514     
515     ppdFileName[0]='\0';
516     
517 #ifdef HAVE_CUPS
518     {
519         ppd = cupsGetPPD(name);
520
521         if (ppd) {
522             strncpy(ppdFileName, ppd, sizeof(ppdFileName));
523             res = ERROR_SUCCESS;
524             /* we should unlink() that file later */
525         } else {
526             res = ERROR_FILE_NOT_FOUND;
527             WARN("Did not find ppd for %s\n",name);
528         }
529     }
530 #endif
531
532     if (!ppdFileName[0]) {
533         res = GetPrinterDataA (hPrinter, "PPD File", NULL, ppdFileName,
534                 sizeof(ppdFileName), &needed);
535     }
536     /* Look for a ppd file for this printer in the config file.
537      * First look for the names of the printer, then for 'generic'
538      */
539     if ((res!=ERROR_SUCCESS) &&
540         !PROFILE_GetWineIniString("ppd",name,"",ppdFileName,sizeof(ppdFileName))        &&
541         !PROFILE_GetWineIniString("ppd","generic","",ppdFileName,sizeof(ppdFileName))
542     )
543         res = ERROR_FILE_NOT_FOUND;
544     else 
545         res = ERROR_SUCCESS;
546
547     if (res != ERROR_SUCCESS) {
548         ERR ("Error %li getting PPD file name for printer '%s'\n", res, name);
549         goto closeprinter;
550     }
551     
552     ppdFileName[sizeof(ppdFileName) - 1] = '\0';
553     
554     pi->ppd = PSDRV_ParsePPD(ppdFileName);
555     if(!pi->ppd) {
556         MESSAGE("Couldn't find PPD file '%s', expect a crash now!\n",
557             ppdFileName);
558         goto closeprinter;
559     }
560     
561     /*
562      *  This is a hack.  The default paper size should be read in as part of
563      *  the Devmode structure, but Wine doesn't currently provide a convenient
564      *  way to configure printers.
565      */
566     res = GetPrinterDataA (hPrinter, "Paper Size", NULL, (LPBYTE) &dwPaperSize,
567             sizeof (DWORD), &needed);
568     if (res == ERROR_SUCCESS)
569         pi->Devmode->dmPublic.u1.s1.dmPaperSize = (SHORT) dwPaperSize;
570     else if (res == ERROR_FILE_NOT_FOUND)
571         TRACE ("No 'Paper Size' for printer '%s'\n", name);
572     else {
573         ERR ("GetPrinterDataA returned %li\n", res);
574         goto closeprinter;
575     }
576
577     res = EnumPrinterDataExA (hPrinter, "PrinterDriverData\\FontSubTable", NULL,
578             0, &needed, &pi->FontSubTableSize);
579     if (res == ERROR_SUCCESS || res == ERROR_FILE_NOT_FOUND) {
580         TRACE ("No 'FontSubTable' for printer '%s'\n", name);
581     }
582     else if (res == ERROR_MORE_DATA) {
583         pi->FontSubTable = HeapAlloc (PSDRV_Heap, 0, needed);
584         if (pi->FontSubTable == NULL) {
585             ERR ("Failed to allocate %li bytes from heap\n", needed);
586             goto closeprinter;
587         }
588
589         res = EnumPrinterDataExA (hPrinter, "PrinterDriverData\\FontSubTable",
590                 (LPBYTE) pi->FontSubTable, needed, &needed,
591                 &pi->FontSubTableSize);
592         if (res != ERROR_SUCCESS) {
593             ERR ("EnumPrinterDataExA returned %li\n", res);
594             goto closeprinter;
595         }
596     }
597     else {
598         ERR("EnumPrinterDataExA returned %li\n", res);
599         goto closeprinter;
600     }
601
602     if (ClosePrinter (hPrinter) == 0) {
603         ERR ("ClosePrinter failed with code %li\n", GetLastError ());
604         goto cleanup;
605     }
606
607     pi->next = NULL;
608     pi->Fonts = NULL;
609
610     for(font = pi->ppd->InstalledFonts; font; font = font->next) {
611         afm = PSDRV_FindAFMinList(PSDRV_AFMFontList, font->Name);
612         if(!afm) {
613             TRACE( "Couldn't find AFM file for installed printer font '%s' - "
614                     "ignoring\n", font->Name);
615         }
616         else {
617             if (PSDRV_AddAFMtoList(&pi->Fonts, afm) == FALSE) {
618                 PSDRV_FreeAFMList(pi->Fonts);
619                 goto cleanup;
620             }
621         }
622
623     }
624     if (ppd) unlink(ppd);
625     return pi;
626
627 closeprinter:
628     ClosePrinter(hPrinter);
629 cleanup:
630     if (pi->FontSubTable)
631         HeapFree(PSDRV_Heap, 0, pi->FontSubTable);
632     if (pi->FriendlyName)
633         HeapFree(PSDRV_Heap, 0, pi->FriendlyName);
634     if (pi->Devmode)
635         HeapFree(PSDRV_Heap, 0, pi->Devmode);
636 fail:
637     HeapFree(PSDRV_Heap, 0, pi);
638     if (ppd) unlink(ppd);
639     *last = NULL;
640     return NULL;
641 }