svx/source/fmcomp/dbaobjectex.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 <svx/dbaobjectex.hxx>
  21 #include <osl/diagnose.h>
  22 #include <com/sun/star/sdbcx/XTablesSupplier.hpp>
  23 #include <com/sun/star/sdb/XSQLQueryComposerFactory.hpp>
  24 #include <com/sun/star/ucb/XContent.hpp>
  25 #include <sot/formats.hxx>
  26 #include <sot/exchange.hxx>
  27
  28
  29 namespace svx
  30 {
  31
  32
  33     using namespace ::com::sun::star::uno;
  34     using namespace ::com::sun::star::beans;
  35     using namespace ::com::sun::star::ucb;
  36     using namespace ::com::sun::star::sdbcx;
  37     using namespace ::com::sun::star::container;
  38     using namespace ::com::sun::star::datatransfer;
  39
  40     OComponentTransferable::OComponentTransferable()
  41     {
  42     }
  43
  44     void OComponentTransferable::Update(const OUString& rDatasourceOrLocation
  45             ,const Reference< XContent>& xContent)
  46     {
  47         ClearFormats();
  48
  49         m_aDescriptor.setDataSource(rDatasourceOrLocation);
  50         m_aDescriptor[DataAccessDescriptorProperty::Component] <<= xContent;
  51
  52         AddSupportedFormats();
  53     }
  54
  55     SotClipboardFormatId OComponentTransferable::getDescriptorFormatId(bool _bExtractForm)
  56     {
  57         static SotClipboardFormatId s_nReportFormat = static_cast<SotClipboardFormatId>(-1);
  58         static SotClipboardFormatId s_nFormFormat = static_cast<SotClipboardFormatId>(-1);
  59         if ( _bExtractForm && static_cast<SotClipboardFormatId>(-1) == s_nFormFormat )
  60         {
  61             s_nFormFormat = SotExchange::RegisterFormatName(u"application/x-openoffice;windows_formatname=\"dbaccess.FormComponentDescriptorTransfer\""_ustr);
  62             OSL_ENSURE(static_cast<SotClipboardFormatId>(-1) != s_nFormFormat, "OComponentTransferable::getDescriptorFormatId: bad exchange id!");
  63         }
  64         else if ( !_bExtractForm && static_cast<SotClipboardFormatId>(-1) == s_nReportFormat)
  65         {
  66             s_nReportFormat = SotExchange::RegisterFormatName(u"application/x-openoffice;windows_formatname=\"dbaccess.ReportComponentDescriptorTransfer\""_ustr);
  67             OSL_ENSURE(static_cast<SotClipboardFormatId>(-1) != s_nReportFormat, "OComponentTransferable::getDescriptorFormatId: bad exchange id!");
  68         }
  69         return _bExtractForm ? s_nFormFormat : s_nReportFormat;
  70     }
  71
  72
  73     void OComponentTransferable::AddSupportedFormats()
  74     {
  75         bool bForm = true;
  76         try
  77         {
  78             Reference<XPropertySet> xProp;
  79             m_aDescriptor[DataAccessDescriptorProperty::Component] >>= xProp;
  80             if ( xProp.is() )
  81                 xProp->getPropertyValue(u"IsForm"_ustr) >>= bForm;
  82         }
  83         catch(const Exception&)
  84         {}
  85         AddFormat(getDescriptorFormatId(bForm));
  86     }
  87
  88
  89     bool OComponentTransferable::GetData( const DataFlavor& _rFlavor, const OUString& /*rDestDoc*/ )
  90     {
  91         const SotClipboardFormatId nFormatId = SotExchange::GetFormat(_rFlavor);
  92         if ( nFormatId == getDescriptorFormatId(true) || nFormatId == getDescriptorFormatId(false) )
  93             return SetAny( Any( m_aDescriptor.createPropertyValueSequence() ) );
  94
  95         return false;
  96     }
  97
  98
  99     bool OComponentTransferable::canExtractComponentDescriptor(const DataFlavorExVector& _rFlavors, bool _bForm )
 100     {
 101         SotClipboardFormatId nFormatId = getDescriptorFormatId(_bForm);
 102         return std::any_of(_rFlavors.begin(), _rFlavors.end(),
 103             [&nFormatId](const DataFlavorEx& rCheck) { return nFormatId == rCheck.mnSotId; });
 104     }
 105
 106
 107     ODataAccessDescriptor OComponentTransferable::extractComponentDescriptor(const TransferableDataHelper& _rData)
 108     {
 109         bool bForm = _rData.HasFormat(getDescriptorFormatId(true));
 110         if ( bForm || _rData.HasFormat(getDescriptorFormatId(false)) )
 111         {
 112             // the object has a real descriptor object (not just the old compatible format)
 113
 114             // extract the any from the transferable
 115             DataFlavor aFlavor;
 116             bool bSuccess =
 117                 SotExchange::GetFormatDataFlavor(getDescriptorFormatId(bForm), aFlavor);
 118             OSL_ENSURE(bSuccess, "OComponentTransferable::extractColumnDescriptor: invalid data format (no flavor)!");
 119
 120             Any aDescriptor = _rData.GetAny(aFlavor, OUString());
 121
 122             // extract the property value sequence
 123             Sequence< PropertyValue > aDescriptorProps;
 124             bSuccess = aDescriptor >>= aDescriptorProps;
 125             OSL_ENSURE(bSuccess, "OComponentTransferable::extractColumnDescriptor: invalid clipboard format!");
 126
 127             // build the real descriptor
 128             return ODataAccessDescriptor(aDescriptorProps);
 129         }
 130
 131         return ODataAccessDescriptor();
 132     }
 133
 134
 135 }
 136
 137
 138 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */