dlls/wineps/driver.c

   1 /*
   2  * Exported functions from the PostScript driver.
   3  *
   4  * [Ext]DeviceMode, DeviceCapabilities, AdvancedSetupDialog.
   5  *
   6  * Will need ExtTextOut for winword6 (urgh!)
   7  *
   8  * Copyright 1998  Huw D M Davies
   9  *
  10  */
  11
  12 #include <string.h>
  13 #include "psdrv.h"
  14 #include "debugtools.h"
  15 #include "winuser.h"
  16 #include "winspool.h"
  17
  18 DEFAULT_DEBUG_CHANNEL(psdrv)
  19
  20
  21 /************************************************************************
  22  *
  23  *              PSDRV_MergeDevmodes
  24  *
  25  * Updates dm1 with some fields from dm2
  26  *
  27  */
  28 void PSDRV_MergeDevmodes(PSDRV_DEVMODEA *dm1, PSDRV_DEVMODEA *dm2,
  29                          PRINTERINFO *pi)
  30 {
  31     /* some sanity checks here on dm2 */
  32
  33     if(dm2->dmPublic.dmFields & DM_ORIENTATION)
  34         dm1->dmPublic.u1.s1.dmOrientation = dm2->dmPublic.u1.s1.dmOrientation;
  35
  36     /* NB PaperWidth is always < PaperLength */
  37
  38     if(dm2->dmPublic.dmFields & DM_PAPERSIZE) {
  39         PAGESIZE *page;
  40
  41         for(page = pi->ppd->PageSizes; page; page = page->next) {
  42             if(page->WinPage == dm2->dmPublic.u1.s1.dmPaperSize)
  43                 break;
  44         }
  45         if(page) {
  46             dm1->dmPublic.u1.s1.dmPaperSize = dm2->dmPublic.u1.s1.dmPaperSize;
  47             dm1->dmPublic.u1.s1.dmPaperWidth = page->PaperDimension->x *
  48                                                                 254.0 / 72.0;
  49             dm1->dmPublic.u1.s1.dmPaperLength = page->PaperDimension->y *
  50                                                                 254.0 / 72.0;
  51             TRACE("Changing page to %s %d x %d\n", page->FullName,
  52                   dm1->dmPublic.u1.s1.dmPaperWidth,
  53                   dm1->dmPublic.u1.s1.dmPaperLength );
  54         } else {
  55             TRACE("Trying to change to unsupported pagesize %d\n",
  56                       dm2->dmPublic.u1.s1.dmPaperSize);
  57         }
  58     }
  59
  60     if(dm2->dmPublic.dmFields & DM_PAPERLENGTH) {
  61         dm1->dmPublic.u1.s1.dmPaperLength = dm2->dmPublic.u1.s1.dmPaperLength;
  62         TRACE("Changing PaperLength to %d\n",
  63               dm2->dmPublic.u1.s1.dmPaperLength);
  64         FIXME("Changing PaperLength.  Do we adjust PaperSize?\n");
  65     }
  66
  67     if(dm2->dmPublic.dmFields & DM_PAPERWIDTH) {
  68         dm1->dmPublic.u1.s1.dmPaperWidth = dm2->dmPublic.u1.s1.dmPaperWidth;
  69         TRACE("Changing PaperWidth to %d\n",
  70               dm2->dmPublic.u1.s1.dmPaperWidth);
  71         FIXME("Changing PaperWidth.  Do we adjust PaperSize?\n");
  72     }
  73
  74     if(dm2->dmPublic.dmFields & DM_SCALE) {
  75         dm1->dmPublic.dmScale = dm2->dmPublic.dmScale;
  76         TRACE("Changing Scale to %d\n", dm2->dmPublic.dmScale);
  77     }
  78
  79     if(dm2->dmPublic.dmFields & DM_COPIES) {
  80         dm1->dmPublic.dmCopies = dm2->dmPublic.dmCopies;
  81         TRACE("Changing Copies to %d\n", dm2->dmPublic.dmCopies);
  82     }
  83
  84     if(dm2->dmPublic.dmFields & DM_DEFAULTSOURCE) {
  85         INPUTSLOT *slot;
  86
  87         for(slot = pi->ppd->InputSlots; slot; slot = slot->next) {
  88             if(slot->WinBin == dm2->dmPublic.dmDefaultSource)
  89                 break;
  90         }
  91         if(slot) {
  92             dm1->dmPublic.dmDefaultSource = dm2->dmPublic.dmDefaultSource;
  93             TRACE("Changing bin to '%s'\n", slot->FullName);
  94         } else {
  95           TRACE("Trying to change to unsupported bin %d\n",
  96                 dm2->dmPublic.dmDefaultSource);
  97         }
  98     }
  99
 100    if (dm2->dmPublic.dmFields & DM_DEFAULTSOURCE )
 101        dm1->dmPublic.dmDefaultSource = dm2->dmPublic.dmDefaultSource;
 102    if (dm2->dmPublic.dmFields & DM_PRINTQUALITY )
 103        dm1->dmPublic.dmPrintQuality = dm2->dmPublic.dmPrintQuality;
 104    if (dm2->dmPublic.dmFields & DM_COLOR )
 105        dm1->dmPublic.dmColor = dm2->dmPublic.dmColor;
 106    if (dm2->dmPublic.dmFields & DM_DUPLEX )
 107        dm1->dmPublic.dmDuplex = dm2->dmPublic.dmDuplex;
 108    if (dm2->dmPublic.dmFields & DM_YRESOLUTION )
 109        dm1->dmPublic.dmYResolution = dm2->dmPublic.dmYResolution;
 110    if (dm2->dmPublic.dmFields & DM_TTOPTION )
 111        dm1->dmPublic.dmTTOption = dm2->dmPublic.dmTTOption;
 112    if (dm2->dmPublic.dmFields & DM_COLLATE )
 113        dm1->dmPublic.dmCollate = dm2->dmPublic.dmCollate;
 114    if (dm2->dmPublic.dmFields & DM_FORMNAME )
 115        lstrcpynA(dm1->dmPublic.dmFormName, dm2->dmPublic.dmFormName, CCHFORMNAME);
 116    if (dm2->dmPublic.dmFields & DM_BITSPERPEL )
 117        dm1->dmPublic.dmBitsPerPel = dm2->dmPublic.dmBitsPerPel;
 118    if (dm2->dmPublic.dmFields & DM_PELSWIDTH )
 119        dm1->dmPublic.dmPelsWidth = dm2->dmPublic.dmPelsWidth;
 120    if (dm2->dmPublic.dmFields & DM_PELSHEIGHT )
 121        dm1->dmPublic.dmPelsHeight = dm2->dmPublic.dmPelsHeight;
 122    if (dm2->dmPublic.dmFields & DM_DISPLAYFLAGS )
 123        dm1->dmPublic.dmDisplayFlags = dm2->dmPublic.dmDisplayFlags;
 124    if (dm2->dmPublic.dmFields & DM_DISPLAYFREQUENCY )
 125        dm1->dmPublic.dmDisplayFrequency = dm2->dmPublic.dmDisplayFrequency;
 126    if (dm2->dmPublic.dmFields & DM_POSITION )
 127        dm1->dmPublic.u1.dmPosition = dm2->dmPublic.u1.dmPosition;
 128    if (dm2->dmPublic.dmFields & DM_LOGPIXELS )
 129        dm1->dmPublic.dmLogPixels = dm2->dmPublic.dmLogPixels;
 130    if (dm2->dmPublic.dmFields & DM_ICMMETHOD )
 131        dm1->dmPublic.dmICMMethod = dm2->dmPublic.dmICMMethod;
 132    if (dm2->dmPublic.dmFields & DM_ICMINTENT )
 133        dm1->dmPublic.dmICMIntent = dm2->dmPublic.dmICMIntent;
 134    if (dm2->dmPublic.dmFields & DM_MEDIATYPE )
 135        dm1->dmPublic.dmMediaType = dm2->dmPublic.dmMediaType;
 136    if (dm2->dmPublic.dmFields & DM_DITHERTYPE )
 137        dm1->dmPublic.dmDitherType = dm2->dmPublic.dmDitherType;
 138    if (dm2->dmPublic.dmFields & DM_PANNINGWIDTH )
 139        dm1->dmPublic.dmPanningWidth = dm2->dmPublic.dmPanningWidth;
 140    if (dm2->dmPublic.dmFields & DM_PANNINGHEIGHT )
 141        dm1->dmPublic.dmPanningHeight = dm2->dmPublic.dmPanningHeight;
 142
 143     return;
 144 }
 145
 146
 147 #if 0
 148 /*******************************************************************
 149  *
 150  *              PSDRV_NewPrinterDlgProc32
 151  *
 152  *
 153  */
 154 LRESULT WINAPI PSDRV_NewPrinterDlgProc(HWND hWnd, UINT wMsg,
 155                                             WPARAM wParam, LPARAM lParam)
 156 {
 157   switch (wMsg) {
 158   case WM_INITDIALOG:
 159     TRACE("WM_INITDIALOG lParam=%08lX\n", lParam);
 160     ShowWindow(hWnd, SW_SHOWNORMAL);
 161     return TRUE;
 162
 163   case WM_COMMAND:
 164     switch (LOWORD(wParam)) {
 165     case IDOK:
 166       EndDialog(hWnd, TRUE);
 167       return TRUE;
 168
 169     case IDCANCEL:
 170       EndDialog(hWnd, FALSE);
 171       return TRUE;
 172
 173     default:
 174       return FALSE;
 175     }
 176
 177   default:
 178     return FALSE;
 179   }
 180 }
 181
 182 LRESULT WINAPI PSDRV_AdvancedSetupDlgProc(HWND hWnd, UINT wMsg,
 183                                             WPARAM wParam, LPARAM lParam)
 184 {
 185   switch (wMsg) {
 186   case WM_INITDIALOG:
 187     TRACE("WM_INITDIALOG lParam=%08lX\n", lParam);
 188     SendDlgItemMessageA(hWnd, 99, CB_ADDSTRING, 0,
 189                           (LPARAM)"Default Tray");
 190     ShowWindow(hWnd, SW_SHOWNORMAL);
 191     return TRUE;
 192
 193   case WM_COMMAND:
 194     switch (LOWORD(wParam)) {
 195     case IDOK:
 196       EndDialog(hWnd, TRUE);
 197       return TRUE;
 198
 199     case IDCANCEL:
 200       EndDialog(hWnd, FALSE);
 201       return TRUE;
 202
 203     case 200:
 204       DialogBoxIndirectParamA( GetWindowLongA( hWnd, GWL_HINSTANCE ),
 205                           SYSRES_GetResPtr( SYSRES_DIALOG_PSDRV_NEWPRINTER ),
 206                           hWnd, PSDRV_NewPrinterDlgProc, (LPARAM) NULL );
 207       return TRUE;
 208
 209     default:
 210       return FALSE;
 211     }
 212
 213   default:
 214     return FALSE;
 215   }
 216 }
 217 #endif /* 0 */
 218
 219 /***********************************************************************
 220  *
 221  *      PSDRV_AdvancedSetupDialog16     [WINEPS.93]
 222  *
 223  */
 224 WORD WINAPI PSDRV_AdvancedSetupDialog16(HWND16 hwnd, HANDLE16 hDriver,
 225                                          LPDEVMODEA devin, LPDEVMODEA devout)
 226 {
 227
 228   TRACE("hwnd = %04x, hDriver = %04x devin=%p devout=%p\n", hwnd,
 229         hDriver, devin, devout);
 230   return IDCANCEL;
 231
 232
 233 #if 0
 234   return DialogBoxIndirectParamA( GetWindowLongA( hwnd, GWL_HINSTANCE ),
 235         SYSRES_GetResPtr( SYSRES_DIALOG_PSDRV_ADVANCEDSETUP ),
 236         hwnd, PSDRV_AdvancedSetupDlgProc, (LPARAM) NULL );
 237 #endif
 238
 239
 240 }
 241
 242 /***********************************************************************
 243  *
 244  *      PSDRV_ExtDeviceMode16   [WINEPS.90]
 245  *
 246  * Just returns default devmode at the moment
 247  */
 248 INT16 WINAPI PSDRV_ExtDeviceMode16(HWND16 hwnd, HANDLE16 hDriver,
 249                                    LPDEVMODEA lpdmOutput, LPSTR lpszDevice,
 250                                    LPSTR lpszPort, LPDEVMODEA lpdmInput,
 251                                    LPSTR lpszProfile, WORD fwMode)
 252 {
 253   PRINTERINFO *pi = PSDRV_FindPrinterInfo(lpszDevice);
 254
 255   TRACE("(hwnd=%04x, hDriver=%04x, devOut=%p, Device='%s', Port='%s', devIn=%p, Profile='%s', Mode=%04x)\n",
 256 hwnd, hDriver, lpdmOutput, lpszDevice, lpszPort, lpdmInput, lpszProfile,
 257 fwMode);
 258
 259   if(!fwMode)
 260     return sizeof(DEVMODEA); /* Just copy dmPublic bit of PSDRV_DEVMODE */
 261
 262   if(fwMode & DM_PROMPT)
 263     FIXME("Mode DM_PROMPT not implemented\n");
 264
 265   if(fwMode & DM_UPDATE)
 266     FIXME("Mode DM_UPDATE.  Just do the same as DM_COPY\n");
 267
 268   if((fwMode & DM_MODIFY) && lpdmInput) {
 269     TRACE("DM_MODIFY set. devIn->dmFields = %08lx\n", lpdmInput->dmFields);
 270     PSDRV_MergeDevmodes(pi->Devmode, (PSDRV_DEVMODEA *)lpdmInput, pi);
 271   }
 272
 273   if((fwMode & DM_COPY) || (fwMode & DM_UPDATE)) {
 274     memcpy(lpdmOutput, pi->Devmode, sizeof(DEVMODEA));
 275   }
 276   return IDOK;
 277 }
 278
 279 /**************************************************************
 280  *
 281  *       PSDRV_ExtDeviceMode
 282  */
 283 INT PSDRV_ExtDeviceMode(LPSTR lpszDriver, HWND hwnd, LPDEVMODEA lpdmOutput,
 284                         LPSTR lpszDevice, LPSTR lpszPort, LPDEVMODEA lpdmInput,
 285                         LPSTR lpszProfile, DWORD dwMode)
 286 {
 287     return PSDRV_ExtDeviceMode16(hwnd, 0, lpdmOutput, lpszDevice, lpszPort,
 288                                  lpdmInput, lpszProfile, dwMode);
 289 }
 290
 291 /***********************************************************************
 292  *
 293  *      PSDRV_DeviceCapabilities16      [WINEPS.91]
 294  *
 295  */
 296 DWORD WINAPI PSDRV_DeviceCapabilities16(LPCSTR lpszDevice, LPCSTR lpszPort,
 297                                         WORD fwCapability, LPSTR lpszOutput,
 298                                         LPDEVMODEA lpDevMode)
 299 {
 300   PRINTERINFO *pi;
 301   DEVMODEA *lpdm;
 302   pi = PSDRV_FindPrinterInfo(lpszDevice);
 303
 304   TRACE("Cap=%d. Got PrinterInfo = %p\n", fwCapability, pi);
 305
 306
 307   if (!pi) {
 308           ERR("no printerinfo for %s, return 0!\n",lpszDevice);
 309           return 0;
 310   }
 311
 312
 313   lpdm = lpDevMode ? lpDevMode : (DEVMODEA *)pi->Devmode;
 314
 315   switch(fwCapability) {
 316
 317   case DC_PAPERS:
 318     {
 319       PAGESIZE *ps;
 320       WORD *wp = (WORD *)lpszOutput;
 321       int i = 0;
 322
 323       for(ps = pi->ppd->PageSizes; ps; ps = ps->next, i++)
 324         if(lpszOutput != NULL)
 325           *wp++ = ps->WinPage;
 326       return i;
 327     }
 328
 329   case DC_PAPERSIZE:
 330     {
 331       PAGESIZE *ps;
 332       POINT16 *pt = (POINT16 *)lpszOutput;
 333       int i = 0;
 334
 335       for(ps = pi->ppd->PageSizes; ps; ps = ps->next, i++)
 336         if(lpszOutput != NULL) {
 337           pt->x = ps->PaperDimension->x * 254.0 / 72.0;
 338           pt->y = ps->PaperDimension->y * 254.0 / 72.0;
 339           pt++;
 340         }
 341       return i;
 342     }
 343
 344   case DC_PAPERNAMES:
 345     {
 346       PAGESIZE *ps;
 347       char *cp = lpszOutput;
 348       int i = 0;
 349
 350       for(ps = pi->ppd->PageSizes; ps; ps = ps->next, i++)
 351         if(lpszOutput != NULL) {
 352           lstrcpynA(cp, ps->FullName, 64);
 353           cp += 64;
 354         }
 355       return i;
 356     }
 357
 358   case DC_ORIENTATION:
 359     return pi->ppd->LandscapeOrientation ? pi->ppd->LandscapeOrientation : 90;
 360
 361   case DC_BINS:
 362     {
 363       INPUTSLOT *slot;
 364       WORD *wp = (WORD *)lpszOutput;
 365       int i = 0;
 366
 367       for(slot = pi->ppd->InputSlots; slot; slot = slot->next, i++)
 368         if(lpszOutput != NULL)
 369           *wp++ = slot->WinBin;
 370       return i;
 371     }
 372
 373   case DC_BINNAMES:
 374     {
 375       INPUTSLOT *slot;
 376       char *cp = lpszOutput;
 377       int i = 0;
 378
 379       for(slot = pi->ppd->InputSlots; slot; slot = slot->next, i++)
 380         if(lpszOutput != NULL) {
 381           lstrcpynA(cp, slot->FullName, 24);
 382           cp += 24;
 383         }
 384       return i;
 385     }
 386
 387   case DC_BINADJUST:
 388     FIXME("DC_BINADJUST: stub.\n");
 389     return DCBA_FACEUPNONE;
 390
 391   case DC_ENUMRESOLUTIONS:
 392     {
 393       LONG *lp = (LONG*)lpszOutput;
 394
 395       if(lpszOutput != NULL) {
 396         lp[0] = (LONG)pi->ppd->DefaultResolution;
 397         lp[1] = (LONG)pi->ppd->DefaultResolution;
 398       }
 399       return 1;
 400     }
 401
 402   case DC_COPIES:
 403     FIXME("DC_COPIES: returning %d.  Is this correct?\n", lpdm->dmCopies);
 404     return lpdm->dmCopies;
 405
 406   case DC_DRIVER:
 407     return lpdm->dmDriverVersion;
 408
 409   case DC_DATATYPE_PRODUCED:
 410     FIXME("DATA_TYPE_PRODUCED: stub.\n");
 411     return -1; /* simulate that the driver supports 'RAW' */
 412
 413   case DC_DUPLEX:
 414     FIXME("DC_DUPLEX: returning %d.  Is this correct?\n", lpdm->dmDuplex);
 415     return lpdm->dmDuplex;
 416
 417   case DC_EMF_COMPLIANT:
 418     FIXME("DC_EMF_COMPLIANT: stub.\n");
 419     return -1; /* simulate that the driver do not support EMF */
 420
 421   case DC_EXTRA:
 422     return lpdm->dmDriverExtra;
 423
 424   case DC_FIELDS:
 425     return lpdm->dmFields;
 426
 427   case DC_FILEDEPENDENCIES:
 428     FIXME("DC_FILEDEPENDENCIES: stub.\n");
 429     return 0;
 430
 431   case DC_MAXEXTENT:
 432     {
 433       PAGESIZE *ps;
 434       int i;
 435       POINT ptMax;
 436       ptMax.x = ptMax.y = 0;
 437
 438       if(lpszOutput == NULL)
 439         return -1;
 440
 441       i = 0;
 442       for(ps = pi->ppd->PageSizes; ps; ps = ps->next, i++) {
 443         if(ps->PaperDimension->x > ptMax.x)
 444           ptMax.x = ps->PaperDimension->x;
 445         if(ps->PaperDimension->y > ptMax.y)
 446           ptMax.y = ps->PaperDimension->y;
 447       }
 448       *((POINT*)lpszOutput) = ptMax;
 449       return 1;
 450     }
 451
 452   case DC_MINEXTENT:
 453     {
 454       PAGESIZE *ps;
 455       int i;
 456       POINT ptMax;
 457       ptMax.x = ptMax.y = 0;
 458
 459       if(lpszOutput == NULL)
 460         return -1;
 461
 462       i = 0;
 463       for(ps = pi->ppd->PageSizes; ps; ps = ps->next, i++) {
 464         if(ps->PaperDimension->x > ptMax.x)
 465           ptMax.x = ps->PaperDimension->x;
 466         if(ps->PaperDimension->y > ptMax.y)
 467           ptMax.y = ps->PaperDimension->y;
 468       }
 469       *((POINT*)lpszOutput) = ptMax;
 470       return 1;
 471     }
 472
 473   case DC_SIZE:
 474     return lpdm->dmSize;
 475
 476   case DC_TRUETYPE:
 477     FIXME("DC_TRUETYPE: stub\n");
 478     return DCTT_SUBDEV;
 479
 480   case DC_VERSION:
 481     return lpdm->dmSpecVersion;
 482
 483   default:
 484     FIXME("Unsupported capability %d\n", fwCapability);
 485   }
 486   return -1;
 487 }
 488
 489 /**************************************************************
 490  *
 491  *     PSDRV_DeviceCapabilities
 492  */
 493 DWORD PSDRV_DeviceCapabilities(LPSTR lpszDriver, LPCSTR lpszDevice,
 494                                LPCSTR lpszPort, WORD fwCapability,
 495                                LPSTR lpszOutput, LPDEVMODEA lpdm)
 496 {
 497     return PSDRV_DeviceCapabilities16(lpszDevice, lpszPort, fwCapability,
 498                                       lpszOutput, lpdm);
 499 }
 500
 501 /***************************************************************
 502  *
 503  *      PSDRV_DeviceMode16      [WINEPS.13]
 504  *
 505  */
 506 void WINAPI PSDRV_DeviceMode16(HWND16 hwnd, HANDLE16 hDriver,
 507 LPSTR lpszDevice, LPSTR lpszPort)
 508 {
 509     PSDRV_ExtDeviceMode16( hwnd, hDriver, NULL, lpszDevice, lpszPort, NULL,
 510                            NULL, DM_PROMPT );
 511     return;
 512 }