xmlhelp/source/cxxhelp/provider/urlparameter.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20
  21 #include "bufferedinputstream.hxx"
  22
  23 #include <string.h>
  24 #include <osl/diagnose.hxx>
  25 #include <osl/thread.h>
  26 #include <osl/file.hxx>
  27 #include <cppuhelper/weak.hxx>
  28 #include <cppuhelper/queryinterface.hxx>
  29 #include <comphelper/processfactory.hxx>
  30 #include <rtl/uri.hxx>
  31 #include <rtl/ustrbuf.hxx>
  32 #include <libxslt/xslt.h>
  33 #include <libxslt/transform.h>
  34 #include <libxslt/xsltutils.h>
  35 #include "db.hxx"
  36 #include <com/sun/star/io/XActiveDataSink.hpp>
  37 #include <com/sun/star/io/XInputStream.hpp>
  38 #include <com/sun/star/io/XSeekable.hpp>
  39 #include <com/sun/star/ucb/OpenCommandArgument2.hpp>
  40 #include <com/sun/star/ucb/OpenMode.hpp>
  41 #include <com/sun/star/ucb/XCommandProcessor.hpp>
  42 #include <com/sun/star/ucb/XCommandEnvironment.hpp>
  43 #include <com/sun/star/ucb/XContentIdentifier.hpp>
  44 #include <com/sun/star/ucb/XContentProvider.hpp>
  45 #include <com/sun/star/ucb/XContentIdentifierFactory.hpp>
  46 #include <com/sun/star/container/XHierarchicalNameAccess.hpp>
  47
  48 #include "urlparameter.hxx"
  49 #include "databases.hxx"
  50
  51 namespace chelp {
  52
  53     inline bool ascii_isDigit( sal_Unicode ch )
  54     {
  55         return ((ch >= 0x0030) && (ch <= 0x0039));
  56     }
  57
  58     inline bool ascii_isLetter( sal_Unicode ch )
  59     {
  60         return ( ( (ch >= 0x0041) && (ch <= 0x005A) ) ||
  61                  ( (ch >= 0x0061) && (ch <= 0x007A) ) );
  62     }
  63
  64     inline bool isLetterOrDigit( sal_Unicode ch )
  65     {
  66         return ascii_isLetter( ch ) || ascii_isDigit( ch );
  67     }
  68
  69 }
  70
  71 using namespace cppu;
  72 using namespace com::sun::star::io;
  73 using namespace com::sun::star::uno;
  74 using namespace com::sun::star::lang;
  75 using namespace com::sun::star::ucb;
  76 using namespace com::sun::star::beans;
  77 using namespace com::sun::star::container;
  78 using namespace chelp;
  79
  80
  81 URLParameter::URLParameter( const OUString& aURL,
  82                             Databases* pDatabases )
  83     throw( com::sun::star::ucb::IllegalIdentifierException )
  84     : m_pDatabases( pDatabases ),
  85       m_aURL( aURL )
  86 {
  87     init( false );
  88     parse();
  89 }
  90
  91
  92 bool URLParameter::isErrorDocument()
  93 {
  94     bool bErrorDoc = false;
  95
  96     if( isFile() )
  97     {
  98         Reference< XHierarchicalNameAccess > xNA =
  99             m_pDatabases->findJarFileForPath( get_jar(), get_language(), get_path() );
 100         bErrorDoc = !xNA.is();
 101     }
 102
 103     return bErrorDoc;
 104 }
 105
 106
 107 OString URLParameter::getByName( const char* par )
 108 {
 109     OUString val;
 110
 111     if( strcmp( par,"Program" ) == 0 )
 112         val = get_program();
 113     else if( strcmp( par,"Database" ) == 0 )
 114         val = get_module();
 115     else if( strcmp( par,"DatabasePar" ) == 0 )
 116         val = get_dbpar();
 117     else if( strcmp( par,"Id" ) == 0 )
 118         val = get_id();
 119     else if( strcmp( par,"Path" ) == 0 )
 120         val = get_path();
 121     else if( strcmp( par,"Language" ) == 0 )
 122         val = get_language();
 123     else if( strcmp( par,"System" ) == 0 )
 124         val = get_system();
 125     else if( strcmp( par,"HelpPrefix" ) == 0 )
 126         val = get_prefix();
 127
 128     return OString( val.getStr(),val.getLength(),RTL_TEXTENCODING_UTF8 );
 129 }
 130
 131
 132 OUString URLParameter::get_id()
 133 {
 134     if( m_aId.compareToAscii("start") == 0 )
 135     {   // module is set
 136         StaticModuleInformation* inf =
 137             m_pDatabases->getStaticInformationForModule( get_module(),
 138                                                          get_language() );
 139         if( inf )
 140             m_aId = inf->get_id();
 141
 142         m_bStart = true;
 143     }
 144
 145     return m_aId;
 146 }
 147
 148 OUString URLParameter::get_tag()
 149 {
 150     if( isFile() )
 151         return get_the_tag();
 152     else
 153         return m_aTag;
 154 }
 155
 156
 157 OUString URLParameter::get_title()
 158 {
 159     if( isFile() )
 160         return get_the_title();
 161     else if( m_aModule.compareToAscii("") != 0 )
 162     {
 163         StaticModuleInformation* inf =
 164             m_pDatabases->getStaticInformationForModule( get_module(),
 165                                                          get_language() );
 166         if( inf )
 167             m_aTitle = inf->get_title();
 168     }
 169     else   // This must be the root
 170         m_aTitle = OUString("root");
 171
 172     return m_aTitle;
 173 }
 174
 175
 176 OUString URLParameter::get_language()
 177 {
 178     if( m_aLanguage.isEmpty() )
 179         return m_aDefaultLanguage;
 180
 181     return m_aLanguage;
 182 }
 183
 184
 185 OUString URLParameter::get_program()
 186 {
 187     if( m_aProgram.isEmpty() )
 188     {
 189         StaticModuleInformation* inf =
 190             m_pDatabases->getStaticInformationForModule( get_module(),
 191                                                          get_language() );
 192         if( inf )
 193             m_aProgram = inf->get_program();
 194     }
 195     return m_aProgram;
 196 }
 197
 198
 199 void URLParameter::init( bool bDefaultLanguageIsInitialized )
 200 {
 201     (void)bDefaultLanguageIsInitialized;
 202
 203     m_bHelpDataFileRead = false;
 204     m_bStart = false;
 205     m_bUseDB = true;
 206     m_nHitCount = 100;                // The default maximum hitcount
 207 }
 208
 209
 210 OUString URLParameter::get_the_tag()
 211 {
 212     if(m_bUseDB) {
 213         if( ! m_bHelpDataFileRead )
 214             readHelpDataFile();
 215
 216         m_bHelpDataFileRead = true;
 217
 218         return m_aTag;
 219     }
 220     else
 221         return OUString();
 222 }
 223
 224
 225
 226 OUString URLParameter::get_the_path()
 227 {
 228     if(m_bUseDB) {
 229         if( ! m_bHelpDataFileRead )
 230             readHelpDataFile();
 231         m_bHelpDataFileRead = true;
 232
 233         return m_aPath;
 234     }
 235     else
 236         return get_id();
 237 }
 238
 239
 240
 241 OUString URLParameter::get_the_title()
 242 {
 243     if(m_bUseDB) {
 244         if( ! m_bHelpDataFileRead )
 245             readHelpDataFile();
 246         m_bHelpDataFileRead = true;
 247
 248         return m_aTitle;
 249     }
 250     else
 251         return OUString();
 252 }
 253
 254
 255 OUString URLParameter::get_the_jar()
 256 {
 257     if(m_bUseDB) {
 258         if( ! m_bHelpDataFileRead )
 259             readHelpDataFile();
 260         m_bHelpDataFileRead = true;
 261
 262         return m_aJar;
 263     }
 264     else
 265         return get_module() + OUString(".jar");
 266 }
 267
 268
 269 void URLParameter::readHelpDataFile()
 270 {
 271     if( get_id().compareToAscii("") == 0 )
 272         return;
 273
 274     OUString aModule = get_module();
 275     OUString aLanguage = get_language();
 276
 277     DataBaseIterator aDbIt( *m_pDatabases, aModule, aLanguage, false );
 278     bool bSuccess = false;
 279
 280     const sal_Char* pData = NULL;
 281
 282     helpdatafileproxy::HDFData aHDFData;
 283     OUString aExtensionPath;
 284     OUString aExtensionRegistryPath;
 285     while( true )
 286     {
 287         helpdatafileproxy::Hdf* pHdf = aDbIt.nextHdf( &aExtensionPath, &aExtensionRegistryPath );
 288         if( !pHdf )
 289             break;
 290
 291         OString keyStr( m_aId.getStr(),m_aId.getLength(),RTL_TEXTENCODING_UTF8 );
 292         bSuccess = pHdf->getValueForKey( keyStr, aHDFData );
 293         if( bSuccess )
 294         {
 295             pData = aHDFData.getData();
 296             break;
 297         }
 298     }
 299
 300     if( bSuccess )
 301     {
 302         DbtToStringConverter converter( pData );
 303         m_aTitle = converter.getTitle();
 304         m_pDatabases->replaceName( m_aTitle );
 305         m_aPath  = converter.getFile();
 306         m_aJar   = converter.getDatabase();
 307         if( !aExtensionPath.isEmpty() )
 308         {
 309             OUStringBuffer aExtendedJarStrBuf;
 310             aExtendedJarStrBuf.append( '?' );
 311             aExtendedJarStrBuf.append( aExtensionPath );
 312             aExtendedJarStrBuf.append( '?' );
 313             aExtendedJarStrBuf.append( m_aJar );
 314             m_aJar = aExtendedJarStrBuf.makeStringAndClear();
 315             m_aExtensionRegistryPath = aExtensionRegistryPath;
 316         }
 317         m_aTag   = converter.getHash();
 318     }
 319 }
 320
 321
 322
 323 // Class encapsulating the transformation of the XInputStream to XHTML
 324
 325
 326 class InputStreamTransformer
 327     : public OWeakObject,
 328       public XInputStream,
 329       public XSeekable
 330 {
 331 public:
 332
 333     InputStreamTransformer( URLParameter* urlParam,
 334                             Databases*    pDatatabases,
 335                             bool isRoot = false );
 336
 337     ~InputStreamTransformer();
 338
 339     virtual Any SAL_CALL queryInterface( const Type& rType ) throw( RuntimeException );
 340     virtual void SAL_CALL acquire( void ) throw();
 341     virtual void SAL_CALL release( void ) throw();
 342
 343     virtual sal_Int32 SAL_CALL readBytes( Sequence< sal_Int8 >& aData,sal_Int32 nBytesToRead )
 344         throw( NotConnectedException,
 345                BufferSizeExceededException,
 346                IOException,
 347                RuntimeException);
 348
 349     virtual sal_Int32 SAL_CALL readSomeBytes( Sequence< sal_Int8 >& aData,sal_Int32 nMaxBytesToRead )
 350         throw( NotConnectedException,
 351                BufferSizeExceededException,
 352                IOException,
 353                RuntimeException);
 354
 355     virtual void SAL_CALL skipBytes( sal_Int32 nBytesToSkip ) throw( NotConnectedException,
 356                                                                      BufferSizeExceededException,
 357                                                                      IOException,
 358                                                                      RuntimeException );
 359
 360     virtual sal_Int32 SAL_CALL available( void ) throw( NotConnectedException,
 361                                                         IOException,
 362                                                         RuntimeException );
 363
 364     virtual void SAL_CALL closeInput( void ) throw( NotConnectedException,
 365                                                     IOException,
 366                                                     RuntimeException );
 367
 368     virtual void SAL_CALL seek( sal_Int64 location ) throw( IllegalArgumentException,
 369                                                             IOException,
 370                                                             RuntimeException );
 371
 372     virtual sal_Int64 SAL_CALL getPosition( void ) throw( IOException,RuntimeException );
 373
 374     virtual sal_Int64 SAL_CALL getLength( void ) throw( IOException,RuntimeException );
 375
 376     void addToBuffer( const char* buffer,int len );
 377
 378     sal_Int8* getData() const { return (sal_Int8*) buffer; }
 379
 380     sal_Int32 getLen() const { return sal_Int32( len ); }
 381
 382 private:
 383
 384     osl::Mutex m_aMutex;
 385
 386     int len,pos;
 387     char *buffer;
 388 };
 389
 390
 391
 392 void URLParameter::open( const Command& aCommand,
 393                          sal_Int32 CommandId,
 394                          const Reference< XCommandEnvironment >& Environment,
 395                          const Reference< XOutputStream >& xDataSink )
 396 {
 397     (void)aCommand;
 398     (void)CommandId;
 399     (void)Environment;
 400
 401     if( ! xDataSink.is() )
 402         return;
 403
 404     if( isPicture() )
 405     {
 406         Reference< XInputStream > xStream;
 407         Reference< XHierarchicalNameAccess > xNA =
 408             m_pDatabases->jarFile( OUString( "picture.jar" ),
 409                                    get_language() );
 410
 411         OUString path = get_path();
 412         if( xNA.is() )
 413         {
 414             try
 415             {
 416                 Any aEntry = xNA->getByHierarchicalName( path );
 417                 Reference< XActiveDataSink > xSink;
 418                 if( ( aEntry >>= xSink ) && xSink.is() )
 419                     xStream = xSink->getInputStream();
 420             }
 421             catch ( NoSuchElementException & )
 422             {
 423             }
 424         }
 425         if( xStream.is() )
 426         {
 427             sal_Int32 ret;
 428             Sequence< sal_Int8 > aSeq( 4096 );
 429             while( true )
 430             {
 431                 try
 432                 {
 433                     ret = xStream->readBytes( aSeq,4096 );
 434                     xDataSink->writeBytes( aSeq );
 435                     if( ret < 4096 )
 436                         break;
 437                 }
 438                 catch( const Exception& )
 439                 {
 440                     break;
 441                 }
 442             }
 443         }
 444     }
 445     else
 446     {
 447         // a standard document or else an active help text, plug in the new input stream
 448         InputStreamTransformer* p = new InputStreamTransformer( this,m_pDatabases,isRoot() );
 449         try
 450         {
 451             xDataSink->writeBytes( Sequence< sal_Int8 >( p->getData(),p->getLen() ) );
 452         }
 453         catch( const Exception& )
 454         {
 455         }
 456         delete p;
 457     }
 458     xDataSink->closeOutput();
 459 }
 460
 461
 462
 463 void URLParameter::open( const Command& aCommand,
 464                          sal_Int32 CommandId,
 465                          const Reference< XCommandEnvironment >& Environment,
 466                          const Reference< XActiveDataSink >& xDataSink )
 467 {
 468     (void)aCommand;
 469     (void)CommandId;
 470     (void)Environment;
 471
 472     if( isPicture() )
 473     {
 474         Reference< XInputStream > xStream;
 475         Reference< XHierarchicalNameAccess > xNA =
 476             m_pDatabases->jarFile( OUString( "picture.jar" ),
 477                                    get_language() );
 478
 479         OUString path = get_path();
 480         if( xNA.is() )
 481         {
 482             try
 483             {
 484                 Any aEntry = xNA->getByHierarchicalName( path );
 485                 Reference< XActiveDataSink > xSink;
 486                 if( ( aEntry >>= xSink ) && xSink.is() )
 487                     xStream = xSink->getInputStream();
 488             }
 489             catch ( NoSuchElementException & )
 490             {
 491             }
 492         }
 493         xDataSink->setInputStream( turnToSeekable(xStream) );
 494     }
 495     else
 496         // a standard document or else an active help text, plug in the new input stream
 497         xDataSink->setInputStream( new InputStreamTransformer( this,m_pDatabases,isRoot() ) );
 498 }
 499
 500
 501 void URLParameter::parse() throw( com::sun::star::ucb::IllegalIdentifierException )
 502 {
 503     m_aExpr = m_aURL;
 504
 505     sal_Int32 lstIdx = m_aExpr.lastIndexOf( sal_Unicode( '#' ) );
 506     if( lstIdx != -1 )
 507         m_aExpr = m_aExpr.copy( 0,lstIdx );
 508
 509     if( ! scheme() ||
 510         ! name( module() ) ||
 511         ! query() ||
 512         m_aLanguage.isEmpty() ||
 513         m_aSystem.isEmpty() )
 514         throw com::sun::star::ucb::IllegalIdentifierException();
 515 }
 516
 517
 518 bool URLParameter::scheme()
 519 {
 520     // Correct extension help links as sometimes the
 521     // module is missing resulting in a misformed URL
 522     if( m_aExpr.startsWith("vnd.sun.star.help:///") )
 523     {
 524         sal_Int32 nLen = m_aExpr.getLength();
 525         OUString aLastStr =
 526             m_aExpr.copy(sal::static_int_cast<sal_uInt32>(nLen) - 6);
 527         if( aLastStr.compareToAscii( "DbPAR=" ) == 0 )
 528         {
 529             OUString aNewExpr = m_aExpr.copy( 0, 20 );
 530             OUString aSharedStr("shared");
 531             aNewExpr += aSharedStr;
 532             aNewExpr += m_aExpr.copy( 20 );
 533             aNewExpr += aSharedStr;
 534             m_aExpr = aNewExpr;
 535         }
 536     }
 537
 538     for( sal_Int32 nPrefixLen = 20 ; nPrefixLen >= 18 ; --nPrefixLen )
 539     {
 540         if( m_aExpr.matchAsciiL( "vnd.sun.star.help://", nPrefixLen ) )
 541         {
 542             m_aExpr = m_aExpr.copy( nPrefixLen );
 543             return true;
 544         }
 545     }
 546     return false;
 547 }
 548
 549
 550 bool URLParameter::module()
 551 {
 552     sal_Int32 idx = 0,length = m_aExpr.getLength();
 553
 554     while( idx < length && isLetterOrDigit( (m_aExpr.getStr())[idx] ) )
 555         ++idx;
 556
 557     if( idx != 0 )
 558     {
 559         m_aModule = m_aExpr.copy( 0,idx );
 560         m_aExpr = m_aExpr.copy( idx );
 561         return true;
 562     }
 563     else
 564         return false;
 565 }
 566
 567
 568
 569 bool URLParameter::name( bool modulePresent )
 570 {
 571     // if modulepresent, a name may be present, but must not
 572
 573     sal_Int32 length = m_aExpr.getLength();
 574
 575     if( length != 0 && (m_aExpr.getStr())[0] == sal_Unicode( '/' ) )
 576     {
 577         sal_Int32 idx = 1;
 578         while( idx < length && (m_aExpr.getStr())[idx] != '?' )
 579             ++idx;
 580
 581         if( idx != 1 && ! modulePresent )
 582             return false;
 583         else
 584         {
 585             m_aId = m_aExpr.copy( 1,idx-1 );
 586             m_aExpr = m_aExpr.copy( idx );
 587         }
 588     }
 589
 590     return true;
 591 }
 592
 593
 594 bool URLParameter::query()
 595 {
 596     OUString query_;
 597
 598     if( m_aExpr.isEmpty() )
 599         return true;
 600     else if( (m_aExpr.getStr())[0] == sal_Unicode( '?' ) )
 601         query_ = m_aExpr.copy( 1 ).trim();
 602     else
 603         return false;
 604
 605
 606     bool ret = true;
 607     sal_Int32 delimIdx,equalIdx;
 608     OUString parameter,value;
 609
 610     while( !query_.isEmpty() )
 611     {
 612         delimIdx = query_.indexOf( sal_Unicode( '&' ) );
 613         equalIdx = query_.indexOf( sal_Unicode( '=' ) );
 614         parameter = query_.copy( 0,equalIdx ).trim();
 615         if( delimIdx == -1 )
 616         {
 617             value = query_.copy( equalIdx + 1 ).trim();
 618             query_ = OUString();
 619         }
 620         else
 621         {
 622             value = query_.copy( equalIdx+1,delimIdx - equalIdx - 1 ).trim();
 623             query_ = query_.copy( delimIdx+1 ).trim();
 624         }
 625
 626         if( parameter.compareToAscii( "Language" ) == 0 )
 627             m_aLanguage = value;
 628         else if( parameter.compareToAscii( "Device" ) == 0 )
 629             m_aDevice = value;
 630         else if( parameter.compareToAscii( "Program" ) == 0 )
 631             m_aProgram = value;
 632         else if( parameter.compareToAscii( "Eid" ) == 0 )
 633             m_aEid = value;
 634         else if( parameter.compareToAscii( "UseDB" ) == 0 )
 635             m_bUseDB = ! ( value.compareToAscii("no") == 0 );
 636         else if( parameter.compareToAscii( "DbPAR" ) == 0 )
 637             m_aDbPar = value;
 638         else if( parameter.compareToAscii( "Query" ) == 0 )
 639         {
 640             if( m_aQuery.isEmpty() )
 641                 m_aQuery = value;
 642             else
 643                 m_aQuery += ( OUString( " " ) + value );
 644         }
 645         else if( parameter.compareToAscii( "Scope" ) == 0 )
 646             m_aScope = value;
 647         else if( parameter.compareToAscii( "System" ) == 0 )
 648             m_aSystem = value;
 649         else if( parameter.compareToAscii( "HelpPrefix" ) == 0 )
 650             m_aPrefix = rtl::Uri::decode(
 651                 value,
 652                 rtl_UriDecodeWithCharset,
 653                 RTL_TEXTENCODING_UTF8 );
 654         else if( parameter.compareToAscii( "HitCount" ) == 0 )
 655             m_nHitCount = value.toInt32();
 656         else if( parameter.compareToAscii( "Active" ) == 0 )
 657             m_aActive = value;
 658         else if( parameter.compareToAscii( "Version" ) == 0 )
 659             ; // ignored (but accepted) in the build-in help, useful only for the online help
 660         else
 661             ret = false;
 662     }
 663
 664     return ret;
 665 }
 666
 667 struct UserData {
 668
 669     UserData( InputStreamTransformer* pTransformer,
 670               URLParameter*           pInitial,
 671               Databases*              pDatabases )
 672         : m_pTransformer( pTransformer ),
 673           m_pDatabases( pDatabases ),
 674           m_pInitial( pInitial )
 675     {
 676     }
 677
 678     InputStreamTransformer*             m_pTransformer;
 679     Databases*                          m_pDatabases;
 680     URLParameter*                       m_pInitial;
 681 };
 682
 683 UserData *ugblData = 0;
 684
 685 extern "C" {
 686
 687 static int
 688 fileMatch(const char * URI) {
 689     if ((URI != NULL) && !strncmp(URI, "file:/", 6))
 690         return 1;
 691     return 0;
 692 }
 693
 694 static int
 695 zipMatch(const char * URI) {
 696     if ((URI != NULL) && !strncmp(URI, "vnd.sun.star.zip:/", 18))
 697         return 1;
 698     return 0;
 699 }
 700
 701 static int
 702 helpMatch(const char * URI) {
 703     if ((URI != NULL) && !strncmp(URI, "vnd.sun.star.help:/", 19))
 704         return 1;
 705     return 0;
 706 }
 707
 708 static void *
 709 fileOpen(const char *URI) {
 710     osl::File *pRet = new osl::File(OUString(URI, strlen(URI), RTL_TEXTENCODING_UTF8));
 711     pRet->open(osl_File_OpenFlag_Read);
 712     return pRet;
 713 }
 714
 715 static void *
 716 zipOpen(SAL_UNUSED_PARAMETER const char *) {
 717     OUString language,jar,path;
 718
 719     if( !ugblData->m_pInitial->get_eid().isEmpty() )
 720         return (void*)(new Reference< XHierarchicalNameAccess >);
 721     else
 722     {
 723         jar = ugblData->m_pInitial->get_jar();
 724         language = ugblData->m_pInitial->get_language();
 725         path = ugblData->m_pInitial->get_path();
 726     }
 727
 728     Reference< XHierarchicalNameAccess > xNA =
 729         ugblData->m_pDatabases->findJarFileForPath( jar, language, path );
 730
 731     Reference< XInputStream > xInputStream;
 732
 733     if( xNA.is() )
 734     {
 735         try
 736         {
 737             Any aEntry = xNA->getByHierarchicalName( path );
 738             Reference< XActiveDataSink > xSink;
 739             if( ( aEntry >>= xSink ) && xSink.is() )
 740                 xInputStream = xSink->getInputStream();
 741         }
 742         catch ( NoSuchElementException & )
 743         {
 744         }
 745     }
 746
 747     if( xInputStream.is() )
 748     {
 749         return new Reference<XInputStream>(xInputStream);
 750     }
 751     return 0;
 752 }
 753
 754 static void *
 755 helpOpen(const char * URI) {
 756     OUString language,jar,path;
 757
 758     URLParameter urlpar( OUString::createFromAscii( URI ),
 759                          ugblData->m_pDatabases );
 760
 761     jar = urlpar.get_jar();
 762     language = urlpar.get_language();
 763     path = urlpar.get_path();
 764
 765     Reference< XHierarchicalNameAccess > xNA =
 766         ugblData->m_pDatabases->findJarFileForPath( jar, language, path );
 767
 768     Reference< XInputStream > xInputStream;
 769
 770     if( xNA.is() )
 771     {
 772         try
 773         {
 774             Any aEntry = xNA->getByHierarchicalName( path );
 775             Reference< XActiveDataSink > xSink;
 776             if( ( aEntry >>= xSink ) && xSink.is() )
 777                 xInputStream = xSink->getInputStream();
 778         }
 779         catch ( NoSuchElementException & )
 780         {
 781         }
 782     }
 783
 784     if( xInputStream.is() )
 785         return new Reference<XInputStream>(xInputStream);
 786     return 0;
 787 }
 788
 789 static int
 790 helpRead(void * context, char * buffer, int len) {
 791     Reference< XInputStream > *pRef = (Reference< XInputStream >*)context;
 792
 793     Sequence< sal_Int8 > aSeq;
 794     len = (*pRef)->readBytes( aSeq,len);
 795     memcpy(buffer, aSeq.getConstArray(), len);
 796
 797     return len;
 798 }
 799
 800 static int
 801 zipRead(void * context, char * buffer, int len) {
 802     if( !ugblData->m_pInitial->get_eid().isEmpty() )
 803     {
 804         ugblData->m_pDatabases->popupDocument( ugblData->m_pInitial,&buffer,&len);
 805         return len;
 806     }
 807     else
 808         return helpRead(context, buffer, len);
 809 }
 810
 811 static int
 812 fileRead(void * context, char * buffer, int len) {
 813     int nRead = 0;
 814     osl::File *pFile = (osl::File*)context;
 815     if (pFile)
 816     {
 817         sal_uInt64 uRead = 0;
 818         if (osl::FileBase::E_None == pFile->read(buffer, len, uRead))
 819             nRead = static_cast<int>(uRead);
 820     }
 821     return nRead;
 822 }
 823
 824 static int
 825 uriClose(void * context) {
 826     Reference< XInputStream > *pRef = (Reference< XInputStream >*)context;
 827     delete pRef;
 828     return 0;
 829 }
 830
 831 static int
 832 fileClose(void * context) {
 833     osl::File *pFile = (osl::File*)context;
 834     if (pFile)
 835     {
 836         pFile->close();
 837         delete pFile;
 838     }
 839     return 0;
 840 }
 841
 842 } // extern "C"
 843
 844 InputStreamTransformer::InputStreamTransformer( URLParameter* urlParam,
 845                                                 Databases*    pDatabases,
 846                                                 bool isRoot )
 847     : len( 0 ),
 848       pos( 0 ),
 849       buffer( new char[1] ) // Initializing with one element to avoid gcc compiler warning
 850 {
 851     if( isRoot )
 852     {
 853         delete[] buffer;
 854         pDatabases->cascadingStylesheet( urlParam->get_language(),
 855                                          &buffer,
 856                                          &len );
 857     }
 858     else if( urlParam->isActive() )
 859     {
 860         delete[] buffer;
 861         pDatabases->setActiveText( urlParam->get_module(),
 862                                    urlParam->get_language(),
 863                                    urlParam->get_id(),
 864                                    &buffer,
 865                                    &len );
 866     }
 867     else
 868     {
 869         UserData userData( this,urlParam,pDatabases );
 870
 871         // Uses the implementation detail, that OString::getStr returns a zero terminated character-array
 872
 873         const char* parameter[47];
 874         OString parString[46];
 875         int last = 0;
 876
 877         parString[last++] = "Program";
 878         OString aPureProgramm( urlParam->getByName( "Program" ) );
 879         parString[last++] = OString('\'') + aPureProgramm + OString('\'');
 880         parString[last++] = "Database";
 881         parString[last++] = OString('\'') + urlParam->getByName( "DatabasePar" ) + OString('\'');
 882         parString[last++] = "Id";
 883         parString[last++] = OString('\'') + urlParam->getByName( "Id" ) + OString('\'');
 884         parString[last++] = "Path";
 885         OString aPath( urlParam->getByName( "Path" ) );
 886         parString[last++] = OString('\'') + aPath + OString('\'');
 887
 888         OString aPureLanguage = urlParam->getByName( "Language" );
 889         parString[last++] = "Language";
 890         parString[last++] = OString('\'') + aPureLanguage + OString('\'');
 891         parString[last++] = "System";
 892         parString[last++] = OString('\'') + urlParam->getByName( "System" ) + OString('\'');
 893         parString[last++] = "productname";
 894         parString[last++] = OString('\'') + OString(
 895             pDatabases->getProductName().getStr(),
 896             pDatabases->getProductName().getLength(),
 897             RTL_TEXTENCODING_UTF8 ) + OString('\'');
 898         parString[last++] = "productversion";
 899         parString[last++] = OString('\'') +
 900             OString(  pDatabases->getProductVersion().getStr(),
 901                           pDatabases->getProductVersion().getLength(),
 902                           RTL_TEXTENCODING_UTF8 ) + OString('\'');
 903
 904         parString[last++] = "imgrepos";
 905         parString[last++] = OString('\'') + pDatabases->getImagesZipFileURL() + OString('\'');
 906         parString[last++] = "hp";
 907         parString[last++] = OString('\'') + urlParam->getByName( "HelpPrefix" ) + OString('\'');
 908
 909         if( !parString[last-1].isEmpty() )
 910         {
 911             parString[last++] = "sm";
 912             parString[last++] = "'vnd.sun.star.help%3A%2F%2F'";
 913             parString[last++] = "qm";
 914             parString[last++] = "'%3F'";
 915             parString[last++] = "es";
 916             parString[last++] = "'%3D'";
 917             parString[last++] = "am";
 918             parString[last++] = "'%26'";
 919             parString[last++] = "cl";
 920             parString[last++] = "'%3A'";
 921             parString[last++] = "sl";
 922             parString[last++] = "'%2F'";
 923             parString[last++] = "hm";
 924             parString[last++] = "'%23'";
 925             parString[last++] = "cs";
 926             parString[last++] = "'css'";
 927
 928             parString[last++] = "vendorname";
 929             parString[last++] = OString("''");
 930             parString[last++] = "vendorversion";
 931             parString[last++] = OString("''");
 932             parString[last++] = "vendorshort";
 933             parString[last++] = OString("''");
 934         }
 935
 936         // Do we need to add extension path?
 937         OUString aExtensionPath;
 938         OUString aJar = urlParam->get_jar();
 939
 940         bool bAddExtensionPath = false;
 941         OUString aExtensionRegistryPath;
 942         sal_Int32 nQuestionMark1 = aJar.indexOf( sal_Unicode('?') );
 943         sal_Int32 nQuestionMark2 = aJar.lastIndexOf( sal_Unicode('?') );
 944         if( nQuestionMark1 != -1 && nQuestionMark2 != -1 && nQuestionMark1 != nQuestionMark2 )
 945         {
 946             aExtensionPath = aJar.copy( nQuestionMark1 + 1, nQuestionMark2 - nQuestionMark1 - 1 );
 947             aExtensionRegistryPath = urlParam->get_ExtensionRegistryPath();
 948             bAddExtensionPath = true;
 949         }
 950         else
 951         {
 952             // Path not yet specified, search directly
 953             Reference< XHierarchicalNameAccess > xNA = pDatabases->findJarFileForPath
 954                 ( aJar, urlParam->get_language(), urlParam->get_path(), &aExtensionPath, &aExtensionRegistryPath );
 955             if( xNA.is() && !aExtensionPath.isEmpty() )
 956                 bAddExtensionPath = true;
 957         }
 958
 959         if( bAddExtensionPath )
 960         {
 961             Reference< XComponentContext > xContext(
 962                 comphelper::getProcessComponentContext() );
 963
 964             OUString aOUExpandedExtensionPath = Databases::expandURL( aExtensionRegistryPath, xContext );
 965             OString aExpandedExtensionPath = OUStringToOString( aOUExpandedExtensionPath, osl_getThreadTextEncoding() );
 966
 967             parString[last++] = "ExtensionPath";
 968             parString[last++] = OString('\'') + aExpandedExtensionPath + OString('\'');
 969
 970             // ExtensionId
 971             OString aPureExtensionId;
 972             sal_Int32 iSlash = aPath.indexOf( '/' );
 973             if( iSlash != -1 )
 974                 aPureExtensionId = aPath.copy( 0, iSlash );
 975
 976             parString[last++] = "ExtensionId";
 977             parString[last++] = OString('\'') + aPureExtensionId + OString('\'');
 978         }
 979
 980         for( int i = 0; i < last; ++i )
 981             parameter[i] = parString[i].getStr();
 982         parameter[last] = 0;
 983
 984         OUString xslURL = pDatabases->getInstallPathAsURL();
 985
 986         OString xslURLascii(
 987             xslURL.getStr(),
 988             xslURL.getLength(),
 989             RTL_TEXTENCODING_UTF8);
 990         xslURLascii += "main_transform.xsl";
 991
 992         ugblData = &userData;
 993
 994         xmlInitParser();
 995         xmlRegisterInputCallbacks(zipMatch, zipOpen, zipRead, uriClose);
 996         xmlRegisterInputCallbacks(helpMatch, helpOpen, helpRead, uriClose);
 997         xmlRegisterInputCallbacks(fileMatch, fileOpen, fileRead, fileClose);
 998
 999         xsltStylesheetPtr cur =
1000             xsltParseStylesheetFile((const xmlChar *)xslURLascii.getStr());
1001
1002         xmlDocPtr doc = xmlParseFile("vnd.sun.star.zip:/");
1003
1004         xmlDocPtr res = xsltApplyStylesheet(cur, doc, parameter);
1005         if (res)
1006         {
1007             xmlChar *doc_txt_ptr=0;
1008             int doc_txt_len;
1009             xsltSaveResultToString(&doc_txt_ptr, &doc_txt_len, res, cur);
1010             addToBuffer((const char*)doc_txt_ptr, doc_txt_len);
1011             xmlFree(doc_txt_ptr);
1012         }
1013         xmlPopInputCallbacks(); //filePatch
1014         xmlPopInputCallbacks(); //helpPatch
1015         xmlPopInputCallbacks(); //zipMatch
1016         xmlFreeDoc(res);
1017         xmlFreeDoc(doc);
1018         xsltFreeStylesheet(cur);
1019     }
1020 }
1021
1022
1023 InputStreamTransformer::~InputStreamTransformer()
1024 {
1025     delete[] buffer;
1026 }
1027
1028
1029 Any SAL_CALL InputStreamTransformer::queryInterface( const Type& rType ) throw( RuntimeException )
1030 {
1031     Any aRet = ::cppu::queryInterface( rType,
1032                                        (static_cast< XInputStream* >(this)),
1033                                        (static_cast< XSeekable* >(this)) );
1034
1035     return aRet.hasValue() ? aRet : OWeakObject::queryInterface( rType );
1036 }
1037
1038
1039
1040 void SAL_CALL InputStreamTransformer::acquire( void ) throw()
1041 {
1042     OWeakObject::acquire();
1043 }
1044
1045
1046
1047 void SAL_CALL InputStreamTransformer::release( void ) throw()
1048 {
1049     OWeakObject::release();
1050 }
1051
1052
1053
1054 sal_Int32 SAL_CALL InputStreamTransformer::readBytes( Sequence< sal_Int8 >& aData,sal_Int32 nBytesToRead )
1055     throw( NotConnectedException,
1056            BufferSizeExceededException,
1057            IOException,
1058            RuntimeException)
1059 {
1060     osl::MutexGuard aGuard( m_aMutex );
1061
1062     int curr,available_ = len-pos;
1063     if( nBytesToRead <= available_ )
1064         curr = nBytesToRead;
1065     else
1066         curr = available_;
1067
1068     if( 0 <= curr && aData.getLength() < curr )
1069         aData.realloc( curr );
1070
1071     for( int k = 0; k < curr; ++k )
1072         aData[k] = buffer[pos++];
1073
1074     return curr > 0 ? curr : 0;
1075 }
1076
1077
1078 sal_Int32 SAL_CALL InputStreamTransformer::readSomeBytes( Sequence< sal_Int8 >& aData,sal_Int32 nMaxBytesToRead )
1079     throw( NotConnectedException,
1080            BufferSizeExceededException,
1081            IOException,
1082            RuntimeException)
1083 {
1084     return readBytes( aData,nMaxBytesToRead );
1085 }
1086
1087
1088
1089 void SAL_CALL InputStreamTransformer::skipBytes( sal_Int32 nBytesToSkip ) throw( NotConnectedException,
1090                                                                                  BufferSizeExceededException,
1091                                                                                  IOException,
1092                                                                                  RuntimeException )
1093 {
1094     osl::MutexGuard aGuard( m_aMutex );
1095     while( nBytesToSkip-- ) ++pos;
1096 }
1097
1098
1099
1100 sal_Int32 SAL_CALL InputStreamTransformer::available( void ) throw( NotConnectedException,
1101                                                                     IOException,
1102                                                                     RuntimeException )
1103 {
1104     osl::MutexGuard aGuard( m_aMutex );
1105     return len-pos > 0 ? len - pos : 0 ;
1106 }
1107
1108
1109
1110 void SAL_CALL InputStreamTransformer::closeInput( void ) throw( NotConnectedException,
1111                                                                 IOException,
1112                                                                 RuntimeException )
1113 {
1114 }
1115
1116
1117
1118 void SAL_CALL InputStreamTransformer::seek( sal_Int64 location ) throw( IllegalArgumentException,
1119                                                                         IOException,
1120                                                                         RuntimeException )
1121 {
1122     osl::MutexGuard aGuard( m_aMutex );
1123     if( location < 0 )
1124         throw IllegalArgumentException();
1125     else
1126         pos = sal::static_int_cast<sal_Int32>( location );
1127
1128     if( pos > len )
1129         pos = len;
1130 }
1131
1132
1133
1134 sal_Int64 SAL_CALL InputStreamTransformer::getPosition( void ) throw( IOException,
1135                                                                       RuntimeException )
1136 {
1137     osl::MutexGuard aGuard( m_aMutex );
1138     return sal_Int64( pos );
1139 }
1140
1141
1142
1143 sal_Int64 SAL_CALL InputStreamTransformer::getLength( void ) throw( IOException,RuntimeException )
1144 {
1145     osl::MutexGuard aGuard( m_aMutex );
1146
1147     return len;
1148 }
1149
1150
1151 void InputStreamTransformer::addToBuffer( const char* buffer_,int len_ )
1152 {
1153     osl::MutexGuard aGuard( m_aMutex );
1154
1155     char* tmp = buffer;
1156     buffer = new char[ len+len_ ];
1157     memcpy( (void*)(buffer),(void*)(tmp),sal_uInt32( len ) );
1158     memcpy( (void*)(buffer+len),(void*)(buffer_),sal_uInt32( len_ ) );
1159     delete[] tmp;
1160     len += len_;
1161 }
1162
1163 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */