src/msw/dcprint.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/dcprint.cpp
   3 // Purpose:     wxPrinterDC class
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     01/02/97
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 #if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
  21     #pragma implementation "dcprint.h"
  22 #endif
  23
  24 // For compilers that support precompilation, includes "wx.h".
  25 #include "wx/wxprec.h"
  26
  27 #ifdef __BORLANDC__
  28     #pragma hdrstop
  29 #endif
  30
  31 #ifndef WX_PRECOMP
  32     #include "wx/string.h"
  33     #include "wx/log.h"
  34     #include "wx/window.h"
  35     #include "wx/dcmemory.h"
  36 #endif
  37
  38 #if wxUSE_PRINTING_ARCHITECTURE
  39
  40 #include "wx/msw/private.h"
  41
  42 #if wxUSE_WXDIB
  43 #include "wx/msw/dib.h"
  44 #endif
  45
  46 #include "wx/dcprint.h"
  47 #include "math.h"
  48
  49 #if wxUSE_COMMON_DIALOGS
  50     #include <commdlg.h>
  51 #endif
  52
  53 #ifndef __WIN32__
  54     #include <print.h>
  55 #endif
  56
  57 // mingw32 defines GDI_ERROR incorrectly
  58 #if defined(__GNUWIN32__) || !defined(GDI_ERROR)
  59     #undef GDI_ERROR
  60     #define GDI_ERROR ((int)-1)
  61 #endif
  62
  63 // ----------------------------------------------------------------------------
  64 // wxWin macros
  65 // ----------------------------------------------------------------------------
  66
  67 IMPLEMENT_CLASS(wxPrinterDC, wxDC)
  68
  69 // ============================================================================
  70 // implementation
  71 // ============================================================================
  72
  73 // ----------------------------------------------------------------------------
  74 // wxPrinterDC construction
  75 // ----------------------------------------------------------------------------
  76
  77 // This form is deprecated
  78 wxPrinterDC::wxPrinterDC(const wxString& driver_name,
  79                          const wxString& device_name,
  80                          const wxString& file,
  81                          bool interactive,
  82                          int orientation)
  83 {
  84     m_isInteractive = interactive;
  85
  86     if ( !file.empty() )
  87         m_printData.SetFilename(file);
  88
  89 #if wxUSE_COMMON_DIALOGS
  90     if ( interactive )
  91     {
  92         PRINTDLG pd;
  93
  94         pd.lStructSize = sizeof( PRINTDLG );
  95         pd.hwndOwner = (HWND) NULL;
  96         pd.hDevMode = (HANDLE)NULL;
  97         pd.hDevNames = (HANDLE)NULL;
  98         pd.Flags = PD_RETURNDC | PD_NOSELECTION | PD_NOPAGENUMS;
  99         pd.nFromPage = 0;
 100         pd.nToPage = 0;
 101         pd.nMinPage = 0;
 102         pd.nMaxPage = 0;
 103         pd.nCopies = 1;
 104         pd.hInstance = (HINSTANCE)NULL;
 105
 106         m_ok = PrintDlg( &pd ) != 0;
 107         if ( m_ok )
 108         {
 109             m_hDC = (WXHDC) pd.hDC;
 110         }
 111     }
 112     else
 113 #endif // wxUSE_COMMON_DIALOGS
 114     {
 115         if ( !driver_name.empty() && !device_name.empty() && !file.empty() )
 116         {
 117             m_hDC = (WXHDC) CreateDC(driver_name, device_name, file, NULL);
 118         }
 119         else // we don't have all parameters, ask the user
 120         {
 121             wxPrintData printData;
 122             printData.SetOrientation(orientation);
 123             m_hDC = wxGetPrinterDC(printData);
 124         }
 125
 126         m_ok = m_hDC ? TRUE: FALSE;
 127
 128         // as we created it, we must delete it as well
 129         m_bOwnsDC = TRUE;
 130     }
 131
 132     Init();
 133 }
 134
 135 wxPrinterDC::wxPrinterDC(const wxPrintData& printData)
 136 {
 137     m_printData = printData;
 138
 139     m_isInteractive = FALSE;
 140
 141     m_hDC = wxGetPrinterDC(printData);
 142     m_ok = m_hDC != 0;
 143     m_bOwnsDC = TRUE;
 144
 145     Init();
 146 }
 147
 148
 149 wxPrinterDC::wxPrinterDC(WXHDC dc)
 150 {
 151     m_isInteractive = FALSE;
 152
 153     m_hDC = dc;
 154     m_bOwnsDC = TRUE;
 155     m_ok = TRUE;
 156 }
 157
 158 void wxPrinterDC::Init()
 159 {
 160     if ( m_hDC )
 161     {
 162         //     int width = GetDeviceCaps(m_hDC, VERTRES);
 163         //     int height = GetDeviceCaps(m_hDC, HORZRES);
 164         SetMapMode(wxMM_TEXT);
 165
 166         SetBrush(*wxBLACK_BRUSH);
 167         SetPen(*wxBLACK_PEN);
 168     }
 169 }
 170
 171 // ----------------------------------------------------------------------------
 172 // wxPrinterDC {Start/End}{Page/Doc} methods
 173 // ----------------------------------------------------------------------------
 174
 175 bool wxPrinterDC::StartDoc(const wxString& message)
 176 {
 177     DOCINFO docinfo;
 178     docinfo.cbSize = sizeof(DOCINFO);
 179     docinfo.lpszDocName = (const wxChar*)message;
 180
 181     wxString filename(m_printData.GetFilename());
 182
 183     if (filename.IsEmpty())
 184         docinfo.lpszOutput = NULL;
 185     else
 186         docinfo.lpszOutput = (const wxChar *) filename;
 187
 188 #if defined(__WIN95__)
 189     docinfo.lpszDatatype = NULL;
 190     docinfo.fwType = 0;
 191 #endif
 192
 193     if (!m_hDC)
 194         return FALSE;
 195
 196     int ret = ::StartDoc(GetHdc(), &docinfo);
 197
 198 #ifndef __WIN16__
 199     if (ret <= 0)
 200     {
 201         DWORD lastError = GetLastError();
 202         wxLogDebug(wxT("wxDC::StartDoc failed with error: %ld\n"), lastError);
 203     }
 204 #endif
 205
 206     return (ret > 0);
 207 }
 208
 209 void wxPrinterDC::EndDoc()
 210 {
 211     if (m_hDC) ::EndDoc((HDC) m_hDC);
 212 }
 213
 214 void wxPrinterDC::StartPage()
 215 {
 216     if (m_hDC)
 217         ::StartPage((HDC) m_hDC);
 218 }
 219
 220 void wxPrinterDC::EndPage()
 221 {
 222     if (m_hDC)
 223         ::EndPage((HDC) m_hDC);
 224 }
 225
 226 // Returns default device and port names
 227 static bool wxGetDefaultDeviceName(wxString& deviceName, wxString& portName)
 228 {
 229     deviceName.clear();
 230
 231     LPDEVNAMES  lpDevNames;
 232     LPTSTR      lpszDeviceName;
 233     LPTSTR      lpszPortName;
 234
 235     PRINTDLG    pd;
 236
 237     // Cygwin has trouble believing PRINTDLG is 66 bytes - thinks it is 68
 238 #ifdef __GNUWIN32__
 239     memset(&pd, 0, 66);
 240     pd.lStructSize    = 66; // sizeof(PRINTDLG);
 241 #else
 242     memset(&pd, 0, sizeof(PRINTDLG));
 243     pd.lStructSize    = sizeof(PRINTDLG);
 244 #endif
 245
 246     pd.hwndOwner      = (HWND)NULL;
 247     pd.hDevMode       = NULL; // Will be created by PrintDlg
 248     pd.hDevNames      = NULL; // Ditto
 249     pd.Flags          = PD_RETURNDEFAULT;
 250     pd.nCopies        = 1;
 251
 252     if (!PrintDlg((LPPRINTDLG)&pd))
 253     {
 254         if ( pd.hDevMode )
 255             GlobalFree(pd.hDevMode);
 256         if (pd.hDevNames)
 257             GlobalFree(pd.hDevNames);
 258
 259         return FALSE;
 260     }
 261
 262     if (pd.hDevNames)
 263     {
 264         lpDevNames = (LPDEVNAMES)GlobalLock(pd.hDevNames);
 265         lpszDeviceName = (LPTSTR)lpDevNames + lpDevNames->wDeviceOffset;
 266         lpszPortName   = (LPTSTR)lpDevNames + lpDevNames->wOutputOffset;
 267
 268         deviceName = lpszDeviceName;
 269         portName = lpszPortName;
 270
 271         GlobalUnlock(pd.hDevNames);
 272         GlobalFree(pd.hDevNames);
 273         pd.hDevNames=NULL;
 274     }
 275
 276     if (pd.hDevMode)
 277     {
 278         GlobalFree(pd.hDevMode);
 279         pd.hDevMode=NULL;
 280     }
 281     return ( deviceName != wxEmptyString );
 282 }
 283
 284 // Gets an HDC for the specified printer configuration
 285 WXHDC WXDLLEXPORT wxGetPrinterDC(const wxPrintData& printDataConst)
 286 {
 287     wxPrintData printData = printDataConst;
 288     printData.ConvertToNative();
 289
 290     wxChar* driverName = (wxChar*) NULL;
 291
 292     wxString devNameStr = printData.GetPrinterName();
 293     wxChar* portName = (wxChar*) NULL; // Obsolete in WIN32
 294
 295     const wxChar* deviceName;
 296     if ( !devNameStr )
 297         deviceName = (wxChar*) NULL;
 298     else
 299         deviceName = devNameStr.c_str();
 300
 301     LPDEVMODE lpDevMode = (LPDEVMODE) NULL;
 302
 303     HGLOBAL hDevMode = (HGLOBAL)(DWORD) printData.GetNativeData();
 304
 305     if ( hDevMode )
 306         lpDevMode = (DEVMODE*) GlobalLock(hDevMode);
 307
 308     if ( !devNameStr )
 309     {
 310         // Retrieve the default device name
 311         wxString portName;
 312 #ifdef  __WXDEBUG__
 313         bool ret =
 314 #else   // !Debug
 315         (void)
 316 #endif // Debug/Release
 317         wxGetDefaultDeviceName(devNameStr, portName);
 318
 319         wxASSERT_MSG( ret, wxT("Could not get default device name.") );
 320
 321         deviceName = devNameStr.c_str();
 322     }
 323
 324 #ifdef __WIN32__
 325     HDC hDC = CreateDC(driverName, deviceName, portName, (DEVMODE *) lpDevMode);
 326 #else
 327     HDC hDC = CreateDC(driverName, deviceName, portName, (LPSTR) lpDevMode);
 328 #endif
 329
 330     if (hDevMode && lpDevMode)
 331         GlobalUnlock(hDevMode);
 332
 333     return (WXHDC) hDC;
 334 }
 335
 336 // ----------------------------------------------------------------------------
 337 // wxPrinterDC bit blitting/bitmap drawing
 338 // ----------------------------------------------------------------------------
 339
 340 // helper of DoDrawBitmap() and DoBlit()
 341 static
 342 bool DrawBitmapUsingStretchDIBits(HDC hdc,
 343                                   const wxBitmap& bmp,
 344                                   wxCoord x, wxCoord y)
 345 {
 346 #if wxUSE_WXDIB
 347     wxDIB dib(bmp);
 348     bool ok = dib.IsOk();
 349     if ( !ok )
 350         return FALSE;
 351
 352     DIBSECTION ds;
 353     if ( !::GetObject(dib.GetHandle(), sizeof(ds), &ds) )
 354     {
 355         wxLogLastError(_T("GetObject(DIBSECTION)"));
 356
 357         return FALSE;
 358     }
 359
 360     // ok, we've got all data we need, do blit it
 361     if ( ::StretchDIBits
 362             (
 363                 hdc,
 364                 x, y,
 365                 ds.dsBmih.biWidth, ds.dsBmih.biHeight,
 366                 0, 0,
 367                 ds.dsBmih.biWidth, ds.dsBmih.biHeight,
 368                 ds.dsBm.bmBits,
 369                 (LPBITMAPINFO)&ds.dsBmih,
 370                 DIB_RGB_COLORS,
 371                 SRCCOPY
 372             ) == GDI_ERROR )
 373     {
 374         wxLogLastError(wxT("StretchDIBits"));
 375
 376         return FALSE;
 377     }
 378     else
 379     return TRUE;
 380 #else
 381     return FALSE;
 382 #endif
 383 }
 384
 385 void wxPrinterDC::DoDrawBitmap(const wxBitmap& bmp,
 386                                wxCoord x, wxCoord y,
 387                                bool useMask)
 388 {
 389     wxCHECK_RET( bmp.Ok(), _T("invalid bitmap in wxPrinterDC::DrawBitmap") );
 390
 391     int width = bmp.GetWidth(),
 392         height = bmp.GetHeight();
 393
 394     if ( !(::GetDeviceCaps(GetHdc(), RASTERCAPS) & RC_STRETCHDIB) ||
 395             !DrawBitmapUsingStretchDIBits(GetHdc(), bmp, x, y) )
 396     {
 397         // no support for StretchDIBits() or an error occured if we got here
 398         wxMemoryDC memDC;
 399         memDC.SelectObject(bmp);
 400
 401         Blit(x, y, width, height, &memDC, 0, 0, wxCOPY, useMask);
 402
 403         memDC.SelectObject(wxNullBitmap);
 404     }
 405 }
 406
 407 bool wxPrinterDC::DoBlit(wxCoord xdest, wxCoord ydest,
 408                          wxCoord width, wxCoord height,
 409                          wxDC *source,
 410                          wxCoord WXUNUSED(xsrc), wxCoord WXUNUSED(ysrc),
 411                          int WXUNUSED(rop), bool useMask,
 412                          wxCoord WXUNUSED(xsrcMask), wxCoord WXUNUSED(ysrcMask))
 413 {
 414     wxBitmap& bmp = source->GetSelectedBitmap();
 415     wxMask *mask = useMask ? bmp.GetMask() : NULL;
 416     if ( mask )
 417     {
 418         // If we are printing source colours are screen colours not printer
 419         // colours and so we need copy the bitmap pixel by pixel.
 420         RECT rect;
 421         HDC dcSrc = GetHdcOf(*source);
 422         MemoryHDC dcMask(dcSrc);
 423         SelectInHDC selectMask(dcMask, (HBITMAP)mask->GetMaskBitmap());
 424
 425         for (int x = 0; x < width; x++)
 426         {
 427             for (int y = 0; y < height; y++)
 428             {
 429                 COLORREF cref = ::GetPixel(dcMask, x, y);
 430                 if (cref)
 431                 {
 432                     HBRUSH brush = ::CreateSolidBrush(::GetPixel(dcSrc, x, y));
 433                     rect.left = xdest + x;
 434                     rect.right = rect.left + 1;
 435                     rect.top = ydest + y;
 436                     rect.bottom = rect.top + 1;
 437                     ::FillRect(GetHdc(), &rect, brush);
 438                     ::DeleteObject(brush);
 439                 }
 440             }
 441         }
 442     }
 443     else // no mask
 444     {
 445         if ( !(::GetDeviceCaps(GetHdc(), RASTERCAPS) & RC_STRETCHDIB) ||
 446                 !DrawBitmapUsingStretchDIBits(GetHdc(), bmp, xdest, ydest) )
 447         {
 448             // no support for StretchDIBits
 449
 450             // as we are printing, source colours are screen colours not
 451             // printer colours and so we need copy the bitmap pixel by pixel.
 452             HDC dcSrc = GetHdcOf(*source);
 453             RECT rect;
 454             for (int y = 0; y < height; y++)
 455             {
 456                 // optimization: draw identical adjacent pixels together.
 457                 for (int x = 0; x < width; x++)
 458                 {
 459                     COLORREF col = ::GetPixel(dcSrc, x, y);
 460                     HBRUSH brush = ::CreateSolidBrush( col );
 461
 462                     rect.left = xdest + x;
 463                     rect.top = ydest + y;
 464                     while( (x + 1 < width) &&
 465                                 (::GetPixel(dcSrc, x + 1, y) == col ) )
 466                     {
 467                         ++x;
 468                     }
 469                     rect.right = xdest + x + 1;
 470                     rect.bottom = rect.top + 1;
 471                     ::FillRect((HDC) m_hDC, &rect, brush);
 472                     ::DeleteObject(brush);
 473                 }
 474             }
 475         }
 476     }
 477
 478     return TRUE;
 479 }
 480
 481 #endif
 482     // wxUSE_PRINTING_ARCHITECTURE