X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/f5c6eb5c178b44f4400495e06274ffd130635190..b724bafee0cbbb5c587d11e82a18c8ea5b060f26:/src/mac/carbon/dnd.cpp

diff --git a/src/mac/carbon/dnd.cpp b/src/mac/carbon/dnd.cpp
index 42b397d590..6f5a325730 100644
--- a/src/mac/carbon/dnd.cpp
+++ b/src/mac/carbon/dnd.cpp
@@ -1,101 +1,302 @@
 ///////////////////////////////////////////////////////////////////////////////
-// Name:        dnd.cpp
-// Purpose:     wxDropTarget, wxDropSource, wxDataObject implementation
-// Author:      AUTHOR
+// Name:        src/mac/carbon/dnd.cpp
+// Purpose:     wxDropTarget, wxDropSource implementations
+// Author:      Stefan Csomor
 // Modified by:
-// Created:     ??/??/98
+// Created:     1998-01-01
 // RCS-ID:      $Id$
-// Copyright:   (c) 1998 AUTHOR
+// Copyright:   (c) 1998 Stefan Csomor
 // Licence:     wxWindows licence
 ///////////////////////////////////////////////////////////////////////////////
 
-#ifdef __GNUG__
-#pragma implementation "dnd.h"
-#endif
+#include "wx/wxprec.h"
+
+#if wxUSE_DRAG_AND_DROP
 
 #include "wx/dnd.h"
-#include "wx/window.h"
-#include "wx/app.h"
-#include "wx/gdicmn.h"
 
-#if wxUSE_DRAG_AND_DROP
+#ifndef WX_PRECOMP
+    #include "wx/app.h"
+    #include "wx/toplevel.h"
+    #include "wx/gdicmn.h"
+#endif // WX_PRECOMP
+
+#include "wx/mac/private.h"
+
+#ifndef __DARWIN__
+    #include <Scrap.h>
+#endif
 
-// ----------------------------------------------------------------------------
-// global
-// ----------------------------------------------------------------------------
 
 // ----------------------------------------------------------------------------
-// wxDropTarget
+// globals
 // ----------------------------------------------------------------------------
 
-wxDropTarget::wxDropTarget()
+typedef struct
 {
-};
+    wxWindow *m_currentTargetWindow;
+    wxDropTarget *m_currentTarget;
+    wxDropSource *m_currentSource;
+    wxDragResult m_result;
+    int m_flags;
+} MacTrackingGlobals;
 
-wxDropTarget::~wxDropTarget()
-{
-};
+MacTrackingGlobals gTrackingGlobals;
 
-// ----------------------------------------------------------------------------
-// wxTextDropTarget
-// ----------------------------------------------------------------------------
-#ifndef __DARWIN__
-bool wxTextDropTarget::OnDrop( wxCoord x, wxCoord y, const void *pData )
-{
-  OnDropText( x, y, (const char*)pData );
-  return TRUE;
-};
-#endif
+void wxMacEnsureTrackingHandlersInstalled();
 
-bool wxTextDropTarget::OnDropText( wxCoord x, wxCoord y, const wxString &psz )
-{
-  printf( "Got dropped text: %s.\n", (char *)psz );
-  printf( "At x: %d, y: %d.\n", (int)x, (int)y );
-  return TRUE;
-};
+//----------------------------------------------------------------------------
+// wxDropTarget
+//----------------------------------------------------------------------------
 
-#ifndef __DARWIN__
-size_t wxTextDropTarget::GetFormatCount() const
+wxDropTarget::wxDropTarget( wxDataObject *data )
+            : wxDropTargetBase( data )
 {
-  return 1;
+    wxMacEnsureTrackingHandlersInstalled();
 }
 
-wxDataFormat wxTextDropTarget::GetFormat(size_t WXUNUSED(n)) const
+wxDragResult wxDropTarget::OnDragOver(
+    wxCoord WXUNUSED(x), wxCoord WXUNUSED(y),
+    wxDragResult def )
 {
-  return wxDF_TEXT;
+    return CurrentDragHasSupportedFormat() ? def : wxDragNone;
 }
-#endif
 
-// ----------------------------------------------------------------------------
-// wxFileDropTarget
-// ----------------------------------------------------------------------------
-
-#ifndef __DARWIN__
-bool wxFileDropTarget::OnDropFiles( wxCoord x, wxCoord y, size_t nFiles, const char * const WXUNUSED(aszFiles)[] )
+bool wxDropTarget::OnDrop( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y) )
 {
-  printf( "Got %d dropped files.\n", (int)nFiles );
-  printf( "At x: %d, y: %d.\n", (int)x, (int)y );
-  return TRUE;
+    if (m_dataObject == NULL)
+        return false;
+
+    return CurrentDragHasSupportedFormat();
 }
-#endif
 
-bool wxFileDropTarget::OnDrop(wxCoord x, wxCoord y, const wxArrayString& filenames)
+wxDragResult wxDropTarget::OnData(
+    wxCoord WXUNUSED(x), wxCoord WXUNUSED(y),
+    wxDragResult def )
 {
-  return OnDropFiles(x, y, 1, &filenames); 
+    if (m_dataObject == NULL)
+        return wxDragNone;
+
+    if (!CurrentDragHasSupportedFormat())
+        return wxDragNone;
+
+    return GetData() ? def : wxDragNone;
 }
 
-#ifndef __DARWIN__
-size_t wxFileDropTarget::GetFormatCount() const
+bool wxDropTarget::CurrentDragHasSupportedFormat()
 {
-  return 1;
+    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;
+        ItemReference theItem;
+        FlavorType theType;
+        UInt16 flavors = 0;
+
+        CountDragItems( (DragReference)m_currentDrag, &items );
+        for (UInt16 index = 1; index <= items && !supported; ++index)
+        {
+            flavors = 0;
+            GetDragItemReferenceNumber( (DragReference)m_currentDrag, index, &theItem );
+            CountDragItemFlavors( (DragReference)m_currentDrag, theItem, &flavors );
+
+            for ( UInt16 flavor = 1; flavor <= flavors; ++flavor )
+            {
+                GetFlavorType( (DragReference)m_currentDrag, theItem, flavor, &theType );
+                if ( m_dataObject->IsSupportedFormat( wxDataFormat( theType ) ) )
+                {
+                    supported = true;
+                    break;
+                }
+            }
+        }
+    }
+
+    return supported;
 }
 
-wxDataFormat wxFileDropTarget::GetFormat(size_t WXUNUSED(n)) const
+bool wxDropTarget::GetData()
 {
-  return wxDF_FILENAME;
-}
+    if (m_dataObject == NULL)
+        return false;
+
+    if ( !CurrentDragHasSupportedFormat() )
+        return false;
+
+    bool transferred = false;
+    if ( gTrackingGlobals.m_currentSource != NULL )
+    {
+        wxDataObject* data = gTrackingGlobals.m_currentSource->GetDataObject();
+
+        if (data != NULL)
+        {
+            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;
+        ItemReference theItem;
+        FlavorType theType;
+        FlavorFlags theFlags;
+        UInt16 flavors;
+        wxString filenamesPassed;
+
+        CountDragItems( (DragReference)m_currentDrag, &items );
+        for (UInt16 index = 1; index <= items; ++index)
+        {
+            flavors = 0;
+            GetDragItemReferenceNumber( (DragReference)m_currentDrag, index, &theItem );
+            CountDragItemFlavors( (DragReference)m_currentDrag, theItem, &flavors );
+            wxDataFormat preferredFormat = m_dataObject->GetPreferredFormat( wxDataObject::Set );
+            bool hasPreferredFormat = false;
+
+            for (UInt16 flavor = 1; flavor <= flavors; ++flavor)
+            {
+                result = GetFlavorType( (DragReference)m_currentDrag, theItem, flavor, &theType );
+                wxDataFormat format( theType );
+                if (preferredFormat == format)
+                {
+                    hasPreferredFormat = true;
+                    break;
+                }
+            }
+
+            for (UInt16 flavor = 1; flavor <= flavors; ++flavor)
+            {
+                result = GetFlavorType( (DragReference)m_currentDrag, theItem, flavor, &theType );
+                wxDataFormat format( theType );
+                if ((hasPreferredFormat && format == preferredFormat)
+                    || (!hasPreferredFormat && m_dataObject->IsSupportedFormat( format )))
+                {
+                    result = GetFlavorFlags( (DragReference)m_currentDrag, theItem, theType, &theFlags );
+                    if (result == noErr)
+                    {
+                        Size dataSize;
+                        Ptr theData;
+
+                        GetFlavorDataSize( (DragReference)m_currentDrag, theItem, theType, &dataSize );
+                        if (theType == kScrapFlavorTypeText)
+                        {
+                            // this increment is only valid for allocating:
+                            // on the next GetFlavorData call it is reset again to the original value
+                            dataSize++;
+                        }
+                        else if (theType == kScrapFlavorTypeUnicode)
+                        {
+                            // this increment is only valid for allocating:
+                            // on the next GetFlavorData call it is reset again to the original value
+                            dataSize++;
+                            dataSize++;
+                        }
+
+                        if (dataSize > 0)
+                            theData = new char[dataSize];
+                        else
+                            theData = NULL;
+
+                        GetFlavorData( (DragReference)m_currentDrag, theItem, theType, (void*)theData, &dataSize, 0L );
+                        switch (theType)
+                        {
+                        case kScrapFlavorTypeText:
+                            theData[dataSize] = 0;
+                            m_dataObject->SetData( wxDataFormat(wxDF_TEXT), dataSize, theData );
+                            break;
+
+#if wxUSE_UNICODE
+                        case kScrapFlavorTypeUnicode:
+                            theData[dataSize + 0] =
+                            theData[dataSize + 1] = 0;
+                            m_dataObject->SetData( wxDataFormat(wxDF_UNICODETEXT), dataSize, theData );
+                            break;
 #endif
 
+                        case kDragFlavorTypeHFS:
+                            if (theData != NULL)
+                            {
+                                HFSFlavor* theFile = (HFSFlavor*)theData;
+#ifndef __LP64__
+                                wxString name = wxMacFSSpec2MacFilename( &theFile->fileSpec );
+
+                                if (!name.empty())
+                                    filenamesPassed += name + wxT("\n");
+#endif
+                            }
+                            break;
+
+                        default:
+                            m_dataObject->SetData( format, dataSize, theData );
+                            break;
+                        }
+
+                        delete [] theData;
+                    }
+                    break;
+                }
+            }
+        }
+
+        if (filenamesPassed.length() > 0)
+        {
+            wxCharBuffer buf = filenamesPassed.fn_str();
+            m_dataObject->SetData( wxDataFormat(wxDF_FILENAME), strlen( buf ), (const char*)buf );
+        }
+    }
+
+    return true;
+}
+
 //-------------------------------------------------------------------------
 // wxDropSource
 //-------------------------------------------------------------------------
@@ -103,39 +304,419 @@ wxDataFormat wxFileDropTarget::GetFormat(size_t WXUNUSED(n)) const
 //-----------------------------------------------------------------------------
 // drag request
 
-wxDropSource::wxDropSource( wxWindow *win )
+wxDropSource::wxDropSource(wxWindow *win,
+                           const wxCursor &cursorCopy,
+                           const wxCursor &cursorMove,
+                           const wxCursor &cursorStop)
+            : wxDropSourceBase(cursorCopy, cursorMove, cursorStop)
 {
-    // TODO
-  //    m_window = win;
-    m_data = NULL;
+    wxMacEnsureTrackingHandlersInstalled();
 
-    //    m_defaultCursor = wxCursor( wxCURSOR_NO_ENTRY );
-    //    m_goaheadCursor = wxCursor( wxCURSOR_HAND );
-};
+    m_window = win;
+}
 
-wxDropSource::wxDropSource( wxDataObject &data, wxWindow *win )
+wxDropSource::wxDropSource(wxDataObject& data,
+                           wxWindow *win,
+                           const wxCursor &cursorCopy,
+                           const wxCursor &cursorMove,
+                           const wxCursor &cursorStop)
+            : wxDropSourceBase(cursorCopy, cursorMove, cursorStop)
 {
-    // TODO
-  //    m_window = win;
-    m_data = &data;
+    wxMacEnsureTrackingHandlersInstalled();
+
+    SetData( data );
+    m_window = win;
+}
+
+wxDropSource::~wxDropSource()
+{
+}
+
+wxDragResult wxDropSource::DoDragDrop(int flags)
+{
+    wxASSERT_MSG( m_data, wxT("Drop source: no data") );
+
+    if ((m_data == NULL) || (m_data->GetFormatCount() == 0))
+        return (wxDragResult)wxDragNone;
 
-    //    m_defaultCursor = wxCursor( wxCURSOR_NO_ENTRY );
-    //    m_goaheadCursor = wxCursor( wxCURSOR_HAND );
-};
+    DragReference theDrag;
+    RgnHandle dragRegion;
 
-void wxDropSource::SetData( wxDataObject &data )
+    if (NewDrag( &theDrag ) != noErr)
+        return wxDragNone;
+
+    // add data to drag
+    size_t formatCount = m_data->GetFormatCount();
+    wxDataFormat *formats = new wxDataFormat[formatCount];
+    m_data->GetAllFormats( formats );
+    ItemReference theItem = (ItemReference) 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' || type == 'utxt' )
+        {
+            if ( dataSize > 0 )
+                dataSize--;
+            dataPtr[ dataSize ] = 0;
+            if ( type == 'utxt' )
+            {
+                if ( dataSize > 0 )
+                    dataSize--;
+                dataPtr[ dataSize ] = 0;
+            }
+
+            AddDragItemFlavor( theDrag, theItem, type, dataPtr, dataSize, 0 );
+        }
+        else if (type == kDragFlavorTypeHFS )
+        {
+            HFSFlavor  theFlavor;
+            OSErr err = noErr;
+#ifndef __LP64__
+            CInfoPBRec cat;
+
+            wxMacFilename2FSSpec( wxString( dataPtr, *wxConvCurrent ), &theFlavor.fileSpec );
+
+            memset( &cat, 0, sizeof(cat) );
+            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 );
+#endif
+          if (err == noErr)
+            {
+#ifndef __LP64__
+                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;
+                }
+#endif
+                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;
+    gTrackingGlobals.m_result = wxDragNone;
+    gTrackingGlobals.m_flags = flags;
+
+    TrackDrag( theDrag, ev, dragRegion );
+    DisposeRgn( dragRegion );
+    DisposeDrag( theDrag );
+    gTrackingGlobals.m_currentSource = NULL;
+
+    return gTrackingGlobals.m_result;
+}
+
+bool wxDropSource::MacInstallDefaultCursor(wxDragResult effect)
 {
-    m_data = &data;
-};
+    const wxCursor& cursor = GetCursor(effect);
+    bool result = cursor.Ok();
+
+    if ( result )
+        cursor.MacInstall();
+
+    return result;
+}
 
-wxDropSource::~wxDropSource(void)
+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()
 {
-};
-   
-wxDragResult wxDropSource::DoDragDrop( bool WXUNUSED(bAllowMove) )
+    if ( !gTrackingGlobalsInstalled )
+    {
+        OSStatus err;
+
+        err = InstallTrackingHandler( NewDragTrackingHandlerUPP(wxMacWindowDragTrackingHandler), 0L, &gTrackingGlobals );
+        verify_noerr( err );
+
+        err = InstallReceiveHandler( NewDragReceiveHandlerUPP(wxMacWindowDragReceiveHandler), 0L, &gTrackingGlobals );
+        verify_noerr( err );
+
+        gTrackingGlobalsInstalled = true;
+    }
+}
+
+pascal OSErr wxMacWindowDragTrackingHandler(
+    DragTrackingMessage theMessage, WindowPtr theWindow,
+    void *handlerRefCon, DragReference theDrag )
 {
-    // TODO
-    return wxDragError;
-};
+    MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;
 
+    Point mouse, localMouse;
+    DragAttributes attributes;
+
+    GetDragAttributes( theDrag, &attributes );
+
+    wxTopLevelWindowMac* toplevel = wxFindWinFromMacWindow( theWindow );
+
+    bool optionDown = GetCurrentKeyModifiers() & optionKey;
+    wxDragResult result = optionDown ? wxDragCopy : wxDragMove;
+
+    switch (theMessage)
+    {
+        case kDragTrackingEnterHandler:
+        case kDragTrackingLeaveHandler:
+            break;
+
+        case kDragTrackingEnterWindow:
+            if (trackingGlobals != NULL)
+            {
+                trackingGlobals->m_currentTargetWindow = NULL;
+                trackingGlobals->m_currentTarget = NULL;
+            }
+            break;
+
+        case kDragTrackingInWindow:
+            if (trackingGlobals == NULL)
+                break;
+            if (toplevel == NULL)
+                break;
+
+            GetDragMouse( theDrag, &mouse, 0L );
+            localMouse = mouse;
+            wxMacGlobalToLocal( theWindow, &localMouse );
+
+            {
+                wxWindow *win = NULL;
+                ControlPartCode controlPart;
+                ControlRef control = wxMacFindControlUnderMouse(
+                    toplevel, localMouse, theWindow, &controlPart );
+                if ( control )
+                    win = wxFindControlFromMacControl( control );
+                else
+                    win = toplevel;
+
+                int localx, localy;
+                localx = localMouse.h;
+                localy = localMouse.v;
+
+                if ( win )
+                    win->MacRootWindowToWindow( &localx, &localy );
+                if ( win != trackingGlobals->m_currentTargetWindow )
+                {
+                    if ( trackingGlobals->m_currentTargetWindow )
+                    {
+                        // this window is left
+                        if ( trackingGlobals->m_currentTarget )
+                        {
+#ifndef __LP64__
+                            HideDragHilite( theDrag );
+#endif
+                            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();
+                        {
+                            if ( trackingGlobals->m_currentTarget )
+                            {
+                                trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag );
+                                result = trackingGlobals->m_currentTarget->OnEnter( localx, localy, result );
+                            }
+
+                            if ( result != wxDragNone )
+                            {
+                                int x, y;
+
+                                x = y = 0;
+                                win->MacWindowToRootWindow( &x, &y );
+                                RgnHandle hiliteRgn = NewRgn();
+                                Rect r = { y, x, y + win->GetSize().y, x + win->GetSize().x };
+                                RectRgn( hiliteRgn, &r );
+#ifndef __LP64__
+                                ShowDragHilite( theDrag, hiliteRgn, true );
+#endif
+                                DisposeRgn( hiliteRgn );
+                            }
+                        }
+                    }
+                }
+                else
+                {
+                    if ( trackingGlobals->m_currentTarget )
+                    {
+                        trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag );
+                        trackingGlobals->m_currentTarget->OnDragOver( localx, localy, result );
+                    }
+                }
+
+                // set cursor for OnEnter and OnDragOver
+                if ( trackingGlobals->m_currentSource && !trackingGlobals->m_currentSource->GiveFeedback( result ) )
+                {
+                  if ( !trackingGlobals->m_currentSource->MacInstallDefaultCursor( result ) )
+                  {
+                      int cursorID = wxCURSOR_NONE;
+
+                      switch (result)
+                      {
+                          case wxDragCopy:
+                              cursorID = wxCURSOR_COPY_ARROW;
+                              break;
+
+                          case wxDragMove:
+                              cursorID = wxCURSOR_ARROW;
+                              break;
+
+                          case wxDragNone:
+                              cursorID = wxCURSOR_NO_ENTRY;
+                              break;
+
+                          case wxDragError:
+                          case wxDragLink:
+                          case wxDragCancel:
+                          default:
+                              // put these here to make gcc happy
+                              ;
+                      }
+
+                      if (cursorID != wxCURSOR_NONE)
+                      {
+                          wxCursor cursor( cursorID );
+                          cursor.MacInstall();
+                      }
+                   }
+                }
+            }
+            break;
+
+        case kDragTrackingLeaveWindow:
+            if (trackingGlobals == NULL)
+                break;
+
+            if (trackingGlobals->m_currentTarget)
+            {
+                trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag );
+                trackingGlobals->m_currentTarget->OnLeave();
+#ifndef __LP64__
+                HideDragHilite( theDrag );
 #endif
+                trackingGlobals->m_currentTarget = NULL;
+            }
+            trackingGlobals->m_currentTargetWindow = NULL;
+            break;
+
+        default:
+            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;
+        wxMacGlobalToLocal( theWindow, &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 ) )
+        {
+            // the option key indicates copy in Mac UI, if it's not pressed do
+            // move by default if it's allowed at all
+            wxDragResult
+                result = !(trackingGlobals->m_flags & wxDrag_AllowMove) ||
+                            (GetCurrentKeyModifiers() & optionKey)
+                            ? wxDragCopy
+                            : wxDragMove;
+            trackingGlobals->m_result =
+                trackingGlobals->m_currentTarget->OnData( localx, localy, result );
+        }
+    }
+
+    return noErr;
+}
+
+#endif // wxUSE_DRAG_AND_DROP
+