xmlscript/source/xmlflat_imexp/xmlbas_export.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: xmlbas_export.cxx,v $
  10  * $Revision: 1.6.10.1 $
  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_xmlscript.hxx"
  33 #include "xmlbas_export.hxx"
  34 #include "xmlscript/xmlns.h"
  35 #include "xmlscript/xml_helper.hxx"
  36 #include <com/sun/star/beans/XPropertySet.hpp>
  37 #include <com/sun/star/lang/XMultiComponentFactory.hpp>
  38 #include <com/sun/star/script/XLibraryContainer2.hpp>
  39 #include <com/sun/star/script/XLibraryContainerPassword.hpp>
  40 #include <com/sun/star/document/XEmbeddedScripts.hpp>
  41 #include <cppuhelper/implementationentry.hxx>
  42
  43 using namespace ::com::sun::star;
  44 using namespace ::com::sun::star::lang;
  45 using namespace ::com::sun::star::uno;
  46
  47
  48 //.........................................................................
  49 namespace xmlscript
  50 {
  51 //.........................................................................
  52
  53     // =============================================================================
  54     // component operations
  55     // =============================================================================
  56
  57     ::rtl::OUString getImplementationName_XMLBasicExporter()
  58     {
  59         static ::rtl::OUString* pImplName = 0;
  60         if ( !pImplName )
  61         {
  62             ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
  63             if ( !pImplName )
  64             {
  65                 static ::rtl::OUString aImplName( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.xmlscript.XMLBasicExporter" ) );
  66                 pImplName = &aImplName;
  67             }
  68         }
  69         return *pImplName;
  70     }
  71
  72     // -----------------------------------------------------------------------------
  73
  74     Sequence< ::rtl::OUString > getSupportedServiceNames_XMLBasicExporter()
  75     {
  76         static Sequence< ::rtl::OUString >* pNames = 0;
  77         if ( !pNames )
  78         {
  79             ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
  80             if ( !pNames )
  81             {
  82                 static Sequence< ::rtl::OUString > aNames(1);
  83                 aNames.getArray()[0] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.document.XMLBasicExporter" ) );
  84                 pNames = &aNames;
  85             }
  86         }
  87         return *pNames;
  88     }
  89
  90     // -----------------------------------------------------------------------------
  91
  92     ::rtl::OUString getImplementationName_XMLOasisBasicExporter()
  93     {
  94         static ::rtl::OUString* pImplName = 0;
  95         if ( !pImplName )
  96         {
  97             ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
  98             if ( !pImplName )
  99             {
 100                 static ::rtl::OUString aImplName( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.xmlscript.XMLOasisBasicExporter" ) );
 101                 pImplName = &aImplName;
 102             }
 103         }
 104         return *pImplName;
 105     }
 106
 107     // -----------------------------------------------------------------------------
 108
 109     Sequence< ::rtl::OUString > getSupportedServiceNames_XMLOasisBasicExporter()
 110     {
 111         static Sequence< ::rtl::OUString >* pNames = 0;
 112         if ( !pNames )
 113         {
 114             ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
 115             if ( !pNames )
 116             {
 117                 static Sequence< ::rtl::OUString > aNames(1);
 118                 aNames.getArray()[0] = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.document.XMLOasisBasicExporter" ) );
 119                 pNames = &aNames;
 120             }
 121         }
 122         return *pNames;
 123     }
 124
 125
 126     // =============================================================================
 127     // XMLBasicExporterBase
 128     // =============================================================================
 129
 130     XMLBasicExporterBase::XMLBasicExporterBase( const Reference< XComponentContext >& rxContext, sal_Bool bOasis )
 131         :m_xContext( rxContext )
 132         ,m_bOasis( bOasis )
 133     {
 134     }
 135
 136     // -----------------------------------------------------------------------------
 137
 138     XMLBasicExporterBase::~XMLBasicExporterBase()
 139     {
 140     }
 141
 142     // -----------------------------------------------------------------------------
 143     // XServiceInfo
 144     // -----------------------------------------------------------------------------
 145
 146     sal_Bool XMLBasicExporterBase::supportsService( const ::rtl::OUString& rServiceName ) throw (RuntimeException)
 147     {
 148         Sequence< ::rtl::OUString > aNames( getSupportedServiceNames() );
 149         const ::rtl::OUString* pNames = aNames.getConstArray();
 150         const ::rtl::OUString* pEnd = pNames + aNames.getLength();
 151         for ( ; pNames != pEnd && !pNames->equals( rServiceName ); ++pNames )
 152             ;
 153
 154         return pNames != pEnd;
 155     }
 156
 157     // -----------------------------------------------------------------------------
 158     // XInitialization
 159     // -----------------------------------------------------------------------------
 160
 161     void XMLBasicExporterBase::initialize( const Sequence< Any >& aArguments ) throw (Exception, RuntimeException)
 162     {
 163         ::osl::MutexGuard aGuard( m_aMutex );
 164
 165         if ( aArguments.getLength() == 1 )
 166         {
 167             aArguments[0] >>= m_xHandler;
 168
 169             if ( !m_xHandler.is() )
 170             {
 171                 throw RuntimeException(
 172                     ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "XMLBasicExporterBase::initialize: invalid argument format!" ) ),
 173                     Reference< XInterface >() );
 174             }
 175         }
 176         else
 177         {
 178             throw RuntimeException(
 179                 ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "XMLBasicExporterBase::initialize: invalid number of arguments!" ) ),
 180                 Reference< XInterface >() );
 181         }
 182     }
 183
 184     // -----------------------------------------------------------------------------
 185     // XExporter
 186     // -----------------------------------------------------------------------------
 187
 188     void XMLBasicExporterBase::setSourceDocument( const Reference< XComponent >& rxDoc )
 189         throw (IllegalArgumentException, RuntimeException)
 190     {
 191         ::osl::MutexGuard aGuard( m_aMutex );
 192
 193         m_xModel.set( rxDoc, UNO_QUERY );
 194
 195         if ( !m_xModel.is() )
 196         {
 197             throw IllegalArgumentException(
 198                 ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "XMLBasicExporter::setSourceDocument: no document model!" ) ),
 199                 Reference< XInterface >(), 1 );
 200         }
 201     }
 202
 203     // -----------------------------------------------------------------------------
 204     // XFilter
 205     // -----------------------------------------------------------------------------
 206
 207 sal_Bool XMLBasicExporterBase::filter( const Sequence< beans::PropertyValue >& /*aDescriptor*/ )
 208         throw (RuntimeException)
 209     {
 210         ::osl::MutexGuard aGuard( m_aMutex );
 211
 212         sal_Bool bReturn = sal_True;
 213
 214         try
 215         {
 216             if ( m_xHandler.is() )
 217             {
 218                 m_xHandler->startDocument();
 219
 220                 // ooo/script prefix and URI
 221                 ::rtl::OUString aPrefix;
 222                 ::rtl::OUString aURI;
 223                 if ( m_bOasis )
 224                 {
 225                     aPrefix = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( XMLNS_OOO_PREFIX ) );
 226                     aURI = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( XMLNS_OOO_URI ) );
 227                 }
 228                 else
 229                 {
 230                     aPrefix = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( XMLNS_SCRIPT_PREFIX ) );
 231                     aURI = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( XMLNS_SCRIPT_URI ) );
 232                 }
 233
 234                 // ooo/script:libraries element
 235                 ::rtl::OUString aLibContElementName( aPrefix );
 236                 aLibContElementName += ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":libraries" ) );
 237                 XMLElement* pLibContElement = new XMLElement( aLibContElementName );
 238                 Reference< xml::sax::XAttributeList > xLibContAttribs( pLibContElement );
 239
 240                 // ooo/script namespace attribute
 241                 pLibContElement->addAttribute( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "xmlns:" ) ) + aPrefix,
 242                     aURI );
 243
 244                 // xlink namespace attribute
 245                 pLibContElement->addAttribute( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "xmlns:" XMLNS_XLINK_PREFIX ) ),
 246                     ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( XMLNS_XLINK_URI ) ) );
 247
 248                 // <ooo/script:libraries...
 249                 m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 250                 m_xHandler->startElement( aLibContElementName, xLibContAttribs );
 251
 252                 Reference< script::XLibraryContainer2 > xLibContainer;
 253
 254                 // try the XEmbeddedScripts interface
 255                 Reference< document::XEmbeddedScripts > xDocumentScripts( m_xModel, UNO_QUERY );
 256                 if ( xDocumentScripts.is() )
 257                     xLibContainer.set( xDocumentScripts->getBasicLibraries().get() );
 258
 259                 if ( !xLibContainer.is() )
 260                 {
 261                     // try the "BasicLibraries" property (old-style, for compatibility)
 262                     Reference< beans::XPropertySet > xPSet( m_xModel, UNO_QUERY );
 263                     if ( xPSet.is() )
 264                         xPSet->getPropertyValue( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "BasicLibraries" ) ) ) >>= xLibContainer;
 265                 }
 266
 267                 OSL_ENSURE( xLibContainer.is(), "XMLBasicExporterBase::filter: nowhere to export to!" );
 268
 269                 if ( xLibContainer.is() )
 270                 {
 271                     Sequence< ::rtl::OUString > aLibNames = xLibContainer->getElementNames();
 272                     sal_Int32 nLibCount = aLibNames.getLength();
 273                     const ::rtl::OUString* pLibNames = aLibNames.getConstArray();
 274                     for ( sal_Int32 i = 0 ; i < nLibCount ; ++i )
 275                     {
 276                         ::rtl::OUString aLibName( pLibNames[i] );
 277
 278                         if ( xLibContainer->hasByName( aLibName ) )
 279                         {
 280                             ::rtl::OUString aTrueStr( RTL_CONSTASCII_USTRINGPARAM( "true" ) );
 281
 282                             if ( xLibContainer->isLibraryLink( aLibName ) )
 283                             {
 284                                 // ooo/script:library-linked element
 285                                 ::rtl::OUString aLibElementName( aPrefix );
 286                                 aLibElementName += ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":library-linked" ) );
 287                                 XMLElement* pLibElement = new XMLElement( aLibElementName );
 288                                 Reference< xml::sax::XAttributeList > xLibAttribs;
 289                                 xLibAttribs = static_cast< xml::sax::XAttributeList* >( pLibElement );
 290
 291                                 // ooo/script:name attribute
 292                                 pLibElement->addAttribute( aPrefix + ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":name" ) ),
 293                                     aLibName );
 294
 295                                 ::rtl::OUString aLinkURL( xLibContainer->getLibraryLinkURL( aLibName ) );
 296                                 if ( aLinkURL.getLength() )
 297                                 {
 298                                     // xlink:href attribute
 299                                     pLibElement->addAttribute( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( XMLNS_XLINK_PREFIX ":href" ) ),
 300                                         aLinkURL );
 301
 302                                     // xlink:type attribute
 303                                     pLibElement->addAttribute( ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( XMLNS_XLINK_PREFIX ":type" ) ),
 304                                         ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "simple" ) ) );
 305                                 }
 306
 307                                 if ( xLibContainer->isLibraryReadOnly( aLibName ) )
 308                                 {
 309                                     // ooo/script:readonly attribute
 310                                     pLibElement->addAttribute( aPrefix + ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":readonly" ) ),
 311                                         aTrueStr );
 312                                 }
 313
 314                                 // <ooo/script:library-linked...
 315                                 m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 316                                 m_xHandler->startElement( aLibElementName, xLibAttribs );
 317
 318                                 // ...ooo/script:library-linked>
 319                                 m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 320                                 m_xHandler->endElement( aLibElementName );
 321                             }
 322                             else
 323                             {
 324                                 // ooo/script:library-embedded element
 325                                 ::rtl::OUString aLibElementName( aPrefix );
 326                                 aLibElementName += ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":library-embedded" ) );
 327                                 XMLElement* pLibElement = new XMLElement( aLibElementName );
 328                                 Reference< xml::sax::XAttributeList > xLibAttribs;
 329                                 xLibAttribs = static_cast< xml::sax::XAttributeList* >( pLibElement );
 330
 331                                 // ooo/script:name attribute
 332                                 pLibElement->addAttribute( aPrefix + ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":name" ) ),
 333                                     aLibName );
 334
 335                                 if ( xLibContainer->isLibraryReadOnly( aLibName ) )
 336                                 {
 337                                     // ooo/script:readonly attribute
 338                                     pLibElement->addAttribute( aPrefix + ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":readonly" ) ),
 339                                         aTrueStr );
 340                                 }
 341
 342                                 // TODO: password protected libraries
 343                                 Reference< script::XLibraryContainerPassword > xPasswd( xLibContainer, UNO_QUERY );
 344                                 if ( xPasswd.is() && xPasswd->isLibraryPasswordProtected( aLibName ) )
 345                                     continue;
 346
 347                                 // <ooo/script:library-embedded...
 348                                 m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 349                                 m_xHandler->startElement( aLibElementName, xLibAttribs );
 350
 351                                 if ( !xLibContainer->isLibraryLoaded( aLibName ) )
 352                                     xLibContainer->loadLibrary( aLibName );
 353
 354                                 Reference< container::XNameContainer > xLib;
 355                                 xLibContainer->getByName( aLibName ) >>= xLib;
 356
 357                                 if ( xLib.is() )
 358                                 {
 359                                     Sequence< ::rtl::OUString > aModNames = xLib->getElementNames();
 360                                     sal_Int32 nModCount = aModNames.getLength();
 361                                     const ::rtl::OUString* pModNames = aModNames.getConstArray();
 362                                     for ( sal_Int32 j = 0 ; j < nModCount ; ++j )
 363                                     {
 364                                         ::rtl::OUString aModName( pModNames[j] );
 365                                         if ( xLib->hasByName( aModName ) )
 366                                         {
 367                                             // ooo/script:module element
 368                                             ::rtl::OUString aModElementName( aPrefix );
 369                                             aModElementName += ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":module" ) );
 370                                             XMLElement* pModElement = new XMLElement( aModElementName );
 371                                             Reference< xml::sax::XAttributeList > xModAttribs;
 372                                             xModAttribs = static_cast< xml::sax::XAttributeList* >( pModElement );
 373
 374                                             // ooo/script:name attribute
 375                                             pModElement->addAttribute( aPrefix + ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":name" ) ),
 376                                                 aModName );
 377
 378                                             // <ooo/script:module...
 379                                             m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 380                                             m_xHandler->startElement( aModElementName, xModAttribs );
 381
 382                                             // ooo/script:source-code element
 383                                             ::rtl::OUString aSourceElementName( aPrefix );
 384                                             aSourceElementName += ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":source-code" ) );
 385                                             XMLElement* pSourceElement = new XMLElement( aSourceElementName );
 386                                             Reference< xml::sax::XAttributeList > xSourceAttribs;
 387                                             xSourceAttribs = static_cast< xml::sax::XAttributeList* >( pSourceElement );
 388
 389                                             // <ooo/script:source-code...
 390                                             m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 391                                             m_xHandler->startElement( aSourceElementName, xSourceAttribs );
 392
 393                                             // module data
 394                                             // TODO: write encrypted data for password protected libraries
 395                                             ::rtl::OUString aSource;
 396                                             xLib->getByName( aModName ) >>= aSource;
 397                                             m_xHandler->characters( aSource );
 398
 399                                             // TODO: <ooo/script:byte-code>
 400
 401                                             // ...ooo/script:source-code>
 402                                             m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 403                                             m_xHandler->endElement( aSourceElementName );
 404
 405                                             // ...ooo/script:module>
 406                                             m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 407                                             m_xHandler->endElement( aModElementName );
 408                                         }
 409                                     }
 410                                 }
 411
 412                                 // ...ooo/script:library-embedded>
 413                                 m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 414                                 m_xHandler->endElement( aLibElementName );
 415                             }
 416                         }
 417                     }
 418                 }
 419
 420                 // ...ooo/script:libraries>
 421                 m_xHandler->ignorableWhitespace( ::rtl::OUString() );
 422                 m_xHandler->endElement( aLibContElementName );
 423
 424                 m_xHandler->endDocument();
 425             }
 426         }
 427         catch ( container::NoSuchElementException& e )
 428         {
 429             OSL_TRACE( "XMLBasicExporterBase::filter: caught NoSuchElementException reason %s",
 430                 ::rtl::OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US ).pData->buffer );
 431             bReturn = sal_False;
 432         }
 433         catch ( lang::IllegalArgumentException& e )
 434         {
 435             OSL_TRACE( "XMLBasicExporterBase::filter: caught IllegalArgumentException reason %s",
 436                 ::rtl::OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US ).pData->buffer );
 437             bReturn = sal_False;
 438         }
 439         catch ( lang::WrappedTargetException& e )
 440         {
 441             OSL_TRACE( "XMLBasicExporterBase::filter: caught WrappedTargetException reason %s",
 442                 ::rtl::OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US ).pData->buffer );
 443             bReturn = sal_False;
 444         }
 445         catch ( xml::sax::SAXException& e )
 446         {
 447             OSL_TRACE( "XMLBasicExporterBase::filter: caught SAXException reason %s",
 448                 ::rtl::OUStringToOString( e.Message, RTL_TEXTENCODING_ASCII_US ).pData->buffer );
 449             bReturn = sal_False;
 450         }
 451
 452         return bReturn;
 453     }
 454
 455     // -----------------------------------------------------------------------------
 456
 457     void XMLBasicExporterBase::cancel()
 458         throw (RuntimeException)
 459     {
 460         ::osl::MutexGuard aGuard( m_aMutex );
 461
 462         // cancel export
 463     }
 464
 465
 466     // =============================================================================
 467     // XMLBasicExporter
 468     // =============================================================================
 469
 470     XMLBasicExporter::XMLBasicExporter( const Reference< XComponentContext >& rxContext )
 471         :XMLBasicExporterBase( rxContext, sal_False )
 472     {
 473     }
 474
 475     // -----------------------------------------------------------------------------
 476
 477     XMLBasicExporter::~XMLBasicExporter()
 478     {
 479     }
 480
 481     // -----------------------------------------------------------------------------
 482     // XServiceInfo
 483     // -----------------------------------------------------------------------------
 484
 485     ::rtl::OUString XMLBasicExporter::getImplementationName(  ) throw (RuntimeException)
 486     {
 487         return getImplementationName_XMLBasicExporter();
 488     }
 489
 490     // -----------------------------------------------------------------------------
 491
 492     Sequence< ::rtl::OUString > XMLBasicExporter::getSupportedServiceNames(  ) throw (RuntimeException)
 493     {
 494         return getSupportedServiceNames_XMLBasicExporter();
 495     }
 496
 497
 498     // =============================================================================
 499     // XMLOasisBasicExporter
 500     // =============================================================================
 501
 502     XMLOasisBasicExporter::XMLOasisBasicExporter( const Reference< XComponentContext >& rxContext )
 503         :XMLBasicExporterBase( rxContext, sal_True )
 504     {
 505     }
 506
 507     // -----------------------------------------------------------------------------
 508
 509     XMLOasisBasicExporter::~XMLOasisBasicExporter()
 510     {
 511     }
 512
 513     // -----------------------------------------------------------------------------
 514     // XServiceInfo
 515     // -----------------------------------------------------------------------------
 516
 517     ::rtl::OUString XMLOasisBasicExporter::getImplementationName(  ) throw (RuntimeException)
 518     {
 519         return getImplementationName_XMLOasisBasicExporter();
 520     }
 521
 522     // -----------------------------------------------------------------------------
 523
 524     Sequence< ::rtl::OUString > XMLOasisBasicExporter::getSupportedServiceNames(  ) throw (RuntimeException)
 525     {
 526         return getSupportedServiceNames_XMLOasisBasicExporter();
 527     }
 528
 529
 530     // =============================================================================
 531     // component operations
 532     // =============================================================================
 533
 534     Reference< XInterface > SAL_CALL create_XMLBasicExporter(
 535         Reference< XComponentContext > const & xContext )
 536         SAL_THROW( () )
 537     {
 538         return static_cast< lang::XTypeProvider * >( new XMLBasicExporter( xContext ) );
 539     }
 540
 541     // -----------------------------------------------------------------------------
 542
 543     Reference< XInterface > SAL_CALL create_XMLOasisBasicExporter(
 544         Reference< XComponentContext > const & xContext )
 545         SAL_THROW( () )
 546     {
 547         return static_cast< lang::XTypeProvider * >( new XMLOasisBasicExporter( xContext ) );
 548     }
 549
 550     // -----------------------------------------------------------------------------
 551
 552 //.........................................................................
 553 }       // namespace xmlscript
 554 //.........................................................................