ucb/source/core/FileAccess.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 #include <cppuhelper/exc_hlp.hxx>
  21 #include <comphelper/processfactory.hxx>
  22 #include <comphelper/sequence.hxx>
  23 #include <cppuhelper/factory.hxx>
  24 #include <cppuhelper/implbase.hxx>
  25 #include <cppuhelper/supportsservice.hxx>
  26
  27 #include <tools/urlobj.hxx>
  28 #include <ucbhelper/content.hxx>
  29 #include <unotools/streamwrap.hxx>
  30 #include <tools/stream.hxx>
  31
  32 #include <com/sun/star/beans/Property.hpp>
  33 #include <com/sun/star/container/XChild.hpp>
  34 #include <com/sun/star/io/XActiveDataSink.hpp>
  35 #include <com/sun/star/io/XActiveDataStreamer.hpp>
  36 #include <com/sun/star/lang/WrappedTargetRuntimeException.hpp>
  37 #include <com/sun/star/lang/XServiceInfo.hpp>
  38 #include <com/sun/star/sdbc/XResultSet.hpp>
  39 #include <com/sun/star/ucb/ContentCreationException.hpp>
  40 #include <com/sun/star/ucb/CommandFailedException.hpp>
  41 #include <com/sun/star/ucb/ContentInfo.hpp>
  42 #include <com/sun/star/ucb/ContentInfoAttribute.hpp>
  43 #include <com/sun/star/ucb/InsertCommandArgument.hpp>
  44 #include <com/sun/star/ucb/InteractiveIOException.hpp>
  45 #include <com/sun/star/ucb/NameClash.hpp>
  46 #include <com/sun/star/ucb/OpenCommandArgument2.hpp>
  47 #include <com/sun/star/ucb/OpenMode.hpp>
  48 #include <com/sun/star/ucb/XCommandEnvironment.hpp>
  49 #include <com/sun/star/ucb/XContent.hpp>
  50 #include <com/sun/star/ucb/XContentAccess.hpp>
  51 #include <com/sun/star/ucb/XSimpleFileAccess3.hpp>
  52 #include <com/sun/star/util/theMacroExpander.hpp>
  53
  54 #include <vector>
  55
  56 constexpr OUString SERVICE_NAME = u"com.sun.star.ucb.SimpleFileAccess"_ustr;
  57
  58 using namespace ::com::sun::star::uno;
  59 using namespace ::com::sun::star::lang;
  60 using namespace ::com::sun::star::io;
  61 using namespace ::com::sun::star::ucb;
  62 using namespace ::com::sun::star::sdbc;
  63 using namespace ::com::sun::star::task;
  64 using namespace ::com::sun::star::util;
  65 using namespace ::com::sun::star::beans;
  66
  67 using ::std::vector;
  68
  69 namespace
  70 {
  71
  72 // Implementation XSimpleFileAccess
  73 typedef cppu::WeakImplHelper<XSimpleFileAccess3, css::lang::XServiceInfo>
  74     FileAccessHelper;
  75 class OCommandEnvironment;
  76
  77 class OFileAccess : public FileAccessHelper
  78 {
  79     Reference< XComponentContext >      m_xContext;
  80     rtl::Reference<OCommandEnvironment> mxEnvironment;
  81
  82     /// @throws CommandAbortedException
  83     /// @throws Exception
  84     /// @throws RuntimeException
  85     void transferImpl( const OUString& rSource, std::u16string_view rDest, bool bMoveData );
  86     /// @throws Exception
  87     bool createNewFile( const OUString & rParentURL,
  88                         const OUString & rTitle,
  89                         const Reference< XInputStream >& data );
  90
  91 public:
  92     explicit OFileAccess( const Reference< XComponentContext > & xContext )
  93         : m_xContext( xContext) {}
  94     // Methods
  95     virtual void SAL_CALL copy( const OUString& SourceURL, const OUString& DestURL ) override;
  96     virtual void SAL_CALL move( const OUString& SourceURL, const OUString& DestURL ) override;
  97     virtual void SAL_CALL kill( const OUString& FileURL ) override;
  98     virtual sal_Bool SAL_CALL isFolder( const OUString& FileURL ) override;
  99     virtual sal_Bool SAL_CALL isReadOnly( const OUString& FileURL ) override;
 100     virtual void SAL_CALL setReadOnly( const OUString& FileURL, sal_Bool bReadOnly ) override;
 101     virtual void SAL_CALL createFolder( const OUString& NewFolderURL ) override;
 102     virtual sal_Int32 SAL_CALL getSize( const OUString& FileURL ) override;
 103     virtual OUString SAL_CALL getContentType( const OUString& FileURL ) override;
 104     virtual css::util::DateTime SAL_CALL getDateTimeModified( const OUString& FileURL ) override;
 105     virtual css::uno::Sequence< OUString > SAL_CALL getFolderContents( const OUString& FolderURL, sal_Bool bIncludeFolders ) override;
 106     virtual sal_Bool SAL_CALL exists( const OUString& FileURL ) override;
 107     virtual css::uno::Reference< css::io::XInputStream > SAL_CALL openFileRead( const OUString& FileURL ) override;
 108     virtual css::uno::Reference< css::io::XOutputStream > SAL_CALL openFileWrite( const OUString& FileURL ) override;
 109     virtual css::uno::Reference< css::io::XStream > SAL_CALL openFileReadWrite( const OUString& FileURL ) override;
 110     virtual void SAL_CALL setInteractionHandler( const css::uno::Reference< css::task::XInteractionHandler >& Handler ) override;
 111     virtual void SAL_CALL writeFile( const OUString& FileURL, const css::uno::Reference< css::io::XInputStream >& data ) override;
 112     virtual sal_Bool SAL_CALL isHidden( const OUString& FileURL ) override;
 113     virtual void SAL_CALL setHidden( const OUString& FileURL, sal_Bool bHidden ) override;
 114
 115     OUString SAL_CALL getImplementationName() override
 116     { return u"com.sun.star.comp.ucb.SimpleFileAccess"_ustr; }
 117
 118     sal_Bool SAL_CALL supportsService(OUString const & ServiceName) override
 119     { return cppu::supportsService(this, ServiceName); }
 120
 121     css::uno::Sequence<OUString> SAL_CALL getSupportedServiceNames() override
 122     { return { SERVICE_NAME }; }
 123 };
 124
 125 // Implementation XActiveDataSink
 126
 127 class OActiveDataSink : public cppu::WeakImplHelper< XActiveDataSink >
 128 {
 129     Reference< XInputStream > mxStream;
 130
 131 public:
 132
 133     // Methods
 134     virtual void SAL_CALL setInputStream( const Reference< XInputStream >& aStream ) override;
 135     virtual Reference< XInputStream > SAL_CALL getInputStream(  ) override;
 136 };
 137
 138 // Implementation XActiveDataStreamer
 139
 140 class OActiveDataStreamer : public cppu::WeakImplHelper< XActiveDataStreamer >
 141 {
 142     Reference< XStream > mxStream;
 143
 144 public:
 145
 146     // Methods
 147     virtual void SAL_CALL setStream( const Reference< XStream >& aStream ) override;
 148     virtual Reference< XStream > SAL_CALL getStream() override;
 149 };
 150
 151 // Implementation XCommandEnvironment
 152
 153 class OCommandEnvironment : public cppu::WeakImplHelper< XCommandEnvironment >
 154 {
 155     Reference< XInteractionHandler > mxInteraction;
 156
 157 public:
 158     void setHandler( const Reference< XInteractionHandler >& xInteraction_ )
 159     {
 160         mxInteraction = xInteraction_;
 161     }
 162
 163     // Methods
 164     virtual Reference< XInteractionHandler > SAL_CALL getInteractionHandler() override;
 165     virtual Reference< XProgressHandler > SAL_CALL getProgressHandler() override;
 166 };
 167
 168 void OActiveDataSink::setInputStream( const Reference< XInputStream >& aStream )
 169 {
 170     mxStream = aStream;
 171 }
 172
 173 Reference< XInputStream > OActiveDataSink::getInputStream()
 174 {
 175     return mxStream;
 176 }
 177
 178 void OActiveDataStreamer::setStream( const Reference< XStream >& aStream )
 179 {
 180     mxStream = aStream;
 181 }
 182
 183 Reference< XStream > OActiveDataStreamer::getStream()
 184 {
 185     return mxStream;
 186 }
 187
 188 Reference< XInteractionHandler > OCommandEnvironment::getInteractionHandler()
 189 {
 190     return mxInteraction;
 191 }
 192
 193 Reference< XProgressHandler > OCommandEnvironment::getProgressHandler()
 194 {
 195     Reference< XProgressHandler > xRet;
 196     return xRet;
 197 }
 198
 199 void OFileAccess::transferImpl( const OUString& rSource,
 200                                 std::u16string_view rDest,
 201                                 bool bMoveData )
 202 {
 203     // SfxContentHelper::Transfer_Impl
 204     INetURLObject aSourceObj( rSource, INetProtocol::File );
 205     INetURLObject aDestObj( rDest, INetProtocol::File );
 206     OUString aName = aDestObj.getName(
 207         INetURLObject::LAST_SEGMENT, true, INetURLObject::DecodeMechanism::WithCharset );
 208     OUString aDestURL;
 209     OUString aSourceURL = aSourceObj.GetMainURL( INetURLObject::DecodeMechanism::NONE );
 210     if ( aDestObj.removeSegment() )
 211     {
 212         // hierarchical URL.
 213
 214         aDestObj.setFinalSlash();
 215         aDestURL = aDestObj.GetMainURL( INetURLObject::DecodeMechanism::NONE );
 216     }
 217     else
 218     {
 219         // non-hierarchical URL
 220
 221         // #i29648#
 222
 223
 224         if ( aDestObj.GetProtocol() == INetProtocol::VndSunStarExpand )
 225         {
 226             // Hack: Expand destination URL using Macro Expander and try again
 227             //       with the hopefully hierarchical expanded URL...
 228
 229             try
 230             {
 231                 Reference< XMacroExpander > xExpander = theMacroExpander::get(m_xContext);
 232
 233                 aDestURL = xExpander->expandMacros(
 234                     aDestObj.GetURLPath( INetURLObject::DecodeMechanism::WithCharset ) );
 235             }
 236             catch ( Exception const & )
 237             {
 238                 css::uno::Any anyEx = cppu::getCaughtException();
 239                 throw css::lang::WrappedTargetRuntimeException(
 240                     u"OFileAccess::transferrImpl - Unable to obtain destination folder URL!"_ustr,
 241                     getXWeak(), anyEx );
 242             }
 243
 244             transferImpl( rSource, aDestURL, bMoveData );
 245             return;
 246         }
 247
 248         throw RuntimeException(
 249                u"OFileAccess::transferrImpl - Unable to obtain destination folder URL!"_ustr,
 250                 getXWeak() );
 251
 252     }
 253
 254     ucbhelper::Content aDestPath( aDestURL,   mxEnvironment, comphelper::getProcessComponentContext() );
 255     ucbhelper::Content aSrc     ( aSourceURL, mxEnvironment, comphelper::getProcessComponentContext() );
 256
 257     try
 258     {
 259         aDestPath.transferContent(aSrc,
 260                                         bMoveData
 261                                          ? ucbhelper::InsertOperation::Move
 262                                          : ucbhelper::InsertOperation::Copy,
 263                                         aName,
 264                                         css::ucb::NameClash::OVERWRITE);
 265     }
 266     catch ( css::ucb::CommandFailedException const & )
 267     {
 268         // Interaction Handler already handled the error that has occurred...
 269     }
 270 }
 271
 272 void OFileAccess::copy( const OUString& SourceURL, const OUString& DestURL )
 273 {
 274     transferImpl( SourceURL, DestURL, false );
 275 }
 276
 277 void OFileAccess::move( const OUString& SourceURL, const OUString& DestURL )
 278 {
 279     transferImpl( SourceURL, DestURL, true );
 280 }
 281
 282 void OFileAccess::kill( const OUString& FileURL )
 283 {
 284     // SfxContentHelper::Kill
 285     INetURLObject aDeleteObj( FileURL, INetProtocol::File );
 286     ucbhelper::Content aCnt( aDeleteObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 287     try
 288     {
 289         aCnt.executeCommand( u"delete"_ustr, Any( true ) );
 290     }
 291     catch ( css::ucb::CommandFailedException const & )
 292     {
 293         // Interaction Handler already handled the error that has occurred...
 294     }
 295 }
 296
 297 sal_Bool OFileAccess::isFolder( const OUString& FileURL )
 298 {
 299     bool bRet = false;
 300     try
 301     {
 302         INetURLObject aURLObj( FileURL, INetProtocol::File );
 303         ucbhelper::Content aCnt( aURLObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 304         bRet = aCnt.isFolder();
 305     }
 306     catch (const Exception &) {}
 307     return bRet;
 308 }
 309
 310 sal_Bool OFileAccess::isReadOnly( const OUString& FileURL )
 311 {
 312     INetURLObject aURLObj( FileURL, INetProtocol::File );
 313     ucbhelper::Content aCnt( aURLObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 314     Any aRetAny = aCnt.getPropertyValue(u"IsReadOnly"_ustr);
 315     bool bRet = false;
 316     aRetAny >>= bRet;
 317     return bRet;
 318 }
 319
 320 void OFileAccess::setReadOnly( const OUString& FileURL, sal_Bool bReadOnly )
 321 {
 322     INetURLObject aURLObj( FileURL, INetProtocol::File );
 323     ucbhelper::Content aCnt( aURLObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 324     aCnt.setPropertyValue(u"IsReadOnly"_ustr, Any(bReadOnly) );
 325 }
 326
 327 void OFileAccess::createFolder( const OUString& NewFolderURL )
 328 {
 329     // Does the folder already exist?
 330     if( NewFolderURL.isEmpty() || isFolder( NewFolderURL ) )
 331         return;
 332
 333     // SfxContentHelper::MakeFolder
 334     INetURLObject aURL( NewFolderURL, INetProtocol::File );
 335     OUString aTitle = aURL.getName( INetURLObject::LAST_SEGMENT, true, INetURLObject::DecodeMechanism::WithCharset );
 336     if ( !aTitle.isEmpty() )
 337     {
 338         aURL.removeSegment();
 339
 340         // Does the base folder exist? Otherwise create it first
 341         OUString aBaseFolderURLStr = aURL.GetMainURL( INetURLObject::DecodeMechanism::NONE );
 342         if( !isFolder( aBaseFolderURLStr ) )
 343         {
 344             createFolder( aBaseFolderURLStr );
 345         }
 346     }
 347
 348     ucbhelper::Content aCnt( aURL.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 349
 350     const Sequence< ContentInfo > aInfo = aCnt.queryCreatableContentsInfo();
 351
 352     for ( const ContentInfo & rCurr : aInfo )
 353     {
 354         // Simply look for the first KIND_FOLDER...
 355         if ( rCurr.Attributes & ContentInfoAttribute::KIND_FOLDER )
 356         {
 357             // Make sure the only required bootstrap property is "Title",
 358             const Sequence< Property > & rProps = rCurr.Properties;
 359             if ( rProps.getLength() != 1 )
 360                 continue;
 361
 362             if ( rProps[ 0 ].Name != "Title" )
 363                 continue;
 364
 365             ucbhelper::Content aNew;
 366             try
 367             {
 368                 if ( !aCnt.insertNewContent( rCurr.Type, { u"Title"_ustr }, { Any(aTitle) }, aNew ) )
 369                     continue;
 370
 371                 // Success. We're done.
 372                 return;
 373             }
 374             catch ( css::ucb::CommandFailedException const & )
 375             {
 376                 // Interaction Handler already handled the error that has occurred...
 377                 continue;
 378             }
 379         }
 380     }
 381 }
 382
 383 sal_Int32 OFileAccess::getSize( const OUString& FileURL )
 384 {
 385     // SfxContentHelper::GetSize
 386     sal_Int32 nSize = 0;
 387     sal_Int64 nTemp = 0;
 388     INetURLObject aObj( FileURL, INetProtocol::File );
 389     ucbhelper::Content aCnt( aObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 390     aCnt.getPropertyValue( u"Size"_ustr ) >>= nTemp;
 391     nSize = static_cast<sal_Int32>(nTemp);
 392     return nSize;
 393 }
 394
 395 OUString OFileAccess::getContentType( const OUString& FileURL )
 396 {
 397     INetURLObject aObj( FileURL, INetProtocol::File );
 398     ucbhelper::Content aCnt( aObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 399
 400     Reference< XContent > xContent = aCnt.get();
 401     OUString aTypeStr = xContent->getContentType();
 402     return aTypeStr;
 403 }
 404
 405 css::util::DateTime OFileAccess::getDateTimeModified( const OUString& FileURL )
 406 {
 407     INetURLObject aFileObj( FileURL, INetProtocol::File );
 408     css::util::DateTime aDateTime;
 409
 410     Reference< XCommandEnvironment > aCmdEnv;
 411     ucbhelper::Content aYoung( aFileObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), aCmdEnv, comphelper::getProcessComponentContext() );
 412     aYoung.getPropertyValue(u"DateModified"_ustr) >>= aDateTime;
 413     return aDateTime;
 414 }
 415
 416 Sequence< OUString > OFileAccess::getFolderContents( const OUString& FolderURL, sal_Bool bIncludeFolders )
 417 {
 418     // SfxContentHelper::GetFolderContents
 419
 420     std::vector<OUString> aFiles;
 421     INetURLObject aFolderObj( FolderURL, INetProtocol::File );
 422
 423     ucbhelper::Content aCnt( aFolderObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 424     Reference< XResultSet > xResultSet;
 425
 426     ucbhelper::ResultSetInclude eInclude = bIncludeFolders ? ucbhelper::INCLUDE_FOLDERS_AND_DOCUMENTS : ucbhelper::INCLUDE_DOCUMENTS_ONLY;
 427
 428     try
 429     {
 430         xResultSet = aCnt.createCursor( {}, eInclude );
 431     }
 432     catch ( css::ucb::CommandFailedException const & )
 433     {
 434         // Interaction Handler already handled the error that has occurred...
 435     }
 436
 437     if ( xResultSet.is() )
 438     {
 439         Reference< css::ucb::XContentAccess > xContentAccess( xResultSet, UNO_QUERY );
 440
 441         while ( xResultSet->next() )
 442         {
 443             OUString aId = xContentAccess->queryContentIdentifierString();
 444             INetURLObject aURL( aId, INetProtocol::File );
 445             aFiles.push_back( aURL.GetMainURL( INetURLObject::DecodeMechanism::NONE ) );
 446         }
 447     }
 448
 449     return comphelper::containerToSequence(aFiles);
 450 }
 451
 452 sal_Bool OFileAccess::exists( const OUString& FileURL )
 453 {
 454     bool bRet = false;
 455     try
 456     {
 457         bRet = isFolder( FileURL );
 458         if( !bRet )
 459         {
 460             Reference< XInputStream > xStream = openFileRead( FileURL );
 461             bRet = xStream.is();
 462             if( bRet )
 463                 xStream->closeInput();
 464         }
 465     }
 466     catch (const Exception &) {}
 467     return bRet;
 468 }
 469
 470 Reference< XInputStream > OFileAccess::openFileRead( const OUString& FileURL )
 471 {
 472     Reference< XInputStream > xRet;
 473     INetURLObject aObj( FileURL, INetProtocol::File );
 474     ucbhelper::Content aCnt( aObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 475
 476     Reference<XActiveDataSink> xSink = new OActiveDataSink;
 477
 478     try
 479     {
 480         bool bRet = aCnt.openStream( xSink );
 481         if( bRet )
 482             xRet = xSink->getInputStream();
 483     }
 484     catch ( css::ucb::CommandFailedException const & )
 485     {
 486         // Interaction Handler already handled the error that has occurred...
 487     }
 488
 489     return xRet;
 490 }
 491
 492 Reference< XOutputStream > OFileAccess::openFileWrite( const OUString& FileURL )
 493 {
 494     Reference< XOutputStream > xRet;
 495     Reference< XStream > xStream = OFileAccess::openFileReadWrite( FileURL );
 496     if( xStream.is() )
 497         xRet = xStream->getOutputStream();
 498     return xRet;
 499 }
 500
 501 Reference< XStream > OFileAccess::openFileReadWrite( const OUString& FileURL )
 502 {
 503     Reference<XActiveDataStreamer> xSink = new OActiveDataStreamer;
 504
 505     OpenCommandArgument2 aArg;
 506     aArg.Mode       = OpenMode::DOCUMENT;
 507     aArg.Priority   = 0; // unused
 508     aArg.Sink       = xSink;
 509     aArg.Properties = Sequence< Property >( 0 ); // unused
 510
 511     Any aCmdArg;
 512     aCmdArg <<= aArg;
 513
 514     INetURLObject aFileObj( FileURL, INetProtocol::File );
 515     ucbhelper::Content aCnt( aFileObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 516
 517     // Be silent...
 518     Reference< XInteractionHandler > xIH;
 519     if ( mxEnvironment.is() )
 520     {
 521         xIH = mxEnvironment->getInteractionHandler();
 522         mxEnvironment->setHandler( nullptr );
 523     }
 524
 525     try
 526     {
 527         aCnt.executeCommand( u"open"_ustr, aCmdArg );
 528     }
 529     catch ( InteractiveIOException const & e )
 530     {
 531         if ( xIH.is() && mxEnvironment.is() )
 532             mxEnvironment->setHandler( xIH );
 533
 534         if ( e.Code == IOErrorCode_NOT_EXISTING )
 535         {
 536             // Create file...
 537             SvMemoryStream aStream(0,0);
 538             rtl::Reference<::utl::OInputStreamWrapper> pInput = new ::utl::OInputStreamWrapper( aStream );
 539             InsertCommandArgument aInsertArg;
 540             aInsertArg.Data = pInput;
 541             aInsertArg.ReplaceExisting = false;
 542
 543             aCmdArg <<= aInsertArg;
 544             aCnt.executeCommand( u"insert"_ustr, aCmdArg );
 545
 546             // Retry...
 547             return openFileReadWrite( FileURL );
 548         }
 549
 550         throw;
 551     }
 552
 553     if ( xIH.is() && mxEnvironment.is() )
 554         mxEnvironment->setHandler( xIH );
 555
 556     Reference< XStream > xRet = xSink->getStream();
 557     return xRet;
 558 }
 559
 560 void OFileAccess::setInteractionHandler( const Reference< XInteractionHandler >& Handler )
 561 {
 562     if( !mxEnvironment.is() )
 563     {
 564         mxEnvironment = new OCommandEnvironment;
 565     }
 566     mxEnvironment->setHandler( Handler );
 567 }
 568
 569 bool OFileAccess::createNewFile( const OUString & rParentURL,
 570                                  const OUString & rTitle,
 571                                  const Reference< XInputStream >& data )
 572 {
 573     ucbhelper::Content aParentCnt( rParentURL, mxEnvironment, comphelper::getProcessComponentContext() );
 574
 575     const Sequence< ContentInfo > aInfo = aParentCnt.queryCreatableContentsInfo();
 576
 577     for ( const ContentInfo & rCurr : aInfo )
 578     {
 579         if ( ( rCurr.Attributes
 580                & ContentInfoAttribute::KIND_DOCUMENT ) &&
 581              ( rCurr.Attributes
 582                & ContentInfoAttribute::INSERT_WITH_INPUTSTREAM ) )
 583         {
 584             // Make sure the only required bootstrap property is
 585             // "Title",
 586             const Sequence< Property > & rProps = rCurr.Properties;
 587             if ( rProps.getLength() != 1 )
 588                 continue;
 589
 590             if ( rProps[ 0 ].Name != "Title" )
 591                 continue;
 592
 593             try
 594             {
 595                 ucbhelper::Content aNew;
 596                 if ( aParentCnt.insertNewContent(
 597                          rCurr.Type, { u"Title"_ustr }, { Any(rTitle) }, data, aNew ) )
 598                     return true; // success.
 599                 else
 600                     continue;
 601             }
 602             catch ( CommandFailedException const & )
 603             {
 604                 // Interaction Handler already handled the
 605                 // error that has occurred...
 606                 continue;
 607             }
 608         }
 609     }
 610
 611     return false;
 612 }
 613
 614 void SAL_CALL OFileAccess::writeFile( const OUString& FileURL,
 615                                       const Reference< XInputStream >& data )
 616 {
 617     INetURLObject aURL( FileURL, INetProtocol::File );
 618     try
 619     {
 620         ucbhelper::Content aCnt(
 621             aURL.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment,
 622             comphelper::getProcessComponentContext() );
 623
 624         try
 625         {
 626             aCnt.writeStream( data, true /* bReplaceExisting */ );
 627         }
 628         catch ( CommandFailedException const & )
 629         {
 630             // Interaction Handler already handled the error that has occurred...
 631         }
 632     }
 633     catch ( ContentCreationException const & e )
 634     {
 635         // Most probably file does not exist. Try to create.
 636         if ( e.eError == ContentCreationError_CONTENT_CREATION_FAILED )
 637         {
 638             INetURLObject aParentURLObj( aURL );
 639             if ( aParentURLObj.removeSegment() )
 640             {
 641                 OUString aParentURL
 642                     = aParentURLObj.GetMainURL( INetURLObject::DecodeMechanism::NONE );
 643
 644                 // ensure all parent folders exist.
 645                 createFolder( aParentURL );
 646
 647                 // create the new file...
 648                 OUString aTitle
 649                     = aURL.getName( INetURLObject::LAST_SEGMENT,
 650                                     true,
 651                                     INetURLObject::DecodeMechanism::WithCharset );
 652                 if ( createNewFile( aParentURL, aTitle, data ) )
 653                 {
 654                     // success
 655                     return;
 656                 }
 657             }
 658         }
 659
 660         throw;
 661     }
 662 }
 663
 664 sal_Bool OFileAccess::isHidden( const OUString& FileURL )
 665 {
 666     INetURLObject aURLObj( FileURL, INetProtocol::File );
 667     ucbhelper::Content aCnt( aURLObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 668     Any aRetAny = aCnt.getPropertyValue(u"IsHidden"_ustr);
 669     bool bRet = false;
 670     aRetAny >>= bRet;
 671     return bRet;
 672 }
 673
 674 void OFileAccess::setHidden( const OUString& FileURL, sal_Bool bHidden )
 675 {
 676     INetURLObject aURLObj( FileURL, INetProtocol::File );
 677     ucbhelper::Content aCnt( aURLObj.GetMainURL( INetURLObject::DecodeMechanism::NONE ), mxEnvironment, comphelper::getProcessComponentContext() );
 678     aCnt.setPropertyValue(u"IsHidden"_ustr, Any(bHidden) );
 679 }
 680
 681
 682 extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface*
 683 ucb_OFileAccess_get_implementation(
 684     css::uno::XComponentContext* context , css::uno::Sequence<css::uno::Any> const&)
 685 {
 686     return cppu::acquire(new OFileAccess(context));
 687 }
 688
 689 }; // namespace end
 690
 691
 692 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */