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