svtools/source/uno/fpicker.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 <rtl/ustring.hxx>
  21
  22 #include <com/sun/star/lang/XMultiComponentFactory.hpp>
  23
  24 #include <svl/pickerhistoryaccess.hxx>
  25 #include <officecfg/Office/Common.hxx>
  26
  27 #include <vcl/svapp.hxx>
  28
  29 #include "fpicker.hxx"
  30
  31 using css::uno::Reference;
  32 using css::uno::Sequence;
  33
  34 /*
  35  * FilePicker implementation.
  36  */
  37 static OUString FilePicker_getSystemPickerServiceName()
  38 {
  39 #ifdef UNX
  40     OUString aDesktopEnvironment (Application::GetDesktopEnvironment());
  41     if (aDesktopEnvironment.equalsIgnoreAsciiCase("macosx"))
  42         return "com.sun.star.ui.dialogs.AquaFilePicker";
  43     else
  44         return "com.sun.star.ui.dialogs.SystemFilePicker";
  45 #endif
  46 #ifdef _WIN32
  47     return "com.sun.star.ui.dialogs.Win32FilePicker";
  48 #endif
  49 }
  50
  51 Reference< css::uno::XInterface > FilePicker_CreateInstance (
  52     Reference< css::uno::XComponentContext > const & context)
  53 {
  54     Reference< css::uno::XInterface > xResult;
  55
  56     if (!context.is())
  57         return xResult;
  58
  59     Reference< css::lang::XMultiComponentFactory > xFactory (context->getServiceManager());
  60     if (xFactory.is() && officecfg::Office::Common::Misc::UseSystemFileDialog::get())
  61     {
  62         xResult.set( Application::createFilePicker( context ) );
  63
  64         if (!xResult.is())
  65         {
  66             try
  67             {
  68                 xResult = xFactory->createInstanceWithContext (
  69                         FilePicker_getSystemPickerServiceName(),
  70                         context);
  71             }
  72             catch (css::uno::Exception const &)
  73             {
  74                 // Handled below (see @ fallback).
  75             }
  76         }
  77     }
  78
  79
  80     if (!xResult.is() && xFactory.is())
  81     {
  82         // Always fall back to OfficeFilePicker.
  83         xResult = xFactory->createInstanceWithContext (
  84                 "com.sun.star.ui.dialogs.OfficeFilePicker",
  85                 context);
  86     }
  87     if (xResult.is())
  88     {
  89         // Add to FilePicker history.
  90         svt::addFilePicker (xResult);
  91     }
  92     return xResult;
  93 }
  94
  95 OUString FilePicker_getImplementationName()
  96 {
  97     return "com.sun.star.comp.svt.FilePicker";
  98 }
  99
 100 Sequence< OUString > FilePicker_getSupportedServiceNames()
 101 {
 102     Sequence< OUString > aServiceNames { "com.sun.star.ui.dialogs.FilePicker" };
 103     return aServiceNames;
 104 }
 105
 106 /*
 107  * FolderPicker implementation.
 108  */
 109 static OUString FolderPicker_getSystemPickerServiceName()
 110 {
 111 #ifdef UNX
 112     OUString aDesktopEnvironment (Application::GetDesktopEnvironment());
 113     if (aDesktopEnvironment.equalsIgnoreAsciiCase("macosx"))
 114         return "com.sun.star.ui.dialogs.AquaFolderPicker";
 115 #endif
 116     return "com.sun.star.ui.dialogs.SystemFolderPicker";
 117 }
 118
 119 Reference< css::uno::XInterface > FolderPicker_CreateInstance (
 120     Reference< css::uno::XComponentContext > const & context)
 121 {
 122     Reference< css::uno::XInterface > xResult;
 123
 124     if (!context.is())
 125         return xResult;
 126
 127     Reference< css::lang::XMultiComponentFactory > xFactory (context->getServiceManager());
 128     if (xFactory.is() && officecfg::Office::Common::Misc::UseSystemFileDialog::get())
 129     {
 130         xResult.set( Application::createFolderPicker( context ) );
 131         if (!xResult.is())
 132         {
 133             try
 134             {
 135                 xResult = xFactory->createInstanceWithContext (
 136                                 FolderPicker_getSystemPickerServiceName(),
 137                                 context);
 138             }
 139             catch (css::uno::Exception const &)
 140             {
 141                 // Handled below (see @ fallback).
 142             }
 143         }
 144     }
 145     if (!xResult.is() && xFactory.is() )
 146     {
 147         // Always fall back to OfficeFolderPicker.
 148         xResult = xFactory->createInstanceWithContext (
 149                  "com.sun.star.ui.dialogs.OfficeFolderPicker",
 150                 context);
 151     }
 152     if (xResult.is())
 153     {
 154         // Add to FolderPicker history.
 155         svt::addFolderPicker (xResult);
 156     }
 157     return xResult;
 158 }
 159
 160 OUString FolderPicker_getImplementationName()
 161 {
 162     return "com.sun.star.comp.svt.FolderPicker";
 163 }
 164
 165 Sequence< OUString > FolderPicker_getSupportedServiceNames()
 166 {
 167     Sequence< OUString > aServiceNames { "com.sun.star.ui.dialogs.FolderPicker" };
 168     return aServiceNames;
 169 }
 170
 171 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */