/**************************************************************
 * 
 * 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
 * 
 * Unless required by applicable law or agreed to in writing,
 * software distributed under the License is distributed on an
 * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
 * KIND, either express or implied.  See the License for the
 * specific language governing permissions and limitations
 * under the License.
 * 
 *************************************************************/



// MARKER(update_precomp.py): autogen include statement, do not remove
#include "precompiled_sd.hxx"

#include <com/sun/star/style/XStyle.hpp>
#include <com/sun/star/presentation/ClickAction.hpp>
#include <com/sun/star/beans/PropertyAttribute.hpp>
#include <com/sun/star/text/XText.hpp>
#include <com/sun/star/beans/PropertyState.hpp>
#include <com/sun/star/beans/PropertyValues.hpp>
#include <rtl/ustrbuf.hxx>
#include <comphelper/stl_types.hxx>
#include <vos/mutex.hxx>
#include <svl/itemprop.hxx>
#include <svl/style.hxx>
#include <svx/svdpool.hxx>
#include <sfx2/viewfrm.hxx>
#include <sfx2/app.hxx>
#include <svtools/unoimap.hxx>
#include <svtools/unoevent.hxx>
#include <sfx2/bindings.hxx>
#include <sfx2/sfxsids.hrc>
#include <comphelper/extract.hxx>
#include <svx/unoprov.hxx>
#include <svx/unoshape.hxx>
#include <svx/svditer.hxx>
#include <svx/svdotext.hxx>
#include <svx/unoapi.hxx>
#include <svx/svdopath.hxx>
#include <svx/svdoole2.hxx>
#include <svx/svdograf.hxx>
#include <editeng/outlobj.hxx>
#include "CustomAnimationPreset.hxx"
#include "Outliner.hxx"
#include "sdresid.hxx"
#include <comphelper/serviceinfohelper.hxx>
#include <svx/svdogrp.hxx>

#include "anminfo.hxx"
#include "unohelp.hxx"
#include "unoobj.hxx"
#include "unoprnms.hxx"
#include "unomodel.hxx"
#include "drawdoc.hxx"
#include "sdpage.hxx"
#include "ViewShell.hxx"
#include "unokywds.hxx"
#include "unopage.hxx"
#ifndef SVX_LIGHT
#ifndef SD_DRAW_DOC_SHELL_HXX
#include "DrawDocShell.hxx"
#endif
#endif
#include "helpids.h"
#include "glob.hxx"
#include "glob.hrc"
#include "unolayer.hxx"
#include "imapinfo.hxx"
#include "EffectMigration.hxx"

#ifndef SEQTYPE
 #if defined(__SUNPRO_CC) && (__SUNPRO_CC == 0x500)
  #define SEQTYPE(x) (new ::com::sun::star::uno::Type( x ))
 #else
  #define SEQTYPE(x) &(x)
 #endif
#endif

using ::rtl::OUString;
using ::rtl::OUStringBuffer;
using namespace ::vos;
using namespace ::sd;
using namespace ::com::sun::star;
using namespace ::com::sun::star::presentation;
using namespace ::com::sun::star::animations;

using ::com::sun::star::uno::makeAny;
using ::com::sun::star::uno::Any;
using ::com::sun::star::uno::Reference;
using ::com::sun::star::drawing::XShape;

extern OUString getPageApiNameFromUiName( const String& rUIName );
extern String getUiNameFromPageApiNameImpl( const ::rtl::OUString& rApiName );

///////////////////////////////////////////////////////////////////////

DECLARE_STL_STDKEY_MAP(sal_uIntPtr, SfxExtItemPropertySetInfo*, SdExtPropertySetInfoCache);
static SdExtPropertySetInfoCache gImplImpressPropertySetInfoCache;
static SdExtPropertySetInfoCache gImplDrawPropertySetInfoCache;

DECLARE_STL_STDKEY_MAP(sal_uInt32, uno::Sequence< uno::Type >*, SdTypesCache);
static SdTypesCache gImplTypesCache;

///////////////////////////////////////////////////////////////////////


#define WID_EFFECT			1
#define WID_SPEED			2
#define WID_TEXTEFFECT		3
#define WID_BOOKMARK		4
#define WID_CLICKACTION		5
#define WID_PLAYFULL		6
#define WID_SOUNDFILE		7
#define WID_SOUNDON			8
#define WID_BLUESCREEN		9
#define WID_VERB			10
#define WID_DIMCOLOR		11
#define WID_DIMHIDE			12
#define WID_DIMPREV			13
#define WID_PRESORDER		14
#define WID_STYLE			15
#define WID_ANIMPATH		16
#define WID_IMAGEMAP		17
#define WID_ISANIMATION		18

#define WID_ISEMPTYPRESOBJ	20
#define WID_ISPRESOBJ		21
#define WID_MASTERDEPEND	22

#define WID_NAVORDER		23

#define WID_THAT_NEED_ANIMINFO 19



        #define IMPRESS_MAP_ENTRIES \
        { MAP_CHAR_LEN(UNO_NAME_OBJ_ANIMATIONPATH),	WID_ANIMPATH,		 &ITYPE(drawing::XShape),									0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_BOOKMARK),		WID_BOOKMARK,		 &::getCppuType((const OUString*)0),						0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_DIMCOLOR),		WID_DIMCOLOR,		 &::getCppuType((const sal_Int32*)0),						0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_DIMHIDE),		WID_DIMHIDE,		 &::getBooleanCppuType(),									0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_DIMPREV),		WID_DIMPREV,		 &::getBooleanCppuType(),									0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_EFFECT),		WID_EFFECT,			 &::getCppuType((const presentation::AnimationEffect*)0),	0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_ISEMPTYPRESOBJ),WID_ISEMPTYPRESOBJ,  &::getBooleanCppuType(),									0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_ISPRESOBJ),		WID_ISPRESOBJ,		 &::getBooleanCppuType(),								    ::com::sun::star::beans::PropertyAttribute::READONLY, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_MASTERDEPENDENT),WID_MASTERDEPEND,	 &::getBooleanCppuType(),								    0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_CLICKACTION),	WID_CLICKACTION,	 &::getCppuType((const presentation::ClickAction*)0),		0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_PLAYFULL),		WID_PLAYFULL,		 &::getBooleanCppuType(),									0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_PRESORDER),		WID_PRESORDER,		 &::getCppuType((const sal_Int32*)0),						0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_STYLE),			WID_STYLE,			 &ITYPE( style::XStyle),									::com::sun::star::beans::PropertyAttribute::MAYBEVOID, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_SOUNDFILE),		WID_SOUNDFILE,		 &::getCppuType((const OUString*)0),						0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_SOUNDON),		WID_SOUNDON,		 &::getBooleanCppuType(),									0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_SPEED),			WID_SPEED,			 &::getCppuType((const presentation::AnimationSpeed*)0),	0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_TEXTEFFECT),	WID_TEXTEFFECT,		 &::getCppuType((const presentation::AnimationEffect*)0),	0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_BLUESCREEN),	WID_BLUESCREEN,		 &::getCppuType((const sal_Int32*)0),						0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_VERB),			WID_VERB,			 &::getCppuType((const sal_Int32*)0),						0, 0},\
		{ MAP_CHAR_LEN("IsAnimation"),				WID_ISANIMATION,	 &::getBooleanCppuType(),									0, 0},\
		{ MAP_CHAR_LEN("NavigationOrder"),			WID_NAVORDER,		 &::getCppuType((const sal_Int32*)0),						0, 0},\
		{ 0,0,0,0,0,0}


    const SfxItemPropertyMapEntry* lcl_GetImpress_SdXShapePropertyGraphicMap_Impl()
    {
        
        static const SfxItemPropertyMapEntry aImpress_SdXShapePropertyGraphicMap_Impl[] =
        {
            { MAP_CHAR_LEN("ImageMap"),				WID_IMAGEMAP,		 &::getCppuType((const uno::Reference< container::XIndexContainer >*)0),	0, 0 },
            IMPRESS_MAP_ENTRIES
        };
        return aImpress_SdXShapePropertyGraphicMap_Impl;
    }

    const SfxItemPropertyMapEntry* lcl_GetImpress_SdXShapePropertySimpleMap_Impl()
    {
        
        static const SfxItemPropertyMapEntry aImpress_SdXShapePropertySimpleMap_Impl[] =
        {
            IMPRESS_MAP_ENTRIES
        };
        return aImpress_SdXShapePropertySimpleMap_Impl;
    }

	#define DRAW_MAP_ENTRIES\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_BOOKMARK),		WID_BOOKMARK,		&::getCppuType((const OUString*)0),					0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_CLICKACTION),	WID_CLICKACTION,	&::getCppuType((const presentation::ClickAction*)0),0, 0},\
		{ MAP_CHAR_LEN(UNO_NAME_OBJ_STYLE),			WID_STYLE,			&ITYPE(style::XStyle),								::com::sun::star::beans::PropertyAttribute::MAYBEVOID, 0},\
		{ MAP_CHAR_LEN("NavigationOrder"),			WID_NAVORDER,		 &::getCppuType((const sal_Int32*)0),						0, 0},\
		{ 0,0,0,0,0,0}

    const SfxItemPropertyMapEntry* lcl_GetDraw_SdXShapePropertySimpleMap_Impl()
    {
        static const SfxItemPropertyMapEntry aDraw_SdXShapePropertyMap_Impl[] =
        {
            DRAW_MAP_ENTRIES
        };
        return aDraw_SdXShapePropertyMap_Impl;
    }
    const SfxItemPropertyMapEntry* lcl_GetDraw_SdXShapePropertyGraphicMap_Impl()
    {
        static const SfxItemPropertyMapEntry aDraw_SdXShapePropertyGraphicMap_Impl[] =
        {
            { MAP_CHAR_LEN("ImageMap"),				WID_IMAGEMAP,		 &::getCppuType((const uno::Reference< container::XIndexContainer >*)0),	0, 0 },
            DRAW_MAP_ENTRIES
        };
        return aDraw_SdXShapePropertyGraphicMap_Impl;
    }
    const SfxItemPropertyMapEntry* lcl_ImplGetShapePropertyMap( sal_Bool bImpress, sal_Bool bGraphicObj )
    {
        const SfxItemPropertyMapEntry* pRet = 0;
        if( bImpress )
        {
            if( bGraphicObj )
                pRet = lcl_GetImpress_SdXShapePropertyGraphicMap_Impl();
            else
                pRet = lcl_GetImpress_SdXShapePropertySimpleMap_Impl();
        }
        else
        {
            if( bGraphicObj )
                pRet = lcl_GetDraw_SdXShapePropertyGraphicMap_Impl();
            else
                pRet = lcl_GetDraw_SdXShapePropertySimpleMap_Impl();
        }
        return pRet;
        
    }
    const SvxItemPropertySet* lcl_ImplGetShapePropertySet( sal_Bool bImpress, sal_Bool bGraphicObj )
    {
        const SvxItemPropertySet* pRet = 0;
        if( bImpress )
        {
            if( bGraphicObj )
            {
                static SvxItemPropertySet aImpress_SdXShapePropertyGraphicSet_Impl( lcl_GetImpress_SdXShapePropertyGraphicMap_Impl(), SdrObject::GetGlobalDrawObjectItemPool());
                pRet = &aImpress_SdXShapePropertyGraphicSet_Impl;
            }
            else
            {
                static SvxItemPropertySet aImpress_SdXShapePropertySet_Impl(lcl_GetImpress_SdXShapePropertySimpleMap_Impl(), SdrObject::GetGlobalDrawObjectItemPool());
                pRet = &aImpress_SdXShapePropertySet_Impl; 
            }
        }
        else
        {
            if( bGraphicObj )
            {
                static SvxItemPropertySet aDraw_SdXShapePropertyGraphicSet_Impl(lcl_GetDraw_SdXShapePropertyGraphicMap_Impl(), SdrObject::GetGlobalDrawObjectItemPool());
                pRet = &aDraw_SdXShapePropertyGraphicSet_Impl; 
            }
            else
            {
                static SvxItemPropertySet aDraw_SdXShapePropertySet_Impl( lcl_GetDraw_SdXShapePropertySimpleMap_Impl(), SdrObject::GetGlobalDrawObjectItemPool());
                pRet = &aDraw_SdXShapePropertySet_Impl;
            }
        }
        return pRet;
    }
    const SfxItemPropertyMapEntry* lcl_GetEmpty_SdXShapePropertyMap_Impl()
    {
        static SfxItemPropertyMapEntry aEmpty_SdXShapePropertyMap_Impl[] =
        {
            { 0,0,0,0,0,0}
        };
        return aEmpty_SdXShapePropertyMap_Impl;
    }
        
    static const SvxItemPropertySet* lcl_GetEmpty_SdXShapePropertySet_Impl()
    {
        static SvxItemPropertySet aEmptyPropSet( lcl_GetEmpty_SdXShapePropertyMap_Impl(), SdrObject::GetGlobalDrawObjectItemPool() );
        return &aEmptyPropSet;
    }
const SvEventDescription* ImplGetSupportedMacroItems()
{
	static const SvEventDescription aMacroDescriptionsImpl[] =
	{
		{ SFX_EVENT_MOUSEOVER_OBJECT, "OnMouseOver" },
		{ SFX_EVENT_MOUSEOUT_OBJECT, "OnMouseOut" },
		{ 0, NULL }
	};

	return aMacroDescriptionsImpl;
}

/*************************************************************************
|*
|*    Vergleichsfkt. fuer QSort
|*
\************************************************************************/
struct SortStruct
{
	SdrObject*	pObj;
	sal_uInt32		nOrder;
};

typedef SortStruct	SORT;
typedef SORT*		PSORT;

extern "C" int __LOADONCALLAPI SortFunc( const void* p1, const void* p2 );

SdXShape::SdXShape( SvxShape* pShape, SdXImpressDocument* pModel) throw()
:	mpShape( pShape ),
	mpPropSet( pModel?
					lcl_ImplGetShapePropertySet(pModel->IsImpressDocument(), pShape->getShapeKind() == OBJ_GRAF )
				:	lcl_GetEmpty_SdXShapePropertySet_Impl() ),
	mpMap( pModel?
					lcl_ImplGetShapePropertyMap(pModel->IsImpressDocument(), pShape->getShapeKind() == OBJ_GRAF )
				:	lcl_GetEmpty_SdXShapePropertyMap_Impl() ),
	mpModel(pModel),
	mpImplementationId( NULL )
	
{
	
    pShape->setMaster( this );
}

SdXShape::~SdXShape() throw()
{
}

void SdXShape::dispose()
{
	mpShape->setMaster( NULL );
	delete this;
}

// XInterface
uno::Any SAL_CALL SdXShape::queryAggregation( const uno::Type & rType )
	throw(uno::RuntimeException)
{
	return mpShape->queryAggregation( rType );
}

uno::Any SAL_CALL SdXShape::queryInterface( const uno::Type & rType )
	throw(uno::RuntimeException)
{
	return mpShape->queryInterface( rType );
}

void SAL_CALL SdXShape::acquire() throw()
{
	mpShape->acquire();
}

void SAL_CALL SdXShape::release() throw()
{
	mpShape->release();
}

sal_Bool SdXShape::queryAggregation( const com::sun::star::uno::Type & rType, com::sun::star::uno::Any& aAny )
{
	if( mpModel && mpModel ->IsImpressDocument() )
	{
		if( rType == ::getCppuType(( const uno::Reference< document::XEventsSupplier >*)0) )
		{
			aAny <<= uno::Reference< document::XEventsSupplier >(this);
			return sal_True;
		}
	}

	return sal_False;
}

uno::Sequence< uno::Type > SAL_CALL SdXShape::getTypes()
	throw (uno::RuntimeException)
{
	if( mpModel && !mpModel->IsImpressDocument() )
	{
		return mpShape->_getTypes();
	}
	else
	{
		const sal_uInt32 nObjId = mpShape->getShapeKind();
		uno::Sequence< uno::Type >* pTypes;
		SdTypesCache::iterator aIter( gImplTypesCache.find( nObjId ) );
		if( aIter == gImplTypesCache.end() )
		{
			pTypes = new uno::Sequence< uno::Type >( mpShape->_getTypes() );
			sal_uInt32 nCount = pTypes->getLength();
			pTypes->realloc( nCount+1 );
			(*pTypes)[nCount] = ::getCppuType((const uno::Reference< lang::XTypeProvider>*)0);

			gImplTypesCache[ nObjId ] = pTypes;
		}
		else
		{
			// use the already computed implementation id
			pTypes = (*aIter).second;
		}
		return *pTypes;
	}
}

// XPropertyState
beans::PropertyState SAL_CALL SdXShape::getPropertyState( const OUString& PropertyName ) throw( beans::UnknownPropertyException, uno::RuntimeException)
{
	OGuard aGuard( Application::GetSolarMutex() );

	if( mpPropSet->getPropertyMapEntry(PropertyName) )
	{
		return beans::PropertyState_DIRECT_VALUE;
	}
	else
	{
		SdrObject* pObj = mpShape->GetSdrObject();
		if( pObj == NULL || ( pObj->GetPage()->IsMasterPage() && pObj->IsEmptyPresObj() ) )
			return beans::PropertyState_DEFAULT_VALUE;

		return mpShape->_getPropertyState( PropertyName );
	}
}

void SAL_CALL SdXShape::setPropertyToDefault( const OUString& PropertyName ) throw( beans::UnknownPropertyException, uno::RuntimeException)
{
	OGuard aGuard( Application::GetSolarMutex() );

	if( mpPropSet->getPropertyMapEntry(PropertyName) )
	{
		return;
	}
	else
	{
		mpShape->_setPropertyToDefault(PropertyName);
	}
}

uno::Any SAL_CALL SdXShape::getPropertyDefault( const OUString& aPropertyName ) throw( beans::UnknownPropertyException, lang::WrappedTargetException, uno::RuntimeException)
{
	OGuard aGuard( Application::GetSolarMutex() );

	if( mpPropSet->getPropertyMapEntry(aPropertyName) )
	{
		return getPropertyValue( aPropertyName );
	}
	else
	{
		uno::Any aRet( mpShape->_getPropertyDefault(aPropertyName) );

		if( aPropertyName.equalsAsciiL( RTL_CONSTASCII_STRINGPARAM( sUNO_shape_layername ) ) )
		{
			OUString aName;
			if( aRet >>= aName )
			{
				aName = SdLayer::convertToExternalName( aName );
				aRet <<= aName;
			}
		}
		return aRet;
	}
}

//XPropertySet
::com::sun::star::uno::Reference< ::com::sun::star::beans::XPropertySetInfo > SAL_CALL SdXShape::getPropertySetInfo()
	throw(::com::sun::star::uno::RuntimeException)
{
	sal_uIntPtr nObjId = (sal_uIntPtr)mpShape->getPropertyMapEntries();
	SfxExtItemPropertySetInfo* pInfo = NULL;

	SdExtPropertySetInfoCache* pCache = (mpModel && mpModel->IsImpressDocument()) ? 
		&gImplImpressPropertySetInfoCache : &gImplDrawPropertySetInfoCache;

	SdExtPropertySetInfoCache::iterator aIter( pCache->find( nObjId ) );
	if( aIter == pCache->end() )
	{
		uno::Reference< beans::XPropertySetInfo > xInfo( mpShape->_getPropertySetInfo() );
		pInfo = new SfxExtItemPropertySetInfo( mpMap, xInfo->getProperties() );
		pInfo->acquire();

		(*pCache)[ nObjId ] = pInfo;
	}
	else
	{
		// use the already computed implementation id
		pInfo = (*aIter).second;
	}

	uno::Reference< beans::XPropertySetInfo > xInfo( pInfo );
	return pInfo;
}

void SAL_CALL SdXShape::setPropertyValue( const ::rtl::OUString& aPropertyName, const ::com::sun::star::uno::Any& aValue )
	throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::beans::PropertyVetoException, ::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException)
{
	OGuard aGuard( Application::GetSolarMutex() );

	const SfxItemPropertySimpleEntry* pEntry = mpPropSet->getPropertyMapEntry(aPropertyName);

	if( pEntry )
	{
		SdrObject* pObj = mpShape->GetSdrObject();
		if( pObj )
		{
			SdAnimationInfo* pInfo = GetAnimationInfo((pEntry->nWID <= WID_THAT_NEED_ANIMINFO)?sal_True:sal_False);

			switch(pEntry->nWID)
			{
				case WID_NAVORDER:
				{
					sal_Int32 nNavOrder = 0;
					if(!(aValue >>= nNavOrder))
						throw lang::IllegalArgumentException();

					SdrObjList* pObjList = pObj->GetObjList();
					if( pObjList )
						pObjList->SetObjectNavigationPosition( *pObj, (nNavOrder < 0) ? SAL_MAX_UINT32 : static_cast< sal_uInt32 >( nNavOrder ) );
					break;
				}

				case WID_EFFECT:
				{
					AnimationEffect	eEffect;
					if(!(aValue >>= eEffect))
						throw lang::IllegalArgumentException();

					EffectMigration::SetAnimationEffect( mpShape, eEffect );
					break;
				}
				case WID_TEXTEFFECT:
				{
					AnimationEffect	eEffect;
					if(!(aValue >>= eEffect))
						throw lang::IllegalArgumentException();

					EffectMigration::SetTextAnimationEffect( mpShape, eEffect );
					break;
				}
				case WID_SPEED:
				{
					AnimationSpeed eSpeed;
					if(!(aValue>>=eSpeed))
						throw lang::IllegalArgumentException();

					EffectMigration::SetAnimationSpeed( mpShape, eSpeed );
					break;
				}
                case WID_ISANIMATION:
                {
                    sal_Bool bIsAnimation(sal_False);

                    if(!(aValue >>= bIsAnimation))
                    {
                        throw lang::IllegalArgumentException();
                    }

                    if(bIsAnimation)
                    {
                        SdrObjGroup* pGroup = dynamic_cast< SdrObjGroup* >(pObj);
                        SdPage* pPage = dynamic_cast< SdPage* >(pGroup->GetPage());

                        if(pGroup && pPage)
                        {
                            // #42894# Animated Group object, migrate that effect
                            EffectMigration::CreateAnimatedGroup(*pGroup, *pPage);

                            // #42894# unfortunately when doing this all group members have to
                            // be moved to the page as direct members, else the currently
                            // available forms of animation do not work. If it succeeds,
                            // the group is empty and can be removed and deleted
                            if(!pGroup->GetSubList()->GetObjCount())
                            {
                                pPage->NbcRemoveObject(pGroup->GetOrdNum());
                                delete pGroup;
                            }
                        }
                    }
                    //pInfo->mbIsMovie = bIsAnimation;
                    break;
                }
				case WID_BOOKMARK:
				{
					OUString aString;
					if(!(aValue >>= aString))
						throw lang::IllegalArgumentException();

					pInfo->SetBookmark( SdDrawPage::getUiNameFromPageApiName( aString ) );
					break;
				}
				case WID_CLICKACTION:
					::cppu::any2enum< presentation::ClickAction >( pInfo->meClickAction, aValue);
					break;

/* todo?
				case WID_PLAYFULL:
					pInfo->mbPlayFull = ::cppu::any2bool(aValue);
					break;
*/
				case WID_SOUNDFILE:
				{
					OUString aString;
					if(!(aValue >>= aString))
						throw lang::IllegalArgumentException();
					pInfo->maSoundFile = aString;
					EffectMigration::UpdateSoundEffect( mpShape, pInfo );
					break;
				}

				case WID_SOUNDON:
				{
					if( !(aValue >>= pInfo->mbSoundOn) )
						throw lang::IllegalArgumentException();
					EffectMigration::UpdateSoundEffect( mpShape, pInfo );
					break;
				}
/*
				case WID_BLUESCREEN:
				{
					sal_Int32 nColor;
					if(!(aValue >>= nColor))
						throw lang::IllegalArgumentException();

					pInfo->maBlueScreen.SetColor( nColor );
					break;
				}
*/
				case WID_VERB:
				{
					sal_Int32 nVerb = 0;
					if(!(aValue >>= nVerb))
						throw lang::IllegalArgumentException();

					pInfo->mnVerb = (sal_uInt16)nVerb;
					break;
				}
				case WID_DIMCOLOR:
				{
					sal_Int32 nColor = 0;

					if( !(aValue >>= nColor) )					
						throw lang::IllegalArgumentException();

					EffectMigration::SetDimColor( mpShape, nColor );
					break;
				}
				case WID_DIMHIDE:
				{
					sal_Bool bDimHide = sal_False;
					if( !(aValue >>= bDimHide) )
						lang::IllegalArgumentException();

					EffectMigration::SetDimHide( mpShape, bDimHide );
					break;
				}
				case WID_DIMPREV:
				{
					sal_Bool bDimPrevious = sal_False;
					if( !(aValue >>= bDimPrevious) )
						lang::IllegalArgumentException();

					EffectMigration::SetDimPrevious( mpShape, bDimPrevious );
					break;
				}
				case WID_PRESORDER:
				{
					sal_Int32 nNewPos = 0;
					if( !(aValue >>= nNewPos) )
						lang::IllegalArgumentException();

					EffectMigration::SetPresentationOrder( mpShape, nNewPos );
					break;
				}
				case WID_STYLE:
					SetStyleSheet( aValue );
					break;
				case WID_ISEMPTYPRESOBJ:
					SetEmptyPresObj( ::cppu::any2bool(aValue) );
					break;
				case WID_MASTERDEPEND:
					SetMasterDepend( ::cppu::any2bool(aValue) );
					break;
				case WID_ANIMPATH:
				{
					uno::Reference< drawing::XShape > xShape( aValue, uno::UNO_QUERY );
					SdrPathObj* pObj2 = xShape.is() ? dynamic_cast< SdrPathObj* >( GetSdrObjectFromXShape( xShape ) ) : NULL;

					if( pObj2 == NULL )
						throw lang::IllegalArgumentException();

					EffectMigration::SetAnimationPath( mpShape, pObj2 );
					break;
				}
				case WID_IMAGEMAP:
				{
					SdDrawDocument* pDoc = mpModel?mpModel->GetDoc():NULL;
					if( pDoc )
					{
						ImageMap aImageMap;
						uno::Reference< uno::XInterface > xImageMap;
						aValue >>= xImageMap;

						if( !xImageMap.is() || !SvUnoImageMap_fillImageMap( xImageMap, aImageMap ) )
							throw lang::IllegalArgumentException();

						SdIMapInfo* pIMapInfo = pDoc->GetIMapInfo(pObj);
						if( pIMapInfo )
						{
							// replace existing image map
							pIMapInfo->SetImageMap( aImageMap );
						}
						else
						{
							// insert new user data with image map
							pObj->InsertUserData(new SdIMapInfo(aImageMap) );
						}
					}
				}
			}
		}
	}
	else
	{
		uno::Any aAny( aValue );

		if( aPropertyName.equalsAsciiL( RTL_CONSTASCII_STRINGPARAM( sUNO_shape_layername ) ) )
		{
			OUString aName;
			if( aAny >>= aName )
			{
				aName = SdLayer::convertToInternalName( aName );
				aAny <<= aName;
			}
		}

		mpShape->_setPropertyValue(aPropertyName, aAny);
	}

	if( mpModel )
		mpModel->SetModified();
}

::com::sun::star::uno::Any SAL_CALL SdXShape::getPropertyValue( const ::rtl::OUString& PropertyName )
	throw(::com::sun::star::beans::UnknownPropertyException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException)
{
	OGuard aGuard( Application::GetSolarMutex() );

	uno::Any aRet;

	const SfxItemPropertySimpleEntry* pEntry = mpPropSet->getPropertyMapEntry(PropertyName);

	if( pEntry && mpShape->GetSdrObject() )
	{
		SdAnimationInfo* pInfo = GetAnimationInfo(sal_False);

		switch(pEntry->nWID)
		{
		case WID_NAVORDER:
			{
				const sal_uInt32 nNavOrder = mpShape->GetSdrObject()->GetNavigationPosition();
				aRet <<= nNavOrder == SAL_MAX_UINT32 ? static_cast<sal_Int32>(-1) : static_cast< sal_Int32 >(nNavOrder);
			}
			break;
		case WID_EFFECT:
			aRet <<= EffectMigration::GetAnimationEffect( mpShape );
			break;
		case WID_TEXTEFFECT:
			aRet <<= EffectMigration::GetTextAnimationEffect( mpShape );
			break;
		case WID_ISPRESOBJ:
			aRet <<= (sal_Bool)IsPresObj();
			break;
		case WID_ISEMPTYPRESOBJ:
			aRet <<= (sal_Bool)IsEmptyPresObj();
			break;
		case WID_MASTERDEPEND:
			aRet <<= (sal_Bool)IsMasterDepend();
			break;
		case WID_SPEED:
			aRet <<= EffectMigration::GetAnimationSpeed( mpShape );
			break;
		case WID_ISANIMATION:
			aRet <<= (sal_Bool)( pInfo && pInfo->mbIsMovie);
			break;
		case WID_BOOKMARK:
		{
			OUString aString;
			if( pInfo )
			{
				SdDrawDocument* pDoc = mpModel?mpModel->GetDoc():NULL;
				// is the bookmark a page?
				sal_Bool bIsMasterPage;
				if(pDoc->GetPageByName( pInfo->GetBookmark(), bIsMasterPage ) != SDRPAGE_NOTFOUND)
				{
					aString = SdDrawPage::getPageApiNameFromUiName( pInfo->GetBookmark() );
				}
				else
				{
					aString = pInfo->GetBookmark() ;
					sal_Int32 nPos = aString.lastIndexOf( sal_Unicode('#') );
					if( nPos >= 0 )
					{
						OUString aURL( aString.copy( 0, nPos+1 ) );
						OUString aName( aString.copy( nPos+1 ) );
						if(pDoc->GetPageByName( aName, bIsMasterPage ) != SDRPAGE_NOTFOUND)
						{
							aURL += SdDrawPage::getPageApiNameFromUiName( aName );
							aString = aURL;
						}
					}
				}
			}

			aRet <<= aString;
			break;
		}
		case WID_CLICKACTION:
			aRet = ::cppu::enum2any< presentation::ClickAction >( pInfo?pInfo->meClickAction:presentation::ClickAction_NONE );
			break;
		case WID_PLAYFULL:
			aRet <<= (sal_Bool)( pInfo && pInfo->mbPlayFull );
			break;
		case WID_SOUNDFILE:
			aRet <<= EffectMigration::GetSoundFile( mpShape );
			break;
		case WID_SOUNDON:
			aRet <<= EffectMigration::GetSoundOn( mpShape );
			break;
		case WID_BLUESCREEN:
			aRet <<= (sal_Int32)( pInfo?pInfo->maBlueScreen.GetColor():0x00ffffff );
			break;
		case WID_VERB:
			aRet <<= (sal_Int32)( pInfo?pInfo->mnVerb:0 );
			break;
		case WID_DIMCOLOR:
			aRet <<= EffectMigration::GetDimColor( mpShape );
			break;
		case WID_DIMHIDE:
			aRet <<= EffectMigration::GetDimHide( mpShape );
			break;
		case WID_DIMPREV:
			aRet <<= EffectMigration::GetDimPrevious( mpShape );
			break;
		case WID_PRESORDER:
			aRet <<= EffectMigration::GetPresentationOrder( mpShape );
			break;
		case WID_STYLE:
			aRet = GetStyleSheet();
			break;
		case WID_ANIMPATH:
			if( pInfo && pInfo->mpPathObj )
				aRet <<= pInfo->mpPathObj->getUnoShape();
			break;
		case WID_IMAGEMAP:
			{
				uno::Reference< uno::XInterface > xImageMap;

				SdDrawDocument* pDoc = mpModel?mpModel->GetDoc():NULL;
				if( pDoc )
				{

					SdIMapInfo* pIMapInfo = pDoc->GetIMapInfo(mpShape->GetSdrObject());
					if( pIMapInfo )
					{
						const ImageMap& rIMap = pIMapInfo->GetImageMap();
						xImageMap = SvUnoImageMap_createInstance( rIMap, ImplGetSupportedMacroItems() );
					}
					else
					{
						xImageMap = SvUnoImageMap_createInstance(ImplGetSupportedMacroItems() );
					}
				}

				aRet <<= uno::Reference< container::XIndexContainer >::query( xImageMap );
				break;
			}
		}
	}
	else
	{
		aRet = mpShape->_getPropertyValue(PropertyName);

		if( PropertyName.equalsAsciiL( RTL_CONSTASCII_STRINGPARAM( sUNO_shape_layername ) ) )
		{
			OUString aName;
			if( aRet >>= aName )
			{
				aName = SdLayer::convertToExternalName( aName );
				aRet <<= aName;
			}
		}
	}

	return aRet;
}

/** */
SdAnimationInfo* SdXShape::GetAnimationInfo( sal_Bool bCreate ) const throw()
{
	SdAnimationInfo* pInfo = NULL;

	SdrObject* pObj = mpShape->GetSdrObject();
	if(pObj)
		pInfo = SdDrawDocument::GetShapeUserData(*pObj, bCreate ? true : false);

	return pInfo;
}

uno::Sequence< ::rtl::OUString > SAL_CALL SdXShape::getSupportedServiceNames() throw(::com::sun::star::uno::RuntimeException)
{
	uno::Sequence< OUString > aSeq( mpShape->_getSupportedServiceNames() );

	comphelper::ServiceInfoHelper::addToSequence( aSeq, 2, "com.sun.star.presentation.Shape",
												  "com.sun.star.document.LinkTarget" );

	SdrObject* pObj = mpShape->GetSdrObject();
	if(pObj && pObj->GetObjInventor() == SdrInventor )
	{
		sal_uInt32 nInventor = pObj->GetObjIdentifier();
		switch( nInventor )
		{
		case OBJ_TITLETEXT:
			comphelper::ServiceInfoHelper::addToSequence( aSeq, 1, "com.sun.star.presentation.TitleTextShape" );
			break;
		case OBJ_OUTLINETEXT:
			comphelper::ServiceInfoHelper::addToSequence( aSeq, 1, "com.sun.star.presentation.OutlinerShape" );
			break;
		}
	}
	return aSeq;
}

/** checks if this is a presentation object
 */
sal_Bool SdXShape::IsPresObj() const throw()
{
	SdrObject* pObj = mpShape->GetSdrObject();
	if(pObj)
	{
		SdPage* pPage = PTR_CAST(SdPage,pObj->GetPage());
		if(pPage)
			return pPage->GetPresObjKind(pObj) != PRESOBJ_NONE;
	}
	return sal_False;
}

/** checks if this presentation object is empty
 */
sal_Bool SdXShape::IsEmptyPresObj() const throw()
{
	SdrObject* pObj = mpShape->GetSdrObject();
	if( (pObj != NULL) && pObj->IsEmptyPresObj() )
    {
	    // check if the object is in edit, than its temporarely not empty
	    SdrTextObj* pTextObj = dynamic_cast< SdrTextObj* >( pObj );
        if( pTextObj == 0 )
            return sal_True;

        OutlinerParaObject* pParaObj = pTextObj->GetEditOutlinerParaObject();
        if( pParaObj )
        {
            delete pParaObj;
        }
        else
        {
            return sal_True;
        }        
    }

    return sal_False;
}

/** sets/reset the empty status of a presentation object
*/
void SdXShape::SetEmptyPresObj( sal_Bool bEmpty ) throw()
{
	// only possible if this actually *is* a presentation object
	if( !IsPresObj() )
		return;

	SdrObject* pObj = mpShape->GetSdrObject();
	if( pObj == NULL )
		return;

	if( pObj->IsEmptyPresObj() != bEmpty )
	{
		if(!bEmpty)
		{
			OutlinerParaObject* pOutlinerParaObject = pObj->GetOutlinerParaObject();
			const sal_Bool bVertical = pOutlinerParaObject ? pOutlinerParaObject->IsVertical() : sal_False;

			// really delete SdrOutlinerObj at pObj
			pObj->NbcSetOutlinerParaObject(0L);
			if( bVertical && PTR_CAST( SdrTextObj, pObj ) )
				((SdrTextObj*)pObj)->SetVerticalWriting( sal_True );

			SdrGrafObj* pGraphicObj = PTR_CAST( SdrGrafObj, pObj );
			if( pGraphicObj )
			{
				Graphic aEmpty;
				pGraphicObj->SetGraphic(aEmpty);
			}
			else
			{
				SdrOle2Obj* pOleObj = PTR_CAST( SdrOle2Obj, pObj );
				if( pOleObj )
				{
					pOleObj->SetGraphic( NULL );
				}
			}
		}
		else
		{
			// now set an empty OutlinerParaObject at pObj without
			// any content but with the style of the old OutlinerParaObjects
			// first paragraph
			do
			{
				SdDrawDocument* pDoc = mpModel?mpModel->GetDoc():NULL;
				DBG_ASSERT( pDoc, "no document?" );
				if( pDoc == NULL)
					break;

				::sd::Outliner* pOutliner = pDoc->GetInternalOutliner();
				DBG_ASSERT( pOutliner, "no outliner?" );
				if( pOutliner == NULL )
					break;

				SdPage* pPage = PTR_CAST(SdPage,pObj->GetPage());
				DBG_ASSERT( pPage, "no page?" );
				if( pPage == NULL )
					break;

				OutlinerParaObject* pOutlinerParaObject = pObj->GetOutlinerParaObject();
				pOutliner->SetText( *pOutlinerParaObject );
				const sal_Bool bVertical = pOutliner->IsVertical();

				pOutliner->Clear();
				pOutliner->SetVertical( bVertical );
				pOutliner->SetStyleSheetPool( (SfxStyleSheetPool*)pDoc->GetStyleSheetPool() );
				pOutliner->SetStyleSheet( 0, pPage->GetTextStyleSheetForObject( pObj ) );
				pOutliner->Insert( pPage->GetPresObjText( pPage->GetPresObjKind(pObj) ) );
				pObj->SetOutlinerParaObject( pOutliner->CreateParaObject() );
				pOutliner->Clear();
			}
			while(0);
		}

		pObj->SetEmptyPresObj(bEmpty);
	}
}

sal_Bool SdXShape::IsMasterDepend() const throw()
{
	SdrObject* pObj = mpShape->GetSdrObject();
	return pObj && pObj->GetUserCall() != NULL;
}

void SdXShape::SetMasterDepend( sal_Bool bDepend ) throw()
{
	if( IsMasterDepend() != bDepend )
	{
		SdrObject* pObj = mpShape->GetSdrObject();
		if( pObj )
		{
			if( bDepend )
			{
				SdPage* pPage = PTR_CAST(SdPage,pObj->GetPage());
				pObj->SetUserCall( pPage );
			}
			else
			{
				pObj->SetUserCall( NULL );
			}
		}
	}
}

void SdXShape::SetStyleSheet( const uno::Any& rAny ) throw( lang::IllegalArgumentException )
{
	SdrObject* pObj = mpShape->GetSdrObject();
	if( pObj == NULL )
		throw beans::UnknownPropertyException();

	uno::Reference< style::XStyle > xStyle( rAny, uno::UNO_QUERY );
	SfxStyleSheet* pStyleSheet = SfxUnoStyleSheet::getUnoStyleSheet( xStyle );

	const SfxStyleSheet* pOldStyleSheet = pObj->GetStyleSheet();
	if( pOldStyleSheet != pStyleSheet )
	{
		if( pStyleSheet == 0 || (pStyleSheet->GetFamily() != SD_STYLE_FAMILY_GRAPHICS && pStyleSheet->GetFamily() != SD_STYLE_FAMILY_MASTERPAGE) )
			throw lang::IllegalArgumentException();

		pObj->SetStyleSheet( pStyleSheet, sal_False );

		SdDrawDocument* pDoc = mpModel? mpModel->GetDoc() : NULL;
		if( pDoc )
		{
			::sd::DrawDocShell* pDocSh = pDoc->GetDocSh();
			::sd::ViewShell* pViewSh = pDocSh ? pDocSh->GetViewShell() : NULL;

			if( pViewSh )
				pViewSh->GetViewFrame()->GetBindings().Invalidate( SID_STYLE_FAMILY2 );
		}
	}
}

uno::Any SdXShape::GetStyleSheet() const throw( beans::UnknownPropertyException  )
{
	SdrObject* pObj = mpShape->GetSdrObject();
	if( pObj == NULL )
		throw beans::UnknownPropertyException();

	SfxStyleSheet* pStyleSheet = pObj->GetStyleSheet();
	// it is possible for shapes inside a draw to have a presentation style
	// but we don't want this for the api
	if( (pStyleSheet == NULL) || ((pStyleSheet->GetFamily() != SD_STYLE_FAMILY_GRAPHICS) && !mpModel->IsImpressDocument()) )
		return Any();

	return Any( uno::Reference< style::XStyle >( dynamic_cast< SfxUnoStyleSheet* >( pStyleSheet ) ) );
}

class SdUnoEventsAccess : public cppu::WeakImplHelper2< com::sun::star::container::XNameReplace, com::sun::star::lang::XServiceInfo >
{
private:
	const OUString		maStrOnClick;
	const OUString		maStrServiceName;
	const OUString		maStrEventType;
	const OUString		maStrPresentation;
	const OUString		maStrLibrary;
	const OUString		maStrMacroName;
	const OUString		maStrClickAction;
	const OUString		maStrBookmark;
	const OUString		maStrEffect;
	const OUString		maStrPlayFull;
	const OUString		maStrVerb;
	const OUString		maStrSoundURL;
	const OUString		maStrSpeed;
	const OUString		maStrStarBasic;
	const OUString		maStrScript;

	SdXShape*	mpShape;
	uno::Reference< document::XEventsSupplier > mxShape;

public:
	SdUnoEventsAccess( SdXShape* pShape ) throw();

    // XNameReplace
    virtual void SAL_CALL replaceByName( const ::rtl::OUString& aName, const ::com::sun::star::uno::Any& aElement ) throw(::com::sun::star::lang::IllegalArgumentException, ::com::sun::star::container::NoSuchElementException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
    
    // XNameAccess
    virtual ::com::sun::star::uno::Any SAL_CALL getByName( const ::rtl::OUString& aName ) throw(::com::sun::star::container::NoSuchElementException, ::com::sun::star::lang::WrappedTargetException, ::com::sun::star::uno::RuntimeException);
    virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getElementNames(  ) throw(::com::sun::star::uno::RuntimeException);
    virtual sal_Bool SAL_CALL hasByName( const ::rtl::OUString& aName ) throw(::com::sun::star::uno::RuntimeException);

    // XElementAccess
    virtual ::com::sun::star::uno::Type SAL_CALL getElementType(  ) throw(::com::sun::star::uno::RuntimeException);
    virtual sal_Bool SAL_CALL hasElements(  ) throw(::com::sun::star::uno::RuntimeException);

	// XServiceInfo
    virtual ::rtl::OUString SAL_CALL getImplementationName(  ) throw(::com::sun::star::uno::RuntimeException);
    virtual sal_Bool SAL_CALL supportsService( const ::rtl::OUString& ServiceName ) throw(::com::sun::star::uno::RuntimeException);
    virtual ::com::sun::star::uno::Sequence< ::rtl::OUString > SAL_CALL getSupportedServiceNames(  ) throw(::com::sun::star::uno::RuntimeException);
};

// XEventsSupplier
uno::Reference< container::XNameReplace > SAL_CALL SdXShape::getEvents(  ) throw(::com::sun::star::uno::RuntimeException)
{
	return new SdUnoEventsAccess( this );
}

SdUnoEventsAccess::SdUnoEventsAccess( SdXShape* pShape ) throw()
: maStrOnClick( RTL_CONSTASCII_USTRINGPARAM("OnClick") ),
  maStrServiceName( RTL_CONSTASCII_USTRINGPARAM("com.sun.star.documents.Events") ),
  maStrEventType( RTL_CONSTASCII_USTRINGPARAM("EventType") ),
  maStrPresentation( RTL_CONSTASCII_USTRINGPARAM("Presentation") ),
  maStrLibrary(RTL_CONSTASCII_USTRINGPARAM("Library")),
  maStrMacroName(RTL_CONSTASCII_USTRINGPARAM("MacroName")),
  maStrClickAction( RTL_CONSTASCII_USTRINGPARAM("ClickAction") ),
  maStrBookmark( RTL_CONSTASCII_USTRINGPARAM("Bookmark") ),
  maStrEffect( RTL_CONSTASCII_USTRINGPARAM("Effect") ),
  maStrPlayFull( RTL_CONSTASCII_USTRINGPARAM("PlayFull") ),
  maStrVerb( RTL_CONSTASCII_USTRINGPARAM("Verb") ),
  maStrSoundURL( RTL_CONSTASCII_USTRINGPARAM("SoundURL") ),
  maStrSpeed( RTL_CONSTASCII_USTRINGPARAM("Speed") ),
  maStrStarBasic( RTL_CONSTASCII_USTRINGPARAM("StarBasic") ),
  maStrScript( RTL_CONSTASCII_USTRINGPARAM("Script") ),
  mpShape( pShape ), mxShape( pShape )
{
}

#define FOUND_CLICKACTION	0x0001
#define FOUND_BOOKMARK		0x0002
#define FOUND_EFFECT		0x0004
#define FOUND_PLAYFULL		0x0008
#define FOUND_VERB			0x0010
#define FOUND_SOUNDURL		0x0020
#define FOUND_SPEED			0x0040
#define FOUND_EVENTTYPE		0x0080
#define FOUND_MACRO			0x0100
#define FOUND_LIBRARY		0x0200

static void clearEventsInAnimationInfo( SdAnimationInfo* pInfo )
{
	const String aEmpty;
	pInfo->SetBookmark( aEmpty );
	pInfo->mbSecondSoundOn = sal_False;
	pInfo->mbSecondPlayFull = sal_False;
	pInfo->meClickAction = presentation::ClickAction_NONE;
	pInfo->meSecondEffect = presentation::AnimationEffect_NONE;
	pInfo->meSecondSpeed = presentation::AnimationSpeed_MEDIUM;
	pInfo->mnVerb = 0;
}

// XNameReplace
void SAL_CALL SdUnoEventsAccess::replaceByName( const OUString& aName, const uno::Any& aElement )
	throw(lang::IllegalArgumentException, container::NoSuchElementException, lang::WrappedTargetException, uno::RuntimeException)
{
	if( mpShape == NULL || aName != maStrOnClick )
		throw container::NoSuchElementException();

	uno::Sequence< beans::PropertyValue > aProperties;
	if( !aElement.hasValue() || aElement.getValueType() != getElementType() || !(aElement >>= aProperties) )
		throw lang::IllegalArgumentException();

	sal_Int32 nFound = 0;
	const beans::PropertyValue* pProperties = aProperties.getConstArray();

	OUString aStrEventType;
	presentation::ClickAction eClickAction = presentation::ClickAction_NONE;
	presentation::AnimationEffect eEffect = presentation::AnimationEffect_NONE;
	presentation::AnimationSpeed eSpeed = presentation::AnimationSpeed_MEDIUM;
	OUString aStrSoundURL;
	sal_Bool bPlayFull = sal_False;
	sal_Int32 nVerb = 0;
	OUString aStrMacro;
	OUString aStrLibrary;
	OUString aStrBookmark;

	const sal_Int32 nCount = aProperties.getLength();
	sal_Int32 nIndex;
	for( nIndex = 0; nIndex < nCount; nIndex++, pProperties++ )
	{
		if( ( ( nFound & FOUND_EVENTTYPE ) == 0 ) && pProperties->Name == maStrEventType )
		{
			if( pProperties->Value >>= aStrEventType )
			{
				nFound |= FOUND_EVENTTYPE;
				continue;
			}
		}
		else if( ( ( nFound & FOUND_CLICKACTION ) == 0 ) && pProperties->Name == maStrClickAction )
		{
			if( pProperties->Value >>= eClickAction )
			{
				nFound |= FOUND_CLICKACTION;
				continue;
			}
		}
		else if( ( ( nFound & FOUND_MACRO ) == 0 ) && ( pProperties->Name == maStrMacroName || pProperties->Name == maStrScript ) )
		{
			if( pProperties->Value >>= aStrMacro )
			{
				nFound |= FOUND_MACRO;
				continue;
			}
		}
		else if( ( ( nFound & FOUND_LIBRARY ) == 0 ) && pProperties->Name == maStrLibrary )
		{
			if( pProperties->Value >>= aStrLibrary )
			{
				nFound |= FOUND_LIBRARY;
				continue;
			}
		}
		else if( ( ( nFound & FOUND_EFFECT ) == 0 ) && pProperties->Name == maStrEffect )
		{
			if( pProperties->Value >>= eEffect )
			{
				nFound |= FOUND_EFFECT;
				continue;
			}
		}
		else if( ( ( nFound & FOUND_BOOKMARK ) == 0 ) && pProperties->Name == maStrBookmark )
		{
			if( pProperties->Value >>= aStrBookmark )
			{
				nFound |= FOUND_BOOKMARK;
				continue;
			}
		}
		else if( ( ( nFound & FOUND_SPEED ) == 0 ) && pProperties->Name == maStrSpeed )
		{
			if( pProperties->Value >>= eSpeed )
			{
				nFound |= FOUND_SPEED;
				continue;
			}
		}
		else if( ( ( nFound & FOUND_SOUNDURL ) == 0 ) && pProperties->Name == maStrSoundURL )
		{
			if( pProperties->Value >>= aStrSoundURL )
			{
				nFound |= FOUND_SOUNDURL;
				continue;
			}
		}
		else if( ( ( nFound & FOUND_PLAYFULL ) == 0 ) && pProperties->Name == maStrPlayFull )
		{
			if( pProperties->Value >>= bPlayFull )
			{
				nFound |= FOUND_PLAYFULL;
				continue;
			}
		}
		else if( ( ( nFound & FOUND_VERB ) == 0 ) && pProperties->Name == maStrVerb )
		{
			if( pProperties->Value >>= nVerb )
			{
				nFound |= FOUND_VERB;
				continue;
			}
		}

		throw lang::IllegalArgumentException();
	}

	sal_Bool bOk = sal_False;
	do
	{
		if( ( nFound & FOUND_EVENTTYPE ) == 0 )
			break;

		if( aStrEventType == maStrPresentation )
		{
			if( ( nFound & FOUND_CLICKACTION ) == 0 )
				break;

			SdAnimationInfo* pInfo = mpShape->GetAnimationInfo( sal_False );
			if( presentation::ClickAction_NONE == eClickAction && NULL == pInfo )
			{
				bOk = sal_True;
				break;
			}

			if( NULL == pInfo )
				pInfo = mpShape->GetAnimationInfo( sal_True );

			DBG_ASSERT( pInfo, "shape animation info could not be created!" );
			if( NULL == pInfo )
				break;

			clearEventsInAnimationInfo( pInfo );
			pInfo->meClickAction = eClickAction;

			switch( eClickAction )
			{
			case presentation::ClickAction_NONE:
			case presentation::ClickAction_PREVPAGE:
			case presentation::ClickAction_NEXTPAGE:
			case presentation::ClickAction_FIRSTPAGE:
			case presentation::ClickAction_LASTPAGE:
			case presentation::ClickAction_INVISIBLE:
			case presentation::ClickAction_STOPPRESENTATION:
				{
					bOk = sal_True;
				}
				break;

			case presentation::ClickAction_PROGRAM:
			case presentation::ClickAction_BOOKMARK:
			case presentation::ClickAction_DOCUMENT:
				if( nFound & FOUND_BOOKMARK )
				{
					if( eClickAction == presentation::ClickAction_BOOKMARK )
					{
						aStrBookmark = getUiNameFromPageApiNameImpl( aStrBookmark );
					}
					else if( eClickAction == presentation::ClickAction_DOCUMENT )
					{
						sal_Int32 nPos = aStrBookmark.lastIndexOf( sal_Unicode('#') );
						if( nPos >= 0 )
						{
							OUString aURL( aStrBookmark.copy( 0, nPos+1 ) );
							aURL += getUiNameFromPageApiNameImpl( aStrBookmark.copy( nPos+1 ) );
							aStrBookmark = aURL;
						}
					}

					pInfo->SetBookmark( aStrBookmark );
					bOk = sal_True;
				}
				break;

			case presentation::ClickAction_MACRO:
				if( nFound & FOUND_MACRO )
				{
					pInfo->SetBookmark( aStrMacro );
					bOk = sal_True;
				}
				break;

			case presentation::ClickAction_VERB:
				if( nFound & FOUND_VERB )
				{
					pInfo->mnVerb = (sal_uInt16)nVerb;
					bOk = sal_True;
				}
				break;

			case presentation::ClickAction_VANISH:
				if( ( nFound & FOUND_EFFECT ) == 0 )
					break;

				pInfo->meSecondEffect = eEffect;
				pInfo->meSecondSpeed = nFound & FOUND_SPEED ? eSpeed : presentation::AnimationSpeed_MEDIUM;

				bOk = sal_True;

				// NOTE: No break here!!!

			case presentation::ClickAction_SOUND:
				if( nFound & FOUND_SOUNDURL )
				{
					pInfo->SetBookmark( aStrSoundURL );
					if( eClickAction != presentation::ClickAction_SOUND )
						pInfo->mbSecondSoundOn = aStrSoundURL.getLength() != 0;
					pInfo->mbSecondPlayFull = nFound & FOUND_PLAYFULL ? bPlayFull : sal_False;

					bOk = sal_True;
				}
				break;
			case presentation::ClickAction_MAKE_FIXED_SIZE:
				break;
			}
		}
		else
		{
			SdAnimationInfo* pInfo = mpShape->GetAnimationInfo( sal_True );

			DBG_ASSERT( pInfo, "shape animation info could not be created!" );
			if( NULL == pInfo )
				break;

			clearEventsInAnimationInfo( pInfo );
			pInfo->meClickAction = presentation::ClickAction_MACRO;

			if ( SfxApplication::IsXScriptURL( aStrMacro ) )
			{
				pInfo->SetBookmark( aStrMacro );
			}
			else
			{
				String aMacro = aStrMacro;

				String aLibName   = aMacro.GetToken(0, sal_Unicode('.'));
				String aModulName = aMacro.GetToken(1, sal_Unicode('.'));
				String aMacroName = aMacro.GetToken(2, sal_Unicode('.'));

				OUStringBuffer sBuffer;
				sBuffer.append( aMacroName );
				sBuffer.append( sal_Unicode('.') );
				sBuffer.append( aModulName );
				sBuffer.append( sal_Unicode('.') );
				sBuffer.append( aLibName );
				sBuffer.append( sal_Unicode('.') );

				if( aStrLibrary.equalsAsciiL( RTL_CONSTASCII_STRINGPARAM( "StarOffice" ) ) )
				{
					sBuffer.append( OUString( RTL_CONSTASCII_USTRINGPARAM( "BASIC" ) ) );
				}
				else
				{
					sBuffer.append( aStrLibrary );
				}
			
				pInfo->SetBookmark( sBuffer.makeStringAndClear() );
			}
			bOk = sal_True;
		}
	}
	while(0);

	if( !bOk )
		throw lang::IllegalArgumentException();
}

// XNameAccess
uno::Any SAL_CALL SdUnoEventsAccess::getByName( const OUString& aName )
	throw(container::NoSuchElementException, lang::WrappedTargetException, uno::RuntimeException)
{
	if( mpShape == NULL || aName != maStrOnClick )
		throw container::NoSuchElementException();

	SdAnimationInfo* pInfo = mpShape->GetAnimationInfo( sal_False );

	presentation::ClickAction eClickAction = presentation::ClickAction_NONE;
	if( pInfo )
		eClickAction = pInfo->meClickAction;

	sal_Int32 nPropertyCount = 2;
	switch( eClickAction )
	{
	case presentation::ClickAction_NONE:
	case presentation::ClickAction_PREVPAGE:
	case presentation::ClickAction_NEXTPAGE:
	case presentation::ClickAction_FIRSTPAGE:
	case presentation::ClickAction_LASTPAGE:
	case presentation::ClickAction_INVISIBLE:
	case presentation::ClickAction_STOPPRESENTATION:
		break;
	case presentation::ClickAction_PROGRAM:
	case presentation::ClickAction_VERB:
	case presentation::ClickAction_BOOKMARK:
	case presentation::ClickAction_DOCUMENT:
	case presentation::ClickAction_MACRO:
		if ( !SfxApplication::IsXScriptURL( pInfo->GetBookmark() ) )
			nPropertyCount += 1;
		break;

	case presentation::ClickAction_SOUND:
		nPropertyCount += 2;
		break;

	case presentation::ClickAction_VANISH:
		nPropertyCount += 4;
		break;
	default:
		break;
	}

	uno::Sequence< beans::PropertyValue > aProperties( nPropertyCount );
	beans::PropertyValue* pProperties = aProperties.getArray();

	uno::Any aAny;

	if( eClickAction == presentation::ClickAction_MACRO )
	{
		if ( SfxApplication::IsXScriptURL( pInfo->GetBookmark() ) )
		{
			// Scripting Framework URL
			aAny <<= maStrScript;;
			pProperties->Name = maStrEventType;
			pProperties->Handle = -1;
			pProperties->Value = aAny;
			pProperties->State = beans::PropertyState_DIRECT_VALUE;
			pProperties++;

			aAny <<= OUString( pInfo->GetBookmark() );
			pProperties->Name = maStrScript;
			pProperties->Handle = -1;
			pProperties->Value = aAny;
			pProperties->State = beans::PropertyState_DIRECT_VALUE;
			pProperties++;
		}
		else
		{
			// Old Basic macro URL
			aAny <<= maStrStarBasic;;
			pProperties->Name = maStrEventType;
			pProperties->Handle = -1;
			pProperties->Value = aAny;
			pProperties->State = beans::PropertyState_DIRECT_VALUE;
			pProperties++;

			String aMacro = pInfo->GetBookmark();

			// aMacro has got following format:
			// "Macroname.Modulname.Libname.Documentname" or
			// "Macroname.Modulname.Libname.Applicationsname"
			String aMacroName = aMacro.GetToken(0, sal_Unicode('.'));
			String aModulName = aMacro.GetToken(1, sal_Unicode('.'));
			String aLibName   = aMacro.GetToken(2, sal_Unicode('.'));
			String aDocName   = aMacro.GetToken(3, sal_Unicode('.'));

			OUStringBuffer sBuffer;
			sBuffer.append( aLibName );
			sBuffer.append( sal_Unicode('.') );
			sBuffer.append( aModulName );
			sBuffer.append( sal_Unicode('.') );
			sBuffer.append( aMacroName );

			aAny <<= OUString( sBuffer.makeStringAndClear() );
			pProperties->Name = maStrMacroName;
			pProperties->Handle = -1;
			pProperties->Value = aAny;
			pProperties->State = beans::PropertyState_DIRECT_VALUE;
			pProperties++;

			aAny <<= OUString( RTL_CONSTASCII_USTRINGPARAM( "StarOffice" ) );
			pProperties->Name = maStrLibrary;
			pProperties->Handle = -1;
			pProperties->Value = aAny;
			pProperties->State = beans::PropertyState_DIRECT_VALUE;
		}
	}
	else
	{
		aAny <<= maStrPresentation;
		pProperties->Name = maStrEventType;
		pProperties->Handle = -1;
		pProperties->Value = aAny;
		pProperties->State = beans::PropertyState_DIRECT_VALUE;
		pProperties++;

		aAny <<= eClickAction;
		pProperties->Name = maStrClickAction;
		pProperties->Handle = -1;
		pProperties->Value = aAny;
		pProperties->State = beans::PropertyState_DIRECT_VALUE;
		pProperties++;

		switch( eClickAction )
		{
		case presentation::ClickAction_NONE:
		case presentation::ClickAction_PREVPAGE:
		case presentation::ClickAction_NEXTPAGE:
		case presentation::ClickAction_FIRSTPAGE:
		case presentation::ClickAction_LASTPAGE:
		case presentation::ClickAction_INVISIBLE:
		case presentation::ClickAction_STOPPRESENTATION:
			break;
		case presentation::ClickAction_BOOKMARK:
			{
				const OUString aStrBookmark( getPageApiNameFromUiName( pInfo->GetBookmark()) );
				pProperties->Name = maStrBookmark;
				pProperties->Handle = -1;
				pProperties->Value <<= aStrBookmark;
				pProperties->State = beans::PropertyState_DIRECT_VALUE;
			}
			break;

		case presentation::ClickAction_DOCUMENT:
		case presentation::ClickAction_PROGRAM:
			{
				OUString aString( pInfo->GetBookmark());
				sal_Int32 nPos = aString.lastIndexOf( sal_Unicode('#') );
				if( nPos >= 0 )
				{
					OUString aURL( aString.copy( 0, nPos+1 ) );
					aURL += getPageApiNameFromUiName( aString.copy( nPos+1 ) );
					aString = aURL;
				}
				pProperties->Name = maStrBookmark;
				pProperties->Handle = -1;
				pProperties->Value <<= aString;
				pProperties->State = beans::PropertyState_DIRECT_VALUE;
			}
			break;

		case presentation::ClickAction_VANISH:
			aAny <<= pInfo->meSecondEffect;
			pProperties->Name = maStrEffect;
			pProperties->Handle = -1;
			pProperties->Value = aAny;
			pProperties->State = beans::PropertyState_DIRECT_VALUE;
			pProperties++;

			aAny <<= pInfo->meSecondSpeed;
			pProperties->Name = maStrSpeed;
			pProperties->Handle = -1;
			pProperties->Value = aAny;
			pProperties->State = beans::PropertyState_DIRECT_VALUE;
			pProperties++;
		
			// NOTE: no break here!!!

		case presentation::ClickAction_SOUND:
			if( eClickAction == presentation::ClickAction_SOUND || pInfo->mbSecondSoundOn )
			{
				aAny <<= OUString( pInfo->GetBookmark());
				pProperties->Name = maStrSoundURL;
				pProperties->Handle = -1;
				pProperties->Value = aAny;
				pProperties->State = beans::PropertyState_DIRECT_VALUE;
				pProperties++;

				pProperties->Name = maStrPlayFull;
				pProperties->Handle = -1;
				pProperties->Value = ::cppu::bool2any(pInfo->mbSecondPlayFull);
				pProperties->State = beans::PropertyState_DIRECT_VALUE;
			}
			break;

		case presentation::ClickAction_VERB:
			aAny <<= (sal_Int32)pInfo->mnVerb;
			pProperties->Name = maStrVerb;
			pProperties->Handle = -1;
			pProperties->Value = aAny;
			pProperties->State = beans::PropertyState_DIRECT_VALUE;
			break;
		default:
			break;
		}
	}

	aAny <<= aProperties;
	return aAny;
}

uno::Sequence< OUString > SAL_CALL SdUnoEventsAccess::getElementNames(  )
	throw(uno::RuntimeException)
{
	uno::Sequence< OUString > aStr( &maStrOnClick, 1 );
	return aStr;
}

sal_Bool SAL_CALL SdUnoEventsAccess::hasByName( const OUString& aName )
	throw(uno::RuntimeException)
{
	return aName == maStrOnClick;
}

// XElementAccess
uno::Type SAL_CALL SdUnoEventsAccess::getElementType(  )
	throw(uno::RuntimeException)
{
	return *SEQTYPE(::getCppuType((const uno::Sequence< beans::PropertyValue >*)0));
}

sal_Bool SAL_CALL SdUnoEventsAccess::hasElements(  ) throw(uno::RuntimeException)
{
	return sal_True;
}

// XServiceInfo
OUString SAL_CALL SdUnoEventsAccess::getImplementationName(  )
	throw(uno::RuntimeException)
{
	return OUString( RTL_CONSTASCII_USTRINGPARAM( "SdUnoEventsAccess" ) );
}

sal_Bool SAL_CALL SdUnoEventsAccess::supportsService( const OUString& ServiceName )
	throw(uno::RuntimeException)
{
	return ServiceName == maStrServiceName;
}

uno::Sequence< OUString > SAL_CALL SdUnoEventsAccess::getSupportedServiceNames(  )
	throw(uno::RuntimeException)
{
	uno::Sequence< OUString > aStr( &maStrServiceName, 1 );
	return aStr;
}

void SdXShape::modelChanged( SdrModel* pNewModel )
{
	if( pNewModel )
	{
		uno::Reference< uno::XInterface > xModel( pNewModel->getUnoModel() );
		mpModel = SdXImpressDocument::getImplementation( xModel );
	}
	else
	{
		mpModel = 0;
	}
}

void SdXShape::pageChanged( SdrPage*  )
{
}

void SdXShape::objectChanged( SdrObject*  )
{
}

