[wxWidgets.git] / src / mac / carbon / dnd.cpp

///////////////////////////////////////////////////////////////////////////////
// Name:        dnd.cpp
// Purpose:     wxDropTarget, wxDropSource, wxDataObject implementation
// Author:      Stefan Csomor
// Modified by:
// Created:     1998-01-01
// RCS-ID:      $Id$
// Copyright:   (c) 1998 Stefan Csomor
// Licence:     wxWindows licence
///////////////////////////////////////////////////////////////////////////////

#ifdef __GNUG__
#pragma implementation "dnd.h"
#endif

#include "wx/defs.h"

#if wxUSE_DRAG_AND_DROP

#include "wx/dnd.h"
#include "wx/window.h"
#include "wx/toplevel.h"
#include "wx/app.h"
#include "wx/gdicmn.h"
#include "wx/mac/private.h"

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

void wxMacEnsureTrackingHandlersInstalled() ;

typedef struct 
{
    wxWindow* m_currentTargetWindow ;
    wxDropTarget* m_currentTarget ;
    wxDropSource* m_currentSource ;
} MacTrackingGlobals ;

MacTrackingGlobals gTrackingGlobals ; 

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

wxDropTarget::wxDropTarget( wxDataObject *data )
            : wxDropTargetBase( data )
{
    wxMacEnsureTrackingHandlersInstalled() ;
}

wxDragResult wxDropTarget::OnDragOver( wxCoord WXUNUSED(x),
                                       wxCoord WXUNUSED(y),
                                       wxDragResult def )
{

    return CurrentDragHasSupportedFormat() ? def : wxDragNone;
}

bool wxDropTarget::OnDrop( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y) )
{
    if (!m_dataObject)
        return FALSE;

    return CurrentDragHasSupportedFormat() ;
}

wxDragResult wxDropTarget::OnData( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y),
                                   wxDragResult def )
{
    if (!m_dataObject)
        return wxDragNone;

    if (!CurrentDragHasSupportedFormat())
        return wxDragNone;

    return GetData() ? def : wxDragNone;
}

bool wxDropTarget::CurrentDragHasSupportedFormat() 
{
    bool supported = false ;
    if ( gTrackingGlobals.m_currentSource != NULL )
    {
        wxDataObject* data = gTrackingGlobals.m_currentSource->GetDataObject() ;
        
        if ( data )
        {
            size_t formatcount = data->GetFormatCount() ;
            wxDataFormat *array = new wxDataFormat[ formatcount  ];
            data->GetAllFormats( array );
            for (size_t i = 0; !supported && i < formatcount ; i++)
            {
                wxDataFormat format = array[i] ;
                if ( m_dataObject->IsSupported( format ) ) 
                {
                    supported = true ;
                    break ;
                }
            }
            delete[] array ;
        }
    }
    if ( !supported )
    {
        UInt16 items ;
        OSErr result;
        CountDragItems((DragReference)m_currentDrag, &items);
        for (UInt16 index = 1; index <= items && supported == false ; ++index) 
        {
            ItemReference theItem;
            FlavorType theType ;
            UInt16 flavors = 0 ;
            GetDragItemReferenceNumber((DragReference)m_currentDrag, index, &theItem);
            CountDragItemFlavors( (DragReference)m_currentDrag, theItem , &flavors ) ;
            for ( UInt16 flavor = 1 ; flavor <= flavors ; ++flavor )
            {
                result = GetFlavorType((DragReference)m_currentDrag, theItem, flavor , &theType);
                if ( m_dataObject->IsSupportedFormat( wxDataFormat( theType ) ) )
                {
                    supported = true ;
                    break ;
                }
            }
        }
    }
    return supported ;   
}

bool wxDropTarget::GetData()
{
    if (!m_dataObject)
        return FALSE;
    
    if ( !CurrentDragHasSupportedFormat() )
        return FALSE ;
    
    bool transferred = false ;   
    if ( gTrackingGlobals.m_currentSource != NULL )
    {
        wxDataObject* data = gTrackingGlobals.m_currentSource->GetDataObject() ;
        
        if ( data )
        {
            size_t formatcount = data->GetFormatCount() ;
            wxDataFormat *array = new wxDataFormat[ formatcount  ];
            data->GetAllFormats( array );
            for (size_t i = 0; !transferred && i < formatcount ; i++)
            {
                wxDataFormat format = array[i] ;
                if ( m_dataObject->IsSupported( format ) ) 
                {
                    int size = data->GetDataSize( format );
                    transferred = true ;
                    
                    if (size == 0) 
                    {
                        m_dataObject->SetData(format , 0 , 0 ) ;
                    }
                    else
                    {
                        char *d = new char[size];
                        data->GetDataHere( format , (void*) d );
                        m_dataObject->SetData( format , size , d ) ;
                        delete[] d ;
                    }
                }
            }
            delete[] array ;
        }
    }
    if ( !transferred )
    {
        UInt16 items ;
        OSErr result;
        bool firstFileAdded = false ;
        CountDragItems((DragReference)m_currentDrag, &items);
        for (UInt16 index = 1; index <= items; ++index) 
        {
            ItemReference theItem;
            FlavorType theType ;
            UInt16 flavors = 0 ;
            GetDragItemReferenceNumber((DragReference)m_currentDrag, index, &theItem);
            CountDragItemFlavors( (DragReference)m_currentDrag, theItem , &flavors ) ;
            for ( UInt16 flavor = 1 ; flavor <= flavors ; ++flavor )
            {
                result = GetFlavorType((DragReference)m_currentDrag, theItem, flavor , &theType);
                wxDataFormat format(theType) ;
                if ( m_dataObject->IsSupportedFormat( format ) )
                {
                    FlavorFlags theFlags;
                    result = GetFlavorFlags((DragReference)m_currentDrag, theItem, theType, &theFlags);
                    if (result == noErr) 
                    {
                        Size dataSize ;
                        Ptr theData ;
                        GetFlavorDataSize((DragReference)m_currentDrag, theItem, theType, &dataSize);
                        if ( theType == 'TEXT' )
                        {
                            // this increment is only valid for allocating, on the next GetFlavorData
                            // call it is reset again to the original value
                            dataSize++ ;
                        }
                        theData = new char[dataSize];
                        GetFlavorData((DragReference)m_currentDrag, theItem, theType, (void*) theData, &dataSize, 0L); 
                        if( theType == 'TEXT' )
                        {
                            theData[dataSize]=0 ; 
                            wxString convert = wxMacMakeStringFromCString( theData ) ;    
                            m_dataObject->SetData( format, convert.Length() * sizeof(wxChar), (const wxChar*) convert );
                        }
                        else if ( theType == kDragFlavorTypeHFS )
                        {
                            HFSFlavor* theFile = (HFSFlavor*) theData ;
                            wxString name = wxMacFSSpec2MacFilename( &theFile->fileSpec ) ;
                            if (  firstFileAdded )
                                ((wxFileDataObject*)m_dataObject)->AddFile( name ) ;
                            else
                            {
                                ((wxFileDataObject*)m_dataObject)->SetData( 0 , name.c_str() ) ;
                                firstFileAdded = true ;    
                            }
                        }
                        else
                        {
                            m_dataObject->SetData( format, dataSize, theData );
                        }
                        delete[] theData;
                    }
                    break ;
                }
            }
        }
    }
    return TRUE ;   
}

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

//-----------------------------------------------------------------------------
// drag request

wxDropSource::wxDropSource(wxWindow *win,
                           const wxCursor &cursorCopy,
                           const wxCursor &cursorMove,
                           const wxCursor &cursorStop)
            : wxDropSourceBase(cursorCopy, cursorMove, cursorStop)
{
    wxMacEnsureTrackingHandlersInstalled() ;
    m_window = win;
}

wxDropSource::wxDropSource(wxDataObject& data,
                           wxWindow *win,
                           const wxCursor &cursorCopy,
                           const wxCursor &cursorMove,
                           const wxCursor &cursorStop)
            : wxDropSourceBase(cursorCopy, cursorMove, cursorStop)
{
    wxMacEnsureTrackingHandlersInstalled() ;
    SetData( data );
    m_window = win;
}

wxDropSource::~wxDropSource()
{
}


wxDragResult wxDropSource::DoDragDrop(int WXUNUSED(flags))
{
    wxASSERT_MSG( m_data, wxT("Drop source: no data") );
    
    if (!m_data)
        return (wxDragResult) wxDragNone;
    
    if (m_data->GetFormatCount() == 0)
        return (wxDragResult) wxDragNone;
    
    OSErr result;
    DragReference theDrag;
    RgnHandle dragRegion;
    if ((result = NewDrag(&theDrag)))
    {
        return wxDragNone ;
    }
    // add data to drag
    size_t formatCount = m_data->GetFormatCount() ;
    wxDataFormat *formats = new wxDataFormat[formatCount] ;
    m_data->GetAllFormats( formats ) ;
    ItemReference theItem = 1 ;
    for ( size_t i = 0 ; i < formatCount ; ++i )
    {
        size_t dataSize = m_data->GetDataSize( formats[i] ) ;
        Ptr dataPtr = new char[dataSize] ;
        m_data->GetDataHere( formats[i] , dataPtr ) ;
        OSType type = formats[i].GetFormatId() ;
        if ( type == 'TEXT' )
        {
            dataSize-- ;
            dataPtr[ dataSize ] = 0 ;
            wxString st( (wxChar*) dataPtr ) ;
            wxCharBuffer buf = wxMacStringToCString( st ) ;
            AddDragItemFlavor(theDrag, theItem, type , buf.data(), strlen(buf), 0);
        }
        else if (type == kDragFlavorTypeHFS )
        {
            HFSFlavor  theFlavor ;
            OSErr err = noErr;
            CInfoPBRec cat;
            
            wxMacFilename2FSSpec( dataPtr , &theFlavor.fileSpec ) ;
            
            cat.hFileInfo.ioNamePtr = theFlavor.fileSpec.name;
            cat.hFileInfo.ioVRefNum = theFlavor.fileSpec.vRefNum;
            cat.hFileInfo.ioDirID = theFlavor.fileSpec.parID;
            cat.hFileInfo.ioFDirIndex = 0;
            err = PBGetCatInfoSync(&cat);
            if (err == noErr )
            {
                theFlavor.fdFlags = cat.hFileInfo.ioFlFndrInfo.fdFlags;
                if (theFlavor.fileSpec.parID == fsRtParID) {
                    theFlavor.fileCreator = 'MACS';
                    theFlavor.fileType = 'disk';
                } else if ((cat.hFileInfo.ioFlAttrib & ioDirMask) != 0) {
                    theFlavor.fileCreator = 'MACS';
                    theFlavor.fileType = 'fold';
                } else {
                    theFlavor.fileCreator = cat.hFileInfo.ioFlFndrInfo.fdCreator;
                    theFlavor.fileType = cat.hFileInfo.ioFlFndrInfo.fdType;
                }
                AddDragItemFlavor(theDrag, theItem, type , &theFlavor, sizeof(theFlavor), 0);  
            }    
        }
        else
        {
            AddDragItemFlavor(theDrag, theItem, type , dataPtr, dataSize, 0);      
        }
        delete[] dataPtr ;
    }
    delete[] formats ;
    
    dragRegion = NewRgn();
    RgnHandle tempRgn = NewRgn() ;
    
    EventRecord* ev = NULL ;
#if !TARGET_CARBON // TODO
    ev = (EventRecord*) wxTheApp->MacGetCurrentEvent() ;
#else
    EventRecord rec ;
    ev = &rec ;
    wxMacConvertEventToRecord( (EventRef) wxTheApp->MacGetCurrentEvent() , &rec ) ;
#endif
    const short dragRegionOuterBoundary = 10 ;
    const short dragRegionInnerBoundary = 9 ;
    
    SetRectRgn( dragRegion , ev->where.h - dragRegionOuterBoundary , 
        ev->where.v  - dragRegionOuterBoundary ,
        ev->where.h + dragRegionOuterBoundary , 
        ev->where.v + dragRegionOuterBoundary ) ;
    
    SetRectRgn( tempRgn , ev->where.h - dragRegionInnerBoundary , 
        ev->where.v  - dragRegionInnerBoundary ,
        ev->where.h + dragRegionInnerBoundary , 
        ev->where.v + dragRegionInnerBoundary ) ;
    
    DiffRgn( dragRegion , tempRgn , dragRegion ) ;
    DisposeRgn( tempRgn ) ;    
    
    // TODO:work with promises in order to return data only when drag
    // was successfully completed
    
    gTrackingGlobals.m_currentSource = this ;
    result = TrackDrag(theDrag, ev , dragRegion);
    DisposeRgn(dragRegion);
    DisposeDrag(theDrag);
    gTrackingGlobals.m_currentSource = NULL ;
    
    return wxDragCopy ;
}

bool wxDropSource::MacInstallDefaultCursor(wxDragResult effect)
{
    const wxCursor& cursor = GetCursor(effect);
    if ( cursor.Ok() )
    {
        cursor.MacInstall() ;

        return TRUE;
    }
    else
    {
        return FALSE;
    }
}

bool gTrackingGlobalsInstalled = false ;

// passing the globals via refcon is not needed by the CFM and later architectures anymore
// but I'll leave it in there, just in case...

pascal OSErr wxMacWindowDragTrackingHandler(DragTrackingMessage theMessage, WindowPtr theWindow,
  void *handlerRefCon, DragReference theDrag) ;
pascal OSErr wxMacWindowDragReceiveHandler(WindowPtr theWindow, void *handlerRefCon,
DragReference theDrag) ;

void wxMacEnsureTrackingHandlersInstalled()
{
    if( !gTrackingGlobalsInstalled )
    {
        OSErr result;

        result = InstallTrackingHandler(NewDragTrackingHandlerUPP(wxMacWindowDragTrackingHandler), 0L,&gTrackingGlobals);
        wxASSERT( result == noErr ) ;
        result = InstallReceiveHandler(NewDragReceiveHandlerUPP(wxMacWindowDragReceiveHandler), 0L, &gTrackingGlobals);
        wxASSERT( result == noErr ) ;

        gTrackingGlobalsInstalled = true ;
    }
}

pascal OSErr wxMacWindowDragTrackingHandler(DragTrackingMessage theMessage, WindowPtr theWindow,
  void *handlerRefCon, DragReference theDrag)
{ 
    MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;
    Point mouse, localMouse;
    DragAttributes attributes;
    GetDragAttributes(theDrag, &attributes);
    wxTopLevelWindowMac* toplevel = wxFindWinFromMacWindow( theWindow ) ; 
    switch(theMessage) 
    {
        case kDragTrackingEnterHandler:
            break;
        case kDragTrackingLeaveHandler:
            break;
        case kDragTrackingEnterWindow:
            trackingGlobals->m_currentTargetWindow = NULL ;
            trackingGlobals->m_currentTarget = NULL ;
            break;
        case kDragTrackingInWindow:
            if (toplevel == NULL)
                break;

            GetDragMouse(theDrag, &mouse, 0L);
            localMouse = mouse;
            GlobalToLocal(&localMouse);
            
//            if (attributes & kDragHasLeftSenderWindow) 
            {
                wxPoint point(localMouse.h , localMouse.v) ;
                wxWindow *win = NULL ;
                toplevel->MacGetWindowFromPointSub( point , &win ) ;
                int localx , localy ;
                localx = localMouse.h ;
                localy = localMouse.v ;
                //TODO : should we use client coordinates
                if ( win )
                    win->MacRootWindowToWindow( &localx , &localy ) ;
                if ( win != trackingGlobals->m_currentTargetWindow )
                {
                    if ( trackingGlobals->m_currentTargetWindow )
                    {
                        // this window is left
                        if ( trackingGlobals->m_currentTarget )
                        {
                            HideDragHilite(theDrag);
                            trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
                            trackingGlobals->m_currentTarget->OnLeave() ;
                            trackingGlobals->m_currentTarget = NULL;
                            trackingGlobals->m_currentTargetWindow = NULL ;
                        }
                    }
                    if ( win )
                    {
                        // this window is entered
                        trackingGlobals->m_currentTargetWindow = win ;
                        trackingGlobals->m_currentTarget = win->GetDropTarget() ;
                        {
                        	wxDragResult result = wxDragNone ;
                        	if ( trackingGlobals->m_currentTarget )
                        	{
                            	trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
                            	result = trackingGlobals->m_currentTarget->OnEnter(
                                	localx , localy , wxDragCopy ) ;
                            }
                                
                            if ( trackingGlobals->m_currentSource && trackingGlobals->m_currentSource->GiveFeedback( result ) == FALSE )
                            {
                            	if ( trackingGlobals->m_currentSource->MacInstallDefaultCursor( result ) == FALSE )
                            	{
                            		switch( result )
                            		{
                            			case wxDragCopy :
                            			{
                            				wxCursor cursor(wxCURSOR_COPY_ARROW) ;
                            				cursor.MacInstall() ;
                            			}
                            			break ;
                            			case wxDragMove :
                            			{
                             				wxCursor cursor(wxCURSOR_ARROW) ;
                            				cursor.MacInstall() ;
                           			    }
                            			break ;
                            			case wxDragNone :
                            			{
                            				wxCursor cursor(wxCURSOR_NO_ENTRY) ;
                            				cursor.MacInstall() ;
                            			}
                            			break ;
                            		}
                            	}
                            }
                           
                            if ( result != wxDragNone )
                            {
                                int x , y ;
                                x = y = 0 ;
                                win->MacWindowToRootWindow( &x , &y ) ;
                                RgnHandle hiliteRgn = NewRgn() ;
                                SetRectRgn( hiliteRgn , x , y , x+win->GetSize().x ,y+win->GetSize().y) ;
                                ShowDragHilite(theDrag, hiliteRgn, true);
                                DisposeRgn( hiliteRgn ) ;
                            }
                        }
                    }
                }
                else
                {
                    if( trackingGlobals->m_currentTarget )
                    {
                        trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
                        trackingGlobals->m_currentTarget->OnDragOver(
                            localx , localy , wxDragCopy ) ;
                    }
                }
                
          }
            // MyTrackItemUnderMouse(localMouse, theWindow);
            break;
        case kDragTrackingLeaveWindow:
            if (trackingGlobals->m_currentTarget) 
            {
                trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
                trackingGlobals->m_currentTarget->OnLeave() ;
                HideDragHilite(theDrag);
                trackingGlobals->m_currentTarget = NULL ;
            }
            trackingGlobals->m_currentTargetWindow = NULL ;
            break;
    }
    return(noErr);
}

pascal OSErr wxMacWindowDragReceiveHandler(WindowPtr theWindow,
                                           void *handlerRefCon,
                                           DragReference theDrag)
{ 
    MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;
    if ( trackingGlobals->m_currentTarget )
    {
        Point mouse,localMouse ;
        int localx,localy ;
        
        trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
        GetDragMouse(theDrag, &mouse, 0L);
        localMouse = mouse;
        GlobalToLocal(&localMouse);
        localx = localMouse.h ;
        localy = localMouse.v ;
        //TODO : should we use client coordinates
        if ( trackingGlobals->m_currentTargetWindow )
            trackingGlobals->m_currentTargetWindow->MacRootWindowToWindow( &localx , &localy ) ;
        if ( trackingGlobals->m_currentTarget->OnDrop( localx , localy ) )
        {
            trackingGlobals->m_currentTarget->OnData( localx , localy , wxDragCopy ) ;
        }
    }
    return(noErr);
}
#endif
Commit	Line	Data
e9576ca5 SC	1	///////////////////////////////////////////////////////////////////////////////
	2	// Name: dnd.cpp
	3	// Purpose: wxDropTarget, wxDropSource, wxDataObject implementation
a31a5f85	4	// Author: Stefan Csomor
e9576ca5	5	// Modified by:
a31a5f85	6	// Created: 1998-01-01
e9576ca5	7	// RCS-ID: $Id$
a31a5f85	8	// Copyright: (c) 1998 Stefan Csomor
e9576ca5 SC	9	// Licence: wxWindows licence
	10	///////////////////////////////////////////////////////////////////////////////
	11
	12	#ifdef __GNUG__
	13	#pragma implementation "dnd.h"
	14	#endif
	15
ff143598 GD	16	#include "wx/defs.h"
	17
	18	#if wxUSE_DRAG_AND_DROP
	19
e9576ca5 SC	20	#include "wx/dnd.h"
e9576ca5 SC	21	#include "wx/window.h"
ff143598	22	#include "wx/toplevel.h"
e9576ca5 SC	23	#include "wx/app.h"
e9576ca5 SC	24	#include "wx/gdicmn.h"
76a5e5d2	25	#include "wx/mac/private.h"
e9576ca5 SC	26
	27	// ----------------------------------------------------------------------------
	28	// global
	29	// ----------------------------------------------------------------------------
	30
a07c1212	31	void wxMacEnsureTrackingHandlersInstalled() ;
e9576ca5	32
a07c1212	33	typedef struct
e9576ca5	34	{
a07c1212 SC	35	wxWindow* m_currentTargetWindow ;
	36	wxDropTarget* m_currentTarget ;
	37	wxDropSource* m_currentSource ;
	38	} MacTrackingGlobals ;
e9576ca5	39
a07c1212	40	MacTrackingGlobals gTrackingGlobals ;
e9576ca5	41
a07c1212 SC	42	//----------------------------------------------------------------------------
	43	// wxDropTarget
	44	//----------------------------------------------------------------------------
e9576ca5	45
a07c1212 SC	46	wxDropTarget::wxDropTarget( wxDataObject *data )
a07c1212 SC	47	: wxDropTargetBase( data )
e9576ca5	48	{
a07c1212	49	wxMacEnsureTrackingHandlersInstalled() ;
e9576ca5 SC	50	}
e9576ca5 SC	51
a07c1212 SC	52	wxDragResult wxDropTarget::OnDragOver( wxCoord WXUNUSED(x),
	53	wxCoord WXUNUSED(y),
	54	wxDragResult def )
e9576ca5	55	{
e9576ca5	56
a07c1212 SC	57	return CurrentDragHasSupportedFormat() ? def : wxDragNone;
a07c1212 SC	58	}
e9576ca5	59
a07c1212	60	bool wxDropTarget::OnDrop( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y) )
e9576ca5	61	{
a07c1212 SC	62	if (!m_dataObject)
	63	return FALSE;
	64
	65	return CurrentDragHasSupportedFormat() ;
e9576ca5 SC	66	}
e9576ca5 SC	67
a07c1212 SC	68	wxDragResult wxDropTarget::OnData( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y),
a07c1212 SC	69	wxDragResult def )
e9576ca5	70	{
a07c1212 SC	71	if (!m_dataObject)
	72	return wxDragNone;
	73
	74	if (!CurrentDragHasSupportedFormat())
	75	return wxDragNone;
	76
	77	return GetData() ? def : wxDragNone;
e9576ca5 SC	78	}
e9576ca5 SC	79
a07c1212	80	bool wxDropTarget::CurrentDragHasSupportedFormat()
e9576ca5	81	{
a07c1212 SC	82	bool supported = false ;
	83	if ( gTrackingGlobals.m_currentSource != NULL )
	84	{
e40298d5 JS	85	wxDataObject* data = gTrackingGlobals.m_currentSource->GetDataObject() ;
	86
	87	if ( data )
a07c1212	88	{
e40298d5 JS	89	size_t formatcount = data->GetFormatCount() ;
	90	wxDataFormat *array = new wxDataFormat[ formatcount ];
	91	data->GetAllFormats( array );
	92	for (size_t i = 0; !supported && i < formatcount ; i++)
a07c1212	93	{
e40298d5 JS	94	wxDataFormat format = array[i] ;
	95	if ( m_dataObject->IsSupported( format ) )
	96	{
	97	supported = true ;
	98	break ;
	99	}
a07c1212	100	}
e40298d5	101	delete[] array ;
a07c1212	102	}
a07c1212 SC	103	}
	104	if ( !supported )
	105	{
e40298d5 JS	106	UInt16 items ;
	107	OSErr result;
	108	CountDragItems((DragReference)m_currentDrag, &items);
	109	for (UInt16 index = 1; index <= items && supported == false ; ++index)
	110	{
	111	ItemReference theItem;
	112	FlavorType theType ;
	113	UInt16 flavors = 0 ;
	114	GetDragItemReferenceNumber((DragReference)m_currentDrag, index, &theItem);
	115	CountDragItemFlavors( (DragReference)m_currentDrag, theItem , &flavors ) ;
	116	for ( UInt16 flavor = 1 ; flavor <= flavors ; ++flavor )
a07c1212	117	{
e40298d5 JS	118	result = GetFlavorType((DragReference)m_currentDrag, theItem, flavor , &theType);
	119	if ( m_dataObject->IsSupportedFormat( wxDataFormat( theType ) ) )
	120	{
	121	supported = true ;
	122	break ;
	123	}
a07c1212	124	}
e40298d5	125	}
a07c1212 SC	126	}
a07c1212 SC	127	return supported ;
e9576ca5 SC	128	}
e9576ca5 SC	129
a07c1212	130	bool wxDropTarget::GetData()
e9576ca5	131	{
a07c1212 SC	132	if (!m_dataObject)
a07c1212 SC	133	return FALSE;
e40298d5	134
a07c1212 SC	135	if ( !CurrentDragHasSupportedFormat() )
a07c1212 SC	136	return FALSE ;
e40298d5	137
a07c1212 SC	138	bool transferred = false ;
	139	if ( gTrackingGlobals.m_currentSource != NULL )
	140	{
e40298d5 JS	141	wxDataObject* data = gTrackingGlobals.m_currentSource->GetDataObject() ;
	142
	143	if ( data )
a07c1212	144	{
e40298d5 JS	145	size_t formatcount = data->GetFormatCount() ;
	146	wxDataFormat *array = new wxDataFormat[ formatcount ];
	147	data->GetAllFormats( array );
	148	for (size_t i = 0; !transferred && i < formatcount ; i++)
a07c1212	149	{
e40298d5 JS	150	wxDataFormat format = array[i] ;
	151	if ( m_dataObject->IsSupported( format ) )
	152	{
	153	int size = data->GetDataSize( format );
	154	transferred = true ;
	155
	156	if (size == 0)
	157	{
	158	m_dataObject->SetData(format , 0 , 0 ) ;
	159	}
	160	else
	161	{
	162	char *d = new char[size];
	163	data->GetDataHere( format , (void*) d );
	164	m_dataObject->SetData( format , size , d ) ;
	165	delete[] d ;
	166	}
	167	}
a07c1212	168	}
e40298d5 JS	169	delete[] array ;
e40298d5 JS	170	}
a07c1212 SC	171	}
	172	if ( !transferred )
	173	{
e40298d5 JS	174	UInt16 items ;
	175	OSErr result;
	176	bool firstFileAdded = false ;
	177	CountDragItems((DragReference)m_currentDrag, &items);
	178	for (UInt16 index = 1; index <= items; ++index)
	179	{
	180	ItemReference theItem;
	181	FlavorType theType ;
	182	UInt16 flavors = 0 ;
	183	GetDragItemReferenceNumber((DragReference)m_currentDrag, index, &theItem);
	184	CountDragItemFlavors( (DragReference)m_currentDrag, theItem , &flavors ) ;
	185	for ( UInt16 flavor = 1 ; flavor <= flavors ; ++flavor )
a07c1212	186	{
e40298d5 JS	187	result = GetFlavorType((DragReference)m_currentDrag, theItem, flavor , &theType);
	188	wxDataFormat format(theType) ;
	189	if ( m_dataObject->IsSupportedFormat( format ) )
	190	{
	191	FlavorFlags theFlags;
	192	result = GetFlavorFlags((DragReference)m_currentDrag, theItem, theType, &theFlags);
	193	if (result == noErr)
a07c1212	194	{
e40298d5 JS	195	Size dataSize ;
	196	Ptr theData ;
	197	GetFlavorDataSize((DragReference)m_currentDrag, theItem, theType, &dataSize);
	198	if ( theType == 'TEXT' )
	199	{
	200	// this increment is only valid for allocating, on the next GetFlavorData
	201	// call it is reset again to the original value
	202	dataSize++ ;
	203	}
	204	theData = new char[dataSize];
	205	GetFlavorData((DragReference)m_currentDrag, theItem, theType, (void*) theData, &dataSize, 0L);
	206	if( theType == 'TEXT' )
	207	{
427ff662 SC	208	theData[dataSize]=0 ;
	209	wxString convert = wxMacMakeStringFromCString( theData ) ;
	210	m_dataObject->SetData( format, convert.Length() * sizeof(wxChar), (const wxChar*) convert );
e40298d5 JS	211	}
	212	else if ( theType == kDragFlavorTypeHFS )
	213	{
	214	HFSFlavor* theFile = (HFSFlavor*) theData ;
	215	wxString name = wxMacFSSpec2MacFilename( &theFile->fileSpec ) ;
	216	if ( firstFileAdded )
	217	((wxFileDataObject*)m_dataObject)->AddFile( name ) ;
	218	else
	219	{
	220	((wxFileDataObject*)m_dataObject)->SetData( 0 , name.c_str() ) ;
	221	firstFileAdded = true ;
	222	}
	223	}
	224	else
	225	{
	226	m_dataObject->SetData( format, dataSize, theData );
	227	}
	228	delete[] theData;
a07c1212	229	}
e40298d5 JS	230	break ;
e40298d5 JS	231	}
a07c1212	232	}
e40298d5	233	}
a07c1212 SC	234	}
a07c1212 SC	235	return TRUE ;
e9576ca5 SC	236	}
	237
	238	//-------------------------------------------------------------------------
	239	// wxDropSource
	240	//-------------------------------------------------------------------------
	241
	242	//-----------------------------------------------------------------------------
	243	// drag request
	244
a07c1212	245	wxDropSource::wxDropSource(wxWindow *win,
da804130 SC	246	const wxCursor &cursorCopy,
	247	const wxCursor &cursorMove,
	248	const wxCursor &cursorStop)
	249	: wxDropSourceBase(cursorCopy, cursorMove, cursorStop)
e9576ca5	250	{
a07c1212 SC	251	wxMacEnsureTrackingHandlersInstalled() ;
	252	m_window = win;
	253	}
e9576ca5	254
a07c1212 SC	255	wxDropSource::wxDropSource(wxDataObject& data,
a07c1212 SC	256	wxWindow *win,
da804130 SC	257	const wxCursor &cursorCopy,
	258	const wxCursor &cursorMove,
	259	const wxCursor &cursorStop)
	260	: wxDropSourceBase(cursorCopy, cursorMove, cursorStop)
a07c1212 SC	261	{
	262	wxMacEnsureTrackingHandlersInstalled() ;
	263	SetData( data );
	264	m_window = win;
	265	}
e9576ca5	266
a07c1212	267	wxDropSource::~wxDropSource()
e9576ca5	268	{
a07c1212	269	}
e9576ca5	270
e9576ca5	271
2245b2b2	272	wxDragResult wxDropSource::DoDragDrop(int WXUNUSED(flags))
e9576ca5	273	{
a07c1212	274	wxASSERT_MSG( m_data, wxT("Drop source: no data") );
e40298d5	275
a07c1212 SC	276	if (!m_data)
a07c1212 SC	277	return (wxDragResult) wxDragNone;
e40298d5	278
a07c1212 SC	279	if (m_data->GetFormatCount() == 0)
a07c1212 SC	280	return (wxDragResult) wxDragNone;
e40298d5	281
a07c1212 SC	282	OSErr result;
	283	DragReference theDrag;
	284	RgnHandle dragRegion;
0cd51b2d	285	if ((result = NewDrag(&theDrag)))
a07c1212 SC	286	{
	287	return wxDragNone ;
	288	}
	289	// add data to drag
	290	size_t formatCount = m_data->GetFormatCount() ;
	291	wxDataFormat *formats = new wxDataFormat[formatCount] ;
	292	m_data->GetAllFormats( formats ) ;
	293	ItemReference theItem = 1 ;
0cd51b2d	294	for ( size_t i = 0 ; i < formatCount ; ++i )
a07c1212 SC	295	{
	296	size_t dataSize = m_data->GetDataSize( formats[i] ) ;
	297	Ptr dataPtr = new char[dataSize] ;
	298	m_data->GetDataHere( formats[i] , dataPtr ) ;
	299	OSType type = formats[i].GetFormatId() ;
	300	if ( type == 'TEXT' )
	301	{
e40298d5	302	dataSize-- ;
427ff662 SC	303	dataPtr[ dataSize ] = 0 ;
	304	wxString st( (wxChar*) dataPtr ) ;
	305	wxCharBuffer buf = wxMacStringToCString( st ) ;
	306	AddDragItemFlavor(theDrag, theItem, type , buf.data(), strlen(buf), 0);
a07c1212 SC	307	}
	308	else if (type == kDragFlavorTypeHFS )
	309	{
e40298d5 JS	310	HFSFlavor theFlavor ;
	311	OSErr err = noErr;
	312	CInfoPBRec cat;
	313
	314	wxMacFilename2FSSpec( dataPtr , &theFlavor.fileSpec ) ;
	315
	316	cat.hFileInfo.ioNamePtr = theFlavor.fileSpec.name;
	317	cat.hFileInfo.ioVRefNum = theFlavor.fileSpec.vRefNum;
	318	cat.hFileInfo.ioDirID = theFlavor.fileSpec.parID;
	319	cat.hFileInfo.ioFDirIndex = 0;
	320	err = PBGetCatInfoSync(&cat);
	321	if (err == noErr )
	322	{
	323	theFlavor.fdFlags = cat.hFileInfo.ioFlFndrInfo.fdFlags;
	324	if (theFlavor.fileSpec.parID == fsRtParID) {
	325	theFlavor.fileCreator = 'MACS';
	326	theFlavor.fileType = 'disk';
	327	} else if ((cat.hFileInfo.ioFlAttrib & ioDirMask) != 0) {
	328	theFlavor.fileCreator = 'MACS';
	329	theFlavor.fileType = 'fold';
	330	} else {
	331	theFlavor.fileCreator = cat.hFileInfo.ioFlFndrInfo.fdCreator;
	332	theFlavor.fileType = cat.hFileInfo.ioFlFndrInfo.fdType;
	333	}
	334	AddDragItemFlavor(theDrag, theItem, type , &theFlavor, sizeof(theFlavor), 0);
	335	}
a07c1212 SC	336	}
	337	else
	338	{
e40298d5	339	AddDragItemFlavor(theDrag, theItem, type , dataPtr, dataSize, 0);
a07c1212 SC	340	}
	341	delete[] dataPtr ;
	342	}
	343	delete[] formats ;
	344
	345	dragRegion = NewRgn();
	346	RgnHandle tempRgn = NewRgn() ;
	347
45a0fd37 SC	348	EventRecord* ev = NULL ;
45a0fd37 SC	349	#if !TARGET_CARBON // TODO
e40298d5	350	ev = (EventRecord*) wxTheApp->MacGetCurrentEvent() ;
45a0fd37	351	#else
e40298d5 JS	352	EventRecord rec ;
	353	ev = &rec ;
	354	wxMacConvertEventToRecord( (EventRef) wxTheApp->MacGetCurrentEvent() , &rec ) ;
45a0fd37	355	#endif
a07c1212 SC	356	const short dragRegionOuterBoundary = 10 ;
	357	const short dragRegionInnerBoundary = 9 ;
	358
	359	SetRectRgn( dragRegion , ev->where.h - dragRegionOuterBoundary ,
e40298d5 JS	360	ev->where.v - dragRegionOuterBoundary ,
	361	ev->where.h + dragRegionOuterBoundary ,
	362	ev->where.v + dragRegionOuterBoundary ) ;
	363
a07c1212	364	SetRectRgn( tempRgn , ev->where.h - dragRegionInnerBoundary ,
e40298d5 JS	365	ev->where.v - dragRegionInnerBoundary ,
	366	ev->where.h + dragRegionInnerBoundary ,
	367	ev->where.v + dragRegionInnerBoundary ) ;
	368
a07c1212 SC	369	DiffRgn( dragRegion , tempRgn , dragRegion ) ;
a07c1212 SC	370	DisposeRgn( tempRgn ) ;
e40298d5	371
a07c1212 SC	372	// TODO:work with promises in order to return data only when drag
a07c1212 SC	373	// was successfully completed
e40298d5	374
a07c1212 SC	375	gTrackingGlobals.m_currentSource = this ;
	376	result = TrackDrag(theDrag, ev , dragRegion);
	377	DisposeRgn(dragRegion);
	378	DisposeDrag(theDrag);
	379	gTrackingGlobals.m_currentSource = NULL ;
e40298d5	380
a07c1212 SC	381	return wxDragCopy ;
	382	}
	383
da804130 SC	384	bool wxDropSource::MacInstallDefaultCursor(wxDragResult effect)
	385	{
	386	const wxCursor& cursor = GetCursor(effect);
	387	if ( cursor.Ok() )
	388	{
	389	cursor.MacInstall() ;
	390
	391	return TRUE;
	392	}
	393	else
	394	{
	395	return FALSE;
	396	}
	397	}
	398
a07c1212 SC	399	bool gTrackingGlobalsInstalled = false ;
	400
	401	// passing the globals via refcon is not needed by the CFM and later architectures anymore
	402	// but I'll leave it in there, just in case...
	403
	404	pascal OSErr wxMacWindowDragTrackingHandler(DragTrackingMessage theMessage, WindowPtr theWindow,
	405	void *handlerRefCon, DragReference theDrag) ;
	406	pascal OSErr wxMacWindowDragReceiveHandler(WindowPtr theWindow, void *handlerRefCon,
	407	DragReference theDrag) ;
	408
	409	void wxMacEnsureTrackingHandlersInstalled()
e9576ca5	410	{
a07c1212 SC	411	if( !gTrackingGlobalsInstalled )
	412	{
	413	OSErr result;
	414
	415	result = InstallTrackingHandler(NewDragTrackingHandlerUPP(wxMacWindowDragTrackingHandler), 0L,&gTrackingGlobals);
	416	wxASSERT( result == noErr ) ;
	417	result = InstallReceiveHandler(NewDragReceiveHandlerUPP(wxMacWindowDragReceiveHandler), 0L, &gTrackingGlobals);
	418	wxASSERT( result == noErr ) ;
e9576ca5	419
a07c1212 SC	420	gTrackingGlobalsInstalled = true ;
	421	}
	422	}
	423
	424	pascal OSErr wxMacWindowDragTrackingHandler(DragTrackingMessage theMessage, WindowPtr theWindow,
	425	void *handlerRefCon, DragReference theDrag)
	426	{
	427	MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;
	428	Point mouse, localMouse;
	429	DragAttributes attributes;
a07c1212 SC	430	GetDragAttributes(theDrag, &attributes);
	431	wxTopLevelWindowMac* toplevel = wxFindWinFromMacWindow( theWindow ) ;
	432	switch(theMessage)
	433	{
	434	case kDragTrackingEnterHandler:
	435	break;
	436	case kDragTrackingLeaveHandler:
	437	break;
	438	case kDragTrackingEnterWindow:
e40298d5	439	trackingGlobals->m_currentTargetWindow = NULL ;
a07c1212 SC	440	trackingGlobals->m_currentTarget = NULL ;
	441	break;
	442	case kDragTrackingInWindow:
	443	if (toplevel == NULL)
	444	break;
	445
	446	GetDragMouse(theDrag, &mouse, 0L);
	447	localMouse = mouse;
	448	GlobalToLocal(&localMouse);
	449
	450	// if (attributes & kDragHasLeftSenderWindow)
	451	{
	452	wxPoint point(localMouse.h , localMouse.v) ;
	453	wxWindow *win = NULL ;
	454	toplevel->MacGetWindowFromPointSub( point , &win ) ;
	455	int localx , localy ;
	456	localx = localMouse.h ;
	457	localy = localMouse.v ;
	458	//TODO : should we use client coordinates
	459	if ( win )
	460	win->MacRootWindowToWindow( &localx , &localy ) ;
	461	if ( win != trackingGlobals->m_currentTargetWindow )
	462	{
	463	if ( trackingGlobals->m_currentTargetWindow )
	464	{
	465	// this window is left
	466	if ( trackingGlobals->m_currentTarget )
	467	{
	468	HideDragHilite(theDrag);
	469	trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
	470	trackingGlobals->m_currentTarget->OnLeave() ;
	471	trackingGlobals->m_currentTarget = NULL;
	472	trackingGlobals->m_currentTargetWindow = NULL ;
	473	}
	474	}
	475	if ( win )
	476	{
	477	// this window is entered
	478	trackingGlobals->m_currentTargetWindow = win ;
	479	trackingGlobals->m_currentTarget = win->GetDropTarget() ;
a07c1212	480	{
da804130 SC	481	wxDragResult result = wxDragNone ;
	482	if ( trackingGlobals->m_currentTarget )
	483	{
	484	trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
	485	result = trackingGlobals->m_currentTarget->OnEnter(
	486	localx , localy , wxDragCopy ) ;
	487	}
	488
	489	if ( trackingGlobals->m_currentSource && trackingGlobals->m_currentSource->GiveFeedback( result ) == FALSE )
	490	{
	491	if ( trackingGlobals->m_currentSource->MacInstallDefaultCursor( result ) == FALSE )
	492	{
	493	switch( result )
	494	{
	495	case wxDragCopy :
	496	{
	497	wxCursor cursor(wxCURSOR_COPY_ARROW) ;
	498	cursor.MacInstall() ;
	499	}
	500	break ;
	501	case wxDragMove :
	502	{
	503	wxCursor cursor(wxCURSOR_ARROW) ;
	504	cursor.MacInstall() ;
	505	}
	506	break ;
	507	case wxDragNone :
	508	{
	509	wxCursor cursor(wxCURSOR_NO_ENTRY) ;
	510	cursor.MacInstall() ;
	511	}
	512	break ;
	513	}
	514	}
	515	}
	516
	517	if ( result != wxDragNone )
a07c1212	518	{
da804130 SC	519	int x , y ;
	520	x = y = 0 ;
	521	win->MacWindowToRootWindow( &x , &y ) ;
	522	RgnHandle hiliteRgn = NewRgn() ;
	523	SetRectRgn( hiliteRgn , x , y , x+win->GetSize().x ,y+win->GetSize().y) ;
	524	ShowDragHilite(theDrag, hiliteRgn, true);
	525	DisposeRgn( hiliteRgn ) ;
a07c1212 SC	526	}
	527	}
	528	}
	529	}
	530	else
	531	{
	532	if( trackingGlobals->m_currentTarget )
	533	{
	534	trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
	535	trackingGlobals->m_currentTarget->OnDragOver(
	536	localx , localy , wxDragCopy ) ;
	537	}
	538	}
	539
	540	}
	541	// MyTrackItemUnderMouse(localMouse, theWindow);
	542	break;
	543	case kDragTrackingLeaveWindow:
	544	if (trackingGlobals->m_currentTarget)
	545	{
	546	trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
	547	trackingGlobals->m_currentTarget->OnLeave() ;
	548	HideDragHilite(theDrag);
	549	trackingGlobals->m_currentTarget = NULL ;
	550	}
	551	trackingGlobals->m_currentTargetWindow = NULL ;
	552	break;
	553	}
	554	return(noErr);
	555	}
	556
f2af4afb GD	557	pascal OSErr wxMacWindowDragReceiveHandler(WindowPtr theWindow,
	558	void *handlerRefCon,
	559	DragReference theDrag)
a07c1212 SC	560	{
	561	MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;
	562	if ( trackingGlobals->m_currentTarget )
	563	{
	564	Point mouse,localMouse ;
	565	int localx,localy ;
	566
	567	trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
	568	GetDragMouse(theDrag, &mouse, 0L);
	569	localMouse = mouse;
	570	GlobalToLocal(&localMouse);
	571	localx = localMouse.h ;
	572	localy = localMouse.v ;
	573	//TODO : should we use client coordinates
	574	if ( trackingGlobals->m_currentTargetWindow )
	575	trackingGlobals->m_currentTargetWindow->MacRootWindowToWindow( &localx , &localy ) ;
	576	if ( trackingGlobals->m_currentTarget->OnDrop( localx , localy ) )
	577	{
	578	trackingGlobals->m_currentTarget->OnData( localx , localy , wxDragCopy ) ;
	579	}
	580	}
	581	return(noErr);
	582	}
03e11df5	583	#endif