dbaccess/source/ui/dlg/ConnectionHelper.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 <core_resource.hxx>
  21 #include "dsnItem.hxx"
  22 #include "ConnectionHelper.hxx"
  23 #include <IItemSetHelper.hxx>
  24 #include <strings.hrc>
  25 #include <svl/itemset.hxx>
  26 #include <unotools/moduleoptions.hxx>
  27 #include <unotools/pathoptions.hxx>
  28 #include <svl/stritem.hxx>
  29 #include <dsitems.hxx>
  30 #include <osl/diagnose.h>
  31 #include <vcl/svapp.hxx>
  32 #include <vcl/weld.hxx>
  33 #include <sfx2/filedlghelper.hxx>
  34 #include <vcl/stdtext.hxx>
  35 #include <sqlmessage.hxx>
  36 #include "dsselect.hxx"
  37 #include <svl/filenotation.hxx>
  38 #include <com/sun/star/awt/XSystemDependentWindowPeer.hpp>
  39 #include <com/sun/star/ui/dialogs/XFolderPicker2.hpp>
  40 #include <com/sun/star/ui/dialogs/TemplateDescription.hpp>
  41 #include <com/sun/star/lang/SystemDependent.hpp>
  42 #include <com/sun/star/mozilla/MozillaBootstrap.hpp>
  43 #include <com/sun/star/task/InteractionHandler.hpp>
  44 #include <com/sun/star/ucb/XProgressHandler.hpp>
  45 #include <ucbhelper/commandenvironment.hxx>
  46 #include <ucbhelper/content.hxx>
  47 #include "finteraction.hxx"
  48 #include <tools/urlobj.hxx>
  49 #include <comphelper/diagnose_ex.hxx>
  50
  51 #if defined _WIN32
  52 #include <rtl/process.h>
  53 #include <vcl/sysdata.hxx>
  54 #include "adodatalinks.hxx"
  55 #endif
  56
  57 #include <com/sun/star/mozilla/XMozillaBootstrap.hpp>
  58 #include <comphelper/processfactory.hxx>
  59 #include <comphelper/string.hxx>
  60
  61 namespace dbaui
  62 {
  63     using namespace ::com::sun::star;
  64     using namespace ::com::sun::star::uno;
  65     using namespace ::com::sun::star::ucb;
  66     using namespace ::com::sun::star::ui::dialogs;
  67     using namespace ::com::sun::star::sdbc;
  68     using namespace ::com::sun::star::mozilla;
  69     using namespace ::svt;
  70
  71     OConnectionHelper::OConnectionHelper(weld::Container* pPage, weld::DialogController* pController, const OUString& _rUIXMLDescription, const OUString& _rId, const SfxItemSet& _rCoreAttrs)
  72         : OGenericAdministrationPage(pPage, pController, _rUIXMLDescription, _rId, _rCoreAttrs)
  73         , m_bUserGrabFocus(false)
  74         , m_pCollection(nullptr)
  75         , m_xFT_Connection(m_xBuilder->weld_label(u"browseurllabel"_ustr))
  76         , m_xPB_Connection(m_xBuilder->weld_button(u"browse"_ustr))
  77         , m_xPB_CreateDB(m_xBuilder->weld_button(u"create"_ustr))
  78         , m_xConnectionURL(new OConnectionURLEdit(m_xBuilder->weld_entry(u"browseurl"_ustr), m_xBuilder->weld_label(u"browselabel"_ustr)))
  79     {
  80         // extract the datasource type collection from the item set
  81         const DbuTypeCollectionItem* pCollectionItem = dynamic_cast<const DbuTypeCollectionItem*>( _rCoreAttrs.GetItem(DSID_TYPECOLLECTION) );
  82         if (pCollectionItem)
  83             m_pCollection = pCollectionItem->getCollection();
  84         m_xPB_Connection->connect_clicked(LINK(this, OConnectionHelper, OnBrowseConnections));
  85         m_xPB_CreateDB->connect_clicked(LINK(this, OConnectionHelper, OnCreateDatabase));
  86         OSL_ENSURE(m_pCollection, "OConnectionHelper::OConnectionHelper : really need a DSN type collection !");
  87         m_xConnectionURL->SetTypeCollection(m_pCollection);
  88
  89         m_xConnectionURL->connect_focus_in(LINK(this, OConnectionHelper, GetFocusHdl));
  90         m_xConnectionURL->connect_focus_out(LINK(this, OConnectionHelper, LoseFocusHdl));
  91     }
  92
  93     OConnectionHelper::~OConnectionHelper()
  94     {
  95         m_xConnectionURL.reset();
  96     }
  97
  98     void OConnectionHelper::implInitControls(const SfxItemSet& _rSet, bool _bSaveValue)
  99     {
 100         // check whether or not the selection is invalid or readonly (invalid implies readonly, but not vice versa)
 101         bool bValid, bReadonly;
 102         getFlags(_rSet, bValid, bReadonly);
 103
 104         m_xFT_Connection->show();
 105         m_xConnectionURL->show();
 106         m_xConnectionURL->ShowPrefix( ::dbaccess::DST_JDBC == m_pCollection->determineType(m_eType) );
 107
 108         bool bEnableBrowseButton = m_pCollection->supportsBrowsing( m_eType );
 109         m_xPB_Connection->set_visible( bEnableBrowseButton );
 110
 111         bool bEnableCreateButton = m_pCollection->supportsDBCreation( m_eType );
 112         m_xPB_CreateDB->set_visible( bEnableCreateButton );
 113
 114         const SfxStringItem* pUrlItem = _rSet.GetItem<SfxStringItem>(DSID_CONNECTURL);
 115
 116         // forward the values to the controls
 117         if ( bValid )
 118         {
 119             OUString sUrl = pUrlItem->GetValue();
 120             setURL( sUrl );
 121
 122             checkTestConnection();
 123             m_xConnectionURL->save_value();
 124         }
 125
 126         OGenericAdministrationPage::implInitControls(_rSet, _bSaveValue);
 127     }
 128
 129     void OConnectionHelper::implUpdateURLDependentStates() const
 130     {
 131         OSL_PRECOND( m_pAdminDialog && m_pCollection, "OConnectionHelper::implUpdateURLDependentStates: no admin dialog!" );
 132         if ( !m_pAdminDialog || !m_pCollection )
 133             return;
 134
 135         if ( m_pCollection->isFileSystemBased(m_eType) )
 136             m_pAdminDialog->enableConfirmSettings( !getURLNoPrefix().isEmpty() );
 137     }
 138
 139     IMPL_LINK_NOARG(OConnectionHelper, OnBrowseConnections, weld::Button&, void)
 140     {
 141         OSL_ENSURE(m_pAdminDialog,"No Admin dialog set! ->GPF");
 142         const ::dbaccess::DATASOURCE_TYPE eType = m_pCollection->determineType(m_eType);
 143         switch ( eType )
 144         {
 145             case  ::dbaccess::DST_DBASE:
 146             case  ::dbaccess::DST_FLAT:
 147             {
 148                 try
 149                 {
 150                     Reference< XFolderPicker2 > xFolderPicker = sfx2::createFolderPicker(m_xORB, GetFrameWeld());
 151
 152                     bool bDoBrowse = false;
 153                     OUString sOldPath = getURLNoPrefix();
 154                     do
 155                     {
 156                         if (!sOldPath.isEmpty())
 157                             xFolderPicker->setDisplayDirectory(sOldPath);
 158                         if (0 == xFolderPicker->execute())
 159                             // cancelled by the user
 160                             return;
 161
 162                         sOldPath = xFolderPicker->getDirectory();
 163                         switch (checkPathExistence(sOldPath))
 164                         {
 165                             case RET_RETRY:
 166                                 bDoBrowse = true;
 167                                 break;
 168                             case RET_CANCEL:
 169                                 return;
 170                             default:
 171                                 break;
 172                         }
 173                     }
 174                     while (bDoBrowse);
 175
 176                     OUString sSelectedDirectory = xFolderPicker->getDirectory();
 177                     INetURLObject aSelectedDirectory( sSelectedDirectory, INetURLObject::EncodeMechanism::WasEncoded, RTL_TEXTENCODING_UTF8 );
 178
 179                     // for UI purpose, we don't want to have the path encoded
 180                     sSelectedDirectory = aSelectedDirectory.GetMainURL( INetURLObject::DecodeMechanism::WithCharset );
 181
 182                     setURLNoPrefix( sSelectedDirectory );
 183                     SetRoadmapStateValue(true);
 184                     callModifiedHdl();
 185                 }
 186                 catch( const Exception& )
 187                 {
 188                     DBG_UNHANDLED_EXCEPTION("dbaccess");
 189                 }
 190             }
 191             break;
 192             case  ::dbaccess::DST_CALC:
 193             {
 194                 SvtModuleOptions aModule;
 195                 ::sfx2::FileDialogHelper aFileDlg(
 196                     ui::dialogs::TemplateDescription::FILEOPEN_READONLY_VERSION,
 197                     FileDialogFlags::NONE,
 198                     aModule.GetFactoryEmptyDocumentURL(SvtModuleOptions::EFactory::CALC)
 199                     ,SfxFilterFlags::IMPORT, SfxFilterFlags::NONE, GetFrameWeld());
 200                 askForFileName(aFileDlg);
 201             }
 202             break;
 203             case  ::dbaccess::DST_WRITER:
 204             {
 205                 SvtModuleOptions aModule;
 206                 ::sfx2::FileDialogHelper aFileDlg(
 207                     ui::dialogs::TemplateDescription::FILEOPEN_READONLY_VERSION,
 208                     FileDialogFlags::NONE,
 209                     aModule.GetFactoryEmptyDocumentURL(SvtModuleOptions::EFactory::WRITER),
 210                     SfxFilterFlags::IMPORT, SfxFilterFlags::NONE, GetFrameWeld());
 211                 askForFileName(aFileDlg);
 212             }
 213             break;
 214             case  ::dbaccess::DST_MSACCESS:
 215             {
 216                 OUString sFilterName(DBA_RES (STR_MSACCESS_FILTERNAME));
 217                 ::sfx2::FileDialogHelper aFileDlg(
 218                     ui::dialogs::TemplateDescription::FILEOPEN_READONLY_VERSION,
 219                     FileDialogFlags::NONE, GetFrameWeld());
 220                 aFileDlg.AddFilter(sFilterName,u"*.accdb;*.accde;*.mdb;*.mde"_ustr);
 221                 aFileDlg.SetCurrentFilter(sFilterName);
 222                 askForFileName(aFileDlg);
 223             }
 224             break;
 225             case  ::dbaccess::DST_MYSQL_ODBC:
 226             case  ::dbaccess::DST_ODBC:
 227             {
 228                 // collect all ODBC data source names
 229                 OUString sCurrDatasource = getURLNoPrefix();
 230                 OUString sDataSource;
 231                 if ( getSelectedDataSource(sDataSource,sCurrDatasource) && !sDataSource.isEmpty() )
 232                 {
 233                     setURLNoPrefix(sDataSource);
 234                     SetRoadmapStateValue(true);
 235                     callModifiedHdl();
 236                 }
 237                 else
 238                     return;
 239             }
 240             break;
 241 #if defined _WIN32
 242             case  ::dbaccess::DST_ADO:
 243             {
 244                 OUString sOldDataSource=getURLNoPrefix();
 245                 OUString sNewDataSource;
 246                 HWND hWnd = nullptr;
 247
 248                 weld::Window* pDialog = GetFrameWeld();
 249                 css::uno::Reference<css::awt::XSystemDependentWindowPeer> xSysDepWin(pDialog->GetXWindow(), css::uno::UNO_QUERY);
 250                 if (xSysDepWin.is())
 251                 {
 252                     css::uno::Sequence<sal_Int8> aProcessIdent(16);
 253                     rtl_getGlobalProcessId(reinterpret_cast<sal_uInt8*>(aProcessIdent.getArray()));
 254                     css::uno::Any aAny = xSysDepWin->getWindowHandle(aProcessIdent, css::lang::SystemDependent::SYSTEM_WIN32);
 255                     sal_Int64 tmp(0);
 256                     aAny >>= tmp;
 257                     hWnd = reinterpret_cast<HWND>(tmp);
 258                 }
 259
 260                 sNewDataSource = getAdoDatalink(reinterpret_cast<sal_IntPtr>(hWnd),sOldDataSource);
 261                 if ( !sNewDataSource.isEmpty() )
 262                 {
 263                     setURLNoPrefix(sNewDataSource);
 264                     SetRoadmapStateValue(true);
 265                     callModifiedHdl();
 266                 }
 267             }
 268             break;
 269 #endif
 270             case  ::dbaccess::DST_MOZILLA:
 271             case  ::dbaccess::DST_THUNDERBIRD:
 272             {
 273                 MozillaProductType profileType = MozillaProductType_Mozilla;
 274                 if (eType ==  ::dbaccess::DST_THUNDERBIRD)
 275                     profileType = MozillaProductType_Thunderbird;
 276
 277                 const Reference<XComponentContext>& xContext = ::comphelper::getProcessComponentContext();
 278                 Reference<XMozillaBootstrap> xMozillaBootstrap = MozillaBootstrap::create(xContext);
 279
 280                 // collect all Mozilla Profiles
 281                 css::uno::Sequence< OUString > list;
 282
 283                 xMozillaBootstrap->getProfileList( profileType, list );
 284
 285                 std::set<OUString> aProfiles(list.begin(), list.end());
 286
 287                 // execute the select dialog
 288                 ODatasourceSelectDialog aSelector(GetFrameWeld(), aProfiles);
 289                 OUString sOldProfile=getURLNoPrefix();
 290
 291                 if (!sOldProfile.isEmpty())
 292                     aSelector.Select(sOldProfile);
 293                 else
 294                     aSelector.Select(xMozillaBootstrap->getDefaultProfile(profileType));
 295
 296                 if (RET_OK == aSelector.run())
 297                     setURLNoPrefix(aSelector.GetSelected());
 298                 break;
 299             }
 300             case ::dbaccess::DST_FIREBIRD:
 301             {
 302                 OUString sFilterName(DBA_RES (STR_FIREBIRD_FILTERNAME));
 303                 ::sfx2::FileDialogHelper aFileDlg(
 304                     ui::dialogs::TemplateDescription::FILEOPEN_SIMPLE,
 305                     FileDialogFlags::NONE, GetFrameWeld());
 306                 aFileDlg.AddFilter(sFilterName,u"*.fdb"_ustr);
 307                 aFileDlg.SetCurrentFilter(sFilterName);
 308                 askForFileName(aFileDlg);
 309                 break;
 310             }
 311             default:
 312                 break;
 313         }
 314
 315         checkTestConnection();
 316     }
 317
 318     IMPL_LINK_NOARG(OConnectionHelper, OnCreateDatabase, weld::Button&, void)
 319     {
 320         OSL_ENSURE(m_pAdminDialog,"No Admin dialog set! ->GPF");
 321         const ::dbaccess::DATASOURCE_TYPE eType = m_pCollection->determineType(m_eType);
 322         switch ( eType )
 323         {
 324         case ::dbaccess::DST_FIREBIRD:
 325             {
 326                 OUString sFilterName(DBA_RES (STR_FIREBIRD_FILTERNAME));
 327                 ::sfx2::FileDialogHelper aFileDlg(
 328                     ui::dialogs::TemplateDescription::FILESAVE_AUTOEXTENSION,
 329                     FileDialogFlags::NONE, GetFrameWeld());
 330                 aFileDlg.AddFilter(sFilterName,u"*.fdb"_ustr);
 331                 aFileDlg.SetCurrentFilter(sFilterName);
 332                 askForFileName(aFileDlg);
 333                 break;
 334             }
 335             default:
 336                 break;
 337         }
 338
 339         checkTestConnection();
 340     }
 341
 342     bool OConnectionHelper::checkTestConnection()
 343     {
 344         return true;
 345     }
 346
 347     void OConnectionHelper::impl_setURL( std::u16string_view _rURL, bool _bPrefix )
 348     {
 349         OUString sURL( comphelper::string::stripEnd(_rURL, '*') );
 350         OSL_ENSURE( m_pCollection, "OConnectionHelper::impl_setURL: have no interpreter for the URLs!" );
 351
 352         if ( m_pCollection && !sURL.isEmpty() )
 353         {
 354             if ( m_pCollection->isFileSystemBased( m_eType ) )
 355             {
 356                 // get the two parts: prefix and file URL
 357                 OUString sTypePrefix, sFileURLEncoded;
 358                 if ( _bPrefix )
 359                 {
 360                     sTypePrefix = m_pCollection->getPrefix( m_eType );
 361                     sFileURLEncoded = m_pCollection->cutPrefix( sURL );
 362                 }
 363                 else
 364                 {
 365                     sFileURLEncoded = sURL;
 366                 }
 367
 368                 // substitute any variables
 369                 sFileURLEncoded = SvtPathOptions().SubstituteVariable( sFileURLEncoded );
 370
 371                 // decode the URL
 372                 sURL = sTypePrefix;
 373                 if ( !sFileURLEncoded.isEmpty() )
 374                 {
 375                     OFileNotation aFileNotation(sFileURLEncoded);
 376                     // set this decoded URL as text
 377                     sURL += aFileNotation.get(OFileNotation::N_SYSTEM);
 378                 }
 379             }
 380         }
 381
 382         if ( _bPrefix )
 383             m_xConnectionURL->SetText( sURL );
 384         else
 385             m_xConnectionURL->SetTextNoPrefix( sURL );
 386
 387         implUpdateURLDependentStates();
 388     }
 389
 390     OUString OConnectionHelper::impl_getURL() const
 391     {
 392         // get the pure text
 393         OUString sURL = m_xConnectionURL->GetTextNoPrefix();
 394
 395         OSL_ENSURE( m_pCollection, "OConnectionHelper::impl_getURL: have no interpreter for the URLs!" );
 396
 397         if ( m_pCollection && !sURL.isEmpty() )
 398         {
 399             if ( m_pCollection->isFileSystemBased( m_eType ) )
 400             {
 401                 // get the two parts: prefix and file URL
 402                 OUString sFileURLDecoded = sURL;
 403
 404                 sURL = OUString();
 405                 if ( !sFileURLDecoded.isEmpty() )
 406                 {
 407                     OFileNotation aFileNotation( sFileURLDecoded, OFileNotation::N_SYSTEM );
 408                     sURL += aFileNotation.get( OFileNotation::N_URL );
 409                 }
 410
 411                 // encode the URL
 412                 INetURLObject aFileURL( sFileURLDecoded, INetURLObject::EncodeMechanism::All, RTL_TEXTENCODING_UTF8 );
 413                 sFileURLDecoded = aFileURL.GetMainURL( INetURLObject::DecodeMechanism::NONE );
 414             }
 415         }
 416         return sURL;
 417     }
 418
 419     void OConnectionHelper::setURL( std::u16string_view _rURL )
 420     {
 421         impl_setURL( _rURL, true );
 422     }
 423
 424     OUString OConnectionHelper::getURLNoPrefix( ) const
 425     {
 426         return impl_getURL();
 427     }
 428
 429     void OConnectionHelper::setURLNoPrefix( std::u16string_view _rURL )
 430     {
 431         impl_setURL( _rURL, false );
 432     }
 433
 434     sal_Int32 OConnectionHelper::checkPathExistence(const OUString& _rURL)
 435     {
 436         IS_PATH_EXIST e_exists = pathExists(_rURL, false);
 437         if (!m_pCollection->supportsDBCreation(m_eType) &&
 438             (( e_exists == PATH_NOT_EXIST) || ( e_exists == PATH_NOT_KNOWN)))
 439         {
 440             OUString sQuery(DBA_RES(STR_ASK_FOR_DIRECTORY_CREATION));
 441             OFileNotation aTransformer(_rURL);
 442             sQuery = sQuery.replaceFirst("$path$", aTransformer.get(OFileNotation::N_SYSTEM));
 443
 444             m_bUserGrabFocus = false;
 445             std::unique_ptr<weld::MessageDialog> xQueryBox(Application::CreateMessageDialog(GetFrameWeld(),
 446                                                            VclMessageType::Question, VclButtonsType::YesNo,
 447                                                            sQuery));
 448             xQueryBox->set_default_response(RET_YES);
 449             sal_Int32 nQueryResult = xQueryBox->run();
 450             m_bUserGrabFocus = true;
 451
 452             switch (nQueryResult)
 453             {
 454                 case RET_YES:
 455                 {
 456                     bool bTryCreate = false;
 457                     do
 458                     {
 459                         if ( !createDirectoryDeep(_rURL) )
 460                         {   // could not create the directory
 461                             sQuery = DBA_RES(STR_COULD_NOT_CREATE_DIRECTORY);
 462                             sQuery = sQuery.replaceFirst("$name$", aTransformer.get(OFileNotation::N_SYSTEM));
 463
 464                             m_bUserGrabFocus = false;
 465
 466                             std::unique_ptr<weld::MessageDialog> xWhatToDo(Application::CreateMessageDialog(GetFrameWeld(),
 467                                                                            VclMessageType::Question, VclButtonsType::NONE,
 468                                                                            sQuery));
 469                             xWhatToDo->add_button(GetStandardText(StandardButtonType::Retry), RET_RETRY);
 470                             xWhatToDo->add_button(GetStandardText(StandardButtonType::Cancel), RET_CANCEL);
 471                             xWhatToDo->set_default_response(RET_RETRY);
 472                             nQueryResult = xWhatToDo->run();
 473                             m_bUserGrabFocus = true;
 474
 475                             if (RET_RETRY == nQueryResult)
 476                                 bTryCreate = true;
 477                             else
 478                             {
 479                                 SetRoadmapStateValue(false);
 480                                 callModifiedHdl();
 481                                 return RET_RETRY;
 482                             }
 483                         }
 484                     }
 485                     while (bTryCreate);
 486                 }
 487                 break;
 488
 489                 case RET_NO:
 490                     callModifiedHdl();
 491                     return RET_OK;
 492
 493                 default:
 494                     // cancelled
 495                     SetRoadmapStateValue(false);
 496                     callModifiedHdl();
 497                     return RET_CANCEL;
 498             }
 499         }
 500 /*        else
 501         {
 502             // TODO: error msg
 503             return RET_CANCEL;
 504         } */
 505         SetRoadmapStateValue(true);
 506         callModifiedHdl();
 507         return RET_OK;
 508     }
 509
 510     IS_PATH_EXIST OConnectionHelper::pathExists(const OUString& _rURL, bool bIsFile) const
 511     {
 512         ::ucbhelper::Content aCheckExistence;
 513         IS_PATH_EXIST eExists = PATH_NOT_EXIST;
 514         Reference< css::task::XInteractionHandler > xInteractionHandler =
 515             task::InteractionHandler::createWithParent(m_xORB, nullptr);
 516         rtl::Reference<OFilePickerInteractionHandler> pHandler = new OFilePickerInteractionHandler(xInteractionHandler);
 517         xInteractionHandler = pHandler;
 518
 519         Reference< XCommandEnvironment > xCmdEnv = new ::ucbhelper::CommandEnvironment( xInteractionHandler, Reference< XProgressHandler >() );
 520         try
 521         {
 522             aCheckExistence = ::ucbhelper::Content(_rURL, xCmdEnv, comphelper::getProcessComponentContext());
 523             const bool bExists = bIsFile? aCheckExistence.isDocument(): aCheckExistence.isFolder();
 524             eExists = bExists? PATH_EXIST: PATH_NOT_EXIST;
 525         }
 526         catch (const Exception&)
 527         {
 528             eExists = pHandler->isDoesNotExist() ? PATH_NOT_EXIST : (bIsFile ? PATH_NOT_EXIST : PATH_NOT_KNOWN);
 529         }
 530         return eExists;
 531     }
 532
 533     IMPL_LINK_NOARG(OConnectionHelper, GetFocusHdl, weld::Widget&, void)
 534     {
 535         if (!m_pCollection->isFileSystemBased(m_eType))
 536             return;
 537         if (!m_bUserGrabFocus)
 538             return;
 539         // URL edit field got the focus
 540         m_xConnectionURL->SaveValueNoPrefix();
 541     }
 542
 543     IMPL_LINK_NOARG(OConnectionHelper, LoseFocusHdl, weld::Widget&, void)
 544     {
 545         if (!m_pCollection->isFileSystemBased(m_eType))
 546             return;
 547         if (!m_bUserGrabFocus)
 548             return;
 549         // URL edit field lost the focus
 550         commitURL();
 551     }
 552
 553     bool OConnectionHelper::createDirectoryDeep(std::u16string_view _rPathURL)
 554     {
 555         // get a URL object analyzing the URL for us ...
 556         INetURLObject aParser;
 557         aParser.SetURL(_rPathURL);
 558
 559         INetProtocol eProtocol = aParser.GetProtocol();
 560
 561         std::vector< OUString > aToBeCreated;  // the to-be-created levels
 562
 563         // search a level which exists
 564         IS_PATH_EXIST eParentExists = PATH_NOT_EXIST;
 565         while ( eParentExists == PATH_NOT_EXIST && aParser.getSegmentCount())
 566         {
 567             aToBeCreated.push_back(aParser.getName());  // remember the local name for creation
 568             aParser.removeSegment();                    // cut the local name
 569             eParentExists = pathExists(aParser.GetMainURL(INetURLObject::DecodeMechanism::NONE), false);
 570         }
 571
 572         if (!aParser.getSegmentCount())
 573             return false;
 574
 575         // create all the missing levels
 576         try
 577         {
 578             // the parent content
 579             Reference< XCommandEnvironment > xEmptyEnv;
 580             ::ucbhelper::Content aParent(aParser.GetMainURL(INetURLObject::DecodeMechanism::NONE), xEmptyEnv, comphelper::getProcessComponentContext());
 581
 582             OUString sContentType;
 583             if ( INetProtocol::File == eProtocol )
 584             {
 585                 sContentType = "application/vnd.sun.staroffice.fsys-folder";
 586                 // the file UCP currently does not support the ContentType property
 587             }
 588             else
 589             {
 590                 Any aContentType = aParent.getPropertyValue(u"ContentType"_ustr);
 591                 aContentType >>= sContentType;
 592             }
 593
 594             // the properties which need to be set on the new content
 595             Sequence< OUString > aNewDirectoryProperties { u"Title"_ustr };
 596
 597             // loop
 598             for (   std::vector< OUString >::const_reverse_iterator aLocalName = aToBeCreated.rbegin();
 599                     aLocalName != aToBeCreated.rend();
 600                     ++aLocalName
 601                 )
 602             {
 603                 // the values to be set
 604                 Sequence< Any > aNewDirectoryAttributes{ Any(* aLocalName) };
 605                 if (!aParent.insertNewContent(sContentType, aNewDirectoryProperties, aNewDirectoryAttributes, aParent))
 606                     return false;
 607             }
 608         }
 609         catch ( const Exception& )
 610         {
 611             DBG_UNHANDLED_EXCEPTION("dbaccess");
 612             return false;
 613         }
 614
 615         return true;
 616     }
 617
 618     void OConnectionHelper::fillWindows(std::vector< std::unique_ptr<ISaveValueWrapper> >& _rControlList)
 619     {
 620         _rControlList.emplace_back(new ODisableWidgetWrapper<weld::Label>(m_xFT_Connection.get()));
 621         _rControlList.emplace_back(new ODisableWidgetWrapper<weld::Button>(m_xPB_Connection.get()));
 622         _rControlList.emplace_back(new ODisableWidgetWrapper<weld::Button>(m_xPB_CreateDB.get()));
 623     }
 624
 625     void OConnectionHelper::fillControls(std::vector< std::unique_ptr<ISaveValueWrapper> >& _rControlList)
 626     {
 627         _rControlList.emplace_back( new OSaveValueWidgetWrapper<OConnectionURLEdit>( m_xConnectionURL.get() ) );
 628     }
 629
 630     bool OConnectionHelper::commitURL()
 631     {
 632         OUString sOldPath = m_xConnectionURL->GetSavedValueNoPrefix();
 633         OUString sURL = m_xConnectionURL->GetTextNoPrefix();
 634
 635         if ( m_pCollection->isFileSystemBased(m_eType) )
 636         {
 637             if ( ( sURL != sOldPath ) && !sURL.isEmpty() )
 638             {   // the text changed since entering the control
 639
 640                 // the path may be in system notation...
 641                 OFileNotation aTransformer(sURL);
 642                 sURL = aTransformer.get(OFileNotation::N_URL);
 643
 644                 const ::dbaccess::DATASOURCE_TYPE eType = m_pCollection->determineType(m_eType);
 645
 646                 if ( ( ::dbaccess::DST_CALC == eType) || ( ::dbaccess::DST_WRITER == eType) || ( ::dbaccess::DST_MSACCESS == eType) )
 647                 {
 648                     if( pathExists(sURL, true) == PATH_NOT_EXIST )
 649                     {
 650                         OUString sFile = DBA_RES( STR_FILE_DOES_NOT_EXIST );
 651                         sFile = sFile.replaceFirst("$file$", aTransformer.get(OFileNotation::N_SYSTEM));
 652                         OSQLWarningBox aWarning(GetFrameWeld(), sFile);
 653                         aWarning.run();
 654                         setURLNoPrefix(sOldPath);
 655                         SetRoadmapStateValue(false);
 656                         callModifiedHdl();
 657                         return false;
 658                     }
 659                 }
 660                 else
 661                 {
 662                     switch (checkPathExistence(sURL))
 663                     {
 664                         case RET_RETRY:
 665                             m_bUserGrabFocus = false;
 666                             m_xConnectionURL->grab_focus();
 667                             m_bUserGrabFocus = true;
 668                             return false;
 669
 670                         case RET_CANCEL:
 671                             setURLNoPrefix(sOldPath);
 672                             return false;
 673                     }
 674                 }
 675             }
 676         }
 677
 678         setURLNoPrefix(sURL);
 679         m_xConnectionURL->SaveValueNoPrefix();
 680         return true;
 681     }
 682
 683     void OConnectionHelper::askForFileName(::sfx2::FileDialogHelper& _aFileOpen)
 684     {
 685         OUString sOldPath = getURLNoPrefix();
 686         if ( !sOldPath.isEmpty() )
 687             _aFileOpen.SetDisplayDirectory(sOldPath);
 688         else
 689             _aFileOpen.SetDisplayDirectory( SvtPathOptions().GetWorkPath() );
 690         if (ERRCODE_NONE == _aFileOpen.Execute())
 691         {
 692             setURLNoPrefix(_aFileOpen.GetPath());
 693             SetRoadmapStateValue(checkTestConnection());
 694             callModifiedHdl();
 695         }
 696     }
 697
 698 }   // namespace dbaui
 699
 700 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */