dnd test app

2 files changed, 618 insertions, 0 deletions

diff --git a/vcl/test/dndtest.cxx b/vcl/test/dndtest.cxx
new file mode 100755
index 000000000000..40ee765adc19
--- /dev/null
+++ b/vcl/test/dndtest.cxx
@@ -0,0 +1,517 @@
+/*************************************************************************
+ *
+ *  $RCSfile: dndtest.cxx,v $
+ *
+ *  $Revision: 1.1 $
+ *
+ *  last change: $Author: obr $ $Date: 2001-02-21 15:01:54 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library is distributed in the hope that it will be useful,
+ *  but WITHOUT ANY WARRANTY; without even the implied warranty of
+ *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+#include <event.hxx>
+#include <svapp.hxx>
+#include <wrkwin.hxx>
+#include <msgbox.hxx>
+#include <lstbox.hxx>
+
+#ifndef _COMPHELPER_PROCESSFACTORY_HXX_
+#include <comphelper/processfactory.hxx>
+#endif
+
+#ifndef _CPPUHELPER_SERVICEFACTORY_HXX_
+#include <cppuhelper/servicefactory.hxx>
+#endif
+
+#ifndef _CPPUHELPER_IMPLBASE1_HXX_
+#include <cppuhelper/implbase1.hxx>
+#endif
+
+#ifndef _CPPUHELPER_IMPLBASE3_HXX_
+#include <cppuhelper/implbase3.hxx>
+#endif
+
+#ifndef _COM_SUN_STAR_LANG_XCOMPONENT_HPP_
+#include <com/sun/star/lang/XComponent.hpp>
+#endif
+
+#ifndef _COM_SUN_STAR_DATATRANSFER_XTRANSFERABLE_HPP_
+#include <com/sun/star/datatransfer/XTransferable.hpp>
+#endif
+
+#ifndef _COM_SUN_STAR_DATATRANSFER_CLIPBOARD_XCLIPBOARD_HPP_
+#include <com/sun/star/datatransfer/clipboard/XClipboard.hpp>
+#endif
+
+#ifndef _COM_SUN_STAR_DATATRANSFER_DND_XDROPTARGET_HPP_
+#include <com/sun/star/datatransfer/dnd/XDropTarget.hpp>
+#endif
+
+#ifndef _COM_SUN_STAR_DATATRANSFER_DND_XDRAGSOURCELISTENER_HPP_
+#include <com/sun/star/datatransfer/dnd/XDragSourceListener.hpp>
+#endif
+
+#ifndef _COM_SUN_STAR_DATATRANSFER_DND_XDROPTARGETLISTENER_HPP_
+#include <com/sun/star/datatransfer/dnd/XDropTargetListener.hpp>
+#endif
+
+#ifndef _COM_SUN_STAR_DATATRANSFER_DND_XDRAGGESTURERECOGNIZER_HPP_
+#include <com/sun/star/datatransfer/dnd/XDragGestureRecognizer.hpp>
+#endif
+
+#ifndef _COM_SUN_STAR_DATATRANSFER_DND_XDRAGGESTURELISTENER_HPP_
+#include <com/sun/star/datatransfer/dnd/XDragGestureListener.hpp>
+#endif
+
+#ifndef _VOS_PROCESS_HXX_
+#include <vos/process.hxx>
+#endif
+
+#include <stdio.h>
+
+using namespace ::rtl;
+using namespace ::vos;
+using namespace ::com::sun::star::io;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::lang;
+using namespace ::com::sun::star::datatransfer;
+using namespace ::com::sun::star::datatransfer::clipboard;
+using namespace ::com::sun::star::datatransfer::dnd;
+
+// -----------------------------------------------------------------------
+
+class MyApp : public Application
+{
+public:
+    void        Main();
+};
+
+MyApp aMyApp;
+
+// -----------------------------------------------------------------------
+
+class MyWin : public WorkWindow
+{
+public:
+                MyWin( Window* pParent, WinBits nWinStyle );
+
+    void        MouseMove( const MouseEvent& rMEvt );
+    void        MouseButtonDown( const MouseEvent& rMEvt );
+    void        MouseButtonUp( const MouseEvent& rMEvt );
+    void        KeyInput( const KeyEvent& rKEvt );
+    void        KeyUp( const KeyEvent& rKEvt );
+    void        Paint( const Rectangle& rRect );
+    void        Resize();
+};
+
+// -----------------------------------------------------------------------
+
+class MyDragAndDropListener: public ::cppu::WeakImplHelper3 < XDropTargetListener, XDragGestureListener, XDragSourceListener >
+{
+    Window * m_pWindow;
+
+public:
+
+    MyDragAndDropListener( Window * pWindow ) : m_pWindow( pWindow ) {};
+
+    virtual void SAL_CALL dragGestureRecognized( const DragGestureEvent& dge ) throw(RuntimeException);
+    virtual void SAL_CALL drop( const DropTargetDropEvent& dtde ) throw(RuntimeException);
+    virtual void SAL_CALL dragEnter( const DropTargetDragEnterEvent& dtde ) throw(RuntimeException);
+    virtual void SAL_CALL dragExit( const DropTargetEvent& dte ) throw(RuntimeException);
+    virtual void SAL_CALL dragOver( const DropTargetDragEvent& dtde ) throw(RuntimeException);
+    virtual void SAL_CALL dropActionChanged( const DropTargetDragEvent& dtde ) throw(RuntimeException);
+    virtual void SAL_CALL dragDropEnd( const DragSourceDropEvent& dsde ) throw(RuntimeException);
+    virtual void SAL_CALL dragEnter( const DragSourceDragEvent& dsdee ) throw(RuntimeException);
+    virtual void SAL_CALL dragExit( const DragSourceEvent& dse ) throw(RuntimeException);
+    virtual void SAL_CALL dragOver( const DragSourceDragEvent& dsde ) throw(RuntimeException);
+    virtual void SAL_CALL dropActionChanged( const DragSourceDragEvent& dsde ) throw(RuntimeException);
+    virtual void SAL_CALL disposing( const EventObject& eo ) throw(RuntimeException);
+};
+
+// -----------------------------------------------------------------------
+
+class MyInfoBox : public InfoBox
+{
+
+public:
+
+    MyInfoBox( Window* pParent );
+};
+
+// -----------------------------------------------------------------------
+
+class MyListBox : public ListBox
+{
+
+public:
+
+    MyListBox( Window* pParent );
+};
+
+// -----------------------------------------------------------------------
+
+class StringTransferable : public ::cppu::WeakImplHelper1< XTransferable >
+{
+    const OUString         m_aData;
+    Sequence< DataFlavor > m_aFlavorList;
+
+public:
+    StringTransferable( const OUString& rString ) : m_aFlavorList( 1 ), m_aData( rString )
+    {
+        DataFlavor df;
+
+        df.MimeType = OUString::createFromAscii( "text/plain;charset=utf-16" );
+        df.DataType = getCppuType( static_cast < OUString * > ( 0 ) );
+
+         m_aFlavorList[0] = df;
+    };
+
+    virtual Any SAL_CALL getTransferData( const DataFlavor& aFlavor ) throw(UnsupportedFlavorException, IOException, RuntimeException);
+    virtual Sequence< DataFlavor > SAL_CALL getTransferDataFlavors(  ) throw(RuntimeException);
+    virtual sal_Bool SAL_CALL isDataFlavorSupported( const DataFlavor& aFlavor ) throw(RuntimeException);
+};
+
+
+// -----------------------------------------------------------------------
+
+void MyApp::Main()
+{
+    OUString aRegistry;
+    OStartupInfo aInfo;
+
+    for( sal_Int32 n = 0, nmax = aInfo.getCommandArgCount(); n < nmax; n++ )
+    {
+        OUString aArg;
+
+        aInfo.getCommandArg( n, aArg );
+
+        if( aArg.compareTo( OUString::createFromAscii( "-r" ), 2 ) == 0 )
+        {
+            if ( n + 1 < nmax )
+                aInfo.getCommandArg( ++n, aRegistry );
+        }
+    }
+
+    Reference< XMultiServiceFactory > xServiceManager;
+
+    if( aRegistry.getLength() )
+    {
+        xServiceManager = ::cppu::createRegistryServiceFactory( aRegistry, sal_True );
+
+        if( xServiceManager.is() )
+        {
+            ::comphelper::setProcessServiceFactory( xServiceManager );
+        }
+
+        if( ! xServiceManager.is() )
+            printf( "No servicemanager available.\n" );
+        else
+            printf( "Ok\n" );
+
+    }
+    else
+        fprintf( stderr, "Usage: %s -r full-path-to-applicat.rdb\n", "dnddemo" );
+
+
+    MyWin aMainWin( NULL, WB_APP | WB_STDWORK );
+    aMainWin.SetText( XubString( RTL_CONSTASCII_USTRINGPARAM( "Drag And Drop - Workbench" ) ) );
+    aMainWin.Show();
+
+    // test the clipboard code
+    Reference< XClipboard > xClipboard = aMainWin.GetClipboard();
+    if( xClipboard.is() )
+    {
+        printf( "System clipboard available.\n" );
+        xClipboard->getContents();
+    }
+    else
+        fprintf( stderr, "System clipboard not available.\n" );
+
+    MyInfoBox aInfoBox( &aMainWin );
+    aInfoBox.Execute();
+
+    MyListBox aListBox( &aMainWin );
+    aListBox.SetPosSizePixel( 10, 10, 100, 100 );
+    aListBox.InsertEntry( OUString::createFromAscii( "TestItem" ));
+    aListBox.Show();
+
+    Execute();
+
+    Reference< XComponent > xComponent( xServiceManager, UNO_QUERY );
+    if( xComponent.is() )
+        xComponent->dispose();
+
+}
+
+// -----------------------------------------------------------------------
+
+MyWin::MyWin( Window* pParent, WinBits nWinStyle ) :
+    WorkWindow( pParent, nWinStyle )
+{
+    Reference< XDropTargetListener > xListener = new MyDragAndDropListener( this );
+
+    Reference< XDropTarget > xDropTarget = GetDropTarget();
+    if( xDropTarget.is() )
+    {
+        xDropTarget->addDropTargetListener( xListener );
+        xDropTarget->setActive( sal_True );
+    }
+
+    Reference< XDragGestureRecognizer > xRecognizer = GetDragGestureRecognizer();
+    if( xRecognizer.is() )
+        xRecognizer->addDragGestureListener( Reference< XDragGestureListener > ( xListener, UNO_QUERY ) );
+}
+
+// -----------------------------------------------------------------------
+
+void MyWin::MouseMove( const MouseEvent& rMEvt )
+{
+    WorkWindow::MouseMove( rMEvt );
+}
+
+// -----------------------------------------------------------------------
+
+void MyWin::MouseButtonDown( const MouseEvent& rMEvt )
+{
+    WorkWindow::MouseButtonDown( rMEvt );
+}
+
+// -----------------------------------------------------------------------
+
+void MyWin::MouseButtonUp( const MouseEvent& rMEvt )
+{
+    WorkWindow::MouseButtonUp( rMEvt );
+}
+
+// -----------------------------------------------------------------------
+
+void MyWin::KeyInput( const KeyEvent& rKEvt )
+{
+    WorkWindow::KeyInput( rKEvt );
+}
+
+// -----------------------------------------------------------------------
+
+void MyWin::KeyUp( const KeyEvent& rKEvt )
+{
+    WorkWindow::KeyUp( rKEvt );
+}
+
+// -----------------------------------------------------------------------
+
+void MyWin::Paint( const Rectangle& rRect )
+{
+    WorkWindow::Paint( rRect );
+}
+
+// -----------------------------------------------------------------------
+
+void MyWin::Resize()
+{
+    WorkWindow::Resize();
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dragGestureRecognized( const DragGestureEvent& dge ) throw(RuntimeException)
+{
+    printf( "XDragGestureListener::dragGestureRecognized called ( Window: %X, %d, %d ).\n", m_pWindow, dge.DragOriginX, dge.DragOriginY );
+
+    Reference< XDragSource > xDragSource( dge.DragSource, UNO_QUERY );
+    xDragSource->startDrag( dge, -1, 0, 0, new StringTransferable( OUString::createFromAscii( "TestString" ) ), this );
+    printf( "XDragSource::startDrag returned.\n" );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::drop( const DropTargetDropEvent& dtde ) throw(RuntimeException)
+{
+    printf( "XDropTargetListener::drop called ( Window: %X, %d, %d ).\n", m_pWindow, dtde.LocationX, dtde.LocationY );
+
+    dtde.Context->dropComplete( sal_True );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dragEnter( const DropTargetDragEnterEvent& dtdee ) throw(RuntimeException)
+{
+    printf( "XDropTargetListener::dragEnter called ( Window: %X, %d, %d ).\n", m_pWindow, dtdee.LocationX, dtdee.LocationY );
+    dtdee.Context->acceptDrag( dtdee.DropAction );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dragExit( const DropTargetEvent& dte ) throw(RuntimeException)
+{
+    printf( "XDropTargetListener::dragExit called ( Window: %X ).\n", m_pWindow );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dragOver( const DropTargetDragEvent& dtde ) throw(RuntimeException)
+{
+    printf( "XDropTargetListener::dragOver called ( Window: %X, %d, %d ).\n", m_pWindow, dtde.LocationX, dtde.LocationY );
+    dtde.Context->acceptDrag( dtde.DropAction );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dropActionChanged( const DropTargetDragEvent& dtde ) throw(RuntimeException)
+{
+    printf( "XDropTargetListener::dropActionChanged called ( Window: %X, %d, %d ).\n", m_pWindow, dtde.LocationX, dtde.LocationY );
+    dtde.Context->acceptDrag( dtde.DropAction );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dragDropEnd( const DragSourceDropEvent& dsde ) throw(RuntimeException)
+{
+    printf( "XDragSourceListener::dropDropEnd called ( Window: %X, %s ).\n", m_pWindow, dsde.DropSuccess ? "sucess" : "failed" );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dragEnter( const DragSourceDragEvent& dsde ) throw(RuntimeException)
+{
+    printf( "XDragSourceListener::dragEnter called ( Window: %X ).\n", m_pWindow );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dragExit( const DragSourceEvent& dse ) throw(RuntimeException)
+{
+    printf( "XDragSourceListener::dragExit called ( Window: %X ).\n", m_pWindow );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dragOver( const DragSourceDragEvent& dsde ) throw(RuntimeException)
+{
+    printf( "XDragSourceListener::dragOver called ( Window: %X ).\n", m_pWindow );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::dropActionChanged( const DragSourceDragEvent& dsde ) throw(RuntimeException)
+{
+    printf( "XDragSourceListener::dropActionChanged called ( Window: %X ).\n", m_pWindow );
+}
+
+// -----------------------------------------------------------------------
+
+void SAL_CALL MyDragAndDropListener::disposing( const EventObject& eo ) throw(RuntimeException)
+{
+    printf( "XEventListener::disposing called ( Window: %X ).\n", m_pWindow );
+}
+
+// -----------------------------------------------------------------------
+
+MyInfoBox::MyInfoBox( Window* pParent ) : InfoBox( pParent,
+    OUString::createFromAscii( "dragging over this box should result in another window id in the drag log." ) )
+{
+    Reference< XDropTargetListener > xListener = new MyDragAndDropListener( this );
+
+    Reference< XDropTarget > xDropTarget = GetDropTarget();
+    if( xDropTarget.is() )
+    {
+        xDropTarget->addDropTargetListener( xListener );
+        xDropTarget->setActive( sal_True );
+    }
+
+    Reference< XDragGestureRecognizer > xRecognizer = GetDragGestureRecognizer();
+    if( xRecognizer.is() )
+        xRecognizer->addDragGestureListener( Reference< XDragGestureListener > ( xListener, UNO_QUERY ) );
+};
+
+// -----------------------------------------------------------------------
+
+MyListBox::MyListBox( Window* pParent ) : ListBox( pParent )
+{
+    Reference< XDropTargetListener > xListener = new MyDragAndDropListener( this );
+
+    Reference< XDropTarget > xDropTarget = GetDropTarget();
+    if( xDropTarget.is() )
+    {
+        xDropTarget->addDropTargetListener( xListener );
+        xDropTarget->setActive( sal_True );
+    }
+
+    Reference< XDragGestureRecognizer > xRecognizer = GetDragGestureRecognizer();
+    if( xRecognizer.is() )
+        xRecognizer->addDragGestureListener( Reference< XDragGestureListener > ( xListener, UNO_QUERY ) );
+};
+
+// -----------------------------------------------------------------------
+
+Any SAL_CALL StringTransferable::getTransferData( const DataFlavor& aFlavor )
+    throw(UnsupportedFlavorException, IOException, RuntimeException)
+{
+    return makeAny( m_aData );
+}
+
+// -----------------------------------------------------------------------
+
+Sequence< DataFlavor > SAL_CALL StringTransferable::getTransferDataFlavors(  )
+    throw(RuntimeException)
+{
+    return m_aFlavorList;
+}
+
+// -----------------------------------------------------------------------
+
+sal_Bool SAL_CALL StringTransferable::isDataFlavorSupported( const DataFlavor& aFlavor )
+    throw(RuntimeException)
+{
+    return sal_True;
+}
+
+
diff --git a/vcl/test/makefile.mk b/vcl/test/makefile.mk
new file mode 100644
index 000000000000..df3fbe20f185
--- /dev/null
+++ b/vcl/test/makefile.mk
@@ -0,0 +1,101 @@
+#*************************************************************************
+#
+#   $RCSfile: makefile.mk,v $
+#
+#   $Revision: 1.1 $
+#
+#   last change: $Author: obr $ $Date: 2001-02-21 15:02:01 $
+#
+#   The Contents of this file are made available subject to the terms of
+#   either of the following licenses
+#
+#          - GNU Lesser General Public License Version 2.1
+#          - Sun Industry Standards Source License Version 1.1
+#
+#   Sun Microsystems Inc., October, 2000
+#
+#   GNU Lesser General Public License Version 2.1
+#   =============================================
+#   Copyright 2000 by Sun Microsystems, Inc.
+#   901 San Antonio Road, Palo Alto, CA 94303, USA
+#
+#   This library is free software; you can redistribute it and/or
+#   modify it under the terms of the GNU Lesser General Public
+#   License version 2.1, as published by the Free Software Foundation.
+#
+#   This library is distributed in the hope that it will be useful,
+#   but WITHOUT ANY WARRANTY; without even the implied warranty of
+#   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#   Lesser General Public License for more details.
+#
+#   You should have received a copy of the GNU Lesser General Public
+#   License along with this library; if not, write to the Free Software
+#   Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+#   MA  02111-1307  USA
+#
+#
+#   Sun Industry Standards Source License Version 1.1
+#   =================================================
+#   The contents of this file are subject to the Sun Industry Standards
+#   Source License Version 1.1 (the "License"); You may not use this file
+#   except in compliance with the License. You may obtain a copy of the
+#   License at http://www.openoffice.org/license.html.
+#
+#   Software provided under this License is provided on an "AS IS" basis,
+#   WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+#   WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+#   MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+#   See the License for the specific provisions governing your rights and
+#   obligations concerning the Software.
+#
+#   The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+#
+#   Copyright: 2000 by Sun Microsystems, Inc.
+#
+#   All Rights Reserved.
+#
+#   Contributor(s): _______________________________________
+#
+#
+#
+#*************************************************************************
+
+PRJ=..
+
+PRJNAME=SV
+TARGET=dndtest
+LIBTARGET=NO
+
+# --- Settings -----------------------------------------------------
+
+.INCLUDE :	settings.mk
+
+# --- Files --------------------------------------------------------
+
+OBJFILES=		$(OBJ)$/dndtest.obj
+
+APP1NOSAL=		TRUE
+APP1TARGET= 	$(TARGET)
+APP1OBJS=		$(OBJ)$/dnddem.obj \
+                $(OBJ)$/salmain.obj
+
+APP1STDLIBS=	$(CPPULIB)			\
+                $(CPPUHELPERLIB)	\
+                $(TOOLSLIB) 		\
+                $(SALLIB)			\
+                $(VOSLIB)			\
+                $(SOTLIB)			\
+                $(COMPHELPERLIB)	\
+                $(SVLIB)
+
+APP1DEPN=		$(L)$/itools.lib	\
+                $(L)$/sot.lib
+
+.IF "$(remote)"!=""
+EXCEPTIONSFILES= $(OBJ)$/dndtest.obj
+.ENDIF
+
+# --- Targets ------------------------------------------------------
+
+.INCLUDE :	target.mk
+