/*************************************************************************
 *
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 * 
 * Copyright 2000, 2010 Oracle and/or its affiliates.
 *
 * OpenOffice.org - a multi-platform office productivity suite
 *
 * This file is part of OpenOffice.org.
 *
 * OpenOffice.org is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Lesser General Public License version 3
 * only, as published by the Free Software Foundation.
 *
 * OpenOffice.org 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 version 3 for more details
 * (a copy is included in the LICENSE file that accompanied this code).
 *
 * You should have received a copy of the GNU Lesser General Public License
 * version 3 along with OpenOffice.org.  If not, see
 * <http://www.openoffice.org/license.html>
 * for a copy of the LGPLv3 License.
 *
 ************************************************************************/

#include "oox/ppt/animationspersist.hxx"

#include <rtl/ustring.hxx>
#include <com/sun/star/uno/Any.hxx>
#include <com/sun/star/drawing/XShape.hpp>
#include <com/sun/star/text/XText.hpp>
#include <com/sun/star/presentation/ParagraphTarget.hpp>
#include <com/sun/star/presentation/ShapeAnimationSubType.hpp>

#include "oox/drawingml/shape.hxx"

using rtl::OUString;
using namespace ::com::sun::star::uno;
using namespace ::com::sun::star::presentation;
using namespace ::com::sun::star::drawing;
using namespace ::com::sun::star::text;

namespace oox { namespace ppt {

	void ShapeTargetElement::convert( ::com::sun::star::uno::Any & rTarget, sal_Int16 & rSubType ) const
	{
		switch(mnType)
		{
		case XML_subSp:
			rSubType = ShapeAnimationSubType::AS_WHOLE;
			break;
		case XML_bg:
			rSubType = ShapeAnimationSubType::ONLY_BACKGROUND;
			break;
		case XML_txEl:
		{
			ParagraphTarget aParaTarget;
			Reference< XShape > xShape;
			rTarget >>= xShape;
			aParaTarget.Shape = xShape;
			rSubType = ShapeAnimationSubType::ONLY_TEXT;

			Reference< XText > xText( xShape, UNO_QUERY );
			if( xText.is() )
			{
				switch(mnRangeType)
				{
				case XML_charRg:
					// TODO calculate the corresponding paragraph for the text range....
					OSL_TRACE( "OOX: TODO calculate the corresponding paragraph for the text range..." );
					break;
				case XML_pRg:
					aParaTarget.Paragraph = static_cast< sal_Int16 >( maRange.start );
					// TODO what to do with more than one.
					OSL_TRACE( "OOX: TODO what to do with more than one" );
					break;
				}
				rTarget = makeAny( aParaTarget );
			}
			break;
		}
		default:
			break;
		}
	}


	Any AnimTargetElement::convert(const SlidePersistPtr & pSlide, sal_Int16 & nSubType) const
	{
		Any aTarget;
		// see sd/source/files/ppt/pptinanimations.cxx:3191 (in importTargetElementContainer())
		switch(mnType)
		{
		case XML_inkTgt:
			// TODO
			OSL_TRACE( "OOX: TODO inkTgt" );
			break;
		case XML_sldTgt:
			// TODO
			OSL_TRACE( "OOX: TODO sldTgt" );
			break;
		case XML_sndTgt:
			aTarget = makeAny(msValue);
			break;
		case XML_spTgt:
		{
			Any rTarget;
			::oox::drawingml::ShapePtr pShape = pSlide->getShape(msValue);
			OSL_ENSURE( pShape, "failed to locate Shape");
			if( pShape )
			{
				Reference< XShape > xShape( pShape->getXShape() );
				OSL_ENSURE( xShape.is(), "fail to get XShape from shape" );
				if( xShape.is() )
				{
					rTarget <<= xShape;
					maShapeTarget.convert(rTarget, nSubType);
					aTarget = rTarget;
				}
			}
			break;
		}
		default:
			break;
		}
		return aTarget;
	}

	
// BEGIN CUT&PASTE from sd/source/filter/ppt/pptinanimations.cxx
/** this adds an any to another any.
	if rNewValue is empty, rOldValue is returned.
	if rOldValue is empty, rNewValue is returned.
	if rOldValue contains a value, a sequence with rOldValue and rNewValue is returned.
	if rOldValue contains a sequence, a new sequence with the old sequence and rNewValue is returned.
*/
	static Any addToSequence( const Any& rOldValue, const Any& rNewValue )
	{
		if( !rNewValue.hasValue() )
		{
			return rOldValue;
		}
		else if( !rOldValue.hasValue() )
		{
			return rNewValue;
		}
		else
		{
			Sequence< Any > aNewSeq;
			if( rOldValue >>= aNewSeq )
			{
				sal_Int32 nSize = aNewSeq.getLength();
				aNewSeq.realloc(nSize+1);
				aNewSeq[nSize] = rNewValue;
			}
			else
			{
				aNewSeq.realloc(2);
				aNewSeq[0] = rOldValue;
				aNewSeq[1] = rNewValue;
			}
			return makeAny( aNewSeq );
		}
	}
// END

	Any AnimationCondition::convert(const SlidePersistPtr & pSlide) const
	{
		Any aAny;
		if( mpTarget )
		{
			sal_Int16 nSubType;
			aAny = mpTarget->convert( pSlide, nSubType );
		}
		else 
		{
			aAny = maValue;
		}
		return aAny;
	}


	Any AnimationCondition::convertList(const SlidePersistPtr & pSlide, const AnimationConditionList & l)
	{
		Any aAny;
		for( AnimationConditionList::const_iterator iter = l.begin();
			 iter != l.end(); iter++)
		{
			aAny = addToSequence( aAny, iter->convert(pSlide) );
		}
		return aAny;
	}

} }