[wxWidgets.git] / src / os2 / region.cpp

/////////////////////////////////////////////////////////////////////////////
// File:      src/os2/region.cpp
// Purpose:   Region class
// Author:    David Webster
// Modified by:
// Created:   10/15/99
// RCS-ID:    $Id$
// Copyright: (c) David Webster
// Licence:   wxWindows licence
/////////////////////////////////////////////////////////////////////////////

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

#ifndef WX_PRECOMP
    #include "wx/app.h"
    #include "wx/window.h"
    #include "wx/gdicmn.h"
#endif

#include "wx/os2/region.h"

#include "wx/os2/private.h"

IMPLEMENT_DYNAMIC_CLASS(wxRegion, wxGDIObject)
IMPLEMENT_DYNAMIC_CLASS(wxRegionIterator, wxObject)

//-----------------------------------------------------------------------------
// wxRegionRefData implementation
//-----------------------------------------------------------------------------

class WXDLLEXPORT wxRegionRefData : public wxGDIRefData {
public:
    wxRegionRefData()
    {
        m_hRegion = 0;
        m_hPS     = 0;
    }

    wxRegionRefData(const wxRegionRefData& rData)
    {
        RGNRECT                     vRgnData;
        PRECTL                      pRect = NULL;

        vRgnData.ulDirection = RECTDIR_LFRT_TOPBOT;
        if (::GpiQueryRegionRects( rData.m_hPS      // Pres space
                                  ,rData.m_hRegion  // Handle of region to query
                                  ,NULL             // Return all RECTs
                                  ,&vRgnData        // Will contain number or RECTs in region
                                  ,NULL             // NULL to return number of RECTs
                                 ))
        {
            pRect = new RECTL[vRgnData.crcReturned];
            vRgnData.crc = vRgnData.crcReturned;
            vRgnData.ircStart = 1;
            if (::GpiQueryRegionRects( rData.m_hPS     // Pres space of source
                                      ,rData.m_hRegion // Handle of source region
                                      ,NULL            // Return all RECTs
                                      ,&vRgnData       // Operations set to return rects
                                      ,pRect           // Will contain the actual RECTS
                                     ))
            {
                m_hRegion = ::GpiCreateRegion( rData.m_hPS
                                              ,vRgnData.crcReturned
                                              ,pRect
                                             );
                m_hPS = rData.m_hPS;
            }
            delete [] pRect;
        }
    }

    virtual ~wxRegionRefData()
    {
        ::GpiDestroyRegion(m_hPS, m_hRegion);
    }

    HRGN                            m_hRegion;
    HPS                             m_hPS;
};

#define M_REGION (((wxRegionRefData*)m_refData)->m_hRegion)
#define M_REGION_OF(rgn) (((wxRegionRefData*)(rgn.m_refData))->m_hRegion)

//-----------------------------------------------------------------------------
// wxRegion
//-----------------------------------------------------------------------------

// General remark:
// wxRegion is always basically stored in wx coordinates. However, since
// OS/2's internal functions rely on "top > bottom", the values of top and
// bottom values of a region need to be interchanged, as compared to wx.
// This needs to be taken into account when feeding any rectangle to wx _or_
// when accessing the region data via GetBox, wxRegionIterator or otherwise.

/*!
 * Create an empty region.
 */
wxRegion::wxRegion()
{
    m_refData = new wxRegionRefData;
} // end of wxRegion::wxRegion

wxRegion::wxRegion(
  WXHRGN                            hRegion,
  WXHDC                             hPS
)
{
    m_refData = new wxRegionRefData;
    M_REGION = (HRGN) hRegion;
    (((wxRegionRefData*)m_refData)->m_hPS) = hPS;
} // end of wxRegion::wxRegion

wxRegion::wxRegion(
  wxCoord                           x
, wxCoord                           y
, wxCoord                           vWidth
, wxCoord                           vHeight
)
{
    RECTL                           vRect;
    SIZEL                           vSize = {0, 0};
    DEVOPENSTRUC                    vDop = {0L, "DISPLAY", NULL, 0L, 0L, 0L, 0L, 0L, 0L};
    HDC                             hDC = ::DevOpenDC( vHabmain
                                                      ,OD_MEMORY
                                                      ,"*"
                                                      ,5L
                                                      ,(PDEVOPENDATA)&vDop
                                                      ,NULLHANDLE
                                                     );


    vRect.xLeft   = x;
    vRect.xRight  = x + vWidth;
    vRect.yBottom = y;
    vRect.yTop    = y + vHeight;

    m_refData     = new wxRegionRefData;

    //
    // Need a PS to create a Region
    //
    ((wxRegionRefData*)m_refData)->m_hPS = ::GpiCreatePS( vHabmain
                                                         ,hDC
                                                         ,&vSize
                                                         ,PU_PELS | GPIT_MICRO | GPIA_ASSOC
                                                        );
    M_REGION      = ::GpiCreateRegion( ((wxRegionRefData*)m_refData)->m_hPS
                                      ,1
                                      ,&vRect
                                     );
} // end of wxRegion::wxRegion

wxRegion::wxRegion(const wxPoint& rTopLeft,
                   const wxPoint& rBottomRight)
{
    RECTL                           vRect;
    SIZEL                           vSize = {0, 0};
    DEVOPENSTRUC                    vDop = {0L, "DISPLAY", NULL, 0L, 0L, 0L, 0L, 0L, 0L};
    HDC                             hDC = ::DevOpenDC( vHabmain
                                                      ,OD_MEMORY
                                                      ,"*"
                                                      ,5L
                                                      ,(PDEVOPENDATA)&vDop
                                                      ,NULLHANDLE
                                                     );

    vRect.xLeft   = rTopLeft.x;
    vRect.xRight  = rBottomRight.x;
    vRect.yBottom = rTopLeft.y;
    vRect.yTop    = rBottomRight.y;

    m_refData     = new wxRegionRefData;

    //
    // Need a PS to create a Region
    //
    ((wxRegionRefData*)m_refData)->m_hPS = ::GpiCreatePS( vHabmain
                                                         ,hDC
                                                         ,&vSize
                                                         ,PU_PELS | GPIT_MICRO | GPIA_ASSOC
                                                        );
    M_REGION      = ::GpiCreateRegion( ((wxRegionRefData*)m_refData)->m_hPS
                                      ,1
                                      ,&vRect
                                     );
} // end of wxRegion::wxRegion

wxRegion::wxRegion(const wxRect& rRect)
{
    RECTL                           vRect;
    SIZEL                           vSize = {0, 0};
    DEVOPENSTRUC                    vDop = {0L, "DISPLAY", NULL, 0L, 0L, 0L, 0L, 0L, 0L};
    HDC                             hDC = ::DevOpenDC( vHabmain
                                                      ,OD_MEMORY
                                                      ,"*"
                                                      ,5L
                                                      ,(PDEVOPENDATA)&vDop
                                                      ,NULLHANDLE
                                                     );


    vRect.xLeft   = rRect.x;
    vRect.xRight  = rRect.x + rRect.width;
    vRect.yBottom = rRect.y;
    vRect.yTop    = rRect.y + rRect.height;

    m_refData     = new wxRegionRefData;

    //
    // Need a PS to create a Region
    //
    ((wxRegionRefData*)m_refData)->m_hPS = ::GpiCreatePS( vHabmain
                                                         ,hDC
                                                         ,&vSize
                                                         ,PU_PELS | GPIT_MICRO | GPIA_ASSOC
                                                        );
    M_REGION      = ::GpiCreateRegion( ((wxRegionRefData*)m_refData)->m_hPS
                                      ,1
                                      ,&vRect
                                     );
} // end of wxRegion::wxRegion

wxRegion::wxRegion(size_t n, const wxPoint *points, int WXUNUSED(fillStyle))
{
    // TO DO
}

//
// Destroy the region.
//
wxRegion::~wxRegion()
{
} // end of wxRegion::~wxRegion

wxObjectRefData *wxRegion::CreateData() const
{
    return new wxRegionRefData;
}

wxObjectRefData *wxRegion::CloneData(const wxObjectRefData *data) const
{
    return new wxRegionRefData(*(wxRegionRefData *)data);
}

//-----------------------------------------------------------------------------
//# Modify region
//-----------------------------------------------------------------------------

bool wxRegion::DoOffset( wxCoord x, wxCoord y )
{
    if ( !x && !y )
    {
        // nothing to do
        return true;
    }

    AllocExclusive();

#if 0
    if ( ::OffsetRgn(GetHrgn(), x, y) == ERROR )
    {
        wxLogLastError(_T("OffsetRgn"));

        return false;
    }
#endif
    return true;
}

//
// Clear current region
//
void wxRegion::Clear()
{
    UnRef();
} // end of wxRegion::Clear

//
// Union region with this.
//
bool wxRegion::DoCombine( const wxRegion& rRegion, wxRegionOp eOp )
{
    //
    // We can't use the API functions if we don't have a valid region handle
    //
    if (!m_refData)
    {
        // combining with an empty/invalid region works differently depending
        // on the operation
        switch (eOp)
        {
            case wxRGN_COPY:
            case wxRGN_OR:
            case wxRGN_XOR:
                *this = rRegion;
                break;

            default:
                wxFAIL_MSG( _T("unknown region operation") );
                // fall through

            case wxRGN_AND:
            case wxRGN_DIFF:
                // leave empty/invalid
                return false;
        }
    }
    else // we have a valid region
    {

        LONG                        lMode = 0;

        switch (eOp)
        {
            case wxRGN_AND:
                lMode = CRGN_AND;
                break;

            case wxRGN_OR:
                lMode = CRGN_OR;
                break;

            case wxRGN_XOR:
                lMode = CRGN_XOR;
                break;

            case wxRGN_DIFF:
                lMode = CRGN_DIFF;
                break;

            case wxRGN_COPY:
            default:
                lMode = CRGN_COPY;
                break;
        }
        return (::GpiCombineRegion( ((wxRegionRefData*)rRegion.m_refData)->m_hPS
                                   ,M_REGION
                                   ,M_REGION
                                   ,((wxRegionRefData*)rRegion.m_refData)->m_hRegion
                                   ,lMode
                                  ) != RGN_ERROR);
    }
    return true;
} // end of wxRegion::Combine

//-----------------------------------------------------------------------------
//# Information on region
//-----------------------------------------------------------------------------

bool wxRegion::DoIsEqual(const wxRegion& WXUNUSED(region)) const
{
    return false;
}

//
// Outer bounds of region
//
bool wxRegion::DoGetBox(
  wxCoord&                          x
, wxCoord&                          y
, wxCoord&                          vWidth
, wxCoord&                          vHeight
) const
{
    if (m_refData)
    {
        RECTL                       vRect;
        APIRET                      rc;

        rc = ::GpiQueryRegionBox( ((wxRegionRefData*)m_refData)->m_hPS
                            ,M_REGION
                            ,&vRect
                           );
        x       = vRect.xLeft;
        y       = vRect.yBottom;
        vWidth  = vRect.xRight - vRect.xLeft;
        vHeight = vRect.yTop - vRect.yBottom;
        return true;
    }
    else
    {
        x = y = vWidth = vHeight = 0L;
        return false;
    }
} // end of wxRegion::GetBox

//
// Is region empty?
//
bool wxRegion::IsEmpty() const
{
    wxCoord x;
    wxCoord y;
    wxCoord vWidth;
    wxCoord vHeight;

    if (M_REGION == 0)
        return true;

    GetBox( x
           ,y
           ,vWidth
           ,vHeight
          );
    return ((vWidth == 0) && (vHeight == 0));
} // end of wxRegion::IsEmpty

//-----------------------------------------------------------------------------
// Tests
//-----------------------------------------------------------------------------
//
// Does the region contain the point pt?
//
wxRegionContain wxRegion::DoContainsPoint( wxCoord x, wxCoord y ) const
{
    POINTL vPoint = { x, y };

    if (!m_refData)
        return wxOutRegion;

    LONG lInside = ::GpiPtInRegion( ((wxRegionRefData*)m_refData)->m_hPS,
                                    M_REGION,
                                    &vPoint
                                  );
    if (lInside == PRGN_INSIDE)
        return wxInRegion;
    else
        return wxOutRegion;
} // end of wxRegion::Contains

//
// Does the region contain the rectangle (x, y, w, h)?
//
wxRegionContain wxRegion::DoContainsRect(const wxRect& rect) const
{
    if (!m_refData)
        return wxOutRegion;

    RECTL   vRect;
    vRect.xLeft   = rect.x;
    vRect.xRight  = rect.x + rect.width;
    vRect.yTop    = rect.y + rect.height;
    vRect.yBottom = rect.y;

    LONG lInside = ::GpiRectInRegion( ((wxRegionRefData*)m_refData)->m_hPS,
                                      M_REGION,
                                      &vRect
                                    );
    switch (lInside)
    {
        case RRGN_INSIDE    :   return wxInRegion;
        case RRGN_PARTIAL   :   return wxPartRegion;
        case RRGN_ERROR     :
        default             :   return wxOutRegion;
    }

} // end of wxRegion::Contains

//
// Get internal region handle
//
WXHRGN wxRegion::GetHRGN() const
{
    if (!m_refData)
        return (WXHRGN) 0;
    return (WXHRGN) M_REGION;
}

//
// Set a new PS, this means we have to recreate the old region in the new
// PS
//
void wxRegion::SetPS(
  HPS                               hPS
)
{
    RGNRECT                     vRgnData;
    PRECTL                      pRect = NULL;

    vRgnData.ulDirection = RECTDIR_LFRT_TOPBOT;
    if (::GpiQueryRegionRects( ((wxRegionRefData*)m_refData)->m_hPS
                              ,((wxRegionRefData*)m_refData)->m_hRegion
                              ,NULL
                              ,&vRgnData
                              ,NULL
                             ))
    {
        pRect = new RECTL[vRgnData.crcReturned];
        vRgnData.crc = vRgnData.crcReturned;
        vRgnData.ircStart = 1;
        if (::GpiQueryRegionRects( ((wxRegionRefData*)m_refData)->m_hPS
                                  ,((wxRegionRefData*)m_refData)->m_hRegion
                                  ,NULL
                                  ,&vRgnData
                                  ,pRect
                                 ))
        {
            //
            // First destroy the region out of the old PS
            // and then create it in the new and set the new to current
            //
            ::GpiDestroyRegion( ((wxRegionRefData*)m_refData)->m_hPS
                               ,M_REGION
                              );
            ((wxRegionRefData*)m_refData)->m_hRegion = ::GpiCreateRegion( hPS
                                                                         ,vRgnData.crcReturned
                                                                         ,pRect
                                                                        );
            ((wxRegionRefData*)m_refData)->m_hPS = hPS;
        }
        delete [] pRect;
    }
} // end of wxRegion::SetPS

///////////////////////////////////////////////////////////////////////////////
//                                                                           //
//                             wxRegionIterator                              //
//                                                                           //
///////////////////////////////////////////////////////////////////////////////

//
// Initialize empty iterator
//
wxRegionIterator::wxRegionIterator()
: m_lCurrent(0)
, m_lNumRects(0)
, m_pRects(NULL)
{
} // end of wxRegionIterator::wxRegionIterator

wxRegionIterator::~wxRegionIterator()
{
    if (m_pRects)
        delete[] m_pRects;
} // end of wxRegionIterator::~wxRegionIterator

//
// Initialize iterator for region
//
wxRegionIterator::wxRegionIterator(
  const wxRegion&                   rRegion
)
{
    m_pRects = NULL;
    Reset(rRegion);
} // end of wxRegionIterator::wxRegionIterator

//
// Reset iterator for a new /e region.
//
void wxRegionIterator::Reset(
  const wxRegion&                   rRegion
)
{
    m_lCurrent = 0;
    m_lNumRects = 0;
    m_vRegion  = rRegion;

    if (m_pRects)
        delete[] m_pRects;

    m_pRects = NULL;

    if (m_vRegion.Empty())
        m_lNumRects = 0;
    else
    {
        RGNRECT                     vRgnData;
        PRECTL                      pRect;

        vRgnData.ulDirection = RECTDIR_LFRT_TOPBOT;
        if (::GpiQueryRegionRects( ((wxRegionRefData*)rRegion.m_refData)->m_hPS     // Pres space
                                  ,((wxRegionRefData*)rRegion.m_refData)->m_hRegion // Handle of region to query
                                  ,NULL                                             // Return all RECTs
                                  ,&vRgnData                                        // Will contain number or RECTs in region
                                  ,NULL                                             // NULL to return number of RECTs
                                 ))
        {
            pRect = new RECTL[vRgnData.crcReturned];
            m_pRects = new wxRect[vRgnData.crcReturned];
            vRgnData.crc = vRgnData.crcReturned;
            m_lNumRects = vRgnData.crcReturned;
            vRgnData.ircStart = 1;
            if (::GpiQueryRegionRects( ((wxRegionRefData*)rRegion.m_refData)->m_hPS     // Pres space of source
                                      ,((wxRegionRefData*)rRegion.m_refData)->m_hRegion // Handle of source region
                                      ,NULL                                             // Return all RECTs
                                      ,&vRgnData                                        // Operations set to return rects
                                      ,pRect                                            // Will contain the actual RECTS
                                     ))
            {
#if 0
                M_REGION = ::GpiCreateRegion( ((wxRegionRefData*)rRegion.m_refData)->m_hPS
                                             ,vRgnData.crcReturned
                                             ,pRect
                                            );
#endif
                for( LONG i = 0; i < m_lNumRects; i++)
                {
                    m_pRects[i].x      = pRect[i].xLeft;
                    m_pRects[i].width  = pRect[i].xRight - pRect[i].xLeft;
                    m_pRects[i].y      = pRect[i].yBottom;
                    m_pRects[i].height = pRect[i].yTop - pRect[i].yBottom;
                }
#if 0
                ((wxRegionRefData*)m_refData)->m_hPS = ((wxRegionRefData*)rRegion.m_refData)->m_hPS;
#endif
            }
        }
    }
} // end of wxRegionIterator::Reset

//
// Increment iterator. The rectangle returned is the one after the
// incrementation.
//
void wxRegionIterator::operator++ ()
{
    if (m_lCurrent < m_lNumRects)
        ++m_lCurrent;
} // end of wxRegionIterator::operator ++

//
// Increment iterator. The rectangle returned is the one before the
// incrementation.
//
void wxRegionIterator::operator++ (int)
{
    if (m_lCurrent < m_lNumRects)
        ++m_lCurrent;
} // end of wxRegionIterator::operator++

wxCoord wxRegionIterator::GetX() const
{
    if (m_lCurrent < m_lNumRects)
        return m_pRects[m_lCurrent].x;
    return 0L;
} // end of wxRegionIterator::GetX

wxCoord wxRegionIterator::GetY() const
{
    if (m_lCurrent < m_lNumRects)
        return m_pRects[m_lCurrent].y;
    return 0L;
} // end of wxRegionIterator::GetY

wxCoord wxRegionIterator::GetW() const
{
    if (m_lCurrent < m_lNumRects)
        return m_pRects[m_lCurrent].width ;
    return 0L;
} // end of wxRegionIterator::GetW

wxCoord wxRegionIterator::GetH() const
{
    if (m_lCurrent < m_lNumRects)
        return m_pRects[m_lCurrent].height;
    return 0L;
} // end of wxRegionIterator::GetH
Commit	Line	Data
0e320a79	1	/////////////////////////////////////////////////////////////////////////////
670f9935	2	// File: src/os2/region.cpp
0e320a79	3	// Purpose: Region class
409c9842 DW	4	// Author: David Webster
	5	// Modified by:
	6	// Created: 10/15/99
19193a2c	7	// RCS-ID: $Id$
744c5946	8	// Copyright: (c) David Webster
65571936	9	// Licence: wxWindows licence
0e320a79 DW	10	/////////////////////////////////////////////////////////////////////////////
0e320a79 DW	11
409c9842 DW	12	// For compilers that support precompilation, includes "wx.h".
409c9842 DW	13	#include "wx/wxprec.h"
0e320a79	14
670f9935 WS	15	#ifndef WX_PRECOMP
670f9935 WS	16	#include "wx/app.h"
cdccdfab	17	#include "wx/window.h"
dd05139a	18	#include "wx/gdicmn.h"
670f9935 WS	19	#endif
670f9935 WS	20
409c9842	21	#include "wx/os2/region.h"
0e320a79	22
409c9842 DW	23	#include "wx/os2/private.h"
409c9842 DW	24
670f9935 WS	25	IMPLEMENT_DYNAMIC_CLASS(wxRegion, wxGDIObject)
670f9935 WS	26	IMPLEMENT_DYNAMIC_CLASS(wxRegionIterator, wxObject)
0e320a79 DW	27
	28	//-----------------------------------------------------------------------------
	29	// wxRegionRefData implementation
	30	//-----------------------------------------------------------------------------
	31
	32	class WXDLLEXPORT wxRegionRefData : public wxGDIRefData {
	33	public:
409c9842 DW	34	wxRegionRefData()
409c9842 DW	35	{
8d854fa9	36	m_hRegion = 0;
19193a2c	37	m_hPS = 0;
409c9842	38	}
0e320a79	39
8d854fa9	40	wxRegionRefData(const wxRegionRefData& rData)
409c9842	41	{
8d854fa9 DW	42	RGNRECT vRgnData;
	43	PRECTL pRect = NULL;
	44
53e8757b	45	vRgnData.ulDirection = RECTDIR_LFRT_TOPBOT;
8d854fa9 DW	46	if (::GpiQueryRegionRects( rData.m_hPS // Pres space
	47	,rData.m_hRegion // Handle of region to query
	48	,NULL // Return all RECTs
	49	,&vRgnData // Will contain number or RECTs in region
	50	,NULL // NULL to return number of RECTs
	51	))
	52	{
	53	pRect = new RECTL[vRgnData.crcReturned];
	54	vRgnData.crc = vRgnData.crcReturned;
	55	vRgnData.ircStart = 1;
	56	if (::GpiQueryRegionRects( rData.m_hPS // Pres space of source
	57	,rData.m_hRegion // Handle of source region
	58	,NULL // Return all RECTs
	59	,&vRgnData // Operations set to return rects
	60	,pRect // Will contain the actual RECTS
	61	))
	62	{
	63	m_hRegion = ::GpiCreateRegion( rData.m_hPS
	64	,vRgnData.crcReturned
	65	,pRect
	66	);
	67	m_hPS = rData.m_hPS;
	68	}
	69	delete [] pRect;
	70	}
409c9842	71	}
0e320a79	72
d3c7fc99	73	virtual ~wxRegionRefData()
409c9842	74	{
8d854fa9	75	::GpiDestroyRegion(m_hPS, m_hRegion);
409c9842	76	}
04701dd9	77
8d854fa9 DW	78	HRGN m_hRegion;
8d854fa9 DW	79	HPS m_hPS;
0e320a79 DW	80	};
0e320a79 DW	81
8d854fa9	82	#define M_REGION (((wxRegionRefData*)m_refData)->m_hRegion)
6ed98c6a	83	#define M_REGION_OF(rgn) (((wxRegionRefData*)(rgn.m_refData))->m_hRegion)
0e320a79 DW	84
	85	//-----------------------------------------------------------------------------
	86	// wxRegion
	87	//-----------------------------------------------------------------------------
	88
744c5946 SN	89	// General remark:
	90	// wxRegion is always basically stored in wx coordinates. However, since
	91	// OS/2's internal functions rely on "top > bottom", the values of top and
	92	// bottom values of a region need to be interchanged, as compared to wx.
	93	// This needs to be taken into account when feeding any rectangle to wx _or_
	94	// when accessing the region data via GetBox, wxRegionIterator or otherwise.
	95
0e320a79 DW	96	/*!
	97	* Create an empty region.
	98	*/
	99	wxRegion::wxRegion()
	100	{
	101	m_refData = new wxRegionRefData;
8d854fa9	102	} // end of wxRegion::wxRegion
0e320a79	103
8d854fa9	104	wxRegion::wxRegion(
19193a2c KB	105	WXHRGN hRegion,
19193a2c KB	106	WXHDC hPS
8d854fa9	107	)
409c9842 DW	108	{
	109	m_refData = new wxRegionRefData;
	110	M_REGION = (HRGN) hRegion;
19193a2c	111	(((wxRegionRefData*)m_refData)->m_hPS) = hPS;
8d854fa9 DW	112	} // end of wxRegion::wxRegion
	113
	114	wxRegion::wxRegion(
	115	wxCoord x
	116	, wxCoord y
	117	, wxCoord vWidth
	118	, wxCoord vHeight
	119	)
0e320a79	120	{
8d854fa9 DW	121	RECTL vRect;
	122	SIZEL vSize = {0, 0};
	123	DEVOPENSTRUC vDop = {0L, "DISPLAY", NULL, 0L, 0L, 0L, 0L, 0L, 0L};
	124	HDC hDC = ::DevOpenDC( vHabmain
	125	,OD_MEMORY
	126	,"*"
	127	,5L
	128	,(PDEVOPENDATA)&vDop
	129	,NULLHANDLE
	130	);
	131
	132
	133	vRect.xLeft = x;
	134	vRect.xRight = x + vWidth;
	135	vRect.yBottom = y;
	136	vRect.yTop = y + vHeight;
	137
	138	m_refData = new wxRegionRefData;
	139
	140	//
	141	// Need a PS to create a Region
	142	//
	143	((wxRegionRefData*)m_refData)->m_hPS = ::GpiCreatePS( vHabmain
	144	,hDC
	145	,&vSize
	146	,PU_PELS \| GPIT_MICRO \| GPIA_ASSOC
	147	);
	148	M_REGION = ::GpiCreateRegion( ((wxRegionRefData*)m_refData)->m_hPS
	149	,1
	150	,&vRect
	151	);
	152	} // end of wxRegion::wxRegion
	153
ec02a2f7 WS	154	wxRegion::wxRegion(const wxPoint& rTopLeft,
ec02a2f7 WS	155	const wxPoint& rBottomRight)
0e320a79	156	{
8d854fa9 DW	157	RECTL vRect;
	158	SIZEL vSize = {0, 0};
	159	DEVOPENSTRUC vDop = {0L, "DISPLAY", NULL, 0L, 0L, 0L, 0L, 0L, 0L};
	160	HDC hDC = ::DevOpenDC( vHabmain
	161	,OD_MEMORY
	162	,"*"
	163	,5L
	164	,(PDEVOPENDATA)&vDop
	165	,NULLHANDLE
	166	);
	167
	168	vRect.xLeft = rTopLeft.x;
	169	vRect.xRight = rBottomRight.x;
744c5946 SN	170	vRect.yBottom = rTopLeft.y;
744c5946 SN	171	vRect.yTop = rBottomRight.y;
8d854fa9 DW	172
	173	m_refData = new wxRegionRefData;
	174
	175	//
	176	// Need a PS to create a Region
	177	//
	178	((wxRegionRefData*)m_refData)->m_hPS = ::GpiCreatePS( vHabmain
	179	,hDC
	180	,&vSize
	181	,PU_PELS \| GPIT_MICRO \| GPIA_ASSOC
	182	);
	183	M_REGION = ::GpiCreateRegion( ((wxRegionRefData*)m_refData)->m_hPS
	184	,1
	185	,&vRect
	186	);
	187	} // end of wxRegion::wxRegion
	188
ec02a2f7	189	wxRegion::wxRegion(const wxRect& rRect)
0e320a79	190	{
8d854fa9 DW	191	RECTL vRect;
	192	SIZEL vSize = {0, 0};
	193	DEVOPENSTRUC vDop = {0L, "DISPLAY", NULL, 0L, 0L, 0L, 0L, 0L, 0L};
	194	HDC hDC = ::DevOpenDC( vHabmain
	195	,OD_MEMORY
	196	,"*"
	197	,5L
	198	,(PDEVOPENDATA)&vDop
	199	,NULLHANDLE
	200	);
	201
	202
	203	vRect.xLeft = rRect.x;
	204	vRect.xRight = rRect.x + rRect.width;
	205	vRect.yBottom = rRect.y;
	206	vRect.yTop = rRect.y + rRect.height;
	207
	208	m_refData = new wxRegionRefData;
	209
	210	//
	211	// Need a PS to create a Region
	212	//
	213	((wxRegionRefData*)m_refData)->m_hPS = ::GpiCreatePS( vHabmain
	214	,hDC
	215	,&vSize
	216	,PU_PELS \| GPIT_MICRO \| GPIA_ASSOC
	217	);
	218	M_REGION = ::GpiCreateRegion( ((wxRegionRefData*)m_refData)->m_hPS
	219	,1
	220	,&vRect
	221	);
	222	} // end of wxRegion::wxRegion
ec02a2f7 WS	223
	224	wxRegion::wxRegion(size_t n, const wxPoint *points, int WXUNUSED(fillStyle))
	225	{
	226	// TO DO
	227	}
8d854fa9 DW	228
	229	//
	230	// Destroy the region.
	231	//
0e320a79 DW	232	wxRegion::~wxRegion()
0e320a79 DW	233	{
8d854fa9	234	} // end of wxRegion::~wxRegion
0e320a79	235
58238121 DW	236	wxObjectRefData *wxRegion::CreateData() const
	237	{
	238	return new wxRegionRefData;
	239	}
	240
70b7bcd1	241	wxObjectRefData wxRegion::CloneData(const wxObjectRefData data) const
58238121 DW	242	{
	243	return new wxRegionRefData((wxRegionRefData )data);
	244	}
	245
0e320a79 DW	246	//-----------------------------------------------------------------------------
	247	//# Modify region
	248	//-----------------------------------------------------------------------------
	249
8a16d737	250	bool wxRegion::DoOffset( wxCoord x, wxCoord y )
58238121 DW	251	{
	252	if ( !x && !y )
	253	{
	254	// nothing to do
670f9935	255	return true;
58238121 DW	256	}
	257
	258	AllocExclusive();
	259
	260	#if 0
	261	if ( ::OffsetRgn(GetHrgn(), x, y) == ERROR )
	262	{
	263	wxLogLastError(_T("OffsetRgn"));
	264
670f9935	265	return false;
58238121 DW	266	}
58238121 DW	267	#endif
670f9935	268	return true;
58238121 DW	269	}
58238121 DW	270
8d854fa9 DW	271	//
	272	// Clear current region
	273	//
0e320a79 DW	274	void wxRegion::Clear()
	275	{
	276	UnRef();
8d854fa9 DW	277	} // end of wxRegion::Clear
8d854fa9 DW	278
8d854fa9 DW	279	//
	280	// Union region with this.
	281	//
8a16d737	282	bool wxRegion::DoCombine( const wxRegion& rRegion, wxRegionOp eOp )
0e320a79	283	{
6ed98c6a DW	284	//
	285	// We can't use the API functions if we don't have a valid region handle
	286	//
	287	if (!m_refData)
	288	{
	289	// combining with an empty/invalid region works differently depending
	290	// on the operation
	291	switch (eOp)
	292	{
	293	case wxRGN_COPY:
	294	case wxRGN_OR:
	295	case wxRGN_XOR:
	296	*this = rRegion;
	297	break;
	298
	299	default:
	300	wxFAIL_MSG( _T("unknown region operation") );
	301	// fall through
	302
	303	case wxRGN_AND:
	304	case wxRGN_DIFF:
	305	// leave empty/invalid
670f9935	306	return false;
6ed98c6a DW	307	}
	308	}
	309	else // we have a valid region
	310	{
0e320a79	311
6ed98c6a	312	LONG lMode = 0;
8d854fa9	313
6ed98c6a DW	314	switch (eOp)
	315	{
	316	case wxRGN_AND:
	317	lMode = CRGN_AND;
	318	break;
	319
	320	case wxRGN_OR:
	321	lMode = CRGN_OR;
	322	break;
	323
	324	case wxRGN_XOR:
	325	lMode = CRGN_XOR;
	326	break;
	327
	328	case wxRGN_DIFF:
	329	lMode = CRGN_DIFF;
	330	break;
	331
	332	case wxRGN_COPY:
	333	default:
	334	lMode = CRGN_COPY;
	335	break;
	336	}
	337	return (::GpiCombineRegion( ((wxRegionRefData*)rRegion.m_refData)->m_hPS
	338	,M_REGION
	339	,M_REGION
	340	,((wxRegionRefData*)rRegion.m_refData)->m_hRegion
	341	,lMode
	342	) != RGN_ERROR);
0e320a79	343	}
670f9935	344	return true;
8d854fa9 DW	345	} // end of wxRegion::Combine
8d854fa9 DW	346
0e320a79 DW	347	//-----------------------------------------------------------------------------
	348	//# Information on region
	349	//-----------------------------------------------------------------------------
	350
56617718	351	bool wxRegion::DoIsEqual(const wxRegion& WXUNUSED(region)) const
8a16d737 VZ	352	{
	353	return false;
	354	}
	355
8d854fa9	356	//
0e320a79	357	// Outer bounds of region
8d854fa9	358	//
8a16d737	359	bool wxRegion::DoGetBox(
8d854fa9 DW	360	wxCoord& x
	361	, wxCoord& y
	362	, wxCoord& vWidth
	363	, wxCoord& vHeight
	364	) const
0e320a79	365	{
8d854fa9 DW	366	if (m_refData)
	367	{
	368	RECTL vRect;
19193a2c	369	APIRET rc;
8d854fa9	370
19193a2c	371	rc = ::GpiQueryRegionBox( ((wxRegionRefData*)m_refData)->m_hPS
8d854fa9 DW	372	,M_REGION
	373	,&vRect
	374	);
	375	x = vRect.xLeft;
4a46a5df	376	y = vRect.yBottom;
8d854fa9 DW	377	vWidth = vRect.xRight - vRect.xLeft;
8d854fa9 DW	378	vHeight = vRect.yTop - vRect.yBottom;
8a16d737	379	return true;
409c9842	380	}
8d854fa9 DW	381	else
	382	{
	383	x = y = vWidth = vHeight = 0L;
8a16d737	384	return false;
8d854fa9 DW	385	}
8d854fa9 DW	386	} // end of wxRegion::GetBox
0e320a79	387
8d854fa9	388	//
0e320a79	389	// Is region empty?
8d854fa9	390	//
8a16d737	391	bool wxRegion::IsEmpty() const
0e320a79	392	{
670f9935 WS	393	wxCoord x;
	394	wxCoord y;
	395	wxCoord vWidth;
	396	wxCoord vHeight;
8d854fa9 DW	397
8d854fa9 DW	398	if (M_REGION == 0)
670f9935	399	return true;
8d854fa9 DW	400
	401	GetBox( x
	402	,y
	403	,vWidth
	404	,vHeight
	405	);
	406	return ((vWidth == 0) && (vHeight == 0));
8a16d737	407	} // end of wxRegion::IsEmpty
0e320a79 DW	408
0e320a79 DW	409	//-----------------------------------------------------------------------------
8d854fa9	410	// Tests
0e320a79	411	//-----------------------------------------------------------------------------
8d854fa9	412	//
0e320a79	413	// Does the region contain the point pt?
8d854fa9	414	//
56617718	415	wxRegionContain wxRegion::DoContainsPoint( wxCoord x, wxCoord y ) const
0e320a79	416	{
56617718	417	POINTL vPoint = { x, y };
8d854fa9	418
409c9842 DW	419	if (!m_refData)
409c9842 DW	420	return wxOutRegion;
0e320a79	421
744c5946 SN	422	LONG lInside = ::GpiPtInRegion( ((wxRegionRefData*)m_refData)->m_hPS,
	423	M_REGION,
	424	&vPoint
8a16d737	425	);
8d854fa9	426	if (lInside == PRGN_INSIDE)
0e320a79 DW	427	return wxInRegion;
	428	else
	429	return wxOutRegion;
8d854fa9	430	} // end of wxRegion::Contains
0e320a79	431
8d854fa9	432	//
0e320a79	433	// Does the region contain the rectangle (x, y, w, h)?
8d854fa9	434	//
8a16d737	435	wxRegionContain wxRegion::DoContainsRect(const wxRect& rect) const
0e320a79	436	{
409c9842 DW	437	if (!m_refData)
409c9842 DW	438	return wxOutRegion;
0e320a79	439
744c5946	440	RECTL vRect;
56617718 WS	441	vRect.xLeft = rect.x;
	442	vRect.xRight = rect.x + rect.width;
	443	vRect.yTop = rect.y + rect.height;
	444	vRect.yBottom = rect.y;
0e320a79	445
744c5946 SN	446	LONG lInside = ::GpiRectInRegion( ((wxRegionRefData*)m_refData)->m_hPS,
744c5946 SN	447	M_REGION,
8a16d737	448	&vRect
744c5946 SN	449	);
	450	switch (lInside)
	451	{
	452	case RRGN_INSIDE : return wxInRegion;
	453	case RRGN_PARTIAL : return wxPartRegion;
	454	case RRGN_ERROR :
	455	default : return wxOutRegion;
	456	}
56617718	457
8d854fa9 DW	458	} // end of wxRegion::Contains
	459
	460	//
409c9842	461	// Get internal region handle
8d854fa9	462	//
409c9842 DW	463	WXHRGN wxRegion::GetHRGN() const
	464	{
	465	if (!m_refData)
	466	return (WXHRGN) 0;
	467	return (WXHRGN) M_REGION;
	468	}
	469
44227537 DW	470	//
	471	// Set a new PS, this means we have to recreate the old region in the new
	472	// PS
	473	//
	474	void wxRegion::SetPS(
	475	HPS hPS
	476	)
	477	{
	478	RGNRECT vRgnData;
	479	PRECTL pRect = NULL;
	480
53e8757b	481	vRgnData.ulDirection = RECTDIR_LFRT_TOPBOT;
44227537 DW	482	if (::GpiQueryRegionRects( ((wxRegionRefData*)m_refData)->m_hPS
	483	,((wxRegionRefData*)m_refData)->m_hRegion
	484	,NULL
	485	,&vRgnData
	486	,NULL
	487	))
	488	{
	489	pRect = new RECTL[vRgnData.crcReturned];
	490	vRgnData.crc = vRgnData.crcReturned;
	491	vRgnData.ircStart = 1;
	492	if (::GpiQueryRegionRects( ((wxRegionRefData*)m_refData)->m_hPS
	493	,((wxRegionRefData*)m_refData)->m_hRegion
	494	,NULL
	495	,&vRgnData
	496	,pRect
	497	))
	498	{
	499	//
	500	// First destroy the region out of the old PS
	501	// and then create it in the new and set the new to current
	502	//
	503	::GpiDestroyRegion( ((wxRegionRefData*)m_refData)->m_hPS
	504	,M_REGION
	505	);
	506	((wxRegionRefData*)m_refData)->m_hRegion = ::GpiCreateRegion( hPS
	507	,vRgnData.crcReturned
	508	,pRect
	509	);
	510	((wxRegionRefData*)m_refData)->m_hPS = hPS;
	511	}
	512	delete [] pRect;
	513	}
	514	} // end of wxRegion::SetPS
	515
0e320a79	516	///////////////////////////////////////////////////////////////////////////////
409c9842 DW	517	// //
	518	// wxRegionIterator //
	519	// //
0e320a79 DW	520	///////////////////////////////////////////////////////////////////////////////
0e320a79 DW	521
8d854fa9 DW	522	//
	523	// Initialize empty iterator
	524	//
	525	wxRegionIterator::wxRegionIterator()
	526	: m_lCurrent(0)
	527	, m_lNumRects(0)
	528	, m_pRects(NULL)
0e320a79	529	{
8d854fa9	530	} // end of wxRegionIterator::wxRegionIterator
0e320a79 DW	531
	532	wxRegionIterator::~wxRegionIterator()
	533	{
8d854fa9 DW	534	if (m_pRects)
	535	delete[] m_pRects;
	536	} // end of wxRegionIterator::~wxRegionIterator
	537
	538	//
	539	// Initialize iterator for region
	540	//
	541	wxRegionIterator::wxRegionIterator(
	542	const wxRegion& rRegion
	543	)
0e320a79	544	{
8d854fa9 DW	545	m_pRects = NULL;
	546	Reset(rRegion);
	547	} // end of wxRegionIterator::wxRegionIterator
	548
	549	//
	550	// Reset iterator for a new /e region.
	551	//
	552	void wxRegionIterator::Reset(
	553	const wxRegion& rRegion
	554	)
0e320a79	555	{
8d854fa9	556	m_lCurrent = 0;
0b483d6e	557	m_lNumRects = 0;
8d854fa9	558	m_vRegion = rRegion;
0e320a79	559
8d854fa9 DW	560	if (m_pRects)
8d854fa9 DW	561	delete[] m_pRects;
0e320a79	562
8d854fa9	563	m_pRects = NULL;
0e320a79	564
8d854fa9 DW	565	if (m_vRegion.Empty())
8d854fa9 DW	566	m_lNumRects = 0;
409c9842	567	else
0e320a79	568	{
8d854fa9 DW	569	RGNRECT vRgnData;
	570	PRECTL pRect;
	571
53e8757b	572	vRgnData.ulDirection = RECTDIR_LFRT_TOPBOT;
8d854fa9 DW	573	if (::GpiQueryRegionRects( ((wxRegionRefData*)rRegion.m_refData)->m_hPS // Pres space
	574	,((wxRegionRefData*)rRegion.m_refData)->m_hRegion // Handle of region to query
	575	,NULL // Return all RECTs
	576	,&vRgnData // Will contain number or RECTs in region
	577	,NULL // NULL to return number of RECTs
	578	))
	579	{
	580	pRect = new RECTL[vRgnData.crcReturned];
	581	m_pRects = new wxRect[vRgnData.crcReturned];
	582	vRgnData.crc = vRgnData.crcReturned;
	583	m_lNumRects = vRgnData.crcReturned;
	584	vRgnData.ircStart = 1;
	585	if (::GpiQueryRegionRects( ((wxRegionRefData*)rRegion.m_refData)->m_hPS // Pres space of source
	586	,((wxRegionRefData*)rRegion.m_refData)->m_hRegion // Handle of source region
	587	,NULL // Return all RECTs
	588	,&vRgnData // Operations set to return rects
	589	,pRect // Will contain the actual RECTS
	590	))
	591	{
53e8757b	592	#if 0
8d854fa9 DW	593	M_REGION = ::GpiCreateRegion( ((wxRegionRefData*)rRegion.m_refData)->m_hPS
	594	,vRgnData.crcReturned
	595	,pRect
	596	);
53e8757b	597	#endif
8d854fa9 DW	598	for( LONG i = 0; i < m_lNumRects; i++)
	599	{
	600	m_pRects[i].x = pRect[i].xLeft;
	601	m_pRects[i].width = pRect[i].xRight - pRect[i].xLeft;
	602	m_pRects[i].y = pRect[i].yBottom;
	603	m_pRects[i].height = pRect[i].yTop - pRect[i].yBottom;
	604	}
53e8757b	605	#if 0
8d854fa9	606	((wxRegionRefData)m_refData)->m_hPS = ((wxRegionRefData)rRegion.m_refData)->m_hPS;
53e8757b	607	#endif
8d854fa9 DW	608	}
8d854fa9 DW	609	}
0e320a79	610	}
8d854fa9	611	} // end of wxRegionIterator::Reset
0e320a79	612
8d854fa9 DW	613	//
	614	// Increment iterator. The rectangle returned is the one after the
	615	// incrementation.
	616	//
	617	void wxRegionIterator::operator++ ()
0e320a79	618	{
8d854fa9 DW	619	if (m_lCurrent < m_lNumRects)
	620	++m_lCurrent;
	621	} // end of wxRegionIterator::operator ++
	622
	623	//
	624	// Increment iterator. The rectangle returned is the one before the
	625	// incrementation.
	626	//
	627	void wxRegionIterator::operator++ (int)
0e320a79	628	{
8d854fa9 DW	629	if (m_lCurrent < m_lNumRects)
	630	++m_lCurrent;
	631	} // end of wxRegionIterator::operator++
0e320a79	632
0b7e7739	633	wxCoord wxRegionIterator::GetX() const
0e320a79	634	{
8d854fa9 DW	635	if (m_lCurrent < m_lNumRects)
	636	return m_pRects[m_lCurrent].x;
	637	return 0L;
	638	} // end of wxRegionIterator::GetX
0e320a79	639
0b7e7739	640	wxCoord wxRegionIterator::GetY() const
0e320a79	641	{
8d854fa9 DW	642	if (m_lCurrent < m_lNumRects)
	643	return m_pRects[m_lCurrent].y;
	644	return 0L;
	645	} // end of wxRegionIterator::GetY
0e320a79	646
0b7e7739	647	wxCoord wxRegionIterator::GetW() const
0e320a79	648	{
8d854fa9 DW	649	if (m_lCurrent < m_lNumRects)
	650	return m_pRects[m_lCurrent].width ;
	651	return 0L;
	652	} // end of wxRegionIterator::GetW
0e320a79	653
0b7e7739	654	wxCoord wxRegionIterator::GetH() const
0e320a79	655	{
8d854fa9 DW	656	if (m_lCurrent < m_lNumRects)
	657	return m_pRects[m_lCurrent].height;
	658	return 0L;
	659	} // end of wxRegionIterator::GetH