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  * 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  */
  21
  22 #include "config.h"
  23 #include "wine/port.h"
  24
  25 #include <string.h>
  26 #ifdef HAVE_UNISTD_H
  27 # include <unistd.h>
  28 #endif
  29
  30 #define NONAMELESSUNION
  31 #define NONAMELESSSTRUCT
  32 #include "gdi.h"
  33 #include "psdrv.h"
  34 #include "wine/debug.h"
  35 #include "winreg.h"
  36 #include "winspool.h"
  37 #include "winerror.h"
  38
  39 WINE_DEFAULT_DEBUG_CHANNEL(psdrv);
  40
  41 #ifdef HAVE_CUPS_CUPS_H
  42 #include <cups/cups.h>
  43
  44 #ifndef SONAME_LIBCUPS
  45 #define SONAME_LIBCUPS "libcups.so"
  46 #endif
  47
  48 static void *cupshandle = NULL;
  49 #endif
  50
  51 static PSDRV_DEVMODEA DefaultDevmode =
  52 {
  53   { /* dmPublic */
  54 /* dmDeviceName */      "Wine PostScript Driver",
  55 /* dmSpecVersion */     0x30a,
  56 /* dmDriverVersion */   0x001,
  57 /* dmSize */            sizeof(DEVMODEA),
  58 /* dmDriverExtra */     sizeof(PSDRV_DEVMODEA)-sizeof(DEVMODEA),
  59 /* dmFields */          DM_ORIENTATION | DM_PAPERSIZE | DM_SCALE |
  60                         DM_COPIES | DM_DEFAULTSOURCE | DM_COLOR |
  61                         DM_DUPLEX | DM_YRESOLUTION | DM_TTOPTION,
  62    { /* u1 */
  63      { /* s1 */
  64 /* dmOrientation */     DMORIENT_PORTRAIT,
  65 /* dmPaperSize */       DMPAPER_LETTER,
  66 /* dmPaperLength */     2794,
  67 /* dmPaperWidth */      2159
  68      }
  69    },
  70 /* dmScale */           100, /* ?? */
  71 /* dmCopies */          1,
  72 /* dmDefaultSource */   DMBIN_AUTO,
  73 /* dmPrintQuality */    0,
  74 /* dmColor */           DMCOLOR_COLOR,
  75 /* dmDuplex */          0,
  76 /* dmYResolution */     0,
  77 /* dmTTOption */        DMTT_SUBDEV,
  78 /* dmCollate */         0,
  79 /* dmFormName */        "",
  80 /* dmUnusedPadding */   0,
  81 /* dmBitsPerPel */      0,
  82 /* dmPelsWidth */       0,
  83 /* dmPelsHeight */      0,
  84 /* dmDisplayFlags */    0,
  85 /* dmDisplayFrequency */ 0,
  86 /* dmICMMethod */       0,
  87 /* dmICMIntent */       0,
  88 /* dmMediaType */       0,
  89 /* dmDitherType */      0,
  90 /* dmReserved1 */       0,
  91 /* dmReserved2 */       0,
  92 /* dmPanningWidth */    0,
  93 /* dmPanningHeight */   0
  94   },
  95   { /* dmDocPrivate */
  96     /* dummy */ 0
  97   },
  98   { /* dmDrvPrivate */
  99     /* numInstalledOptions */ 0
 100   }
 101 };
 102
 103 HANDLE PSDRV_Heap = 0;
 104
 105 static HANDLE PSDRV_DefaultFont = 0;
 106 static LOGFONTA DefaultLogFont = {
 107     100, 0, 0, 0, FW_NORMAL, FALSE, FALSE, FALSE, ANSI_CHARSET, 0, 0,
 108     DEFAULT_QUALITY, FIXED_PITCH | FF_MODERN, ""
 109 };
 110
 111 /*********************************************************************
 112  *           DllMain
 113  *
 114  * Initializes font metrics and registers driver. wineps dll entry point.
 115  *
 116  */
 117 BOOL WINAPI DllMain( HINSTANCE hinst, DWORD reason, LPVOID reserved )
 118 {
 119     TRACE("(%p, 0x%08lx, %p)\n", hinst, reason, reserved);
 120
 121     switch(reason) {
 122
 123         case DLL_PROCESS_ATTACH:
 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 #ifdef HAVE_CUPS_CUPS_H
 140             /* dynamically load CUPS if not yet loaded */
 141             if (!cupshandle) {
 142                 cupshandle = wine_dlopen(SONAME_LIBCUPS, RTLD_NOW, NULL, 0);
 143                 if (!cupshandle) cupshandle = (void*)-1;
 144             }
 145 #endif
 146             break;
 147
 148         case DLL_PROCESS_DETACH:
 149
 150             DeleteObject( PSDRV_DefaultFont );
 151             HeapDestroy( PSDRV_Heap );
 152 #ifdef HAVE_CUPS_CUPS_H
 153             if (cupshandle && (cupshandle != (void*)-1)) {
 154                 wine_dlclose(cupshandle, NULL, 0);
 155                 cupshandle = NULL;
 156             }
 157 #endif
 158             break;
 159     }
 160
 161     return TRUE;
 162 }
 163
 164
 165 static void PSDRV_UpdateDevCaps( PSDRV_PDEVICE *physDev )
 166 {
 167     PAGESIZE *page;
 168     INT width = 0, height = 0;
 169
 170     if(physDev->Devmode->dmPublic.dmFields & DM_PAPERSIZE) {
 171         for(page = physDev->pi->ppd->PageSizes; page; page = page->next) {
 172             if(page->WinPage == physDev->Devmode->dmPublic.u1.s1.dmPaperSize)
 173                 break;
 174         }
 175
 176         if(!page) {
 177             FIXME("Can't find page\n");
 178             physDev->ImageableArea.left = 0;
 179             physDev->ImageableArea.right = 0;
 180             physDev->ImageableArea.bottom = 0;
 181             physDev->ImageableArea.top = 0;
 182             physDev->PageSize.cx = 0;
 183             physDev->PageSize.cy = 0;
 184         } else if(page->ImageableArea) {
 185           /* physDev sizes in device units; ppd sizes in 1/72" */
 186             physDev->ImageableArea.left = page->ImageableArea->llx *
 187               physDev->logPixelsX / 72;
 188             physDev->ImageableArea.right = page->ImageableArea->urx *
 189               physDev->logPixelsX / 72;
 190             physDev->ImageableArea.bottom = page->ImageableArea->lly *
 191               physDev->logPixelsY / 72;
 192             physDev->ImageableArea.top = page->ImageableArea->ury *
 193               physDev->logPixelsY / 72;
 194             physDev->PageSize.cx = page->PaperDimension->x *
 195               physDev->logPixelsX / 72;
 196             physDev->PageSize.cy = page->PaperDimension->y *
 197               physDev->logPixelsY / 72;
 198         } else {
 199             physDev->ImageableArea.left = physDev->ImageableArea.bottom = 0;
 200             physDev->ImageableArea.right = physDev->PageSize.cx =
 201               page->PaperDimension->x * physDev->logPixelsX / 72;
 202             physDev->ImageableArea.top = physDev->PageSize.cy =
 203               page->PaperDimension->y * physDev->logPixelsY / 72;
 204         }
 205     } else if((physDev->Devmode->dmPublic.dmFields & DM_PAPERLENGTH) &&
 206               (physDev->Devmode->dmPublic.dmFields & DM_PAPERWIDTH)) {
 207       /* physDev sizes in device units; Devmode sizes in 1/10 mm */
 208         physDev->ImageableArea.left = physDev->ImageableArea.bottom = 0;
 209         physDev->ImageableArea.right = physDev->PageSize.cx =
 210           physDev->Devmode->dmPublic.u1.s1.dmPaperWidth *
 211           physDev->logPixelsX / 254;
 212         physDev->ImageableArea.top = physDev->PageSize.cy =
 213           physDev->Devmode->dmPublic.u1.s1.dmPaperLength *
 214           physDev->logPixelsY / 254;
 215     } else {
 216         FIXME("Odd dmFields %lx\n", physDev->Devmode->dmPublic.dmFields);
 217         physDev->ImageableArea.left = 0;
 218         physDev->ImageableArea.right = 0;
 219         physDev->ImageableArea.bottom = 0;
 220         physDev->ImageableArea.top = 0;
 221         physDev->PageSize.cx = 0;
 222         physDev->PageSize.cy = 0;
 223     }
 224
 225     TRACE("ImageableArea = %ld,%ld - %ld,%ld: PageSize = %ldx%ld\n",
 226           physDev->ImageableArea.left, physDev->ImageableArea.bottom,
 227           physDev->ImageableArea.right, physDev->ImageableArea.top,
 228           physDev->PageSize.cx, physDev->PageSize.cy);
 229
 230     /* these are in device units */
 231     width = physDev->ImageableArea.right - physDev->ImageableArea.left;
 232     height = physDev->ImageableArea.top - physDev->ImageableArea.bottom;
 233
 234     if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_PORTRAIT) {
 235         physDev->horzRes = width;
 236         physDev->vertRes = height;
 237     } else {
 238         physDev->horzRes = height;
 239         physDev->vertRes = width;
 240     }
 241
 242     /* these are in mm */
 243     physDev->horzSize = (physDev->horzRes * 25.4) / physDev->logPixelsX;
 244     physDev->vertSize = (physDev->vertRes * 25.4) / physDev->logPixelsY;
 245
 246     TRACE("devcaps: horzSize = %dmm, vertSize = %dmm, "
 247           "horzRes = %d, vertRes = %d\n",
 248           physDev->horzSize, physDev->vertSize,
 249           physDev->horzRes, physDev->vertRes);
 250 }
 251
 252
 253 /**********************************************************************
 254  *           PSDRV_CreateDC
 255  */
 256 BOOL PSDRV_CreateDC( DC *dc, PSDRV_PDEVICE **pdev, LPCSTR driver, LPCSTR device,
 257                      LPCSTR output, const DEVMODEA* initData )
 258 {
 259     PSDRV_PDEVICE *physDev;
 260     PRINTERINFO *pi;
 261
 262     /* If no device name was specified, retrieve the device name
 263      * from the DEVMODE structure from the DC's physDev.
 264      * (See CreateCompatibleDC) */
 265     if ( !device && *pdev )
 266     {
 267         physDev = *pdev;
 268         device = physDev->Devmode->dmPublic.dmDeviceName;
 269     }
 270     pi = PSDRV_FindPrinterInfo(device);
 271
 272     TRACE("(%s %s %s %p)\n", driver, device, output, initData);
 273
 274     if(!pi) return FALSE;
 275
 276     if(!pi->Fonts) {
 277         MESSAGE("To use WINEPS you need to install some AFM files.\n");
 278         return FALSE;
 279     }
 280
 281     physDev = (PSDRV_PDEVICE *)HeapAlloc( PSDRV_Heap, HEAP_ZERO_MEMORY,
 282                                                      sizeof(*physDev) );
 283     if (!physDev) return FALSE;
 284     *pdev = physDev;
 285     physDev->hdc = dc->hSelf;
 286     physDev->dc = dc;
 287
 288     physDev->pi = pi;
 289
 290     physDev->Devmode = (PSDRV_DEVMODEA *)HeapAlloc( PSDRV_Heap, 0,
 291                                                      sizeof(PSDRV_DEVMODEA) );
 292     if(!physDev->Devmode) {
 293         HeapFree( PSDRV_Heap, 0, physDev );
 294         return FALSE;
 295     }
 296
 297     memcpy( physDev->Devmode, pi->Devmode, sizeof(PSDRV_DEVMODEA) );
 298
 299     physDev->logPixelsX = physDev->pi->ppd->DefaultResolution;
 300     physDev->logPixelsY = physDev->pi->ppd->DefaultResolution;
 301
 302     if (output) {
 303         physDev->job.output = HeapAlloc( PSDRV_Heap, 0, strlen(output)+1 );
 304         strcpy( physDev->job.output, output );
 305     } else
 306         physDev->job.output = NULL;
 307     physDev->job.hJob = 0;
 308
 309     if(initData) {
 310         PSDRV_MergeDevmodes(physDev->Devmode, (PSDRV_DEVMODEA *)initData, pi);
 311     }
 312
 313     PSDRV_UpdateDevCaps(physDev);
 314     dc->hFont = PSDRV_DefaultFont;
 315     return TRUE;
 316 }
 317
 318
 319
 320 /**********************************************************************
 321  *           PSDRV_DeleteDC
 322  */
 323 BOOL PSDRV_DeleteDC( PSDRV_PDEVICE *physDev )
 324 {
 325     TRACE("\n");
 326
 327     HeapFree( PSDRV_Heap, 0, physDev->Devmode );
 328     if(physDev->job.output)
 329         HeapFree( PSDRV_Heap, 0, physDev->job.output );
 330     HeapFree( PSDRV_Heap, 0, physDev );
 331
 332     return TRUE;
 333 }
 334
 335
 336 /**********************************************************************
 337  *           ResetDC   (WINEPS.@)
 338  */
 339 HDC PSDRV_ResetDC( PSDRV_PDEVICE *physDev, const DEVMODEA *lpInitData )
 340 {
 341     if(lpInitData) {
 342         PSDRV_MergeDevmodes(physDev->Devmode, (PSDRV_DEVMODEA *)lpInitData, physDev->pi);
 343         PSDRV_UpdateDevCaps(physDev);
 344     }
 345     return physDev->hdc;
 346 }
 347
 348 /***********************************************************************
 349  *           GetDeviceCaps    (WINEPS.@)
 350  */
 351 INT PSDRV_GetDeviceCaps( PSDRV_PDEVICE *physDev, INT cap )
 352 {
 353     switch(cap)
 354     {
 355     case DRIVERVERSION:
 356         return 0;
 357     case TECHNOLOGY:
 358         return DT_RASPRINTER;
 359     case HORZSIZE:
 360         return MulDiv(physDev->horzSize, 100,
 361                       physDev->Devmode->dmPublic.dmScale);
 362     case VERTSIZE:
 363         return MulDiv(physDev->vertSize, 100,
 364                       physDev->Devmode->dmPublic.dmScale);
 365     case HORZRES:
 366         return physDev->horzRes;
 367     case VERTRES:
 368         return physDev->vertRes;
 369     case BITSPIXEL:
 370         return (physDev->pi->ppd->ColorDevice ? 8 : 1);
 371     case PLANES:
 372         return 1;
 373     case NUMBRUSHES:
 374         return -1;
 375     case NUMPENS:
 376         return 10;
 377     case NUMMARKERS:
 378         return 0;
 379     case NUMFONTS:
 380         return 39;
 381     case NUMCOLORS:
 382         return (physDev->pi->ppd->ColorDevice ? 256 : -1);
 383     case PDEVICESIZE:
 384         return sizeof(PSDRV_PDEVICE);
 385     case CURVECAPS:
 386         return (CC_CIRCLES | CC_PIE | CC_CHORD | CC_ELLIPSES | CC_WIDE |
 387                 CC_STYLED | CC_WIDESTYLED | CC_INTERIORS | CC_ROUNDRECT);
 388     case LINECAPS:
 389         return (LC_POLYLINE | LC_MARKER | LC_POLYMARKER | LC_WIDE |
 390                 LC_STYLED | LC_WIDESTYLED | LC_INTERIORS);
 391     case POLYGONALCAPS:
 392         return (PC_POLYGON | PC_RECTANGLE | PC_WINDPOLYGON | PC_SCANLINE |
 393                 PC_WIDE | PC_STYLED | PC_WIDESTYLED | PC_INTERIORS);
 394     case TEXTCAPS:
 395         return TC_CR_ANY | TC_VA_ABLE; /* psdrv 0x59f7 */
 396     case CLIPCAPS:
 397         return CP_RECTANGLE;
 398     case RASTERCAPS:
 399         return (RC_BITBLT | RC_BITMAP64 | RC_GDI20_OUTPUT | RC_DIBTODEV |
 400                 RC_STRETCHBLT | RC_STRETCHDIB); /* psdrv 0x6e99 */
 401     /* Are aspect[XY] and logPixels[XY] correct? */
 402     /* Need to handle different res in x and y => fix ppd */
 403     case ASPECTX:
 404     case ASPECTY:
 405         return physDev->pi->ppd->DefaultResolution;
 406     case ASPECTXY:
 407         return (int)hypot( (double)physDev->pi->ppd->DefaultResolution,
 408                            (double)physDev->pi->ppd->DefaultResolution );
 409     case LOGPIXELSX:
 410         return MulDiv(physDev->logPixelsX,
 411                       physDev->Devmode->dmPublic.dmScale, 100);
 412     case LOGPIXELSY:
 413         return MulDiv(physDev->logPixelsY,
 414                       physDev->Devmode->dmPublic.dmScale, 100);
 415     case SIZEPALETTE:
 416         return 0;
 417     case NUMRESERVED:
 418         return 0;
 419     case COLORRES:
 420         return 0;
 421     case PHYSICALWIDTH:
 422         return (physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) ?
 423           physDev->PageSize.cy : physDev->PageSize.cx;
 424     case PHYSICALHEIGHT:
 425         return (physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) ?
 426           physDev->PageSize.cx : physDev->PageSize.cy;
 427     case PHYSICALOFFSETX:
 428       if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) {
 429           if(physDev->pi->ppd->LandscapeOrientation == -90)
 430               return physDev->PageSize.cy - physDev->ImageableArea.top;
 431           else
 432               return physDev->ImageableArea.bottom;
 433       }
 434       return physDev->ImageableArea.left;
 435
 436     case PHYSICALOFFSETY:
 437       if(physDev->Devmode->dmPublic.u1.s1.dmOrientation == DMORIENT_LANDSCAPE) {
 438           if(physDev->pi->ppd->LandscapeOrientation == -90)
 439               return physDev->PageSize.cx - physDev->ImageableArea.right;
 440           else
 441               return physDev->ImageableArea.left;
 442       }
 443       return physDev->PageSize.cy - physDev->ImageableArea.top;
 444
 445     case SCALINGFACTORX:
 446     case SCALINGFACTORY:
 447     case VREFRESH:
 448     case DESKTOPVERTRES:
 449     case DESKTOPHORZRES:
 450     case BTLALIGNMENT:
 451         return 0;
 452     default:
 453         FIXME("(%p): unsupported capability %d, will return 0\n", physDev->hdc, cap );
 454         return 0;
 455     }
 456 }
 457
 458
 459 /**********************************************************************
 460  *              PSDRV_FindPrinterInfo
 461  */
 462 PRINTERINFO *PSDRV_FindPrinterInfo(LPCSTR name)
 463 {
 464     static PRINTERINFO *PSDRV_PrinterList;
 465     DWORD type = REG_BINARY, needed, res, dwPaperSize;
 466     PRINTERINFO *pi = PSDRV_PrinterList, **last = &PSDRV_PrinterList;
 467     FONTNAME *font;
 468     const AFM *afm;
 469     HANDLE hPrinter;
 470     const char *ppd = NULL;
 471     DWORD ppdType;
 472     char* ppdFileName = NULL;
 473     HKEY hkey;
 474     BOOL using_default_devmode = FALSE;
 475
 476     TRACE("'%s'\n", name);
 477
 478     /*
 479      *  If this loop completes, last will point to the 'next' element of the
 480      *  final PRINTERINFO in the list
 481      */
 482     for( ; pi; last = &pi->next, pi = pi->next)
 483         if(!strcmp(pi->FriendlyName, name))
 484             return pi;
 485
 486     pi = *last = HeapAlloc( PSDRV_Heap, HEAP_ZERO_MEMORY, sizeof(*pi) );
 487     if (pi == NULL)
 488         return NULL;
 489
 490     if (!(pi->FriendlyName = HeapAlloc( PSDRV_Heap, 0, strlen(name)+1 ))) goto fail;
 491     strcpy( pi->FriendlyName, name );
 492
 493     /* Use Get|SetPrinterDataExA instead? */
 494
 495     res = DrvGetPrinterData16((LPSTR)name, (LPSTR)INT_PD_DEFAULT_DEVMODE, &type,
 496                             NULL, 0, &needed );
 497
 498     if(res == ERROR_INVALID_PRINTER_NAME || needed != sizeof(DefaultDevmode)) {
 499         pi->Devmode = HeapAlloc( PSDRV_Heap, 0, sizeof(DefaultDevmode) );
 500         if (pi->Devmode == NULL)
 501             goto cleanup;
 502         memcpy(pi->Devmode, &DefaultDevmode, sizeof(DefaultDevmode) );
 503         strcpy(pi->Devmode->dmPublic.dmDeviceName,name);
 504         using_default_devmode = TRUE;
 505
 506         /* need to do something here AddPrinter?? */
 507     }
 508     else {
 509         pi->Devmode = HeapAlloc( PSDRV_Heap, 0, needed );
 510         DrvGetPrinterData16((LPSTR)name, (LPSTR)INT_PD_DEFAULT_DEVMODE, &type,
 511                           (LPBYTE)pi->Devmode, needed, &needed);
 512     }
 513
 514     if (OpenPrinterA (pi->FriendlyName, &hPrinter, NULL) == 0) {
 515         ERR ("OpenPrinterA failed with code %li\n", GetLastError ());
 516         goto cleanup;
 517     }
 518
 519 #ifdef HAVE_CUPS_CUPS_H
 520     if (cupshandle != (void*)-1) {
 521         typeof(cupsGetPPD) * pcupsGetPPD = NULL;
 522
 523         pcupsGetPPD = wine_dlsym(cupshandle, "cupsGetPPD", NULL, 0);
 524         if (pcupsGetPPD) {
 525             ppd = pcupsGetPPD(name);
 526
 527             if (ppd) {
 528                 needed=strlen(ppd)+1;
 529                 ppdFileName=HeapAlloc(PSDRV_Heap, 0, needed);
 530                 memcpy(ppdFileName, ppd, needed);
 531                 ppdType=REG_SZ;
 532                 res = ERROR_SUCCESS;
 533                 /* we should unlink() that file later */
 534             } else {
 535                 res = ERROR_FILE_NOT_FOUND;
 536                 WARN("Did not find ppd for %s\n",name);
 537             }
 538         }
 539     }
 540 #endif
 541     if (!ppdFileName) {
 542         res = GetPrinterDataA(hPrinter, "PPD File", NULL, NULL, 0, &needed);
 543         if ((res==ERROR_SUCCESS) || (res==ERROR_MORE_DATA)) {
 544             ppdFileName=HeapAlloc(PSDRV_Heap, 0, needed);
 545             res = GetPrinterDataA(hPrinter, "PPD File", &ppdType, ppdFileName, needed, &needed);
 546         }
 547     }
 548     /* Look for a ppd file for this printer in the config file.
 549      * First look under that printer's name, and then under 'generic'
 550      */
 551     if((res != ERROR_SUCCESS) && !RegOpenKeyA(HKEY_LOCAL_MACHINE, "Software\\Wine\\Wine\\Config\\ppd", &hkey))
 552     {
 553         const char* value_name;
 554
 555         if (RegQueryValueExA(hkey, name, 0, NULL, NULL, &needed) == ERROR_SUCCESS) {
 556             value_name=name;
 557         } else if (RegQueryValueExA(hkey, "generic", 0, NULL, NULL, &needed) == ERROR_SUCCESS) {
 558             value_name="generic";
 559         } else {
 560             value_name=NULL;
 561         }
 562         if (value_name) {
 563             ppdFileName=HeapAlloc(PSDRV_Heap, 0, needed);
 564             RegQueryValueExA(hkey, value_name, 0, &ppdType, ppdFileName, &needed);
 565         }
 566         RegCloseKey(hkey);
 567     }
 568
 569     if (!ppdFileName) {
 570         res = ERROR_FILE_NOT_FOUND;
 571         ERR ("Error %li getting PPD file name for printer '%s'\n", res, name);
 572         goto closeprinter;
 573     } else {
 574         res = ERROR_SUCCESS;
 575         if (ppdType==REG_EXPAND_SZ) {
 576             char* tmp;
 577
 578             /* Expand environment variable references */
 579             needed=ExpandEnvironmentStringsA(ppdFileName,NULL,0);
 580             tmp=HeapAlloc(PSDRV_Heap, 0, needed);
 581             ExpandEnvironmentStringsA(ppdFileName,tmp,needed);
 582             HeapFree(PSDRV_Heap, 0, ppdFileName);
 583             ppdFileName=tmp;
 584         }
 585     }
 586
 587     pi->ppd = PSDRV_ParsePPD(ppdFileName);
 588     if(!pi->ppd) {
 589         MESSAGE("Couldn't find PPD file '%s', expect a crash now!\n",
 590             ppdFileName);
 591         goto closeprinter;
 592     }
 593
 594     /* Some gimp-print ppd files don't contain a DefaultResolution line
 595        set it to 300 if it's not specified */
 596     if(pi->ppd->DefaultResolution == 0)
 597         pi->ppd->DefaultResolution = 300;
 598
 599     if(using_default_devmode) {
 600         DWORD papersize;
 601
 602         if(GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_IPAPERSIZE | LOCALE_RETURN_NUMBER,
 603                           (LPWSTR)&papersize, sizeof(papersize))) {
 604             PSDRV_DEVMODEA dm;
 605             memset(&dm, 0, sizeof(dm));
 606             dm.dmPublic.dmFields = DM_PAPERSIZE;
 607             dm.dmPublic.u1.s1.dmPaperSize = papersize;
 608             PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
 609         }
 610         DrvSetPrinterData16((LPSTR)name, (LPSTR)INT_PD_DEFAULT_DEVMODE,
 611                  REG_BINARY, (LPBYTE)pi->Devmode, sizeof(DefaultDevmode) );
 612     }
 613
 614     if(pi->ppd->DefaultPageSize) { /* We'll let the ppd override the devmode */
 615         PSDRV_DEVMODEA dm;
 616         memset(&dm, 0, sizeof(dm));
 617         dm.dmPublic.dmFields = DM_PAPERSIZE;
 618         dm.dmPublic.u1.s1.dmPaperSize = pi->ppd->DefaultPageSize->WinPage;
 619         PSDRV_MergeDevmodes(pi->Devmode, &dm, pi);
 620     }
 621
 622     /*
 623      *  This is a hack.  The default paper size should be read in as part of
 624      *  the Devmode structure, but Wine doesn't currently provide a convenient
 625      *  way to configure printers.
 626      */
 627     res = GetPrinterDataA (hPrinter, "Paper Size", NULL, (LPBYTE) &dwPaperSize,
 628             sizeof (DWORD), &needed);
 629     if (res == ERROR_SUCCESS)
 630         pi->Devmode->dmPublic.u1.s1.dmPaperSize = (SHORT) dwPaperSize;
 631     else if (res == ERROR_FILE_NOT_FOUND)
 632         TRACE ("No 'Paper Size' for printer '%s'\n", name);
 633     else {
 634         ERR ("GetPrinterDataA returned %li\n", res);
 635         goto closeprinter;
 636     }
 637
 638     res = EnumPrinterDataExA (hPrinter, "PrinterDriverData\\FontSubTable", NULL,
 639             0, &needed, &pi->FontSubTableSize);
 640     if (res == ERROR_SUCCESS || res == ERROR_FILE_NOT_FOUND) {
 641         TRACE ("No 'FontSubTable' for printer '%s'\n", name);
 642     }
 643     else if (res == ERROR_MORE_DATA) {
 644         pi->FontSubTable = HeapAlloc (PSDRV_Heap, 0, needed);
 645         if (pi->FontSubTable == NULL) {
 646             ERR ("Failed to allocate %li bytes from heap\n", needed);
 647             goto closeprinter;
 648         }
 649
 650         res = EnumPrinterDataExA (hPrinter, "PrinterDriverData\\FontSubTable",
 651                 (LPBYTE) pi->FontSubTable, needed, &needed,
 652                 &pi->FontSubTableSize);
 653         if (res != ERROR_SUCCESS) {
 654             ERR ("EnumPrinterDataExA returned %li\n", res);
 655             goto closeprinter;
 656         }
 657     }
 658     else {
 659         ERR("EnumPrinterDataExA returned %li\n", res);
 660         goto closeprinter;
 661     }
 662
 663     if (ClosePrinter (hPrinter) == 0) {
 664         ERR ("ClosePrinter failed with code %li\n", GetLastError ());
 665         goto cleanup;
 666     }
 667
 668     pi->next = NULL;
 669     pi->Fonts = NULL;
 670
 671     for(font = pi->ppd->InstalledFonts; font; font = font->next) {
 672         afm = PSDRV_FindAFMinList(PSDRV_AFMFontList, font->Name);
 673         if(!afm) {
 674             TRACE( "Couldn't find AFM file for installed printer font '%s' - "
 675                     "ignoring\n", font->Name);
 676         }
 677         else {
 678             BOOL added;
 679             if (PSDRV_AddAFMtoList(&pi->Fonts, afm, &added) == FALSE) {
 680                 PSDRV_FreeAFMList(pi->Fonts);
 681                 goto cleanup;
 682             }
 683         }
 684
 685     }
 686     if (ppd) unlink(ppd);
 687     return pi;
 688
 689 closeprinter:
 690     ClosePrinter(hPrinter);
 691 cleanup:
 692     if (ppdFileName)
 693         HeapFree(PSDRV_Heap, 0, ppdFileName);
 694     if (pi->FontSubTable)
 695         HeapFree(PSDRV_Heap, 0, pi->FontSubTable);
 696     if (pi->FriendlyName)
 697         HeapFree(PSDRV_Heap, 0, pi->FriendlyName);
 698     if (pi->Devmode)
 699         HeapFree(PSDRV_Heap, 0, pi->Devmode);
 700 fail:
 701     HeapFree(PSDRV_Heap, 0, pi);
 702     if (ppd) unlink(ppd);
 703     *last = NULL;
 704     return NULL;
 705 }