check that the version of __sync_sub_and_fetch that returns a value is supported...

[wxWidgets.git] / src / msw / dcprint.cpp

diff --git a/src/msw/dcprint.cpp b/src/msw/dcprint.cpp
index 6802ea97826cf3e0d5a51c65345b4fe95b896627..628e6e81b2217364fed0c46add04d756739c6603 100644 (file)
--- a/src/msw/dcprint.cpp
+++ b/src/msw/dcprint.cpp
@@ -1,153 +1,267 @@
 /////////////////////////////////////////////////////////////////////////////
 /////////////////////////////////////////////////////////////////////////////

-// Name:        dcprint.cpp
+// Name:        src/msw/dcprint.cpp

 // Purpose:     wxPrinterDC class
 // Author:      Julian Smart
 // Modified by:
 // Created:     01/02/97
 // RCS-ID:      $Id$
 // Purpose:     wxPrinterDC class
 // Author:      Julian Smart
 // Modified by:
 // Created:     01/02/97
 // RCS-ID:      $Id$

-// Copyright:   (c) Julian Smart and Markus Holzem
-// Licence:    wxWindows licence
+// Copyright:   (c) Julian Smart
+// Licence:     wxWindows licence

 /////////////////////////////////////////////////////////////////////////////
 
 /////////////////////////////////////////////////////////////////////////////
 

-#ifdef __GNUG__
-#pragma implementation
-#pragma implementation "dcprint.h"
-#endif
+// ============================================================================
+// declarations
+// ============================================================================
+
+// ----------------------------------------------------------------------------
+// headers
+// ----------------------------------------------------------------------------

 
 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"
 
 #ifdef __BORLANDC__
 
 // For compilers that support precompilation, includes "wx.h".
 #include "wx/wxprec.h"
 
 #ifdef __BORLANDC__

-#pragma hdrstop
+    #pragma hdrstop

 #endif
 
 #endif
 

-#ifndef WX_PRECOMP
-#endif
+#if wxUSE_PRINTING_ARCHITECTURE

 
 #include "wx/dcprint.h"
 
 #include "wx/dcprint.h"

-#include "math.h"
-#include "fstream.h"
+#include "wx/msw/dcprint.h"

 
 

-#include <windows.h>
+#ifndef WX_PRECOMP
+    #include "wx/msw/wrapcdlg.h"
+    #include "wx/string.h"
+    #include "wx/log.h"
+    #include "wx/window.h"
+    #include "wx/dcmemory.h"
+    #include "wx/math.h"
+#endif

 
 

-#if USE_COMMON_DIALOGS
-#include <commdlg.h>
+#include "wx/msw/private.h"
+
+#if wxUSE_WXDIB
+    #include "wx/msw/dib.h"

 #endif
 
 #endif
 

+#include "wx/printdlg.h"
+#include "wx/msw/printdlg.h"
+

 #ifndef __WIN32__
 #ifndef __WIN32__

-#include <print.h>
+    #include <print.h>

 #endif
 
 #endif
 

-#ifdef DrawText
-#undef DrawText
+// mingw32 defines GDI_ERROR incorrectly
+#if defined(__GNUWIN32__) || !defined(GDI_ERROR)
+    #undef GDI_ERROR
+    #define GDI_ERROR ((int)-1)

 #endif
 
 #endif
 

-#ifdef GetCharWidth
-#undef GetCharWidth
+#if defined(__WXUNIVERSAL__) && wxUSE_POSTSCRIPT_ARCHITECTURE_IN_MSW
+    #define wxUSE_PS_PRINTING 1
+#else
+    #define wxUSE_PS_PRINTING 0

 #endif
 
 #endif
 

-#ifdef StartDoc
-#undef StartDoc
-#endif
+// ----------------------------------------------------------------------------
+// wxWin macros
+// ----------------------------------------------------------------------------

 
 

-#if !USE_SHARED_LIBRARY
-IMPLEMENT_CLASS(wxPrinterDC, wxDC)
-#endif
+IMPLEMENT_ABSTRACT_CLASS(wxPrinterDCImpl, wxMSWDCImpl)
+
+// ============================================================================
+// implementation
+// ============================================================================

 
 

-wxPrinterDC::wxPrinterDC(const wxString& driver_name, const wxString& device_name, const wxString& file, const bool interactive, const int orientation)
+// ----------------------------------------------------------------------------
+// wxPrinterDC construction
+// ----------------------------------------------------------------------------
+
+#if 0
+// This form is deprecated
+wxPrinterDC::wxPrinterDC(const wxString& driver_name,
+                         const wxString& device_name,
+                         const wxString& file,
+                         bool interactive,
+                         int orientation)

 {
 {

-  m_isInteractive = interactive;
-
-  if (!file.IsNull() && file != "")
-    m_filename = file;
-
-#if USE_COMMON_DIALOGS
-   if (interactive)
-   {
-     PRINTDLG pd;
-       
-     pd.lStructSize = sizeof( PRINTDLG );
-     pd.hwndOwner=NULL;
-     pd.hDevMode=(HANDLE)NULL;
-     pd.hDevNames=(HANDLE)NULL;
-     pd.Flags=PD_RETURNDC | PD_NOSELECTION | PD_NOPAGENUMS;
-     pd.nFromPage=0;
-     pd.nToPage=0;
-     pd.nMinPage=0;
-     pd.nMaxPage=0;
-     pd.nCopies=1;
-     pd.hInstance=(HINSTANCE)NULL;
-
-     if ( PrintDlg( &pd ) != 0 )
-     {
-       m_hDC = (WXHDC) pd.hDC;
-       m_ok = TRUE;
-     }
-     else
-     {
-       m_ok = FALSE;
-       return;
-     }
-
-//     m_dontDelete = TRUE;
-   }
-   else
+    m_isInteractive = interactive;
+
+    if ( !file.empty() )
+        m_printData.SetFilename(file);
+
+#if wxUSE_COMMON_DIALOGS
+    if ( interactive )
+    {
+        PRINTDLG pd;
+
+        pd.lStructSize = sizeof( PRINTDLG );
+        pd.hwndOwner = (HWND) NULL;
+        pd.hDevMode = (HANDLE)NULL;
+        pd.hDevNames = (HANDLE)NULL;
+        pd.Flags = PD_RETURNDC | PD_NOSELECTION | PD_NOPAGENUMS;
+        pd.nFromPage = 0;
+        pd.nToPage = 0;
+        pd.nMinPage = 0;
+        pd.nMaxPage = 0;
+        pd.nCopies = 1;
+        pd.hInstance = (HINSTANCE)NULL;
+
+        m_ok = PrintDlg( &pd ) != 0;
+        if ( m_ok )
+        {
+            m_hDC = (WXHDC) pd.hDC;
+        }
+    }
+    else
+#endif // wxUSE_COMMON_DIALOGS
+    {
+        if ( !driver_name.empty() && !device_name.empty() && !file.empty() )
+        {
+            m_hDC = (WXHDC) CreateDC(driver_name.wx_str(),
+                                     device_name.wx_str(),
+                                     file.fn_str(),
+                                     NULL);
+        }
+        else // we don't have all parameters, ask the user
+        {
+            wxPrintData printData;
+            printData.SetOrientation(orientation);
+            m_hDC = wxGetPrinterDC(printData);
+        }
+
+        m_ok = m_hDC ? true: false;
+
+        // as we created it, we must delete it as well
+        m_bOwnsDC = true;
+    }
+
+    Init();
+}

 #endif
 #endif

-   if ((!driver_name.IsNull() && driver_name != "") &&
-       (!device_name.IsNull() && device_name != "") &&
-       (!file.IsNull() && file != ""))
-   {
-     m_hDC = (WXHDC) CreateDC((char *) (const char *) driver_name, (char *) (const char *) device_name, (char *) (const char *) file, NULL);
-     m_ok = m_hDC ? TRUE: FALSE;
-   }
-   else
-   {
-     m_hDC = wxGetPrinterDC(orientation);
-     m_ok = m_hDC ? TRUE: FALSE;
-   }
-   
-   if (m_hDC)
-   {
-//     int width = GetDeviceCaps(m_hDC, VERTRES);
-//     int height = GetDeviceCaps(m_hDC, HORZRES);
-     SetMapMode(MM_TEXT);
-   }
-  SetBrush(*wxBLACK_BRUSH);
-  SetPen(*wxBLACK_PEN);
+
+wxPrinterDCImpl::wxPrinterDCImpl( wxPrinterDC *owner, const wxPrintData& printData ) :
+    wxMSWDCImpl( owner )
+{
+    m_printData = printData;
+
+    m_isInteractive = false;
+
+    m_hDC = wxGetPrinterDC(printData);
+    m_ok = m_hDC != 0;
+    m_bOwnsDC = true;
+
+    Init();

 }
 
 }
 

-wxPrinterDC::wxPrinterDC(WXHDC theDC)
+
+wxPrinterDCImpl::wxPrinterDCImpl( wxPrinterDC *owner, WXHDC dc ) :
+    wxMSWDCImpl( owner )

 {
 {

-  m_isInteractive = FALSE;
-
-  m_hDC = theDC;
-  m_ok = TRUE;
-  if (m_hDC)
- {
-//     int width = GetDeviceCaps(m_hDC, VERTRES);
-//     int height = GetDeviceCaps(m_hDC, HORZRES);
-    SetMapMode(MM_TEXT);
-  }
-  SetBrush(*wxBLACK_BRUSH);
-  SetPen(*wxBLACK_PEN);
+    m_isInteractive = false;
+
+    m_hDC = dc;
+    m_bOwnsDC = true;
+    m_ok = true;

 }
 
 }
 

-wxPrinterDC::~wxPrinterDC(void)
+void wxPrinterDCImpl::Init()
+{
+    if ( m_hDC )
+    {
+        //     int width = GetDeviceCaps(m_hDC, VERTRES);
+        //     int height = GetDeviceCaps(m_hDC, HORZRES);
+        SetMapMode(wxMM_TEXT);
+
+        SetBrush(*wxBLACK_BRUSH);
+        SetPen(*wxBLACK_PEN);
+    }
+}
+
+// ----------------------------------------------------------------------------
+// wxPrinterDCImpl {Start/End}{Page/Doc} methods
+// ----------------------------------------------------------------------------
+
+bool wxPrinterDCImpl::StartDoc(const wxString& message)
+{
+    DOCINFO docinfo;
+    docinfo.cbSize = sizeof(DOCINFO);
+    docinfo.lpszDocName = message.wx_str();
+
+    wxString filename(m_printData.GetFilename());
+
+    if (filename.empty())
+        docinfo.lpszOutput = NULL;
+    else
+        docinfo.lpszOutput = filename.wx_str();
+
+    docinfo.lpszDatatype = NULL;
+    docinfo.fwType = 0;
+
+    if (!m_hDC)
+        return false;
+
+    if ( ::StartDoc(GetHdc(), &docinfo) <= 0 )
+    {
+        wxLogLastError(wxT("StartDoc"));
+        return false;
+    }
+
+    return true;
+}
+
+void wxPrinterDCImpl::EndDoc()
+{
+    if (m_hDC) ::EndDoc((HDC) m_hDC);
+}
+
+void wxPrinterDCImpl::StartPage()
+{
+    if (m_hDC)
+        ::StartPage((HDC) m_hDC);
+}
+
+void wxPrinterDCImpl::EndPage()
+{
+    if (m_hDC)
+        ::EndPage((HDC) m_hDC);
+}
+
+
+wxRect wxPrinterDCImpl::GetPaperRect()
+

 {
 {

+    if (!IsOk()) return wxRect(0, 0, 0, 0);
+    int w = ::GetDeviceCaps((HDC) m_hDC, PHYSICALWIDTH);
+    int h = ::GetDeviceCaps((HDC) m_hDC, PHYSICALHEIGHT);
+    int x = -::GetDeviceCaps((HDC) m_hDC, PHYSICALOFFSETX);
+    int y = -::GetDeviceCaps((HDC) m_hDC, PHYSICALOFFSETY);
+    return wxRect(x, y, w, h);

 }
 
 }
 

-WXHDC wxGetPrinterDC(int orientation)
+
+#if !wxUSE_PS_PRINTING
+
+// Returns default device and port names
+static bool wxGetDefaultDeviceName(wxString& deviceName, wxString& portName)

 {
 {

-    HDC         hDC;
-    LPDEVMODE   lpDevMode = NULL;
+    deviceName.clear();
+

     LPDEVNAMES  lpDevNames;
     LPDEVNAMES  lpDevNames;

-    LPSTR       lpszDriverName;
-    LPSTR       lpszDeviceName;
-    LPSTR       lpszPortName;
+    LPTSTR      lpszDeviceName;
+    LPTSTR      lpszPortName;

 
     PRINTDLG    pd;
 
     PRINTDLG    pd;

-    // __GNUWIN32__ has trouble believing PRINTDLG is 66 bytes - thinks it is 68
+
+    // Cygwin has trouble believing PRINTDLG is 66 bytes - thinks it is 68
+#ifdef __GNUWIN32__
+    memset(&pd, 0, 66);

     pd.lStructSize    = 66; // sizeof(PRINTDLG);
     pd.lStructSize    = 66; // sizeof(PRINTDLG);

+#else
+    memset(&pd, 0, sizeof(PRINTDLG));
+    pd.lStructSize    = sizeof(PRINTDLG);
+#endif
+

     pd.hwndOwner      = (HWND)NULL;
     pd.hDevMode       = NULL; // Will be created by PrintDlg
     pd.hDevNames      = NULL; // Ditto
     pd.hwndOwner      = (HWND)NULL;
     pd.hDevMode       = NULL; // Will be created by PrintDlg
     pd.hDevNames      = NULL; // Ditto


@@ -161,48 +275,223 @@ WXHDC wxGetPrinterDC(int orientation)
         if (pd.hDevNames)
             GlobalFree(pd.hDevNames);
 
         if (pd.hDevNames)
             GlobalFree(pd.hDevNames);
 

-        return(0);
+        return false;

     }
 
     }
 

-    if (!pd.hDevNames)
+    if (pd.hDevNames)

     {
     {

-        if ( pd.hDevMode )
-            GlobalFree(pd.hDevMode);
+        lpDevNames = (LPDEVNAMES)GlobalLock(pd.hDevNames);
+        lpszDeviceName = (LPTSTR)lpDevNames + lpDevNames->wDeviceOffset;
+        lpszPortName   = (LPTSTR)lpDevNames + lpDevNames->wOutputOffset;
+
+        deviceName = lpszDeviceName;
+        portName = lpszPortName;
+
+        GlobalUnlock(pd.hDevNames);
+        GlobalFree(pd.hDevNames);
+        pd.hDevNames=NULL;

     }
 
     }
 

-    lpDevNames = (LPDEVNAMES)GlobalLock(pd.hDevNames);
-    lpszDriverName = (LPSTR)lpDevNames + lpDevNames->wDriverOffset;
-    lpszDeviceName = (LPSTR)lpDevNames + lpDevNames->wDeviceOffset;
-    lpszPortName   = (LPSTR)lpDevNames + lpDevNames->wOutputOffset;
-    GlobalUnlock(pd.hDevNames);
+    if (pd.hDevMode)
+    {
+        GlobalFree(pd.hDevMode);
+        pd.hDevMode=NULL;
+    }
+    return ( !deviceName.empty() );
+}
+
+#endif // !wxUSE_PS_PRINTING

 
 

-    if ( pd.hDevMode )
+// Gets an HDC for the specified printer configuration
+WXHDC WXDLLEXPORT wxGetPrinterDC(const wxPrintData& printDataConst)
+{
+#if wxUSE_PS_PRINTING
+    // TODO
+    wxUnusedVar(printDataConst);
+    return 0;
+#else // native Windows printing
+    wxWindowsPrintNativeData *data =
+        (wxWindowsPrintNativeData *) printDataConst.GetNativeData();
+
+    data->TransferFrom( printDataConst );
+
+    wxString deviceName = printDataConst.GetPrinterName();
+    if ( deviceName.empty() )

     {
     {

-        lpDevMode = (DEVMODE*) GlobalLock(pd.hDevMode);
-        lpDevMode->dmOrientation = orientation;
-        lpDevMode->dmFields |= DM_ORIENTATION;
+        // Retrieve the default device name
+        wxString portName;
+        if ( !wxGetDefaultDeviceName(deviceName, portName) )
+        {
+            return 0; // Could not get default device name
+        }

     }
 
     }
 

-#ifdef __WIN32__
-    hDC = CreateDC(lpszDriverName, lpszDeviceName, lpszPortName, (DEVMODE *)lpDevMode);
+
+    HGLOBAL hDevMode = (HGLOBAL)(DWORD) data->GetDevMode();
+
+    DEVMODE *lpDevMode = hDevMode ? (DEVMODE *)::GlobalLock(hDevMode) : NULL;
+
+    HDC hDC = ::CreateDC(NULL, deviceName.wx_str(), NULL, lpDevMode);
+    if ( !hDC )
+        wxLogLastError(_T("CreateDC(printer)"));
+
+    if ( lpDevMode )
+        ::GlobalUnlock(hDevMode);
+
+    return (WXHDC) hDC;
+#endif // PostScript/Windows printing
+}
+
+// ----------------------------------------------------------------------------
+// wxPrinterDCImpl bit blitting/bitmap drawing
+// ----------------------------------------------------------------------------
+
+// helper of DoDrawBitmap() and DoBlit()
+static
+bool DrawBitmapUsingStretchDIBits(HDC hdc,
+                                  const wxBitmap& bmp,
+                                  wxCoord x, wxCoord y)
+{
+#if wxUSE_WXDIB
+    wxDIB dib(bmp);
+    bool ok = dib.IsOk();
+    if ( !ok )
+        return false;
+
+    DIBSECTION ds;
+    if ( !::GetObject(dib.GetHandle(), sizeof(ds), &ds) )
+    {
+        wxLogLastError(_T("GetObject(DIBSECTION)"));
+
+        return false;
+    }
+
+    // ok, we've got all data we need, do blit it
+    if ( ::StretchDIBits
+            (
+                hdc,
+                x, y,
+                ds.dsBmih.biWidth, ds.dsBmih.biHeight,
+                0, 0,
+                ds.dsBmih.biWidth, ds.dsBmih.biHeight,
+                ds.dsBm.bmBits,
+                (LPBITMAPINFO)&ds.dsBmih,
+                DIB_RGB_COLORS,
+                SRCCOPY
+            ) == GDI_ERROR )
+    {
+        wxLogLastError(wxT("StretchDIBits"));
+
+        return false;
+    }
+
+    return true;

 #else
 #else

-    hDC = CreateDC(lpszDriverName, lpszDeviceName, lpszPortName, (LPSTR)lpDevMode);
+    return false;

 #endif
 #endif

+}

 
 

-    if (pd.hDevMode && lpDevMode)
-        GlobalUnlock(pd.hDevMode);
+void wxPrinterDCImpl::DoDrawBitmap(const wxBitmap& bmp,
+                               wxCoord x, wxCoord y,
+                               bool useMask)
+{
+    wxCHECK_RET( bmp.Ok(), _T("invalid bitmap in wxPrinterDC::DrawBitmap") );

 
 

-    if (pd.hDevNames)
+    int width = bmp.GetWidth(),
+        height = bmp.GetHeight();
+
+    if ( !(::GetDeviceCaps(GetHdc(), RASTERCAPS) & RC_STRETCHDIB) ||
+            !DrawBitmapUsingStretchDIBits(GetHdc(), bmp, x, y) )
+    {
+        // no support for StretchDIBits() or an error occurred if we got here
+        wxMemoryDC memDC;
+
+        memDC.SelectObjectAsSource(bmp);
+
+        GetOwner()->Blit(x, y, width, height, &memDC, 0, 0, wxCOPY, useMask);
+
+        memDC.SelectObject(wxNullBitmap);
+    }
+}
+
+bool wxPrinterDCImpl::DoBlit(wxCoord xdest, wxCoord ydest,
+                         wxCoord width, wxCoord height,
+                         wxDC *source,
+                         wxCoord WXUNUSED(xsrc), wxCoord WXUNUSED(ysrc),
+                         int WXUNUSED(rop), bool useMask,
+                         wxCoord WXUNUSED(xsrcMask), wxCoord WXUNUSED(ysrcMask))
+{
+    wxDCImpl *impl = source->GetImpl();
+    wxMSWDCImpl *msw_impl = wxDynamicCast(impl, wxMSWDCImpl);
+    if (!msw_impl)
+        return false;
+
+    wxBitmap& bmp = msw_impl->GetSelectedBitmap();
+    wxMask *mask = useMask ? bmp.GetMask() : NULL;
+    if ( mask )

     {
     {

-           GlobalFree(pd.hDevNames);
-           pd.hDevNames=NULL;
+        // If we are printing source colours are screen colours not printer
+        // colours and so we need copy the bitmap pixel by pixel.
+        RECT rect;
+        HDC dcSrc = GetHdcOf(*msw_impl);
+        MemoryHDC dcMask(dcSrc);
+        SelectInHDC selectMask(dcMask, (HBITMAP)mask->GetMaskBitmap());
+
+        for (int x = 0; x < width; x++)
+        {
+            for (int y = 0; y < height; y++)
+            {
+                COLORREF cref = ::GetPixel(dcMask, x, y);
+                if (cref)
+                {
+                    HBRUSH brush = ::CreateSolidBrush(::GetPixel(dcSrc, x, y));
+                    rect.left = xdest + x;
+                    rect.right = rect.left + 1;
+                    rect.top = ydest + y;
+                    rect.bottom = rect.top + 1;
+                    ::FillRect(GetHdc(), &rect, brush);
+                    ::DeleteObject(brush);
+                }
+            }
+        }

     }
     }

-    if (pd.hDevMode)
+    else // no mask

     {
     {

-        GlobalFree(pd.hDevMode);
-        pd.hDevMode=NULL;
+        if ( !(::GetDeviceCaps(GetHdc(), RASTERCAPS) & RC_STRETCHDIB) ||
+                !DrawBitmapUsingStretchDIBits(GetHdc(), bmp, xdest, ydest) )
+        {
+            // no support for StretchDIBits
+
+            // as we are printing, source colours are screen colours not
+            // printer colours and so we need copy the bitmap pixel by pixel.
+            HDC dcSrc = GetHdcOf(*msw_impl);
+            RECT rect;
+            for (int y = 0; y < height; y++)
+            {
+                // optimization: draw identical adjacent pixels together.
+                for (int x = 0; x < width; x++)
+                {
+                    COLORREF col = ::GetPixel(dcSrc, x, y);
+                    HBRUSH brush = ::CreateSolidBrush( col );
+
+                    rect.left = xdest + x;
+                    rect.top = ydest + y;
+                    while( (x + 1 < width) &&
+                                (::GetPixel(dcSrc, x + 1, y) == col ) )
+                    {
+                        ++x;
+                    }
+                    rect.right = xdest + x + 1;
+                    rect.bottom = rect.top + 1;
+                    ::FillRect((HDC) m_hDC, &rect, brush);
+                    ::DeleteObject(brush);
+                }
+            }
+        }

     }
     }

-    return (WXHDC) hDC;
-}

 
 

+    return true;
+}

 
 

+#endif
+    // wxUSE_PRINTING_ARCHITECTURE