+#include "wx/msw/private/dc.h"
+
+using namespace wxMSWImpl;
+
+#ifndef AC_SRC_ALPHA
+ #define AC_SRC_ALPHA 1
+#endif
+
+#ifndef LAYOUT_RTL
+ #define LAYOUT_RTL 1
+#endif
+
+/* Quaternary raster codes */
+#ifndef MAKEROP4
+#define MAKEROP4(fore,back) (DWORD)((((back) << 8) & 0xFF000000) | (fore))
+#endif
+
+// apparently with MicroWindows it is possible that HDC is 0 so we have to
+// check for this ourselves
+#ifdef __WXMICROWIN__
+ #define WXMICROWIN_CHECK_HDC if ( !GetHDC() ) return;
+ #define WXMICROWIN_CHECK_HDC_RET(x) if ( !GetHDC() ) return x;
+#else
+ #define WXMICROWIN_CHECK_HDC
+ #define WXMICROWIN_CHECK_HDC_RET(x)
+#endif
+
+IMPLEMENT_ABSTRACT_CLASS(wxMSWDCImpl, wxDCImpl)
+
+// ---------------------------------------------------------------------------
+// constants
+// ---------------------------------------------------------------------------
+
+static const int VIEWPORT_EXTENT = 1024;
+
+// ROPs which don't have standard names (see "Ternary Raster Operations" in the
+// MSDN docs for how this and other numbers in wxDC::Blit() are obtained)
+#define DSTCOPY 0x00AA0029 // a.k.a. NOP operation
+
+// ----------------------------------------------------------------------------
+// macros for logical <-> device coords conversion
+// ----------------------------------------------------------------------------
+
+/*
+ We currently let Windows do all the translations itself so these macros are
+ not really needed (any more) but keep them to enhance readability of the
+ code by allowing to see where are the logical and where are the device
+ coordinates used.
+ */
+
+#ifdef __WXWINCE__
+ #define XLOG2DEV(x) ((x-m_logicalOriginX)*m_signX)
+ #define YLOG2DEV(y) ((y-m_logicalOriginY)*m_signY)
+ #define XDEV2LOG(x) ((x)*m_signX+m_logicalOriginX)
+ #define YDEV2LOG(y) ((y)*m_signY+m_logicalOriginY)
+#else
+ #define XLOG2DEV(x) (x)
+ #define YLOG2DEV(y) (y)
+ #define XDEV2LOG(x) (x)
+ #define YDEV2LOG(y) (y)
+#endif
+
+// ---------------------------------------------------------------------------
+// private functions
+// ---------------------------------------------------------------------------
+
+// convert degrees to radians
+static inline double DegToRad(double deg) { return (deg * M_PI) / 180.0; }
+
+// call AlphaBlend() to blit contents of hdcSrc to hdcDst using alpha
+//
+// NB: bmpSrc is the bitmap selected in hdcSrc, it is not really needed
+// to pass it to this function but as we already have it at the point
+// of call anyhow we do
+//
+// return true if we could draw the bitmap in one way or the other, false
+// otherwise
+static bool AlphaBlt(HDC hdcDst,
+ int x, int y, int dstWidth, int dstHeight,
+ int srcX, int srcY,
+ int srcWidth, int srcHeight,
+ HDC hdcSrc,
+ const wxBitmap& bmp);
+
+#ifdef wxHAS_RAW_BITMAP
+
+// our (limited) AlphaBlend() replacement for Windows versions not providing it
+static void
+wxAlphaBlend(HDC hdcDst, int xDst, int yDst,
+ int dstWidth, int dstHeight,
+ int srcX, int srcY,
+ int srcWidth, int srcHeight,
+ const wxBitmap& bmpSrc);
+
+#endif // wxHAS_RAW_BITMAP
+
+// ----------------------------------------------------------------------------
+// private classes
+// ----------------------------------------------------------------------------
+
+// instead of duplicating the same code which sets and then restores text
+// colours in each wxDC method working with wxSTIPPLE_MASK_OPAQUE brushes,
+// encapsulate this in a small helper class
+
+// wxBrushAttrsSetter: changes the text colours in the ctor if required and
+// restores them in the dtor
+class wxBrushAttrsSetter : private wxBkModeChanger,
+ private wxTextColoursChanger
+{
+public:
+ wxBrushAttrsSetter(wxMSWDCImpl& dc);
+
+private:
+ wxDECLARE_NO_COPY_CLASS(wxBrushAttrsSetter);
+};
+
+#ifdef __WXWINCE__
+
+#define SET_STRETCH_BLT_MODE(hdc)
+
+#else // !__WXWINCE__
+
+// this class sets the stretch blit mode to COLORONCOLOR during its lifetime
+//
+// don't use it directly, use SET_STRETCH_BLT_MODE() macro instead as it
+// expands to nothing under WinCE which doesn't have SetStretchBltMode()
+class StretchBltModeChanger
+{
+public:
+ StretchBltModeChanger(HDC hdc)
+ : m_hdc(hdc)
+ {
+ m_modeOld = ::SetStretchBltMode(m_hdc, COLORONCOLOR);
+ if ( !m_modeOld )
+ {
+ wxLogLastError(wxT("SetStretchBltMode"));
+ }
+ }
+
+ ~StretchBltModeChanger()
+ {
+ if ( !::SetStretchBltMode(m_hdc, m_modeOld) )
+ {
+ wxLogLastError(wxT("SetStretchBltMode"));
+ }
+ }
+
+private:
+ const HDC m_hdc;
+
+ int m_modeOld;
+
+ wxDECLARE_NO_COPY_CLASS(StretchBltModeChanger);
+};
+
+#define SET_STRETCH_BLT_MODE(hdc) \
+ StretchBltModeChanger wxMAKE_UNIQUE_NAME(stretchModeChanger)(hdc)
+
+#endif // __WXWINCE__/!__WXWINCE__
+
+#if wxUSE_DYNLIB_CLASS
+
+// helper class to cache dynamically loaded libraries and not attempt reloading
+// them if it fails
+class wxOnceOnlyDLLLoader
+{
+public:
+ // ctor argument must be a literal string as we don't make a copy of it!
+ wxOnceOnlyDLLLoader(const wxChar *dllName)
+ : m_dllName(dllName)
+ {
+ }
+
+
+ // return the symbol with the given name or NULL if the DLL not loaded
+ // or symbol not present
+ void *GetSymbol(const wxChar *name)
+ {
+ // we're prepared to handle errors here
+ wxLogNull noLog;
+
+ if ( m_dllName )
+ {
+ m_dll.Load(m_dllName);
+
+ // reset the name whether we succeeded or failed so that we don't
+ // try again the next time
+ m_dllName = NULL;
+ }
+
+ return m_dll.IsLoaded() ? m_dll.GetSymbol(name) : NULL;
+ }
+
+ void Unload()
+ {
+ if ( m_dll.IsLoaded() )
+ {
+ m_dll.Unload();
+ }
+ }
+
+private:
+ wxDynamicLibrary m_dll;
+ const wxChar *m_dllName;
+};
+
+static wxOnceOnlyDLLLoader wxMSIMG32DLL(wxT("msimg32"));
+
+// we must ensure that DLLs are unloaded before the static objects cleanup time
+// because we may hit the notorious DllMain() dead lock in this case if wx is
+// used as a DLL (attempting to unload another DLL from inside DllMain() hangs
+// under Windows because it tries to reacquire the same lock)
+class wxGDIDLLsCleanupModule : public wxModule
+{
+public:
+ virtual bool OnInit() { return true; }
+ virtual void OnExit() { wxMSIMG32DLL.Unload(); }
+
+private:
+ DECLARE_DYNAMIC_CLASS(wxGDIDLLsCleanupModule)
+};
+
+IMPLEMENT_DYNAMIC_CLASS(wxGDIDLLsCleanupModule, wxModule)
+
+namespace
+{
+
+#if wxUSE_DC_TRANSFORM_MATRIX
+
+// Class used to dynamically load world transform related API functions.
+class GdiWorldTransformFuncs
+{
+public:
+ static bool IsOk()
+ {
+ if ( !ms_worldTransformSymbolsLoaded )
+ LoadWorldTransformSymbols();
+
+ return ms_pfnSetGraphicsMode &&
+ ms_pfnSetWorldTransform &&
+ ms_pfnGetWorldTransform &&
+ ms_pfnModifyWorldTransform;
+ }
+
+ typedef int (WINAPI *SetGraphicsMode_t)(HDC, int);
+ static SetGraphicsMode_t SetGraphicsMode()
+ {
+ if ( !ms_worldTransformSymbolsLoaded )
+ LoadWorldTransformSymbols();
+
+ return ms_pfnSetGraphicsMode;
+ }
+
+ typedef BOOL (WINAPI *SetWorldTransform_t)(HDC, const XFORM *);
+ static SetWorldTransform_t SetWorldTransform()
+ {
+ if ( !ms_worldTransformSymbolsLoaded )
+ LoadWorldTransformSymbols();
+
+ return ms_pfnSetWorldTransform;
+ }
+
+ typedef BOOL (WINAPI *GetWorldTransform_t)(HDC, LPXFORM);
+ static GetWorldTransform_t GetWorldTransform()
+ {
+ if ( !ms_worldTransformSymbolsLoaded )
+ LoadWorldTransformSymbols();
+
+ return ms_pfnGetWorldTransform;
+ }
+
+ typedef BOOL (WINAPI *ModifyWorldTransform_t)(HDC, const XFORM *, DWORD);
+ static ModifyWorldTransform_t ModifyWorldTransform()
+ {
+ if ( !ms_worldTransformSymbolsLoaded )
+ LoadWorldTransformSymbols();
+
+ return ms_pfnModifyWorldTransform;
+ }
+
+private:
+ static void LoadWorldTransformSymbols()
+ {
+ wxDynamicLibrary dll(wxT("gdi32.dll"));
+
+ wxDL_INIT_FUNC(ms_pfn, SetGraphicsMode, dll);
+ wxDL_INIT_FUNC(ms_pfn, SetWorldTransform, dll);
+ wxDL_INIT_FUNC(ms_pfn, GetWorldTransform, dll);
+ wxDL_INIT_FUNC(ms_pfn, ModifyWorldTransform, dll);
+
+ ms_worldTransformSymbolsLoaded = true;
+ }
+
+ static SetGraphicsMode_t ms_pfnSetGraphicsMode;
+ static SetWorldTransform_t ms_pfnSetWorldTransform;
+ static GetWorldTransform_t ms_pfnGetWorldTransform;
+ static ModifyWorldTransform_t ms_pfnModifyWorldTransform;
+
+ static bool ms_worldTransformSymbolsLoaded;
+};
+
+GdiWorldTransformFuncs::SetGraphicsMode_t
+ GdiWorldTransformFuncs::ms_pfnSetGraphicsMode = NULL;
+GdiWorldTransformFuncs::SetWorldTransform_t
+ GdiWorldTransformFuncs::ms_pfnSetWorldTransform = NULL;
+GdiWorldTransformFuncs::GetWorldTransform_t
+ GdiWorldTransformFuncs::ms_pfnGetWorldTransform = NULL;
+GdiWorldTransformFuncs::ModifyWorldTransform_t
+ GdiWorldTransformFuncs::ms_pfnModifyWorldTransform = NULL;
+
+bool GdiWorldTransformFuncs::ms_worldTransformSymbolsLoaded = false;
+
+#endif // wxUSE_DC_TRANSFORM_MATRIX
+
+} // anonymous namespace
+
+#endif // wxUSE_DYNLIB_CLASS
+
+// ===========================================================================
+// implementation
+// ===========================================================================
+
+// ----------------------------------------------------------------------------
+// wxBrushAttrsSetter
+// ----------------------------------------------------------------------------
+
+wxBrushAttrsSetter::wxBrushAttrsSetter(wxMSWDCImpl& dc)
+ : wxBkModeChanger(GetHdcOf(dc)),
+ wxTextColoursChanger(GetHdcOf(dc))
+{
+ const wxBrush& brush = dc.GetBrush();
+ if ( brush.IsOk() && brush.GetStyle() == wxBRUSHSTYLE_STIPPLE_MASK_OPAQUE )
+ {
+ // note that Windows convention is opposite to wxWidgets one, this is
+ // why text colour becomes the background one and vice versa
+ wxTextColoursChanger::Change(dc.GetTextBackground(),
+ dc.GetTextForeground());
+
+ wxBkModeChanger::Change(dc.GetBackgroundMode());
+ }
+}
+
+// ----------------------------------------------------------------------------
+// wxDC MSW-specific methods
+// ----------------------------------------------------------------------------
+
+WXHDC wxDC::GetHDC() const
+{
+ wxMSWDCImpl * const impl = wxDynamicCast(GetImpl(), wxMSWDCImpl);
+ return impl ? impl->GetHDC() : 0;
+}
+
+// ---------------------------------------------------------------------------
+// wxMSWDCImpl
+// ---------------------------------------------------------------------------
+
+wxMSWDCImpl::wxMSWDCImpl( wxDC *owner, WXHDC hDC ) :
+ wxDCImpl( owner )
+{
+ Init();
+ m_hDC = hDC;
+}
+
+wxMSWDCImpl::~wxMSWDCImpl()
+{
+ if ( m_hDC != 0 )
+ {
+ SelectOldObjects(m_hDC);
+
+ // if we own the HDC, we delete it, otherwise we just release it
+
+ if ( m_bOwnsDC )
+ {
+ ::DeleteDC(GetHdc());
+ }
+ else // we don't own our HDC
+ {
+ if (m_window)
+ {
+ ::ReleaseDC(GetHwndOf(m_window), GetHdc());
+ }
+ else
+ {
+ // Must have been a wxScreenDC
+ ::ReleaseDC((HWND) NULL, GetHdc());
+ }
+ }
+ }
+}
+
+// This will select current objects out of the DC,
+// which is what you have to do before deleting the
+// DC.
+void wxMSWDCImpl::SelectOldObjects(WXHDC dc)
+{
+ if (dc)
+ {
+ if (m_oldBitmap)
+ {
+ ::SelectObject((HDC) dc, (HBITMAP) m_oldBitmap);
+ if (m_selectedBitmap.IsOk())
+ {
+ m_selectedBitmap.SetSelectedInto(NULL);
+ }
+ }
+ m_oldBitmap = 0;
+ if (m_oldPen)
+ {
+ ::SelectObject((HDC) dc, (HPEN) m_oldPen);
+ }
+ m_oldPen = 0;
+ if (m_oldBrush)
+ {
+ ::SelectObject((HDC) dc, (HBRUSH) m_oldBrush);
+ }
+ m_oldBrush = 0;
+ if (m_oldFont)
+ {
+ ::SelectObject((HDC) dc, (HFONT) m_oldFont);
+ }
+ m_oldFont = 0;
+
+#if wxUSE_PALETTE
+ if (m_oldPalette)
+ {
+ ::SelectPalette((HDC) dc, (HPALETTE) m_oldPalette, FALSE);
+ }
+ m_oldPalette = 0;
+#endif // wxUSE_PALETTE
+ }
+
+ m_brush = wxNullBrush;
+ m_pen = wxNullPen;
+#if wxUSE_PALETTE
+ m_palette = wxNullPalette;
+#endif // wxUSE_PALETTE
+ m_font = wxNullFont;
+ m_backgroundBrush = wxNullBrush;
+ m_selectedBitmap = wxNullBitmap;
+}
+
+// ---------------------------------------------------------------------------
+// clipping
+// ---------------------------------------------------------------------------
+
+void wxMSWDCImpl::UpdateClipBox()
+{
+ WXMICROWIN_CHECK_HDC
+
+ RECT rect;
+ ::GetClipBox(GetHdc(), &rect);
+
+ m_clipX1 = (wxCoord) XDEV2LOG(rect.left);
+ m_clipY1 = (wxCoord) YDEV2LOG(rect.top);
+ m_clipX2 = (wxCoord) XDEV2LOG(rect.right);
+ m_clipY2 = (wxCoord) YDEV2LOG(rect.bottom);
+}
+
+void
+wxMSWDCImpl::DoGetClippingBox(wxCoord *x, wxCoord *y, wxCoord *w, wxCoord *h) const
+{
+ // check if we should try to retrieve the clipping region possibly not set
+ // by our SetClippingRegion() but preset by Windows:this can only happen
+ // when we're associated with an existing HDC usign SetHDC(), see there
+ if ( m_clipping && !m_clipX1 && !m_clipX2 )
+ {
+ wxMSWDCImpl *self = wxConstCast(this, wxMSWDCImpl);
+ self->UpdateClipBox();
+
+ if ( !m_clipX1 && !m_clipX2 )
+ self->m_clipping = false;
+ }
+
+ wxDCImpl::DoGetClippingBox(x, y, w, h);
+}
+
+// common part of DoSetClippingRegion() and DoSetDeviceClippingRegion()
+void wxMSWDCImpl::SetClippingHrgn(WXHRGN hrgn)
+{
+ wxCHECK_RET( hrgn, wxT("invalid clipping region") );
+
+ WXMICROWIN_CHECK_HDC
+
+ // note that we combine the new clipping region with the existing one: this
+ // is compatible with what the other ports do and is the documented
+ // behaviour now (starting with 2.3.3)
+#if defined(__WXWINCE__)
+ RECT rectClip;
+ if ( !::GetClipBox(GetHdc(), &rectClip) )
+ return;
+
+ // GetClipBox returns logical coordinates, so transform to device
+ rectClip.left = LogicalToDeviceX(rectClip.left);
+ rectClip.top = LogicalToDeviceY(rectClip.top);
+ rectClip.right = LogicalToDeviceX(rectClip.right);
+ rectClip.bottom = LogicalToDeviceY(rectClip.bottom);
+
+ HRGN hrgnDest = ::CreateRectRgn(0, 0, 0, 0);
+ HRGN hrgnClipOld = ::CreateRectRgn(rectClip.left, rectClip.top,
+ rectClip.right, rectClip.bottom);
+
+ if ( ::CombineRgn(hrgnDest, hrgnClipOld, (HRGN)hrgn, RGN_AND) != ERROR )
+ {
+ ::SelectClipRgn(GetHdc(), hrgnDest);
+ }
+
+ ::DeleteObject(hrgnClipOld);
+ ::DeleteObject(hrgnDest);
+#else // !WinCE
+ if ( ::ExtSelectClipRgn(GetHdc(), (HRGN)hrgn, RGN_AND) == ERROR )
+ {
+ wxLogLastError(wxT("ExtSelectClipRgn"));
+
+ return;
+ }
+#endif // WinCE/!WinCE
+
+ m_clipping = true;
+
+ UpdateClipBox();
+}
+
+void wxMSWDCImpl::DoSetClippingRegion(wxCoord x, wxCoord y, wxCoord w, wxCoord h)
+{
+ // the region coords are always the device ones, so do the translation
+ // manually
+ //
+ // FIXME: possible +/-1 error here, to check!
+ HRGN hrgn = ::CreateRectRgn(LogicalToDeviceX(x),
+ LogicalToDeviceY(y),
+ LogicalToDeviceX(x + w),
+ LogicalToDeviceY(y + h));
+ if ( !hrgn )
+ {
+ wxLogLastError(wxT("CreateRectRgn"));
+ }
+ else
+ {
+ SetClippingHrgn((WXHRGN)hrgn);
+
+ ::DeleteObject(hrgn);
+ }
+}
+
+void wxMSWDCImpl::DoSetDeviceClippingRegion(const wxRegion& region)
+{
+ SetClippingHrgn(region.GetHRGN());
+}
+
+void wxMSWDCImpl::DestroyClippingRegion()
+{
+ WXMICROWIN_CHECK_HDC
+
+ if (m_clipping && m_hDC)
+ {
+#if 1
+ // On a PocketPC device (not necessarily emulator), resetting
+ // the clip region as per the old method causes bad display
+ // problems. In fact setting a null region is probably OK
+ // on desktop WIN32 also, since the WIN32 docs imply that the user
+ // clipping region is independent from the paint clipping region.
+ ::SelectClipRgn(GetHdc(), 0);
+#else
+ // TODO: this should restore the previous clipping region,
+ // so that OnPaint processing works correctly, and the update
+ // clipping region doesn't get destroyed after the first
+ // DestroyClippingRegion.
+ HRGN rgn = CreateRectRgn(0, 0, 32000, 32000);
+ ::SelectClipRgn(GetHdc(), rgn);
+ ::DeleteObject(rgn);
+#endif
+ }
+
+ wxDCImpl::DestroyClippingRegion();
+}
+
+// ---------------------------------------------------------------------------
+// query capabilities
+// ---------------------------------------------------------------------------
+
+bool wxMSWDCImpl::CanDrawBitmap() const
+{
+ return true;
+}
+
+bool wxMSWDCImpl::CanGetTextExtent() const
+{
+#ifdef __WXMICROWIN__
+ // TODO Extend MicroWindows' GetDeviceCaps function
+ return true;
+#else
+ // What sort of display is it?
+ int technology = ::GetDeviceCaps(GetHdc(), TECHNOLOGY);
+
+ return (technology == DT_RASDISPLAY) || (technology == DT_RASPRINTER);
+#endif
+}
+
+int wxMSWDCImpl::GetDepth() const
+{
+ WXMICROWIN_CHECK_HDC_RET(16)
+
+ return (int)::GetDeviceCaps(GetHdc(), BITSPIXEL);
+}
+
+// ---------------------------------------------------------------------------
+// drawing
+// ---------------------------------------------------------------------------
+
+void wxMSWDCImpl::Clear()
+{
+ WXMICROWIN_CHECK_HDC
+
+ RECT rect;
+ if (m_window)
+ {
+ GetClientRect((HWND) m_window->GetHWND(), &rect);
+ }
+ else
+ {
+ // No, I think we should simply ignore this if printing on e.g.
+ // a printer DC.
+ // wxCHECK_RET( m_selectedBitmap.IsOk(), wxT("this DC can't be cleared") );
+ if (!m_selectedBitmap.IsOk())
+ return;
+
+ rect.left = -m_deviceOriginX; rect.top = -m_deviceOriginY;
+ rect.right = m_selectedBitmap.GetWidth()-m_deviceOriginX;
+ rect.bottom = m_selectedBitmap.GetHeight()-m_deviceOriginY;
+ }
+
+#ifndef __WXWINCE__
+ (void) ::SetMapMode(GetHdc(), MM_TEXT);
+#endif
+
+ DWORD colour = ::GetBkColor(GetHdc());
+ HBRUSH brush = ::CreateSolidBrush(colour);
+ ::FillRect(GetHdc(), &rect, brush);
+ ::DeleteObject(brush);
+
+ RealizeScaleAndOrigin();
+}
+
+bool wxMSWDCImpl::DoFloodFill(wxCoord WXUNUSED_IN_WINCE(x),
+ wxCoord WXUNUSED_IN_WINCE(y),
+ const wxColour& WXUNUSED_IN_WINCE(col),
+ wxFloodFillStyle WXUNUSED_IN_WINCE(style))
+{
+#ifdef __WXWINCE__
+ return false;
+#else
+ WXMICROWIN_CHECK_HDC_RET(false)
+
+ bool success = (0 != ::ExtFloodFill(GetHdc(), XLOG2DEV(x), YLOG2DEV(y),
+ col.GetPixel(),
+ style == wxFLOOD_SURFACE ? FLOODFILLSURFACE
+ : FLOODFILLBORDER) ) ;
+ if (!success)
+ {
+ // quoting from the MSDN docs:
+ //
+ // Following are some of the reasons this function might fail:
+ //
+ // * The filling could not be completed.
+ // * The specified point has the boundary color specified by the
+ // crColor parameter (if FLOODFILLBORDER was requested).
+ // * The specified point does not have the color specified by
+ // crColor (if FLOODFILLSURFACE was requested)
+ // * The point is outside the clipping region that is, it is not
+ // visible on the device.
+ //
+ wxLogLastError(wxT("ExtFloodFill"));
+ }
+
+ CalcBoundingBox(x, y);
+
+ return success;