Anonymous

	Reference< XMultiServiceFactory> xMS(::comphelper::getProcessServiceFactory(), UNO_QUERY);
	Reference< XPropertySet >  xProps(xMS, UNO_QUERY);
	Reference< XComponentContext > xContext(xProps->getPropertyValue(rtl::OUString::createFromAscii("DefaultContext")), UNO_QUERY);

	Reference<css::deployment::XPackageManager> xUserContext(
		deployment::thePackageManagerFactory::get (xContext)->getPackageManager( OUSTR("user") ) );

    Reference< lang::XMultiServiceFactory > xFactory = ::comphelper::getProcessServiceFactory();
    Reference< task::XInteractionHandler > xInteractionHandler = uno::Reference< task::XInteractionHandler > (
            xFactory->createInstance( rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("com.sun.star.uui.InteractionHandler") ) ), uno::UNO_QUERY );
    ucbhelper::CommandEnvironment* pCommandEnv = new ::ucbhelper::CommandEnvironment( xInteractionHandler, uno::Reference< ucb::XProgressHandler >() );

    Reference< ucb::XCommandEnvironment > xCmdEnv( static_cast< ucb::XCommandEnvironment* >( pCommandEnv ), uno::UNO_QUERY );

	const Sequence< Reference<deployment::XPackage> > packages(
        xUserContext->getDeployedPackages( NULL, xCmdEnv ) );