sdext/source/presenter/PresenterConfigurationAccess.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 "PresenterConfigurationAccess.hxx"
  21
  22 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
  23 #include <com/sun/star/beans/PropertyValue.hpp>
  24 #include <com/sun/star/container/XHierarchicalNameAccess.hpp>
  25 #include <com/sun/star/configuration/theDefaultProvider.hpp>
  26 #include <com/sun/star/util/XChangesBatch.hpp>
  27 #include <comphelper/propertysequence.hxx>
  28 #include <osl/diagnose.h>
  29 #include <tools/diagnose_ex.h>
  30
  31 using namespace ::com::sun::star;
  32 using namespace ::com::sun::star::uno;
  33
  34 namespace sdext { namespace presenter {
  35
  36 const OUString PresenterConfigurationAccess::msPresenterScreenRootName =
  37     "/org.openoffice.Office.PresenterScreen/";
  38
  39 PresenterConfigurationAccess::PresenterConfigurationAccess (
  40     const Reference<XComponentContext>& rxContext,
  41     const OUString& rsRootName,
  42     WriteMode eMode)
  43     : mxRoot(),
  44       maNode()
  45 {
  46     try
  47     {
  48         if (rxContext.is())
  49         {
  50             uno::Sequence<uno::Any> aCreationArguments(comphelper::InitAnyPropertySequence(
  51             {
  52                 {"nodepath", uno::Any(rsRootName)},
  53                 {"depth", uno::Any(sal_Int32(-1))}
  54             }));
  55
  56             OUString sAccessService;
  57             if (eMode == READ_ONLY)
  58                 sAccessService = "com.sun.star.configuration.ConfigurationAccess";
  59             else
  60                 sAccessService = "com.sun.star.configuration.ConfigurationUpdateAccess";
  61
  62             Reference<lang::XMultiServiceFactory> xProvider =
  63                 configuration::theDefaultProvider::get( rxContext );
  64             mxRoot = xProvider->createInstanceWithArguments(
  65                 sAccessService, aCreationArguments);
  66             maNode <<= mxRoot;
  67         }
  68     }
  69     catch (const Exception&)
  70     {
  71         DBG_UNHANDLED_EXCEPTION("sdext.presenter", "caught exception while opening configuration");
  72     }
  73 }
  74
  75 PresenterConfigurationAccess::~PresenterConfigurationAccess()
  76 {
  77 }
  78
  79 bool PresenterConfigurationAccess::IsValid() const
  80 {
  81     return mxRoot.is();
  82 }
  83
  84 Any PresenterConfigurationAccess::GetConfigurationNode (const OUString& sPathToNode)
  85 {
  86     return GetConfigurationNode(
  87         Reference<container::XHierarchicalNameAccess>(mxRoot, UNO_QUERY),
  88         sPathToNode);
  89 }
  90
  91 bool PresenterConfigurationAccess::GoToChild (const OUString& rsPathToNode)
  92 {
  93     if ( ! IsValid())
  94         return false;
  95
  96     Reference<container::XHierarchicalNameAccess> xNode (maNode, UNO_QUERY);
  97     if (xNode.is())
  98     {
  99         maNode = GetConfigurationNode(
 100             Reference<container::XHierarchicalNameAccess>(maNode, UNO_QUERY),
 101             rsPathToNode);
 102         if (Reference<XInterface>(maNode, UNO_QUERY).is())
 103             return true;
 104     }
 105
 106     mxRoot = nullptr;
 107     return false;
 108 }
 109
 110 bool PresenterConfigurationAccess::GoToChild (const Predicate& rPredicate)
 111 {
 112     if ( ! IsValid())
 113         return false;
 114
 115     maNode = Find(Reference<container::XNameAccess>(maNode,UNO_QUERY), rPredicate);
 116     if (Reference<XInterface>(maNode, UNO_QUERY).is())
 117         return true;
 118
 119     mxRoot = nullptr;
 120     return false;
 121 }
 122
 123 bool PresenterConfigurationAccess::SetProperty (
 124     const OUString& rsPropertyName,
 125     const Any& rValue)
 126 {
 127     Reference<beans::XPropertySet> xProperties (maNode, UNO_QUERY);
 128     if (xProperties.is())
 129     {
 130         xProperties->setPropertyValue(rsPropertyName, rValue);
 131         return true;
 132     }
 133     else
 134         return false;
 135 }
 136
 137 Any PresenterConfigurationAccess::GetConfigurationNode (
 138     const css::uno::Reference<css::container::XHierarchicalNameAccess>& rxNode,
 139     const OUString& sPathToNode)
 140 {
 141     if (sPathToNode.isEmpty())
 142         return Any(rxNode);
 143
 144     try
 145     {
 146         if (rxNode.is())
 147         {
 148             return rxNode->getByHierarchicalName(sPathToNode);
 149         }
 150     }
 151     catch (const Exception& rException)
 152     {
 153         SAL_WARN("sdext.presenter", "caught exception while getting configuration node " << sPathToNode << " : " << rException);
 154     }
 155
 156     return Any();
 157 }
 158
 159 Reference<beans::XPropertySet> PresenterConfigurationAccess::GetNodeProperties (
 160     const css::uno::Reference<css::container::XHierarchicalNameAccess>& rxNode,
 161     const OUString& rsPathToNode)
 162 {
 163     return Reference<beans::XPropertySet>(GetConfigurationNode(rxNode, rsPathToNode), UNO_QUERY);
 164 }
 165
 166 void PresenterConfigurationAccess::CommitChanges()
 167 {
 168     Reference<util::XChangesBatch> xConfiguration (mxRoot, UNO_QUERY);
 169     if (xConfiguration.is())
 170         xConfiguration->commitChanges();
 171 }
 172
 173 void PresenterConfigurationAccess::ForAll (
 174     const Reference<container::XNameAccess>& rxContainer,
 175     const ::std::vector<OUString>& rArguments,
 176     const ItemProcessor& rProcessor)
 177 {
 178     if (rxContainer.is())
 179     {
 180         ::std::vector<Any> aValues(rArguments.size());
 181         Sequence<OUString> aKeys (rxContainer->getElementNames());
 182         for (sal_Int32 nItemIndex=0; nItemIndex<aKeys.getLength(); ++nItemIndex)
 183         {
 184             bool bHasAllValues (true);
 185             const OUString& rsKey (aKeys[nItemIndex]);
 186             Reference<container::XNameAccess> xSetItem (rxContainer->getByName(rsKey), UNO_QUERY);
 187             Reference<beans::XPropertySet> xSet (xSetItem, UNO_QUERY);
 188             OSL_ASSERT(xSet.is());
 189             if (xSetItem.is())
 190             {
 191                 // Get from the current item of the container the children
 192                 // that match the names in the rArguments list.
 193                 for (size_t nValueIndex=0; nValueIndex<aValues.size(); ++nValueIndex)
 194                 {
 195                     if ( ! xSetItem->hasByName(rArguments[nValueIndex]))
 196                         bHasAllValues = false;
 197                     else
 198                         aValues[nValueIndex] = xSetItem->getByName(rArguments[nValueIndex]);
 199                 }
 200             }
 201             else
 202                 bHasAllValues = false;
 203             if (bHasAllValues)
 204                 rProcessor(aValues);
 205         }
 206     }
 207 }
 208
 209 void PresenterConfigurationAccess::ForAll (
 210     const Reference<container::XNameAccess>& rxContainer,
 211     const PropertySetProcessor& rProcessor)
 212 {
 213     if (rxContainer.is())
 214     {
 215         Sequence<OUString> aKeys (rxContainer->getElementNames());
 216         for (sal_Int32 nItemIndex=0; nItemIndex<aKeys.getLength(); ++nItemIndex)
 217         {
 218             const OUString& rsKey (aKeys[nItemIndex]);
 219             Reference<beans::XPropertySet> xSet (rxContainer->getByName(rsKey), UNO_QUERY);
 220             if (xSet.is())
 221                 rProcessor(rsKey, xSet);
 222         }
 223     }
 224 }
 225
 226 Any PresenterConfigurationAccess::Find (
 227     const Reference<container::XNameAccess>& rxContainer,
 228     const Predicate& rPredicate)
 229 {
 230     if (rxContainer.is())
 231     {
 232         Sequence<OUString> aKeys (rxContainer->getElementNames());
 233         for (sal_Int32 nItemIndex=0; nItemIndex<aKeys.getLength(); ++nItemIndex)
 234         {
 235             Reference<beans::XPropertySet> xProperties (
 236                 rxContainer->getByName(aKeys[nItemIndex]),
 237                 UNO_QUERY);
 238             if (xProperties.is())
 239                 if (rPredicate(aKeys[nItemIndex], xProperties))
 240                     return Any(xProperties);
 241         }
 242     }
 243     return Any();
 244 }
 245
 246 bool PresenterConfigurationAccess::IsStringPropertyEqual (
 247     const OUString& rsValue,
 248     const OUString& rsPropertyName,
 249     const css::uno::Reference<css::beans::XPropertySet>& rxNode)
 250 {
 251     OUString sValue;
 252     if (GetProperty(rxNode, rsPropertyName) >>= sValue)
 253         return sValue == rsValue;
 254     else
 255         return false;
 256 }
 257
 258 Any PresenterConfigurationAccess::GetProperty (
 259     const Reference<beans::XPropertySet>& rxProperties,
 260     const OUString& rsKey)
 261 {
 262     OSL_ASSERT(rxProperties.is());
 263     if ( ! rxProperties.is())
 264         return Any();
 265     try
 266     {
 267         Reference<beans::XPropertySetInfo> xInfo (rxProperties->getPropertySetInfo());
 268         if (xInfo.is())
 269             if ( ! xInfo->hasPropertyByName(rsKey))
 270                 return Any();
 271         return rxProperties->getPropertyValue(rsKey);
 272     }
 273     catch (beans::UnknownPropertyException&)
 274     {
 275     }
 276     return Any();
 277 }
 278
 279 } } // end of namespace sdext::tools
 280
 281 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */