/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */

/*

 * This file is part of the LibreOffice project.

 *

 * This Source Code Form is subject to the terms of the Mozilla Public

 * License, v. 2.0. If a copy of the MPL was not distributed with this

 * file, You can obtain one at http://mozilla.org/MPL/2.0/.

 *

 * This file incorporates work covered by the following license notice:

 *

 *   Licensed to the Apache Software Foundation (ASF) under one or more

 *   contributor license agreements. See the NOTICE file distributed

 *   with this work for additional information regarding copyright

 *   ownership. The ASF licenses this file to you under the Apache

 *   License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0 .

 */

#include "ChartDropTargetHelper.hxx"

#include <DataSource.hxx>

#include <DataSourceHelper.hxx>

#include <ChartModel.hxx>

#include <Diagram.hxx>

#include <com/sun/star/chart2/data/XDataProvider.hpp>

#include <sot/formats.hxx>

#include <utility>

#include <vector>

using namespace ::com::sun::star;

using ::com::sun::star::uno::Reference;

using ::com::sun::star::uno::Sequence;

namespace

{

std::vector< OUString > lcl_getStringsFromByteSequence(

    const Sequence< sal_Int8 > & aByteSequence )

{

    std::vector< OUString > aResult;

    const sal_Int32 nLength = aByteSequence.getLength();

    const char * pBytes( reinterpret_cast< const char* >( aByteSequence.getConstArray()));

    sal_Int32 nStartPos = 0;

    for( sal_Int32 nPos=0; nPos<nLength; ++nPos )

    {

        if( pBytes[nPos] == '\0' )

        {

            aResult.emplace_back( pBytes + nStartPos, (nPos - nStartPos), RTL_TEXTENCODING_ASCII_US );

            nStartPos = nPos + 1;

        }

    }

    return aResult;

}

} // anonymous namespace

namespace chart

{

ChartDropTargetHelper::ChartDropTargetHelper(

    const Reference< datatransfer::dnd::XDropTarget >& rxDropTarget,

    rtl::Reference<::chart::ChartModel> xChartDocument ) :

        DropTargetHelper( rxDropTarget ),

        m_xChartDocument(std::move( xChartDocument ))

{}

ChartDropTargetHelper::~ChartDropTargetHelper()

{}

bool ChartDropTargetHelper::satisfiesPrerequisites() const

{

    return  ( m_xChartDocument.is() &&

              ! m_xChartDocument->hasInternalDataProvider());

}

sal_Int8 ChartDropTargetHelper::AcceptDrop( const AcceptDropEvent& rEvt )

{

    sal_Int8 nResult = DND_ACTION_NONE;

    if( ( rEvt.mnAction == DND_ACTION_COPY ||

          rEvt.mnAction == DND_ACTION_MOVE ) &&

        satisfiesPrerequisites() &&

        IsDropFormatSupported( SotClipboardFormatId::LINK ) )

    {

        // @todo: check if the data is suitable. Is this possible without XTransferable?

        nResult = rEvt.mnAction;

    }

    return nResult;

}

sal_Int8 ChartDropTargetHelper::ExecuteDrop( const ExecuteDropEvent& rEvt )

{

    sal_Int8 nResult = DND_ACTION_NONE;

    if( ( rEvt.mnAction == DND_ACTION_COPY ||

          rEvt.mnAction == DND_ACTION_MOVE ) &&

        rEvt.maDropEvent.Transferable.is() &&

        satisfiesPrerequisites())

    {

        TransferableDataHelper aDataHelper( rEvt.maDropEvent.Transferable );

        if( aDataHelper.HasFormat( SotClipboardFormatId::LINK ))

        {

            Sequence<sal_Int8> aBytes = aDataHelper.GetSequence(SotClipboardFormatId::LINK, OUString());

            if (aBytes.hasElements())

            {

                std::vector< OUString > aStrings( lcl_getStringsFromByteSequence( aBytes ));

                if( aStrings.size() >= 3 && aStrings[0] == "soffice" )

                {

                    const OUString& aRangeString( aStrings[2] );

                    if( m_xChartDocument.is())

                    {

                        Reference< frame::XModel > xParentModel( m_xChartDocument->getParent(), uno::UNO_QUERY );

                        if( xParentModel.is() &&

                            m_xChartDocument.is())

                        {

                            // @todo: get the title somehow and compare it to

                            // aDocName if successful (the document is the

                            // parent)

                            rtl::Reference< Diagram > xDiagram = m_xChartDocument->getFirstChartDiagram();

                            Reference< chart2::data::XDataProvider > xDataProvider( m_xChartDocument->getDataProvider());

                            if( xDataProvider.is() && xDiagram.is() &&

                                DataSourceHelper::allArgumentsForRectRangeDetected( m_xChartDocument ))

                            {

                                rtl::Reference< DataSource > xDataSource1 =

                                    DataSourceHelper::pressUsedDataIntoRectangularFormat( m_xChartDocument );

                                Sequence< beans::PropertyValue > aArguments(

                                    xDataProvider->detectArguments( xDataSource1 ));

                                OUString aOldRange;

                                beans::PropertyValue * pCellRange = nullptr;

                                for( sal_Int32 i=0; i<aArguments.getLength(); ++i )

                                {

                                    if ( aArguments[i].Name == "CellRangeRepresentation" )

                                    {

                                        pCellRange = (aArguments.getArray() + i);

                                        aArguments[i].Value >>= aOldRange;

                                        break;

                                    }

                                }

                                if( pCellRange )

                                {

                                    // copy means add ranges, move means replace

                                    if( rEvt.mnAction == DND_ACTION_COPY )

                                    {

                                        // @todo: using implicit knowledge that ranges can be

                                        // merged with ";". This should be done more general

                                        pCellRange->Value <<= aOldRange + ";" + aRangeString;

                                    }

                                    // move means replace range

                                    else

                                    {

                                        pCellRange->Value <<= aRangeString;

                                    }

                                    Reference< chart2::data::XDataSource > xDataSource2 =

                                        xDataProvider->createDataSource( aArguments );

                                    xDiagram->setDiagramData( xDataSource2, aArguments );

                                    // always return copy state to avoid deletion of the dragged range

                                    nResult = DND_ACTION_COPY;

                                }

                            }

                        }

                    }

                }

            }

        }

    }

    return nResult;

}

} //  namespace chart

/* vim:set shiftwidth=4 softtabstop=4 expandtab: */