git.oblomov.eu Git - wine/blob - 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 */         2,
 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 mm */
 395     width = (physDev->PageSize.right - physDev->PageSize.left) * 25.4 /
 396       devCaps->logPixelsX;
 397     height = (physDev->PageSize.top - physDev->PageSize.bottom) * 25.4 /
 398       devCaps->logPixelsY;
 399
 400     if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_PORTRAIT) {
 401         devCaps->horzSize = width;
 402         devCaps->vertSize = height;
 403     } else {
 404         devCaps->horzSize = height;
 405         devCaps->vertSize = width;
 406     }
 407
 408     devCaps->horzRes = devCaps->logPixelsX * devCaps->horzSize / 25.4;
 409     devCaps->vertRes = devCaps->logPixelsY * devCaps->vertSize / 25.4;
 410
 411     TRACE("devcaps: horzSize = %dmm, vertSize = %dmm, "
 412           "horzRes = %d, vertRes = %d\n",
 413           devCaps->horzSize, devCaps->vertSize,
 414           devCaps->horzRes, devCaps->vertRes);
 415
 416     if(physDev->pi->ppd->ColorDevice) {
 417         devCaps->bitsPixel = 8;
 418         devCaps->numColors = 256;
 419         /* FIXME are these values OK? */
 420     }
 421
 422     /* etc */
 423
 424     dc->devCaps = devCaps;
 425
 426     dc->hVisRgn = CreateRectRgn(0, 0, dc->devCaps->horzRes,
 427                             dc->devCaps->vertRes);
 428
 429     dc->hFont = PSDRV_DefaultFont;
 430     physDev->job.output = output ?
 431       HEAP_strdupA( PSDRV_Heap, 0, output ) :
 432       HEAP_strdupA( PSDRV_Heap, 0, "LPT1:" );  /* HACK */
 433     physDev->job.hJob = 0;
 434     return TRUE;
 435 }
 436
 437
 438 /**********************************************************************
 439  *           PSDRV_DeleteDC
 440  */
 441 static BOOL PSDRV_DeleteDC( DC *dc )
 442 {
 443     PSDRV_PDEVICE *physDev = (PSDRV_PDEVICE *)dc->physDev;
 444
 445     TRACE("\n");
 446
 447     HeapFree( PSDRV_Heap, 0, physDev->Devmode );
 448     HeapFree( PSDRV_Heap, 0, physDev->job.output );
 449     HeapFree( PSDRV_Heap, 0, (void *)dc->devCaps );
 450     HeapFree( PSDRV_Heap, 0, physDev );
 451     dc->physDev = NULL;
 452
 453     return TRUE;
 454 }
 455
 456
 457 /**********************************************************************
 458  *              PSDRV_FindPrinterInfo
 459  */
 460 PRINTERINFO *PSDRV_FindPrinterInfo(LPCSTR name)
 461 {
 462     static PRINTERINFO *PSDRV_PrinterList;
 463     DWORD type = REG_BINARY, needed, res, dwPaperSize;
 464     PRINTERINFO *pi = PSDRV_PrinterList, **last = &PSDRV_PrinterList;
 465     FONTNAME *font;
 466     AFM *afm;
 467     HANDLE hPrinter;
 468     const char *ppd = NULL;
 469     char ppdFileName[256];
 470
 471     TRACE("'%s'\n", name);
 472
 473     /*
 474      *  If this loop completes, last will point to the 'next' element of the
 475      *  final PRINTERINFO in the list
 476      */
 477     for( ; pi; last = &pi->next, pi = pi->next)
 478         if(!strcmp(pi->FriendlyName, name))
 479             return pi;
 480
 481     pi = *last = HeapAlloc( PSDRV_Heap, HEAP_ZERO_MEMORY, sizeof(*pi) );
 482     if (pi == NULL)
 483         return NULL;
 484
 485     pi->FriendlyName = HEAP_strdupA( PSDRV_Heap, 0, name );
 486     if (pi->FriendlyName == NULL)
 487         goto fail;
 488
 489     /* Use Get|SetPrinterDataExA instead? */
 490
 491     res = DrvGetPrinterData16((LPSTR)name, (LPSTR)INT_PD_DEFAULT_DEVMODE, &type,
 492                             NULL, 0, &needed );
 493
 494     if(res == ERROR_INVALID_PRINTER_NAME || needed != sizeof(DefaultDevmode)) {
 495         pi->Devmode = HeapAlloc( PSDRV_Heap, 0, sizeof(DefaultDevmode) );
 496         if (pi->Devmode == NULL)
 497             goto cleanup;
 498         memcpy(pi->Devmode, &DefaultDevmode, sizeof(DefaultDevmode) );
 499         strcpy(pi->Devmode->dmPublic.dmDeviceName,name);
 500         DrvSetPrinterData16((LPSTR)name, (LPSTR)INT_PD_DEFAULT_DEVMODE,
 501                  REG_BINARY, (LPBYTE)&DefaultDevmode, sizeof(DefaultDevmode) );
 502
 503         /* need to do something here AddPrinter?? */
 504     }
 505     else {
 506         pi->Devmode = HeapAlloc( PSDRV_Heap, 0, needed );
 507         DrvGetPrinterData16((LPSTR)name, (LPSTR)INT_PD_DEFAULT_DEVMODE, &type,
 508                           (LPBYTE)pi->Devmode, needed, &needed);
 509     }
 510
 511     if (OpenPrinterA (pi->FriendlyName, &hPrinter, NULL) == 0) {
 512         ERR ("OpenPrinterA failed with code %li\n", GetLastError ());
 513         goto cleanup;
 514     }
 515
 516     ppdFileName[0]='\0';
 517
 518 #ifdef HAVE_CUPS
 519     {
 520         ppd = cupsGetPPD(name);
 521
 522         if (ppd) {
 523             strncpy(ppdFileName, ppd, sizeof(ppdFileName));
 524             res = ERROR_SUCCESS;
 525             /* we should unlink() that file later */
 526         }
 527         else {
 528                 ERR("Did not find ppd for %s\n",name);
 529         }
 530     }
 531 #endif
 532
 533     if (!ppdFileName[0]) {
 534         res = GetPrinterDataA (hPrinter, "PPD File", NULL, ppdFileName,
 535                 sizeof(ppdFileName), &needed);
 536     }
 537
 538     if (res != ERROR_SUCCESS) {
 539         ERR ("Error %li getting PPD file name for printer '%s'\n", res, name);
 540         goto closeprinter;
 541     }
 542
 543     ppdFileName[sizeof(ppdFileName) - 1] = '\0';
 544
 545     pi->ppd = PSDRV_ParsePPD(ppdFileName);
 546     if(!pi->ppd) {
 547         MESSAGE("Couldn't find PPD file '%s', expect a crash now!\n",
 548             ppdFileName);
 549         goto closeprinter;
 550     }
 551
 552     /*
 553      *  This is a hack.  The default paper size should be read in as part of
 554      *  the Devmode structure, but Wine doesn't currently provide a convenient
 555      *  way to configure printers.
 556      */
 557     res = GetPrinterDataA (hPrinter, "Paper Size", NULL, (LPBYTE) &dwPaperSize,
 558             sizeof (DWORD), &needed);
 559     if (res == ERROR_SUCCESS)
 560         pi->Devmode->dmPublic.u1.s1.dmPaperSize = (SHORT) dwPaperSize;
 561     else if (res == ERROR_FILE_NOT_FOUND)
 562         TRACE ("No 'Paper Size' for printer '%s'\n", name);
 563     else {
 564         ERR ("GetPrinterDataA returned %li\n", res);
 565         goto closeprinter;
 566     }
 567
 568     res = EnumPrinterDataExA (hPrinter, "PrinterDriverData\\FontSubTable", NULL,
 569             0, &needed, &pi->FontSubTableSize);
 570     if (res == ERROR_SUCCESS || res == ERROR_FILE_NOT_FOUND) {
 571         TRACE ("No 'FontSubTable' for printer '%s'\n", name);
 572     }
 573     else if (res == ERROR_MORE_DATA) {
 574         pi->FontSubTable = HeapAlloc (PSDRV_Heap, 0, needed);
 575         if (pi->FontSubTable == NULL) {
 576             ERR ("Failed to allocate %li bytes from heap\n", needed);
 577             goto closeprinter;
 578         }
 579
 580         res = EnumPrinterDataExA (hPrinter, "PrinterDriverData\\FontSubTable",
 581                 (LPBYTE) pi->FontSubTable, needed, &needed,
 582                 &pi->FontSubTableSize);
 583         if (res != ERROR_SUCCESS) {
 584             ERR ("EnumPrinterDataExA returned %li\n", res);
 585             goto closeprinter;
 586         }
 587     }
 588     else {
 589         ERR("EnumPrinterDataExA returned %li\n", res);
 590         goto closeprinter;
 591     }
 592
 593     if (ClosePrinter (hPrinter) == 0) {
 594         ERR ("ClosePrinter failed with code %li\n", GetLastError ());
 595         goto cleanup;
 596     }
 597
 598     pi->next = NULL;
 599     pi->Fonts = NULL;
 600
 601     for(font = pi->ppd->InstalledFonts; font; font = font->next) {
 602         afm = PSDRV_FindAFMinList(PSDRV_AFMFontList, font->Name);
 603         if(!afm) {
 604             TRACE( "Couldn't find AFM file for installed printer font '%s' - "
 605                     "ignoring\n", font->Name);
 606         }
 607         else {
 608             if (PSDRV_AddAFMtoList(&pi->Fonts, afm) == FALSE) {
 609                 PSDRV_FreeAFMList(pi->Fonts);
 610                 goto cleanup;
 611             }
 612         }
 613
 614     }
 615     if (ppd) unlink(ppd);
 616     return pi;
 617
 618 closeprinter:
 619     ClosePrinter(hPrinter);
 620 cleanup:
 621     if (pi->FontSubTable)
 622         HeapFree(PSDRV_Heap, 0, pi->FontSubTable);
 623     if (pi->FriendlyName)
 624         HeapFree(PSDRV_Heap, 0, pi->FriendlyName);
 625     if (pi->Devmode)
 626         HeapFree(PSDRV_Heap, 0, pi->Devmode);
 627 fail:
 628     HeapFree(PSDRV_Heap, 0, pi);
 629     if (ppd) unlink(ppd);
 630     *last = NULL;
 631     return NULL;
 632 }