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