desktop/source/migration/services/extensionmigration.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: extensionmigration.cxx,v $
  10  * $Revision: 1.2 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_desktop.hxx"
  33 #include "extensionmigration.hxx"
  34 #include <tools/urlobj.hxx>
  35 #include <unotools/bootstrap.hxx>
  36 #include <unotools/ucbstreamhelper.hxx>
  37 #include <ucbhelper/content.hxx>
  38 #include <com/sun/star/ucb/XCommandInfo.hpp>
  39 #include <com/sun/star/ucb/TransferInfo.hpp>
  40 #include <com/sun/star/ucb/NameClash.hpp>
  41 #include "comphelper/processfactory.hxx"
  42 #include "com/sun/star/deployment/XPackageManagerFactory.hpp"
  43 #include "com/sun/star/ucb/XCommandEnvironment.hpp"
  44 #include "com/sun/star/xml/sax/XParser.hpp"
  45 #include "rtl/instance.hxx"
  46 #include "osl/file.hxx"
  47 #include "osl/thread.h"
  48
  49 #include "xmlscript/xmllib_imexp.hxx"
  50 #include "../../deployment/inc/dp_ucb.h"
  51
  52 #ifdef SYSTEM_DB
  53 #include <db.h>
  54 #else
  55 #include <berkeleydb/db.h>
  56 #endif
  57
  58 using namespace ::com::sun::star;
  59 using namespace ::com::sun::star::uno;
  60
  61 namespace {
  62
  63     struct LibDescriptor :
  64         public rtl::StaticWithInit<const ::xmlscript::LibDescriptorArray, LibDescriptor> {
  65     const ::xmlscript::LibDescriptorArray operator () () {
  66
  67
  68         return ::xmlscript::LibDescriptorArray();
  69     }
  70 };
  71 }
  72 //.........................................................................
  73 namespace migration
  74 {
  75 //.........................................................................
  76
  77
  78     static ::rtl::OUString sExtensionSubDir = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "/user/uno_packages/" ) );
  79     static ::rtl::OUString sSubDirName = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "cache" ) );
  80     static ::rtl::OUString sConfigDir = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "/user/registry/data" ) );
  81     static ::rtl::OUString sOrgDir = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "/user/registry/data/org" ) );
  82     static ::rtl::OUString sExcludeDir1 = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "/user/registry/data/org" ) );
  83     static ::rtl::OUString sExcludeDir2 = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "/user/registry/data/org/openoffice" ) );
  84
  85     static ::rtl::OUString sBasicType = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("application/vnd.sun.star.basic-library"));
  86     static ::rtl::OUString sDialogType = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("application/vnd.sun.star.dialog-library"));
  87
  88     static ::rtl::OUString sConfigurationDataType = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("application/vnd.sun.star.configuration-data"));
  89     static ::rtl::OUString sConfigurationSchemaType = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("application/vnd.sun.star.configuration-schema"));
  90
  91     // =============================================================================
  92     // component operations
  93     // =============================================================================
  94
  95     ::rtl::OUString ExtensionMigration_getImplementationName()
  96     {
  97         static ::rtl::OUString* pImplName = 0;
  98         if ( !pImplName )
  99         {
 100             ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
 101             if ( !pImplName )
 102             {
 103                 static ::rtl::OUString aImplName( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.desktop.migration.Extensions" ) );
 104                 pImplName = &aImplName;
 105             }
 106         }
 107         return *pImplName;
 108     }
 109
 110     // -----------------------------------------------------------------------------
 111
 112     Sequence< ::rtl::OUString > ExtensionMigration_getSupportedServiceNames()
 113     {
 114         static Sequence< ::rtl::OUString >* pNames = 0;
 115         if ( !pNames )
 116         {
 117             ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
 118             if ( !pNames )
 119             {
 120                 static Sequence< ::rtl::OUString > aNames(1);
 121                 aNames.getArray()[0] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.migration.Extensions" ) );
 122                 pNames = &aNames;
 123             }
 124         }
 125         return *pNames;
 126     }
 127
 128     // =============================================================================
 129     // ExtensionMigration
 130     // =============================================================================
 131
 132     ExtensionMigration::ExtensionMigration(Reference< XComponentContext > const & ctx) :
 133     m_ctx(ctx)
 134     {
 135     }
 136
 137     // -----------------------------------------------------------------------------
 138
 139     ExtensionMigration::~ExtensionMigration()
 140     {
 141     }
 142
 143     ::osl::FileBase::RC ExtensionMigration::checkAndCreateDirectory( INetURLObject& rDirURL )
 144     {
 145         ::osl::FileBase::RC aResult = ::osl::Directory::create( rDirURL.GetMainURL( INetURLObject::DECODE_TO_IURI ) );
 146         if ( aResult == ::osl::FileBase::E_NOENT )
 147         {
 148             INetURLObject aBaseURL( rDirURL );
 149             aBaseURL.removeSegment();
 150             checkAndCreateDirectory( aBaseURL );
 151             return ::osl::Directory::create( rDirURL.GetMainURL( INetURLObject::DECODE_TO_IURI ) );
 152         }
 153         else
 154         {
 155             return aResult;
 156         }
 157     }
 158
 159     void ExtensionMigration::prepareBasicLibs()
 160     {
 161         prepareBasicLibs(m_sSourceDir + ::rtl::OUString(
 162             RTL_CONSTASCII_USTRINGPARAM("/user/basic/script.xlc")), m_scriptElements);
 163         prepareBasicLibs(m_sSourceDir + ::rtl::OUString(
 164             RTL_CONSTASCII_USTRINGPARAM("/user/basic/dialog.xlc")), m_dialogElements);
 165     }
 166
 167     void ExtensionMigration::prepareBasicLibs(const ::rtl::OUString & sURL,
 168         ::xmlscript::LibDescriptorArray & out_elements)
 169     {
 170
 171         ::ucbhelper::Content ucb_content;
 172         if (dp_misc::create_ucb_content( &ucb_content, sURL,
 173             uno::Reference< ucb::XCommandEnvironment>(), false /* no throw */ ))
 174         {
 175             uno::Reference<xml::sax::XParser> xParser(
 176                 m_ctx->getServiceManager()->createInstanceWithContext(
 177                 ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.xml.sax.Parser")),
 178                 m_ctx ), UNO_QUERY_THROW );
 179
 180             xParser->setDocumentHandler( ::xmlscript::importLibraryContainer( &out_elements ) );
 181             xml::sax::InputSource source;
 182             source.aInputStream = ucb_content.openStream();
 183             source.sSystemId = ucb_content.getURL();
 184             xParser->parseStream( source );
 185         }
 186        //else
 187        //The file need not exists
 188     }
 189     /* Checks if basic package is enabled in StarOffice 8. This is the case when the dialog.xlc or
 190     the script.xlc in the user installation contains an entry for this package.
 191     The passed package MUST be a basic package.
 192     */
 193     bool ExtensionMigration::isBasicPackageEnabled( const uno::Reference< deployment::XPackage > & xPkg)
 194     {
 195         ::rtl::OUString sScriptURL = xPkg->getURL();
 196         if ( sScriptURL[ sScriptURL.getLength()-1 ] != '/' )
 197             sScriptURL += ::rtl::OUString::createFromAscii("/");
 198         sScriptURL += ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("script.xlb") );
 199
 200         bool bEntryFound = false;
 201         for ( sal_Int32 nPos = m_scriptElements.mnLibCount; nPos--; )
 202         {
 203             ::xmlscript::LibDescriptor const & descr =
 204                 m_scriptElements.mpLibs[ nPos ];
 205
 206             if (descr.aStorageURL.equals(sScriptURL))
 207             {
 208                bEntryFound = true;
 209                break;
 210             }
 211         }
 212
 213         ::rtl::OUString sDialogURL = xPkg->getURL();
 214         if ( sDialogURL[ sDialogURL.getLength()-1 ] != '/' )
 215             sDialogURL += ::rtl::OUString::createFromAscii("/");
 216          sScriptURL += ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM("dialog.xlb") );
 217
 218         if (!bEntryFound)
 219         {
 220             for ( sal_Int32 nPos = m_dialogElements.mnLibCount; nPos--; )
 221             {
 222                 ::xmlscript::LibDescriptor const & descr =
 223                     m_dialogElements.mpLibs[ nPos ];
 224
 225                 if (descr.aStorageURL.equals(sDialogURL))
 226                 {
 227                     bEntryFound = true;
 228                     break;
 229                 }
 230             }
 231         }
 232         return bEntryFound;
 233     }
 234     /* This function only registers basic and dialog packages.
 235     */
 236     void ExtensionMigration::registerBasicPackage( const uno::Reference< deployment::XPackage > & xPkg)
 237     {
 238         const ::rtl::OUString sMediaType = xPkg->getPackageType()->getMediaType();
 239         if ( (sMediaType.equals(sBasicType) || sMediaType.equals(sDialogType))
 240             && isBasicPackageEnabled(xPkg))
 241         {
 242             xPkg->registerPackage(uno::Reference< task::XAbortChannel >(),
 243                 uno::Reference< ucb::XCommandEnvironment> ());
 244         }
 245     }
 246
 247     void ExtensionMigration::registerConfigurationPackage( const uno::Reference< deployment::XPackage > & xPkg)
 248     {
 249         const ::rtl::OUString sMediaType = xPkg->getPackageType()->getMediaType();
 250         if ( (sMediaType.equals(sConfigurationDataType) || sMediaType.equals(sConfigurationSchemaType) ) )
 251         {
 252             xPkg->revokePackage(uno::Reference< task::XAbortChannel >(), uno::Reference< ucb::XCommandEnvironment> ());
 253             xPkg->registerPackage(uno::Reference< task::XAbortChannel >(), uno::Reference< ucb::XCommandEnvironment> ());
 254         }
 255     }
 256
 257     bool ExtensionMigration::processExtensions( const ::rtl::OUString& sSourceDir, const ::rtl::OUString& sTargetDir )
 258     {
 259         if (!copy(sSourceDir, sTargetDir))
 260             return false;
 261
 262         // Find all basic and script packages and reregister them
 263         uno::Reference< deployment::XPackageManagerFactory > xPMF;
 264         if (! ( m_ctx->getValueByName( ::rtl::OUString(
 265             RTL_CONSTASCII_USTRINGPARAM("/singletons/com.sun.star.deployment.thePackageManagerFactory")))
 266             >>= xPMF))
 267             throw uno::RuntimeException(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(
 268             "ExtensionsMigration: could not get thePackageManagerFactory")), 0);
 269
 270         const uno::Reference< deployment::XPackageManager > xPackageMgr =
 271             xPMF->getPackageManager(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("user")));
 272
 273         if (!xPackageMgr.is())
 274             throw uno::RuntimeException(::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(
 275             "ExtensionsMigration: could not get XPackageManager")), 0);
 276
 277         const uno::Sequence< uno::Reference< deployment::XPackage > > allPackages =
 278             xPackageMgr->getDeployedPackages(
 279             uno::Reference< task::XAbortChannel >(), uno::Reference< ucb::XCommandEnvironment> ());
 280
 281         for (int i = 0; i < allPackages.getLength(); i ++)
 282         {
 283             const uno::Reference< deployment::XPackage > aPackage = allPackages[i];
 284             if ( aPackage->isBundle() )
 285             {
 286                 const uno::Sequence< uno::Reference < deployment::XPackage > > seqPkg =
 287                     aPackage->getBundle(
 288                         uno::Reference< task::XAbortChannel >(),
 289                         uno::Reference< ucb::XCommandEnvironment> ());
 290
 291                 for ( int k = 0; k < seqPkg.getLength(); k++ )
 292                     registerBasicPackage(seqPkg[k]);
 293
 294                 for (int l = 0; l < seqPkg.getLength(); l++)
 295                 {
 296                     const ::rtl::OUString sMediaType = seqPkg[l]->getPackageType()->getMediaType();
 297                     beans::Optional<beans::Ambiguous<sal_Bool> > opt =
 298                         seqPkg[l]->isRegistered(uno::Reference< task::XAbortChannel >(), uno::Reference< ucb::XCommandEnvironment> ());
 299                     bool bRegistered = opt.IsPresent && opt.Value.IsAmbiguous == sal_False && opt.Value.Value == sal_True ? true : false;
 300
 301                     if ( bRegistered && !sMediaType.equals(sBasicType) && !sMediaType.equals(sDialogType) )
 302                     {
 303                         seqPkg[l]->revokePackage(uno::Reference< task::XAbortChannel >(), uno::Reference< ucb::XCommandEnvironment> ());
 304                         seqPkg[l]->registerPackage(uno::Reference< task::XAbortChannel >(), uno::Reference< ucb::XCommandEnvironment> ());
 305                     }
 306                 }
 307             }
 308             else
 309             {
 310                 registerBasicPackage(aPackage);
 311                 {
 312                     aPackage->revokePackage(uno::Reference< task::XAbortChannel >(), uno::Reference< ucb::XCommandEnvironment> ());
 313                     aPackage->registerPackage(uno::Reference< task::XAbortChannel >(), uno::Reference< ucb::XCommandEnvironment> ());
 314                 }
 315             }
 316         }
 317
 318
 319         return true;
 320
 321     }
 322
 323 bool ExtensionMigration::isCompatibleBerkleyDb(const ::rtl::OUString& sSourceDir)
 324 {
 325     try
 326     {
 327     ::rtl::OUString sDb(sSourceDir + ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(
 328         "/uno_packages.db")));
 329     //check if the db exist at all. If not then the call to db_create would create
 330     //the file.
 331     ::osl::File f(sDb);
 332     if (::osl::File::E_None != f.open(OpenFlag_Read))
 333     {
 334         f.close();
 335         return false;
 336     }
 337     f.close();
 338
 339     //create a system path
 340     ::rtl::OUString sSysPath;
 341     if (::osl::File::getSystemPathFromFileURL(sDb, sSysPath ) != ::osl::File::E_None)
 342         return false;
 343
 344     ::rtl::OString cstr_sysPath(
 345         ::rtl::OUStringToOString( sSysPath, osl_getThreadTextEncoding() ) );
 346     char const * pcstr_sysPath = cstr_sysPath.getStr();
 347
 348     //Open the db. If it works then we assume that the file was written with a
 349     //compatible version of Berkeley Db
 350     DB* pDB = NULL;
 351     //using  DB_RDONLY will return an "Invalid argument" error.
 352     //DB_CREATE: only creates the file if it does not exist.
 353     //An existing db is not modified.
 354     if (0 != db_create(& pDB, 0, DB_CREATE))
 355         return false;
 356
 357     if (0 != pDB->open(pDB, 0, pcstr_sysPath , 0, DB_HASH, DB_RDONLY, 0664 /* fs mode */))
 358         return false;
 359
 360     pDB->close(pDB, 0);
 361     }
 362     catch (uno::Exception& )
 363     {
 364         return false;
 365     }
 366
 367     return true;
 368 }
 369
 370 bool ExtensionMigration::copy( const ::rtl::OUString& sSourceDir, const ::rtl::OUString& sTargetDir )
 371 {
 372     bool bRet = false;
 373     if (! isCompatibleBerkleyDb(sSourceDir))
 374         return false;
 375
 376     INetURLObject aSourceObj( sSourceDir );
 377     INetURLObject aDestObj( sTargetDir );
 378     String aName = aDestObj.getName();
 379     aDestObj.removeSegment();
 380     aDestObj.setFinalSlash();
 381
 382     try
 383     {
 384         ::ucbhelper::Content aDestPath( aDestObj.GetMainURL( INetURLObject::NO_DECODE ), uno::Reference< ucb::XCommandEnvironment > () );
 385         uno::Reference< ucb::XCommandInfo > xInfo = aDestPath.getCommands();
 386         ::rtl::OUString aTransferName = ::rtl::OUString::createFromAscii( "transfer" );
 387         if ( xInfo->hasCommandByName( aTransferName ) )
 388         {
 389             aDestPath.executeCommand( aTransferName, uno::makeAny(
 390                 ucb::TransferInfo( sal_False, aSourceObj.GetMainURL( INetURLObject::NO_DECODE ), aName, ucb::NameClash::OVERWRITE ) ) );
 391             bRet = true;
 392         }
 393     }
 394     catch( uno::Exception& )
 395     {
 396     }
 397
 398     return bRet;
 399 }
 400
 401
 402     // -----------------------------------------------------------------------------
 403     // XServiceInfo
 404     // -----------------------------------------------------------------------------
 405
 406     ::rtl::OUString ExtensionMigration::getImplementationName() throw (RuntimeException)
 407     {
 408         return ExtensionMigration_getImplementationName();
 409     }
 410
 411     // -----------------------------------------------------------------------------
 412
 413     sal_Bool ExtensionMigration::supportsService( const ::rtl::OUString& rServiceName ) throw (RuntimeException)
 414     {
 415         Sequence< ::rtl::OUString > aNames( getSupportedServiceNames() );
 416         const ::rtl::OUString* pNames = aNames.getConstArray();
 417         const ::rtl::OUString* pEnd = pNames + aNames.getLength();
 418         for ( ; pNames != pEnd && !pNames->equals( rServiceName ); ++pNames )
 419             ;
 420
 421         return pNames != pEnd;
 422     }
 423
 424     // -----------------------------------------------------------------------------
 425
 426     Sequence< ::rtl::OUString > ExtensionMigration::getSupportedServiceNames() throw (RuntimeException)
 427     {
 428         return ExtensionMigration_getSupportedServiceNames();
 429     }
 430
 431     // -----------------------------------------------------------------------------
 432     // XInitialization
 433     // -----------------------------------------------------------------------------
 434
 435     void ExtensionMigration::initialize( const Sequence< Any >& aArguments ) throw (Exception, RuntimeException)
 436     {
 437         ::osl::MutexGuard aGuard( m_aMutex );
 438
 439         const Any* pIter = aArguments.getConstArray();
 440         const Any* pEnd = pIter + aArguments.getLength();
 441         for ( ; pIter != pEnd ; ++pIter )
 442         {
 443             beans::NamedValue aValue;
 444             *pIter >>= aValue;
 445             if ( aValue.Name.equalsAscii( "UserData" ) )
 446             {
 447                 if ( !(aValue.Value >>= m_sSourceDir) )
 448                 {
 449                     OSL_ENSURE( false, "ExtensionMigration::initialize: argument UserData has wrong type!" );
 450                 }
 451                 break;
 452             }
 453         }
 454         prepareBasicLibs();
 455     }
 456
 457     TStringVectorPtr getContent( const ::rtl::OUString& rBaseURL )
 458     {
 459         TStringVectorPtr aResult( new TStringVector );
 460         ::osl::Directory aDir( rBaseURL);
 461         if ( aDir.open() == ::osl::FileBase::E_None )
 462         {
 463             // iterate over directory content
 464             TStringVector aSubDirs;
 465             ::osl::DirectoryItem aItem;
 466             while ( aDir.getNextItem( aItem ) == ::osl::FileBase::E_None )
 467             {
 468                 ::osl::FileStatus aFileStatus( FileStatusMask_Type | FileStatusMask_FileURL );
 469                 if ( aItem.getFileStatus( aFileStatus ) == ::osl::FileBase::E_None )
 470                     aResult->push_back( aFileStatus.getFileURL() );
 471             }
 472         }
 473
 474         return aResult;
 475     }
 476
 477     // -----------------------------------------------------------------------------
 478     // XJob
 479     // -----------------------------------------------------------------------------
 480
 481 void ExtensionMigration::copyConfig( const ::rtl::OUString& sSourceDir, const ::rtl::OUString& sTargetDir )
 482 {
 483     ::rtl::OUString sEx1( m_sSourceDir );
 484     sEx1 += sExcludeDir1;
 485     ::rtl::OUString sEx2( m_sSourceDir );
 486     sEx2 += sExcludeDir2;
 487
 488     TStringVectorPtr aList = getContent( sSourceDir );
 489     TStringVector::const_iterator aI = aList->begin();
 490     while ( aI != aList->end() )
 491     {
 492         ::rtl::OUString sSourceLocalName = aI->copy( sSourceDir.getLength() );
 493         ::rtl::OUString aTemp = aI->copy( m_sSourceDir.getLength() );
 494         if ( aTemp != sExcludeDir1 && aTemp != sExcludeDir2 )
 495         {
 496             ::rtl::OUString sTargetName = sTargetDir + sSourceLocalName;
 497             copy( (*aI), sTargetName );
 498         }
 499         ++aI;
 500     }
 501 }
 502
 503     Any ExtensionMigration::execute( const Sequence< beans::NamedValue >& )
 504         throw (lang::IllegalArgumentException, Exception, RuntimeException)
 505     {
 506         ::osl::MutexGuard aGuard( m_aMutex );
 507
 508         ::utl::Bootstrap::PathStatus aStatus = ::utl::Bootstrap::locateUserInstallation( m_sTargetDir );
 509         if ( aStatus == ::utl::Bootstrap::PATH_EXISTS )
 510         {
 511             // copy all extensions
 512             ::rtl::OUString sTargetDir(m_sTargetDir), sSourceDir( m_sSourceDir );
 513             sTargetDir += sExtensionSubDir;
 514             sSourceDir += sExtensionSubDir;
 515             sSourceDir += sSubDirName;
 516             sTargetDir += sSubDirName;
 517             processExtensions( sSourceDir, sTargetDir );
 518
 519             // copy all user config settings in user/registry/data (except user/registry/data/org)
 520             sSourceDir = m_sSourceDir;
 521             sSourceDir += sConfigDir;
 522             sTargetDir = m_sTargetDir;
 523             sTargetDir += sConfigDir;
 524             copyConfig( sSourceDir, sTargetDir );
 525
 526             // copy all user config settings in user/registry/data/org (except user/registry/data/org/openoffice)
 527             sSourceDir = m_sSourceDir;
 528             sSourceDir += sOrgDir;
 529             sTargetDir = m_sTargetDir;
 530             sTargetDir += sOrgDir;
 531             copyConfig( sSourceDir, sTargetDir );
 532         }
 533
 534         return Any();
 535     }
 536
 537     // =============================================================================
 538     // component operations
 539     // =============================================================================
 540
 541     Reference< XInterface > SAL_CALL ExtensionMigration_create(
 542         Reference< XComponentContext > const & ctx )
 543         SAL_THROW( () )
 544     {
 545         return static_cast< lang::XTypeProvider * >( new ExtensionMigration(
 546             ctx) );
 547     }
 548
 549     // -----------------------------------------------------------------------------
 550
 551 //.........................................................................
 552 }       // namespace migration
 553 //.........................................................................