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

///////////////////////////////////////////////////////////////////////////////
// Name:        src/os2/dnd.cpp
// Purpose:     wxDropTarget, wxDropSource, wxDataObject implementation
// Author:      David Webster
// Modified by:
// Created:     10/21/99
// RCS-ID:      $Id$
// Copyright:   (c) 1998 AUTHOR
// Licence:     wxWindows licence
///////////////////////////////////////////////////////////////////////////////

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

#if wxUSE_DRAG_AND_DROP

#include "wx/window.h"
#include "wx/app.h"
#include "wx/gdicmn.h"
#include "wx/dnd.h"

#define INCL_PM
#define INCL_DOS
#include <os2.h>

// ----------------------------------------------------------------------------
// global
// ----------------------------------------------------------------------------

/////////////////////////////////////////////////////////////////////////////
// Private functions
/////////////////////////////////////////////////////////////////////////////

#if 0
static wxDragResult ConvertDragEffectToResult (
  DWORD                             dwEffect
)
{
    switch (dwEffect)
    {
        case DO_COPY:
            return wxDragCopy;

        case DO_LINK:
            return wxDragLink;

        case DO_MOVE:
            return wxDragMove;

        default:
        case DO_DEFAULT:
            return wxDragNone;
    }
} // end of ConvertDragEffectToResult

static DWORD ConvertDragResultToEffect (
  wxDragResult                      eResult
)
{
    switch (eResult)
    {
        case wxDragCopy:
            return DO_COPY;

        case wxDragLink:
            return DO_LINK;

        case wxDragMove:
            return DO_MOVE;

        default:
        case wxDragNone:
            return DO_DEFAULT;
    }
} // end of ConvertDragResultToEffect
#endif

class CIDropTarget
{
public:
    CIDropTarget(wxDropTarget* pTarget)
    {
        m_pTarget   = pTarget;
        m_pDragItem = NULL;
    }
    virtual ~CIDropTarget() { }

    //
    // Accessors for CDropTarget
    //
    void      Free(void) { ::DrgFreeDraginfo(m_pDragInfo); }
    PDRAGINFO GetDataSource(void) { return m_pDragInfo; }
    void      SetDataSource(PDRAGINFO pDragInfo) { m_pDragInfo = pDragInfo; }
    void      SetHWND(HWND hWnd) { m_hWnd = hWnd; }

    //
    // CIDropTarget methods
    //
           bool    DragLeave(void);
           MRESULT DragOver(void);
           MRESULT Drop(void);

protected:

    PDRAGINFO                       m_pDragInfo;
    PDRAGITEM                       m_pDragItem; // !NULL between DragEnter and DragLeave/Drop
    wxDropTarget*                   m_pTarget;   // the real target (we're just a proxy)
    HWND                            m_hWnd;      // window we're associated with
}; // end of CLASS CIDropTarget

bool CIDropTarget::DragLeave()
{
    //
    // Remove the UI feedback
    //
    m_pTarget->OnLeave();

    //
    // Release the held object
    //
    Free();
    return true;
} // end of CIDropTarget::DragLeave

MRESULT CIDropTarget::DragOver ()
{
    char                            zBuffer[128];
    ULONG                           ulBytes;
    USHORT                          uOp = 0;
    USHORT                          uIndicator;
    ULONG                           ulItems;
    ULONG                           i;

    ::DrgAccessDraginfo(m_pDragInfo);
    switch(m_pDragInfo->usOperation)
    {
        case DO_UNKNOWN:
            Free();
            return (MRFROM2SHORT(DOR_NODROPOP, 0));

        case DO_DEFAULT:
            m_pDragItem = ::DrgQueryDragitemPtr(m_pDragInfo, 0);
            ulBytes     = ::DrgQueryStrName( m_pDragItem->hstrContainerName
                                            ,128
                                            ,zBuffer
                                           );
            if (!ulBytes)
                return (MRFROM2SHORT(DOR_NODROPOP, 0));
            else
                uOp = DO_MOVE;
            break;

        case DO_COPY:
        case DO_MOVE:
            uOp = m_pDragInfo->usOperation;
            break;
    }
    uIndicator = DOR_DROP;
    ulItems = (ULONG)::DrgQueryDragitemCount(m_pDragInfo);
    for (i = 0; i < ulItems; i++)
    {
        m_pDragItem = ::DrgQueryDragitemPtr(m_pDragInfo, i);
        if (((m_pDragItem->fsSupportedOps & DO_COPYABLE) &&
             (uOp == (USHORT)DO_COPY))                   ||
            ((m_pDragItem->fsSupportedOps & DO_MOVEABLE) &&
             (uOp == (USHORT)DO_COPY)))
        {
            if (::DrgVerifyRMF(m_pDragItem, "DRM_OS2FILE", "DRF_UNKNOWN"))
                uIndicator = (USHORT)DOR_DROP;
            else
                uIndicator = (USHORT)DOR_NEVERDROP;
        }
    }
    Free();
    return (MRFROM2SHORT(uIndicator, uOp));
} // end of CIDropTarget::DragOver

// #pragma page   "CIDropTarget::Drop"
/////////////////////////////////////////////////////////////////////////////
//
// CIDropTarget::Drop
//
//   Instructs the drop target to paste data that was just now dropped on it.
//
// PARAMETERS
//   pIDataSource -- the data to paste
//   dwKeyState   -- kbd & mouse state
//   pt           -- mouse coordinates
//   pdwEffect    -- effect flag
//
// RETURN VALUE
//  STDMETHODIMP S_OK
//
/////////////////////////////////////////////////////////////////////////////
MRESULT CIDropTarget::Drop ()
{
    char                            zBuffer[128];
    ULONG                           ulBytes;
    USHORT                          uOp = 0;
    USHORT                          uIndicator;
    ULONG                           ulItems;
    ULONG                           i;

    ::DrgAccessDraginfo(m_pDragInfo);
    switch(m_pDragInfo->usOperation)
    {
        case DO_UNKNOWN:
            Free();
            return (MRFROM2SHORT(DOR_NODROPOP, 0));

        case DO_DEFAULT:
            m_pDragItem = ::DrgQueryDragitemPtr(m_pDragInfo, 0);
            ulBytes     = ::DrgQueryStrName( m_pDragItem->hstrContainerName
                                            ,128
                                            ,zBuffer
                                           );
            if (!ulBytes)
                return (MRFROM2SHORT(DOR_NODROPOP, 0));
            else
                uOp = DO_MOVE;
            break;

        case DO_COPY:
        case DO_MOVE:
            uOp = m_pDragInfo->usOperation;
            break;
    }
    uIndicator = DOR_DROP;
    ulItems = (ULONG)::DrgQueryDragitemCount(m_pDragInfo);
    for (i = 0; i < ulItems; i++)
    {
        m_pDragItem = ::DrgQueryDragitemPtr(m_pDragInfo, i);
        if (((m_pDragItem->fsSupportedOps & DO_COPYABLE) &&
             (uOp == (USHORT)DO_COPY))                   ||
            ((m_pDragItem->fsSupportedOps & DO_MOVEABLE) &&
             (uOp == (USHORT)DO_COPY)))
        {
            if (::DrgVerifyRMF(m_pDragItem, "DRM_OS2FILE", "DRF_UNKNOWN"))
                uIndicator = (USHORT)DOR_DROP;
            else
                uIndicator = (USHORT)DOR_NEVERDROP;
        }
    }

    //
    // First ask the drop target if it wants data
    //
    if (m_pTarget->OnDrop( m_pDragInfo->xDrop
                          ,m_pDragInfo->yDrop
                         ))
    {
        wxDragResult                 eRc = wxDragNone;

        //
        // And now it has the data
        //
        eRc = m_pTarget->OnData( m_pDragInfo->xDrop
                                ,m_pDragInfo->yDrop
                                ,eRc
                               );
    }
    //else: OnDrop() returned false, no need to copy data

    //
    // Release the held object
    //
    Free();
    return (MRFROM2SHORT(uIndicator, uOp));
} // end of CIDropTarget::Drop

// ----------------------------------------------------------------------------
// wxDropTarget
// ----------------------------------------------------------------------------

wxDropTarget::wxDropTarget (
  wxDataObject*                     pDataObject
)
{
    m_dataObject  = pDataObject;
    m_pDropTarget = new CIDropTarget(this);
} // end of wxDropTarget::wxDropTarget

wxDropTarget::~wxDropTarget()
{
    Release();
} // end of wxDropTarget::~wxDropTarget

bool wxDropTarget::GetData ()
{
    wxDataFormat                    vFormat = GetSupportedFormat(m_pDropTarget->GetDataSource());

    if (vFormat == wxDF_INVALID)
    {
        return false;
    }
    //
    // Under OS/2 we already have the data via the attached DRAGITEM's
    //
    return true;
} // end of wxDropTarget::GetData

wxDataFormat wxDropTarget::GetSupportedFormat (
  PDRAGINFO                         pDataSource
) const
{
    PDRAGITEM                       pDragItem;
    wxDataFormat                    vFormat;
    wxDataFormat*                   pFormats;
    ULONG                           ulFormats = m_dataObject->GetFormatCount(wxDataObject::Set);
    ULONG                           ulItems = (ULONG)::DrgQueryDragitemCount(pDataSource);
    ULONG                           i;
    ULONG                           n;
    wxString                        sMechanism;
    wxString                        sFormat;
    bool                            bValid = false;

    pFormats = ulFormats == 1 ? &vFormat :  new wxDataFormat[ulFormats];
    m_dataObject->GetAllFormats( pFormats
                                ,wxDataObject::Set
                               );

    for (n = 0; n < ulFormats; n++)
    {
        switch(pFormats[n].GetType())
        {
            case wxDF_TEXT:
            case wxDF_FILENAME:
            case wxDF_HTML:
                sMechanism = _T("DRM_OS2FILE");
                sFormat    = _T("DRF_TEXT");
                break;

            case wxDF_OEMTEXT:
                sMechanism = _T("DRM_OS2FILE");
                sFormat    = _T("DRF_OEMTEXT");
                break;

            case wxDF_BITMAP:
                sMechanism = _T("DRM_OS2FILE");
                sFormat    = _T("DRF_BITMAP");
                break;

            case wxDF_METAFILE:
            case wxDF_ENHMETAFILE:
                sMechanism = _T("DRM_OS2FILE");
                sFormat    = _T("DRF_METAFILE");
                break;

            case wxDF_TIFF:
                sMechanism = _T("DRM_OS2FILE");
                sFormat    = _T("DRF_TIFF");
                break;

            case wxDF_SYLK:
                sMechanism = _T("DRM_OS2FILE");
                sFormat    = _T("DRF_SYLK");
                break;

            case wxDF_DIF:
                sMechanism = _T("DRM_OS2FILE");
                sFormat    = _T("DRF_DIF");
                break;

            case wxDF_DIB:
                sMechanism = _T("DRM_OS2FILE");
                sFormat    = _T("DRF_DIB");
                break;

            case wxDF_PALETTE:
            case wxDF_PENDATA:
            case wxDF_RIFF:
            case wxDF_WAVE:
            case wxDF_UNICODETEXT:
            case wxDF_LOCALE:
                sMechanism = _T("DRM_OS2FILE");
                sFormat    = _T("DRF_UNKNOWN");
                break;

            case wxDF_PRIVATE:
                sMechanism = _T("DRM_OBJECT");
                sFormat    = _T("DRF_UNKNOWN");
                break;
        }
        for (i = 0; i < ulItems; i++)
        {
            pDragItem = ::DrgQueryDragitemPtr(pDataSource, i);
            if (::DrgVerifyRMF(pDragItem, (PSZ)sMechanism.c_str(), (PSZ)sFormat.c_str()))
            {
                bValid = true;
                break;
            }
        }
        if (bValid)
        {
            vFormat = pFormats[n];
            break;
        }
    }
    if (pFormats != &vFormat)
    {
        //
        // Free memory if we allocated it
        //
        delete [] pFormats;
    }
    return (n < ulFormats ? vFormat : wxFormatInvalid);
} // end of wxDropTarget::GetSupportedFormat

bool wxDropTarget::IsAcceptedData (
  PDRAGINFO                         pDataSource
) const
{
    return (GetSupportedFormat(pDataSource) != wxDF_INVALID);
} // end of wxDropTarget::IsAcceptedData

void wxDropTarget::Release ()
{
    m_pDropTarget->Free();
} // end of wxDropTarget::Release


wxDragResult wxDropTarget::OnData (
  wxCoord                           WXUNUSED(vX)
, wxCoord                           WXUNUSED(y)
, wxDragResult                      WXUNUSED(vResult)
)
{
    return (wxDragResult)0;
} // end of wxDropTarget::OnData

bool wxDropTarget::OnDrop (
  wxCoord                           WXUNUSED(x)
, wxCoord                           WXUNUSED(y)
)
{
    return true;
} // end of wxDropTarget::OnDrop

//-------------------------------------------------------------------------
// wxDropSource
//-------------------------------------------------------------------------

wxDropSource::wxDropSource ( wxWindow* WXUNUSED(pWin) )
{
    Init();
} // end of wxDropSource::wxDropSource

wxDropSource::wxDropSource ( wxDataObject& rData, wxWindow* WXUNUSED(pWin) )
{
    Init();
    SetData(rData);
} // end of wxDropSource::wxDropSource

wxDropSource::~wxDropSource ()
{
    ::DrgFreeDraginfo(m_pDragInfo);
} // end of wxDropSource::~wxDropSource

wxDragResult wxDropSource::DoDragDrop (
  int                              WXUNUSED(flags)
)
{
    //
    // Need to specify drag items in derived classes that know their data types
    // before calling DoDragDrop
    //
    if (::DrgDrag( m_pWindow->GetHWND()
                  ,m_pDragInfo
                  ,&m_vDragImage
                  ,m_ulItems
                  ,VK_BUTTON2
                  ,NULL
                 ) != NULLHANDLE)
    {
        switch(m_pDragInfo->usOperation)
        {
            case DO_COPY:
                return wxDragCopy;

            case DO_MOVE:
                return wxDragCopy;

            case DO_LINK:
                return wxDragCopy;

            default:
                return wxDragNone;
        }
    }
    return wxDragError;
} // end of wxDropSource::DoDragDrop

bool wxDropSource::GiveFeedback (
  wxDragResult                      eEffect
)
{
    const wxCursor&                 rCursor = GetCursor(eEffect);

    if (rCursor.Ok())
    {
        ::WinSetPointer(HWND_DESKTOP, (HPOINTER)rCursor.GetHCURSOR());
        m_vDragImage.hImage = (LHANDLE)rCursor.GetHCURSOR();
        switch(eEffect)
        {
            case wxDragCopy:
                m_pDragInfo->usOperation = DO_COPY;
                break;

            case wxDragMove:
                m_pDragInfo->usOperation = DO_MOVE;
                break;

            case wxDragLink:
                m_pDragInfo->usOperation = DO_LINK;
                break;

            case wxDragNone:
            case wxDragCancel:
            case wxDragError:
                break;
        }
        return true;
    }
    else
    {
        return false;
    }
} // end of GuiAdvDnd_CDropSource::GiveFeedback

void wxDropSource::Init ()
{
    m_pDragInfo = ::DrgAllocDraginfo(m_ulItems);

    //
    // Set a default drag image struct with what we know so far
    //
    m_vDragImage.cb             = sizeof(DRAGIMAGE);
    m_vDragImage.cptl           = 0;  // non-zero if fl is DRG_POLYGON
    m_vDragImage.hImage         = 0;  // Set in GiveFeedback
    m_vDragImage.sizlStretch.cx = 20L;
    m_vDragImage.sizlStretch.cy = 20L;
    m_vDragImage.fl             = DRG_ICON | DRG_STRETCH;
    m_vDragImage.cxOffset       = 0;
    m_vDragImage.cyOffset       = 0;

    HSTR    hStrType = ::DrgAddStrHandle(DRT_UNKNOWN);
    HSTR    hStrRMF;
    HSTR    hStrContainer;
    wxChar  zFormats[128];
    wxChar  zContainer[128];
    USHORT  uSize = (USHORT)(GetDataObject()->GetDataSize(GetDataObject()->GetPreferredFormat()) + 1);
    wxChar* pzBuffer = new wxChar[uSize];

    memset(pzBuffer, '\0', GetDataObject()->GetDataSize(GetDataObject()->GetPreferredFormat()));
    pzBuffer[GetDataObject()->GetDataSize(GetDataObject()->GetPreferredFormat())] = '\0';
    GetDataObject()->GetDataHere( GetDataObject()->GetPreferredFormat()
                                 ,(void*)pzBuffer
                                );

    wxStrcpy(zFormats, _T("<DRM_OS2FILE, DRF_UNKNOWN>"));
    wxStrcpy(zContainer, GetDataObject()->GetPreferredFormat().GetId());

    hStrRMF       = ::DrgAddStrHandle((PSZ)zFormats);
    hStrContainer = ::DrgAddStrHandle((PSZ)zContainer);

    m_pDragItem = new DRAGITEM[m_ulItems];
    for (ULONG i = 0; i < m_ulItems; i++)
    {
        m_pDragItem[i].hwndItem          = m_pWindow->GetHWND();
        m_pDragItem[i].hstrType          = hStrType;
        m_pDragItem[i].hstrRMF           = hStrRMF;
        m_pDragItem[i].hstrContainerName = hStrContainer;
        m_pDragItem[i].fsControl         = 0;
        m_pDragItem[i].fsSupportedOps    = DO_COPYABLE | DO_MOVEABLE | DO_LINKABLE;
        m_pDragItem[i].hstrSourceName    = ::DrgAddStrHandle((PSZ)pzBuffer);
        m_pDragItem[i].hstrTargetName    = m_pDragItem[i].hstrSourceName;
        m_pDragItem[i].ulItemID          = i;
        ::DrgSetDragitem( m_pDragInfo
                         ,&m_pDragItem[i]
                         ,sizeof(DRAGITEM)
                         ,0
                        );
    }
    delete [] pzBuffer;
    delete [] m_pDragItem;
} // end of wxDropSource::Init

#endif //wxUSE_DRAG_AND_DROP
Commit	Line	Data
0e320a79	1	///////////////////////////////////////////////////////////////////////////////
cb7d7375	2	// Name: src/os2/dnd.cpp
0e320a79	3	// Purpose: wxDropTarget, wxDropSource, wxDataObject implementation
6dddc146	4	// Author: David Webster
0e320a79	5	// Modified by:
6dddc146	6	// Created: 10/21/99
0e320a79 DW	7	// RCS-ID: $Id$
0e320a79 DW	8	// Copyright: (c) 1998 AUTHOR
65571936	9	// Licence: wxWindows licence
0e320a79 DW	10	///////////////////////////////////////////////////////////////////////////////
0e320a79 DW	11
6670f564 WS	12	// For compilers that support precompilation, includes "wx.h".
	13	#include "wx/wxprec.h"
	14
	15	#if wxUSE_DRAG_AND_DROP
	16
0e320a79 DW	17	#include "wx/window.h"
	18	#include "wx/app.h"
	19	#include "wx/gdicmn.h"
e6ebb514	20	#include "wx/dnd.h"
0e320a79	21
55945915 SN	22	#define INCL_PM
	23	#define INCL_DOS
	24	#include <os2.h>
	25
0e320a79 DW	26	// ----------------------------------------------------------------------------
	27	// global
	28	// ----------------------------------------------------------------------------
	29
4fd899b6 DW	30	/////////////////////////////////////////////////////////////////////////////
	31	// Private functions
	32	/////////////////////////////////////////////////////////////////////////////
	33
9923c37d	34	#if 0
4fd899b6 DW	35	static wxDragResult ConvertDragEffectToResult (
	36	DWORD dwEffect
	37	)
	38	{
	39	switch (dwEffect)
	40	{
	41	case DO_COPY:
	42	return wxDragCopy;
	43
	44	case DO_LINK:
	45	return wxDragLink;
	46
	47	case DO_MOVE:
	48	return wxDragMove;
	49
	50	default:
	51	case DO_DEFAULT:
	52	return wxDragNone;
	53	}
	54	} // end of ConvertDragEffectToResult
	55
	56	static DWORD ConvertDragResultToEffect (
	57	wxDragResult eResult
	58	)
	59	{
	60	switch (eResult)
	61	{
	62	case wxDragCopy:
	63	return DO_COPY;
	64
	65	case wxDragLink:
	66	return DO_LINK;
	67
	68	case wxDragMove:
	69	return DO_MOVE;
	70
	71	default:
	72	case wxDragNone:
	73	return DO_DEFAULT;
	74	}
	75	} // end of ConvertDragResultToEffect
9923c37d	76	#endif
4fd899b6 DW	77
	78	class CIDropTarget
	79	{
	80	public:
	81	CIDropTarget(wxDropTarget* pTarget)
	82	{
	83	m_pTarget = pTarget;
	84	m_pDragItem = NULL;
	85	}
	86	virtual ~CIDropTarget() { }
	87
	88	//
	89	// Accessors for CDropTarget
	90	//
	91	void Free(void) { ::DrgFreeDraginfo(m_pDragInfo); }
	92	PDRAGINFO GetDataSource(void) { return m_pDragInfo; }
	93	void SetDataSource(PDRAGINFO pDragInfo) { m_pDragInfo = pDragInfo; }
	94	void SetHWND(HWND hWnd) { m_hWnd = hWnd; }
	95
	96	//
	97	// CIDropTarget methods
	98	//
	99	bool DragLeave(void);
	100	MRESULT DragOver(void);
	101	MRESULT Drop(void);
	102
	103	protected:
	104
	105	PDRAGINFO m_pDragInfo;
	106	PDRAGITEM m_pDragItem; // !NULL between DragEnter and DragLeave/Drop
	107	wxDropTarget* m_pTarget; // the real target (we're just a proxy)
	108	HWND m_hWnd; // window we're associated with
	109	}; // end of CLASS CIDropTarget
	110
	111	bool CIDropTarget::DragLeave()
	112	{
	113	//
	114	// Remove the UI feedback
	115	//
	116	m_pTarget->OnLeave();
	117
	118	//
	119	// Release the held object
	120	//
	121	Free();
d0ee33f5	122	return true;
4fd899b6 DW	123	} // end of CIDropTarget::DragLeave
	124
	125	MRESULT CIDropTarget::DragOver ()
	126	{
	127	char zBuffer[128];
	128	ULONG ulBytes;
322d45dd	129	USHORT uOp = 0;
4fd899b6 DW	130	USHORT uIndicator;
	131	ULONG ulItems;
	132	ULONG i;
	133
	134	::DrgAccessDraginfo(m_pDragInfo);
	135	switch(m_pDragInfo->usOperation)
	136	{
	137	case DO_UNKNOWN:
	138	Free();
	139	return (MRFROM2SHORT(DOR_NODROPOP, 0));
	140
	141	case DO_DEFAULT:
	142	m_pDragItem = ::DrgQueryDragitemPtr(m_pDragInfo, 0);
	143	ulBytes = ::DrgQueryStrName( m_pDragItem->hstrContainerName
	144	,128
	145	,zBuffer
	146	);
	147	if (!ulBytes)
	148	return (MRFROM2SHORT(DOR_NODROPOP, 0));
	149	else
	150	uOp = DO_MOVE;
	151	break;
	152
	153	case DO_COPY:
	154	case DO_MOVE:
	155	uOp = m_pDragInfo->usOperation;
	156	break;
	157	}
	158	uIndicator = DOR_DROP;
	159	ulItems = (ULONG)::DrgQueryDragitemCount(m_pDragInfo);
	160	for (i = 0; i < ulItems; i++)
	161	{
	162	m_pDragItem = ::DrgQueryDragitemPtr(m_pDragInfo, i);
	163	if (((m_pDragItem->fsSupportedOps & DO_COPYABLE) &&
	164	(uOp == (USHORT)DO_COPY)) \|\|
	165	((m_pDragItem->fsSupportedOps & DO_MOVEABLE) &&
	166	(uOp == (USHORT)DO_COPY)))
	167	{
	168	if (::DrgVerifyRMF(m_pDragItem, "DRM_OS2FILE", "DRF_UNKNOWN"))
	169	uIndicator = (USHORT)DOR_DROP;
	170	else
	171	uIndicator = (USHORT)DOR_NEVERDROP;
	172	}
	173	}
	174	Free();
	175	return (MRFROM2SHORT(uIndicator, uOp));
	176	} // end of CIDropTarget::DragOver
	177
	178	// #pragma page "CIDropTarget::Drop"
	179	/////////////////////////////////////////////////////////////////////////////
	180	//
	181	// CIDropTarget::Drop
	182	//
	183	// Instructs the drop target to paste data that was just now dropped on it.
	184	//
	185	// PARAMETERS
	186	// pIDataSource -- the data to paste
	187	// dwKeyState -- kbd & mouse state
	188	// pt -- mouse coordinates
	189	// pdwEffect -- effect flag
	190	//
	191	// RETURN VALUE
	192	// STDMETHODIMP S_OK
	193	//
194	/////////////////////////////////////////////////////////////////////////////
195	MRESULT CIDropTarget::Drop ()
196	{
197	char zBuffer[128];
198	ULONG ulBytes;
322d45dd	199	USHORT uOp = 0;
4fd899b6 DW	200	USHORT uIndicator;
	201	ULONG ulItems;
	202	ULONG i;
	203
	204	::DrgAccessDraginfo(m_pDragInfo);
	205	switch(m_pDragInfo->usOperation)
	206	{
	207	case DO_UNKNOWN:
	208	Free();
	209	return (MRFROM2SHORT(DOR_NODROPOP, 0));
	210
	211	case DO_DEFAULT:
	212	m_pDragItem = ::DrgQueryDragitemPtr(m_pDragInfo, 0);
	213	ulBytes = ::DrgQueryStrName( m_pDragItem->hstrContainerName
	214	,128
	215	,zBuffer
	216	);
	217	if (!ulBytes)
	218	return (MRFROM2SHORT(DOR_NODROPOP, 0));
	219	else
	220	uOp = DO_MOVE;
	221	break;
	222
	223	case DO_COPY:
	224	case DO_MOVE:
	225	uOp = m_pDragInfo->usOperation;
	226	break;
	227	}
	228	uIndicator = DOR_DROP;
	229	ulItems = (ULONG)::DrgQueryDragitemCount(m_pDragInfo);
	230	for (i = 0; i < ulItems; i++)
	231	{
	232	m_pDragItem = ::DrgQueryDragitemPtr(m_pDragInfo, i);
	233	if (((m_pDragItem->fsSupportedOps & DO_COPYABLE) &&
	234	(uOp == (USHORT)DO_COPY)) \|\|
	235	((m_pDragItem->fsSupportedOps & DO_MOVEABLE) &&
	236	(uOp == (USHORT)DO_COPY)))
	237	{
	238	if (::DrgVerifyRMF(m_pDragItem, "DRM_OS2FILE", "DRF_UNKNOWN"))
	239	uIndicator = (USHORT)DOR_DROP;
	240	else
	241	uIndicator = (USHORT)DOR_NEVERDROP;
	242	}
	243	}
	244
	245	//
	246	// First ask the drop target if it wants data
	247	//
	248	if (m_pTarget->OnDrop( m_pDragInfo->xDrop
	249	,m_pDragInfo->yDrop
	250	))
	251	{
d0ee33f5	252	wxDragResult eRc = wxDragNone;
4fd899b6 DW	253
	254	//
	255	// And now it has the data
	256	//
	257	eRc = m_pTarget->OnData( m_pDragInfo->xDrop
	258	,m_pDragInfo->yDrop
	259	,eRc
	260	);
	261	}
d0ee33f5	262	//else: OnDrop() returned false, no need to copy data
4fd899b6 DW	263
	264	//
	265	// Release the held object
	266	//
	267	Free();
	268	return (MRFROM2SHORT(uIndicator, uOp));
	269	} // end of CIDropTarget::Drop
	270
0e320a79 DW	271	// ----------------------------------------------------------------------------
	272	// wxDropTarget
	273	// ----------------------------------------------------------------------------
	274
4fd899b6	275	wxDropTarget::wxDropTarget (
6dddc146 DW	276	wxDataObject* pDataObject
6dddc146 DW	277	)
0e320a79	278	{
4fd899b6 DW	279	m_dataObject = pDataObject;
	280	m_pDropTarget = new CIDropTarget(this);
	281	} // end of wxDropTarget::wxDropTarget
0e320a79 DW	282
	283	wxDropTarget::~wxDropTarget()
	284	{
4fd899b6 DW	285	Release();
4fd899b6 DW	286	} // end of wxDropTarget::~wxDropTarget
0e320a79	287
4fd899b6	288	bool wxDropTarget::GetData ()
6dddc146	289	{
4fd899b6	290	wxDataFormat vFormat = GetSupportedFormat(m_pDropTarget->GetDataSource());
0e320a79	291
4fd899b6 DW	292	if (vFormat == wxDF_INVALID)
4fd899b6 DW	293	{
d0ee33f5	294	return false;
4fd899b6 DW	295	}
	296	//
	297	// Under OS/2 we already have the data via the attached DRAGITEM's
	298	//
d0ee33f5	299	return true;
4fd899b6 DW	300	} // end of wxDropTarget::GetData
	301
	302	wxDataFormat wxDropTarget::GetSupportedFormat (
	303	PDRAGINFO pDataSource
	304	) const
0e320a79	305	{
4fd899b6 DW	306	PDRAGITEM pDragItem;
	307	wxDataFormat vFormat;
	308	wxDataFormat* pFormats;
	309	ULONG ulFormats = m_dataObject->GetFormatCount(wxDataObject::Set);
	310	ULONG ulItems = (ULONG)::DrgQueryDragitemCount(pDataSource);
	311	ULONG i;
	312	ULONG n;
	313	wxString sMechanism;
	314	wxString sFormat;
d0ee33f5	315	bool bValid = false;
0e320a79	316
4fd899b6 DW	317	pFormats = ulFormats == 1 ? &vFormat : new wxDataFormat[ulFormats];
	318	m_dataObject->GetAllFormats( pFormats
	319	,wxDataObject::Set
	320	);
	321
	322	for (n = 0; n < ulFormats; n++)
	323	{
	324	switch(pFormats[n].GetType())
	325	{
	326	case wxDF_TEXT:
	327	case wxDF_FILENAME:
	328	case wxDF_HTML:
0fba44b4 DW	329	sMechanism = _T("DRM_OS2FILE");
0fba44b4 DW	330	sFormat = _T("DRF_TEXT");
4fd899b6 DW	331	break;
	332
	333	case wxDF_OEMTEXT:
0fba44b4 DW	334	sMechanism = _T("DRM_OS2FILE");
0fba44b4 DW	335	sFormat = _T("DRF_OEMTEXT");
4fd899b6 DW	336	break;
	337
	338	case wxDF_BITMAP:
0fba44b4 DW	339	sMechanism = _T("DRM_OS2FILE");
0fba44b4 DW	340	sFormat = _T("DRF_BITMAP");
4fd899b6 DW	341	break;
	342
	343	case wxDF_METAFILE:
	344	case wxDF_ENHMETAFILE:
0fba44b4 DW	345	sMechanism = _T("DRM_OS2FILE");
0fba44b4 DW	346	sFormat = _T("DRF_METAFILE");
4fd899b6 DW	347	break;
	348
	349	case wxDF_TIFF:
0fba44b4 DW	350	sMechanism = _T("DRM_OS2FILE");
0fba44b4 DW	351	sFormat = _T("DRF_TIFF");
4fd899b6 DW	352	break;
	353
	354	case wxDF_SYLK:
0fba44b4 DW	355	sMechanism = _T("DRM_OS2FILE");
0fba44b4 DW	356	sFormat = _T("DRF_SYLK");
4fd899b6 DW	357	break;
	358
	359	case wxDF_DIF:
0fba44b4 DW	360	sMechanism = _T("DRM_OS2FILE");
0fba44b4 DW	361	sFormat = _T("DRF_DIF");
4fd899b6 DW	362	break;
	363
	364	case wxDF_DIB:
0fba44b4 DW	365	sMechanism = _T("DRM_OS2FILE");
0fba44b4 DW	366	sFormat = _T("DRF_DIB");
4fd899b6 DW	367	break;
	368
	369	case wxDF_PALETTE:
	370	case wxDF_PENDATA:
	371	case wxDF_RIFF:
	372	case wxDF_WAVE:
	373	case wxDF_UNICODETEXT:
	374	case wxDF_LOCALE:
0fba44b4 DW	375	sMechanism = _T("DRM_OS2FILE");
0fba44b4 DW	376	sFormat = _T("DRF_UNKNOWN");
4fd899b6 DW	377	break;
	378
	379	case wxDF_PRIVATE:
0fba44b4 DW	380	sMechanism = _T("DRM_OBJECT");
0fba44b4 DW	381	sFormat = _T("DRF_UNKNOWN");
4fd899b6 DW	382	break;
	383	}
	384	for (i = 0; i < ulItems; i++)
	385	{
	386	pDragItem = ::DrgQueryDragitemPtr(pDataSource, i);
0fba44b4	387	if (::DrgVerifyRMF(pDragItem, (PSZ)sMechanism.c_str(), (PSZ)sFormat.c_str()))
4fd899b6	388	{
d0ee33f5	389	bValid = true;
4fd899b6 DW	390	break;
	391	}
	392	}
	393	if (bValid)
	394	{
	395	vFormat = pFormats[n];
	396	break;
	397	}
	398	}
	399	if (pFormats != &vFormat)
	400	{
	401	//
	402	// Free memory if we allocated it
	403	//
	404	delete [] pFormats;
	405	}
	406	return (n < ulFormats ? vFormat : wxFormatInvalid);
	407	} // end of wxDropTarget::GetSupportedFormat
	408
	409	bool wxDropTarget::IsAcceptedData (
	410	PDRAGINFO pDataSource
	411	) const
0e320a79	412	{
4fd899b6 DW	413	return (GetSupportedFormat(pDataSource) != wxDF_INVALID);
4fd899b6 DW	414	} // end of wxDropTarget::IsAcceptedData
0e320a79	415
4fd899b6	416	void wxDropTarget::Release ()
0e320a79	417	{
4fd899b6 DW	418	m_pDropTarget->Free();
	419	} // end of wxDropTarget::Release
	420
0e320a79	421
4fd899b6 DW	422	wxDragResult wxDropTarget::OnData (
	423	wxCoord WXUNUSED(vX)
	424	, wxCoord WXUNUSED(y)
	425	, wxDragResult WXUNUSED(vResult)
004fd0c8 DW	426	)
004fd0c8 DW	427	{
004fd0c8	428	return (wxDragResult)0;
4fd899b6	429	} // end of wxDropTarget::OnData
004fd0c8	430
4fd899b6 DW	431	bool wxDropTarget::OnDrop (
	432	wxCoord WXUNUSED(x)
	433	, wxCoord WXUNUSED(y)
6dddc146 DW	434	)
6dddc146 DW	435	{
d0ee33f5	436	return true;
4fd899b6	437	} // end of wxDropTarget::OnDrop
0e320a79	438
0e320a79 DW	439	//-------------------------------------------------------------------------
	440	// wxDropSource
	441	//-------------------------------------------------------------------------
	442
cb7d7375	443	wxDropSource::wxDropSource ( wxWindow* WXUNUSED(pWin) )
0e320a79	444	{
4fd899b6 DW	445	Init();
4fd899b6 DW	446	} // end of wxDropSource::wxDropSource
0e320a79	447
cb7d7375	448	wxDropSource::wxDropSource ( wxDataObject& rData, wxWindow* WXUNUSED(pWin) )
0e320a79	449	{
4fd899b6 DW	450	Init();
	451	SetData(rData);
	452	} // end of wxDropSource::wxDropSource
0e320a79	453
4fd899b6	454	wxDropSource::~wxDropSource ()
0e320a79	455	{
4fd899b6 DW	456	::DrgFreeDraginfo(m_pDragInfo);
4fd899b6 DW	457	} // end of wxDropSource::~wxDropSource
0e320a79	458
4fd899b6	459	wxDragResult wxDropSource::DoDragDrop (
2245b2b2	460	int WXUNUSED(flags)
6dddc146	461	)
0e320a79	462	{
4fd899b6 DW	463	//
	464	// Need to specify drag items in derived classes that know their data types
	465	// before calling DoDragDrop
	466	//
	467	if (::DrgDrag( m_pWindow->GetHWND()
	468	,m_pDragInfo
	469	,&m_vDragImage
	470	,m_ulItems
	471	,VK_BUTTON2
	472	,NULL
	473	) != NULLHANDLE)
	474	{
	475	switch(m_pDragInfo->usOperation)
	476	{
	477	case DO_COPY:
	478	return wxDragCopy;
	479
	480	case DO_MOVE:
	481	return wxDragCopy;
	482
	483	case DO_LINK:
	484	return wxDragCopy;
	485
	486	default:
	487	return wxDragNone;
	488	}
	489	}
6dddc146	490	return wxDragError;
4fd899b6	491	} // end of wxDropSource::DoDragDrop
6dddc146	492
4fd899b6 DW	493	bool wxDropSource::GiveFeedback (
	494	wxDragResult eEffect
	495	)
0e320a79	496	{
4fd899b6 DW	497	const wxCursor& rCursor = GetCursor(eEffect);
	498
	499	if (rCursor.Ok())
	500	{
	501	::WinSetPointer(HWND_DESKTOP, (HPOINTER)rCursor.GetHCURSOR());
	502	m_vDragImage.hImage = (LHANDLE)rCursor.GetHCURSOR();
	503	switch(eEffect)
	504	{
	505	case wxDragCopy:
	506	m_pDragInfo->usOperation = DO_COPY;
	507	break;
	508
	509	case wxDragMove:
	510	m_pDragInfo->usOperation = DO_MOVE;
	511	break;
	512
	513	case wxDragLink:
	514	m_pDragInfo->usOperation = DO_LINK;
	515	break;
9923c37d DW	516
	517	case wxDragNone:
	518	case wxDragCancel:
	519	case wxDragError:
	520	break;
4fd899b6	521	}
d0ee33f5	522	return true;
4fd899b6 DW	523	}
	524	else
	525	{
d0ee33f5	526	return false;
4fd899b6 DW	527	}
	528	} // end of GuiAdvDnd_CDropSource::GiveFeedback
	529
	530	void wxDropSource::Init ()
	531	{
	532	m_pDragInfo = ::DrgAllocDraginfo(m_ulItems);
	533
	534	//
	535	// Set a default drag image struct with what we know so far
	536	//
	537	m_vDragImage.cb = sizeof(DRAGIMAGE);
	538	m_vDragImage.cptl = 0; // non-zero if fl is DRG_POLYGON
	539	m_vDragImage.hImage = 0; // Set in GiveFeedback
	540	m_vDragImage.sizlStretch.cx = 20L;
	541	m_vDragImage.sizlStretch.cy = 20L;
	542	m_vDragImage.fl = DRG_ICON \| DRG_STRETCH;
	543	m_vDragImage.cxOffset = 0;
	544	m_vDragImage.cyOffset = 0;
	545
cb7d7375 WS	546	HSTR hStrType = ::DrgAddStrHandle(DRT_UNKNOWN);
	547	HSTR hStrRMF;
	548	HSTR hStrContainer;
	549	wxChar zFormats[128];
	550	wxChar zContainer[128];
	551	USHORT uSize = (USHORT)(GetDataObject()->GetDataSize(GetDataObject()->GetPreferredFormat()) + 1);
	552	wxChar* pzBuffer = new wxChar[uSize];
4fd899b6 DW	553
	554	memset(pzBuffer, '\0', GetDataObject()->GetDataSize(GetDataObject()->GetPreferredFormat()));
	555	pzBuffer[GetDataObject()->GetDataSize(GetDataObject()->GetPreferredFormat())] = '\0';
	556	GetDataObject()->GetDataHere( GetDataObject()->GetPreferredFormat()
	557	,(void*)pzBuffer
	558	);
	559
0fba44b4 DW	560	wxStrcpy(zFormats, _T("<DRM_OS2FILE, DRF_UNKNOWN>"));
0fba44b4 DW	561	wxStrcpy(zContainer, GetDataObject()->GetPreferredFormat().GetId());
4fd899b6	562
0fba44b4 DW	563	hStrRMF = ::DrgAddStrHandle((PSZ)zFormats);
0fba44b4 DW	564	hStrContainer = ::DrgAddStrHandle((PSZ)zContainer);
4fd899b6 DW	565
4fd899b6 DW	566	m_pDragItem = new DRAGITEM[m_ulItems];
55945915	567	for (ULONG i = 0; i < m_ulItems; i++)
4fd899b6 DW	568	{
	569	m_pDragItem[i].hwndItem = m_pWindow->GetHWND();
	570	m_pDragItem[i].hstrType = hStrType;
	571	m_pDragItem[i].hstrRMF = hStrRMF;
	572	m_pDragItem[i].hstrContainerName = hStrContainer;
	573	m_pDragItem[i].fsControl = 0;
	574	m_pDragItem[i].fsSupportedOps = DO_COPYABLE \| DO_MOVEABLE \| DO_LINKABLE;
0fba44b4	575	m_pDragItem[i].hstrSourceName = ::DrgAddStrHandle((PSZ)pzBuffer);
4fd899b6 DW	576	m_pDragItem[i].hstrTargetName = m_pDragItem[i].hstrSourceName;
	577	m_pDragItem[i].ulItemID = i;
	578	::DrgSetDragitem( m_pDragInfo
	579	,&m_pDragItem[i]
	580	,sizeof(DRAGITEM)
	581	,0
	582	);
	583	}
	584	delete [] pzBuffer;
	585	delete [] m_pDragItem;
	586	} // end of wxDropSource::Init
0e320a79	587
7e99520b	588	#endif //wxUSE_DRAG_AND_DROP