no real changes; just streamlined ifdef around compositing check and removed redundan...

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

diff --git a/src/mac/carbon/dnd.cpp b/src/mac/carbon/dnd.cpp
index 33ad69d413848af188e4a2af7eda7b3915f47bbf..f5212eb4e210e5d007c82f947b17abe3975bcc48 100644 (file)
--- a/src/mac/carbon/dnd.cpp
+++ b/src/mac/carbon/dnd.cpp
@@ -1,19 +1,15 @@
 ///////////////////////////////////////////////////////////////////////////////
 // Name:        dnd.cpp
 ///////////////////////////////////////////////////////////////////////////////
 // Name:        dnd.cpp

-// Purpose:     wxDropTarget, wxDropSource, wxDataObject implementation
-// Author:      AUTHOR
+// Purpose:     wxDropTarget, wxDropSource implementations
+// Author:      Stefan Csomor

 // Modified by:
 // Modified by:

-// Created:     ??/??/98
+// Created:     1998-01-01

 // RCS-ID:      $Id$
 // RCS-ID:      $Id$

-// Copyright:   (c) 1998 AUTHOR
+// Copyright:   (c) 1998 Stefan Csomor

 // Licence:     wxWindows licence
 ///////////////////////////////////////////////////////////////////////////////
 
 // Licence:     wxWindows licence
 ///////////////////////////////////////////////////////////////////////////////
 

-#ifdef __GNUG__
-#pragma implementation "dnd.h"
-#endif
-
-#include "wx/defs.h"
+#include "wx/wxprec.h"

 
 #if wxUSE_DRAG_AND_DROP
 
 
 #if wxUSE_DRAG_AND_DROP
 


@@ -24,20 +20,26 @@
 #include "wx/gdicmn.h"
 #include "wx/mac/private.h"
 
 #include "wx/gdicmn.h"
 #include "wx/mac/private.h"
 

+#ifndef __DARWIN__
+    #include <Scrap.h>
+#endif
+
+

 // ----------------------------------------------------------------------------
 // ----------------------------------------------------------------------------

-// global
+// globals

 // ----------------------------------------------------------------------------
 
 // ----------------------------------------------------------------------------
 

-void wxMacEnsureTrackingHandlersInstalled() ;
-
-typedef struct 
+typedef struct

 {
 {

-    wxWindow* m_currentTargetWindow ;
-    wxDropTarget* m_currentTarget ;
-    wxDropSource* m_currentSource ;
-} MacTrackingGlobals ;
+    wxWindow* m_currentTargetWindow;
+    wxDropTarget* m_currentTarget;
+    wxDropSource* m_currentSource;
+}
+MacTrackingGlobals;

 
 

-MacTrackingGlobals gTrackingGlobals ; 
+MacTrackingGlobals gTrackingGlobals;
+
+void wxMacEnsureTrackingHandlersInstalled() ;

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


@@ -53,14 +55,13 @@ wxDragResult wxDropTarget::OnDragOver( wxCoord WXUNUSED(x),
                                        wxCoord WXUNUSED(y),
                                        wxDragResult def )
 {
                                        wxCoord WXUNUSED(y),
                                        wxDragResult def )
 {

-

     return CurrentDragHasSupportedFormat() ? def : wxDragNone;
 }
 
 bool wxDropTarget::OnDrop( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y) )
 {
     return CurrentDragHasSupportedFormat() ? def : wxDragNone;
 }
 
 bool wxDropTarget::OnDrop( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y) )
 {

-    if (!m_dataObject)
-        return FALSE;
+    if (m_dataObject == NULL)
+        return false;

 
     return CurrentDragHasSupportedFormat() ;
 }
 
     return CurrentDragHasSupportedFormat() ;
 }


@@ -68,7 +69,7 @@ bool wxDropTarget::OnDrop( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y) )
 wxDragResult wxDropTarget::OnData( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y),
                                    wxDragResult def )
 {
 wxDragResult wxDropTarget::OnData( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y),
                                    wxDragResult def )
 {

-    if (!m_dataObject)
+    if (m_dataObject == NULL)

         return wxDragNone;
 
     if (!CurrentDragHasSupportedFormat())
         return wxDragNone;
 
     if (!CurrentDragHasSupportedFormat())


@@ -77,154 +78,216 @@ wxDragResult wxDropTarget::OnData( wxCoord WXUNUSED(x), wxCoord WXUNUSED(y),
     return GetData() ? def : wxDragNone;
 }
 
     return GetData() ? def : wxDragNone;
 }
 

-bool wxDropTarget::CurrentDragHasSupportedFormat() 
+bool wxDropTarget::CurrentDragHasSupportedFormat()

 {
     bool supported = false ;
 {
     bool supported = false ;

+

     if ( gTrackingGlobals.m_currentSource != NULL )
     {
     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++)
+        wxDataObject* data = gTrackingGlobals.m_currentSource->GetDataObject() ;
+
+        if ( data )

         {
         {

-            wxDataFormat format = array[i] ;
-            if ( m_dataObject->IsSupported( format ) ) 
+            size_t formatcount = data->GetFormatCount() ;
+            wxDataFormat *array = new wxDataFormat[formatcount];
+            data->GetAllFormats( array );
+            for (size_t i = 0; !supported && i < formatcount ; i++)

             {
             {

-              supported = true ;
-              break ;
+                wxDataFormat format = array[i] ;
+                if ( m_dataObject->IsSupported( format ) )
+                {
+                    supported = true ;
+                    break ;
+                }

             }
             }

+
+            delete [] array ;

         }
         }

-        delete[] array ;
-      }

     }
     }

+

     if ( !supported )
     {
     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 ) ) )
+        UInt16 items ;
+        OSErr result;
+        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 )

             {
             {

-              supported = true ;
-              break ;
+                result = GetFlavorType( (DragReference)m_currentDrag, theItem, flavor, &theType );
+                if ( m_dataObject->IsSupportedFormat( wxDataFormat( theType ) ) )
+                {
+                    supported = true ;
+                    break ;
+                }

             }
             }

-          }
-      }
+        }

     }
     }

-    return supported ;   
+
+    return supported ;

 }
 
 bool wxDropTarget::GetData()
 {
 }
 
 bool wxDropTarget::GetData()
 {

-    if (!m_dataObject)
-        return FALSE;
-        
+    if (m_dataObject == NULL)
+        return false;
+

     if ( !CurrentDragHasSupportedFormat() )
     if ( !CurrentDragHasSupportedFormat() )

-        return FALSE ;
-     
-    bool transferred = false ;   
+        return false ;
+
+    bool transferred = false ;

     if ( gTrackingGlobals.m_currentSource != NULL )
     {
     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++)
+        wxDataObject* data = gTrackingGlobals.m_currentSource->GetDataObject() ;
+
+        if ( data )

         {
         {

-            wxDataFormat format = array[i] ;
-            if ( m_dataObject->IsSupported( format ) ) 
+            size_t formatcount = data->GetFormatCount() ;
+            wxDataFormat *array = new wxDataFormat[formatcount];
+            data->GetAllFormats( array );
+            for (size_t i = 0; !transferred && i < formatcount ; i++)

             {
             {

-              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 ;
-              }
+                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 ;
-      }
+
+            delete [] array ;
+        }

     }
     }

+

     if ( !transferred )
     {
     if ( !transferred )
     {

-      UInt16 items ;
-      OSErr result;
-      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 ) )
+        UInt16 items ;
+        OSErr result;
+        ItemReference theItem;
+        FlavorType theType ;
+        FlavorFlags theFlags;
+        UInt16 flavors ;
+        bool firstFileAdded = false ;
+
+        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 )

             {
             {

-              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' )
-                                   dataSize++ ;
-                  theData = new char[dataSize];
-                  GetFlavorData((DragReference)m_currentDrag, theItem, theType, (void*) theData, &dataSize, 0L); 
-                  if( theType == 'TEXT' )
-                  {
-                    theData[dataSize]=0 ;       
-                    if ( wxApp::s_macDefaultEncodingIsPC )
+                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)

                     {
                     {

-                      wxMacConvertToPC((char*)theData) ;
+                        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++ ;
+                        }
+
+                        theData = new char[dataSize];
+
+                        GetFlavorData( (DragReference)m_currentDrag, theItem, theType, (void*) theData, &dataSize, 0L );
+                        if ( theType == kScrapFlavorTypeText )
+                        {
+                            theData[dataSize] = 0 ;
+                            m_dataObject->SetData( wxDataFormat(wxDF_TEXT), dataSize , theData );
+                        }
+#if wxUSE_UNICODE
+                        else if ( theType == kScrapFlavorTypeUnicode )
+                        {
+                            theData[dataSize + 0] =
+                            theData[dataSize + 1] = 0 ;
+                            m_dataObject->SetData( wxDataFormat(wxDF_UNICODETEXT), dataSize , theData );
+                        }
+#endif
+                        else if ( theType == kDragFlavorTypeHFS )
+                        {
+                            wxFileDataObject *fdo = dynamic_cast<wxFileDataObject*>(m_dataObject);
+                            wxASSERT( fdo != NULL );
+
+                            if ((theData != NULL) && (fdo != NULL))
+                            {
+                                HFSFlavor* theFile = (HFSFlavor*) theData ;
+                                wxString name = wxMacFSSpec2MacFilename( &theFile->fileSpec ) ;
+
+                                if ( !firstFileAdded )
+                                {
+                                    // reset file list
+                                    fdo->SetData( 0 , "" ) ;
+                                    firstFileAdded = true ;
+                                }
+
+                                if (!name.IsEmpty())
+                                    fdo->AddFile( name ) ;
+                            }
+                        }
+                        else
+                        {
+                            m_dataObject->SetData( format, dataSize, theData );
+                        }
+
+                        delete [] theData;

                     }
                     }

-                    m_dataObject->SetData( format, dataSize, theData );
-                  }
-                  else if ( theType == kDragFlavorTypeHFS )
-                  {
-                    HFSFlavor* theFile = (HFSFlavor*) theData ;
-                    wxString name = wxMacFSSpec2MacFilename( &theFile->fileSpec ) ;
-                    ((wxFileDataObject*)m_dataObject)->AddFile( name ) ;
-                  }
-                  else
-                  {
-                    m_dataObject->SetData( format, dataSize, theData );
-                  }
-                  delete[] theData;
-              }
-              break ;
+                    break ;
+                }

             }
             }

-          }
-      }
+        }

     }
     }

-    return TRUE ;   
+
+    return true ;

 }
 
 //-------------------------------------------------------------------------
 }
 
 //-------------------------------------------------------------------------


@@ -235,21 +298,25 @@ bool wxDropTarget::GetData()
 // drag request
 
 wxDropSource::wxDropSource(wxWindow *win,
 // drag request
 
 wxDropSource::wxDropSource(wxWindow *win,

-                           const wxIcon &iconCopy,
-                           const wxIcon &iconMove,
-                           const wxIcon &iconNone)
+                           const wxCursor &cursorCopy,
+                           const wxCursor &cursorMove,
+                           const wxCursor &cursorStop)
+            : wxDropSourceBase(cursorCopy, cursorMove, cursorStop)

 {
     wxMacEnsureTrackingHandlersInstalled() ;
 {
     wxMacEnsureTrackingHandlersInstalled() ;

+

     m_window = win;
 }
 
 wxDropSource::wxDropSource(wxDataObject& data,
                            wxWindow *win,
     m_window = win;
 }
 
 wxDropSource::wxDropSource(wxDataObject& data,
                            wxWindow *win,

-                           const wxIcon &iconCopy,
-                           const wxIcon &iconMove,
-                           const wxIcon &iconNone)
+                           const wxCursor &cursorCopy,
+                           const wxCursor &cursorMove,
+                           const wxCursor &cursorStop)
+            : wxDropSourceBase(cursorCopy, cursorMove, cursorStop)

 {
     wxMacEnsureTrackingHandlersInstalled() ;
 {
     wxMacEnsureTrackingHandlersInstalled() ;

+

     SetData( data );
     m_window = win;
 }
     SetData( data );
     m_window = win;
 }


@@ -258,111 +325,153 @@ wxDropSource::~wxDropSource()
 {
 }
 
 {
 }
 

-
-wxDragResult wxDropSource::DoDragDrop(int WXUNUSED(flags))
+wxDragResult wxDropSource::DoDragDrop(int flags)

 {
     wxASSERT_MSG( m_data, wxT("Drop source: no data") );
 
     if (!m_data)
         return (wxDragResult) wxDragNone;
 {
     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 (m_data->GetFormatCount() == 0)
         return (wxDragResult) wxDragNone;
 
     OSErr result;
     DragReference theDrag;
     RgnHandle dragRegion;

-    if ((result = NewDrag(&theDrag)))
-    {
+    if ((result = NewDrag(&theDrag)) != noErr)

         return wxDragNone ;
         return wxDragNone ;

-    }
+

     // add data to drag
     size_t formatCount = m_data->GetFormatCount() ;
     wxDataFormat *formats = new wxDataFormat[formatCount] ;
     m_data->GetAllFormats( formats ) ;
     ItemReference theItem = 1 ;
     // 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() ;
     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' )
+        if ( type == 'TEXT' || type == 'utxt' )

         {
         {

-          dataSize-- ;
-          if ( wxApp::s_macDefaultEncodingIsPC )
-          {
-            wxMacConvertFromPC((char*)dataPtr) ;
-          }
-          AddDragItemFlavor(theDrag, theItem, type , dataPtr, dataSize, 0);
+            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 )
         {
         }
         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);  
-          }    
+            HFSFlavor  theFlavor ;
+            OSErr err = noErr;
+            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 );
+            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
         {
         }
         else
         {

-          AddDragItemFlavor(theDrag, theItem, type , dataPtr, dataSize, 0);      
+            AddDragItemFlavor( theDrag, theItem, type , dataPtr, dataSize, 0 );

         }
         }

-        delete[] dataPtr ;
+
+        delete [] dataPtr ;

     }
     }

-    delete[] formats ;
-    
+
+    delete [] formats ;
+

     dragRegion = NewRgn();
     RgnHandle tempRgn = NewRgn() ;
     dragRegion = NewRgn();
     RgnHandle tempRgn = NewRgn() ;

-    
-    EventRecord* ev = (EventRecord*) wxTheApp->MacGetCurrentEvent() ;
+
+    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 ;
     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 ) ;
+    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 ) ;
 
     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 ;
+    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;
+
+    bool optionDown = GetCurrentKeyModifiers() & optionKey;
+    wxDragResult dndresult = wxDragCopy;
+    if ( flags != wxDrag_CopyOnly )
+        // on mac the option key is always the indication for copy
+        dndresult = optionDown ? wxDragCopy : wxDragMove;
+
+    return dndresult;
+}
+
+bool wxDropSource::MacInstallDefaultCursor(wxDragResult effect)
+{
+    const wxCursor& cursor = GetCursor(effect);
+    bool result = cursor.Ok();
+
+    if ( result )
+        cursor.MacInstall();
+
+    return result;

 }
 
 bool gTrackingGlobalsInstalled = false ;
 }
 
 bool gTrackingGlobalsInstalled = false ;


@@ -370,61 +479,83 @@ 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...
 
 // 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) ;
+pascal OSErr wxMacWindowDragTrackingHandler(
+    DragTrackingMessage theMessage, WindowPtr theWindow,
+    void *handlerRefCon, DragReference theDrag );
+pascal OSErr wxMacWindowDragReceiveHandler(
+    WindowPtr theWindow, void *handlerRefCon,
+    DragReference theDrag );

 
 void wxMacEnsureTrackingHandlersInstalled()
 {
 
 void wxMacEnsureTrackingHandlersInstalled()
 {

-    if( !gTrackingGlobalsInstalled )
+    if ( !gTrackingGlobalsInstalled )

     {
         OSErr result;
 
     {
         OSErr result;
 

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

 
 

-        gTrackingGlobalsInstalled = true ;
+        gTrackingGlobalsInstalled = true;

     }
 }
 
     }
 }
 

-pascal OSErr wxMacWindowDragTrackingHandler(DragTrackingMessage theMessage, WindowPtr theWindow,
-  void *handlerRefCon, DragReference theDrag)
-{ 
+pascal OSErr wxMacWindowDragTrackingHandler(
+    DragTrackingMessage theMessage, WindowPtr theWindow,
+    void *handlerRefCon, DragReference theDrag )
+{

     MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;
     MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;

+

     Point mouse, localMouse;
     DragAttributes attributes;
     Point mouse, localMouse;
     DragAttributes attributes;

-    GetDragAttributes(theDrag, &attributes);
-    wxTopLevelWindowMac* toplevel = wxFindWinFromMacWindow( theWindow ) ; 
-    switch(theMessage) 
+
+    GetDragAttributes( theDrag, &attributes );
+
+    wxTopLevelWindowMac* toplevel = wxFindWinFromMacWindow( theWindow ) ;
+
+    bool optionDown = GetCurrentKeyModifiers() & optionKey ;
+    wxDragResult result = optionDown ? wxDragCopy : wxDragMove;
+
+    switch (theMessage)

     {
         case kDragTrackingEnterHandler:
     {
         case kDragTrackingEnterHandler:

-            break;

         case kDragTrackingLeaveHandler:
             break;
         case kDragTrackingLeaveHandler:
             break;

+

         case kDragTrackingEnterWindow:
         case kDragTrackingEnterWindow:

-           trackingGlobals->m_currentTargetWindow = NULL ;
-            trackingGlobals->m_currentTarget = NULL ;
+            if (trackingGlobals != NULL)
+            {
+                trackingGlobals->m_currentTargetWindow = NULL ;
+                trackingGlobals->m_currentTarget = NULL ;
+            }

             break;
             break;

+

         case kDragTrackingInWindow:
         case kDragTrackingInWindow:

+            if (trackingGlobals == NULL)
+                break;

             if (toplevel == NULL)
                 break;
 
             if (toplevel == NULL)
                 break;
 

-            GetDragMouse(theDrag, &mouse, 0L);
+            GetDragMouse( theDrag, &mouse, 0L );

             localMouse = mouse;
             localMouse = mouse;

-            GlobalToLocal(&localMouse);
-            
-//            if (attributes & kDragHasLeftSenderWindow) 
+            GlobalToLocal( &localMouse );
+

             {
             {

-                wxPoint point(localMouse.h , localMouse.v) ;

                 wxWindow *win = NULL ;
                 wxWindow *win = NULL ;

-                toplevel->MacGetWindowFromPointSub( point , &win ) ;
+                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 ;
                 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 ( win )
                     win->MacRootWindowToWindow( &localx , &localy ) ;
                 if ( win != trackingGlobals->m_currentTargetWindow )


@@ -434,85 +565,141 @@ pascal OSErr wxMacWindowDragTrackingHandler(DragTrackingMessage theMessage, Wind
                         // this window is left
                         if ( trackingGlobals->m_currentTarget )
                         {
                         // this window is left
                         if ( trackingGlobals->m_currentTarget )
                         {

-                            HideDragHilite(theDrag);
-                            trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
-                            trackingGlobals->m_currentTarget->OnLeave() ;
+                            HideDragHilite( theDrag );
+                            trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag );
+                            trackingGlobals->m_currentTarget->OnLeave();

                             trackingGlobals->m_currentTarget = NULL;
                             trackingGlobals->m_currentTarget = NULL;

-                            trackingGlobals->m_currentTargetWindow = NULL ;
+                            trackingGlobals->m_currentTargetWindow = NULL;

                         }
                     }
                         }
                     }

+

                     if ( win )
                     {
                         // this window is entered
                         trackingGlobals->m_currentTargetWindow = win ;
                         trackingGlobals->m_currentTarget = win->GetDropTarget() ;
                     if ( win )
                     {
                         // this window is entered
                         trackingGlobals->m_currentTargetWindow = win ;
                         trackingGlobals->m_currentTarget = win->GetDropTarget() ;

-                        if ( trackingGlobals->m_currentTarget )

                         {
                         {

-                          trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
-                           if ( trackingGlobals->m_currentTarget->OnEnter(
-                                localx , localy , wxDragCopy ) != wxDragNone )
+                            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() ;
-                              SetRectRgn( hiliteRgn , x , y , x+win->GetSize().x ,y+win->GetSize().y) ;
-                              ShowDragHilite(theDrag, hiliteRgn, true);
-                              DisposeRgn( hiliteRgn ) ;
+                                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 ) ;
+                                ShowDragHilite( theDrag, hiliteRgn, true );
+                                DisposeRgn( hiliteRgn ) ;

                             }
                         }
                     }
                 }
                 else
                 {
                             }
                         }
                     }
                 }
                 else
                 {

-                    if( trackingGlobals->m_currentTarget )
+                    if ( trackingGlobals->m_currentTarget )

                     {
                         trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
                     {
                         trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;

-                        trackingGlobals->m_currentTarget->OnDragOver(
-                            localx , localy , wxDragCopy ) ;
+                        trackingGlobals->m_currentTarget->OnDragOver( localx , localy , result ) ;

                     }
                 }
                     }
                 }

-                
-          }
-            // MyTrackItemUnderMouse(localMouse, theWindow);
+
+                // set cursor for OnEnter and OnDragOver
+                if ( trackingGlobals->m_currentSource && !trackingGlobals->m_currentSource->GiveFeedback( result ) )
+                {
+                  if ( !trackingGlobals->m_currentSource->MacInstallDefaultCursor( result ) )
+                  {
+                      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 ;
+
+                          case wxDragError:
+                          case wxDragLink:
+                          case wxDragCancel:
+                          default:
+                              // put these here to make gcc happy
+                              ;
+                      }
+                   }
+                }
+            }

             break;
             break;

+

         case kDragTrackingLeaveWindow:
         case kDragTrackingLeaveWindow:

-            if (trackingGlobals->m_currentTarget) 
+            if (trackingGlobals == NULL)
+                break;
+
+            if (trackingGlobals->m_currentTarget)

             {
             {

-                trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag ) ;
-                trackingGlobals->m_currentTarget->OnLeave() ;
-                HideDragHilite(theDrag);
-                trackingGlobals->m_currentTarget = NULL ;
+                trackingGlobals->m_currentTarget->SetCurrentDrag( theDrag );
+                trackingGlobals->m_currentTarget->OnLeave();
+                HideDragHilite( theDrag );
+                trackingGlobals->m_currentTarget = NULL;

             }
             }

-            trackingGlobals->m_currentTargetWindow = NULL ;
+            trackingGlobals->m_currentTargetWindow = NULL;
+            break;
+
+        default:

             break;
     }
             break;
     }

-    return(noErr);
+
+    return noErr;

 }
 
 }
 

-pascal OSErr wxMacWindowDragReceiveHandler(WindowPtr theWindow, void *handlerRefCon,
-DragReference theDrag)
-{ 
-    MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*) handlerRefCon;
+pascal OSErr wxMacWindowDragReceiveHandler(
+    WindowPtr theWindow,
+    void *handlerRefCon,
+    DragReference theDrag)
+{
+    MacTrackingGlobals* trackingGlobals = (MacTrackingGlobals*)handlerRefCon;

     if ( trackingGlobals->m_currentTarget )
     {
     if ( trackingGlobals->m_currentTarget )
     {

-        Point mouse,localMouse ;
-        int localx,localy ;
-        
+        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 ;
         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
+
+        // TODO : should we use client coordinates?

         if ( trackingGlobals->m_currentTargetWindow )
             trackingGlobals->m_currentTargetWindow->MacRootWindowToWindow( &localx , &localy ) ;
         if ( trackingGlobals->m_currentTarget->OnDrop( localx , localy ) )
         {
         if ( trackingGlobals->m_currentTargetWindow )
             trackingGlobals->m_currentTargetWindow->MacRootWindowToWindow( &localx , &localy ) ;
         if ( trackingGlobals->m_currentTarget->OnDrop( localx , localy ) )
         {

-            trackingGlobals->m_currentTarget->OnData( localx , localy , wxDragCopy ) ;
+            bool optionDown = GetCurrentKeyModifiers() & optionKey ;
+            wxDragResult result = optionDown ? wxDragCopy : wxDragMove;
+            trackingGlobals->m_currentTarget->OnData( localx , localy , result ) ;

         }
     }
         }
     }

-    return(noErr);
+
+    return noErr;

 }
 }

+

 #endif
 #endif