1
0
Fork 0
libreoffice/vcl/win/dtrans/FetcList.cxx
Daniel Baumann 8e63e14cf6
Adding upstream version 4:25.2.3.
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
2025-06-22 16:20:04 +02:00

340 lines
12 KiB
C++

/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
/*
* This file is part of the LibreOffice project.
*
* This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
*
* This file incorporates work covered by the following license notice:
*
* Licensed to the Apache Software Foundation (ASF) under one or more
* contributor license agreements. See the NOTICE file distributed
* with this work for additional information regarding copyright
* ownership. The ASF licenses this file to you under the Apache
* License, Version 2.0 (the "License"); you may not use this file
* except in compliance with the License. You may obtain a copy of
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
*/
#include <osl/diagnose.h>
#include "FetcList.hxx"
#include "Fetc.hxx"
#include <com/sun/star/container/NoSuchElementException.hpp>
#include <com/sun/star/datatransfer/MimeContentTypeFactory.hpp>
#include <com/sun/star/datatransfer/XMimeContentType.hpp>
#include "DataFmtTransl.hxx"
#include "ImplHelper.hxx"
#include "WinClip.hxx"
#include <algorithm>
#include "MimeAttrib.hxx"
using namespace com::sun::star::uno;
using namespace com::sun::star::datatransfer;
using namespace com::sun::star::lang;
using namespace com::sun::star::container;
LCID CFormatRegistrar::m_TxtLocale = 0;
sal_uInt32 CFormatRegistrar::m_TxtCodePage = GetACP( );
CFormatEtcContainer::CFormatEtcContainer( )
{
m_EnumIterator = m_FormatMap.begin( );
}
void CFormatEtcContainer::addFormatEtc( const CFormatEtc& fetc )
{
m_FormatMap.push_back( fetc );
}
void CFormatEtcContainer::removeFormatEtc( const CFormatEtc& fetc )
{
FormatEtcMap_t::iterator iter =
find( m_FormatMap.begin(), m_FormatMap.end(), fetc );
if ( iter != m_FormatMap.end( ) )
m_FormatMap.erase( iter );
}
void CFormatEtcContainer::removeAllFormatEtc( )
{
m_FormatMap.clear( );
}
bool CFormatEtcContainer::hasFormatEtc( const CFormatEtc& fetc ) const
{
FormatEtcMap_t::const_iterator iter =
find( m_FormatMap.begin(), m_FormatMap.end(), fetc );
return ( iter != m_FormatMap.end( ) );
}
bool CFormatEtcContainer::hasElements( ) const
{
return !m_FormatMap.empty();
}
void CFormatEtcContainer::beginEnumFormatEtc( )
{
m_EnumIterator = m_FormatMap.begin( );
}
sal_uInt32 CFormatEtcContainer::nextFormatEtc( LPFORMATETC lpFetc,
sal_uInt32 aNum )
{
OSL_ASSERT( lpFetc );
OSL_ASSERT( !IsBadWritePtr( lpFetc, sizeof( FORMATETC ) * aNum ) );
sal_uInt32 nFetched = 0;
for ( sal_uInt32 i = 0; i < aNum; i++, nFetched++, lpFetc++, ++m_EnumIterator )
{
if ( m_EnumIterator == m_FormatMap.end() )
break;
CopyFormatEtc( lpFetc, *m_EnumIterator );
}
return nFetched;
}
bool CFormatEtcContainer::skipFormatEtc( sal_uInt32 aNum )
{
FormatEtcMap_t::const_iterator iter_end = m_FormatMap.end( );
for ( sal_uInt32 i = 0;
(i < aNum) && (m_EnumIterator != iter_end);
i++, ++m_EnumIterator )
;/* intentionally left empty */
return ( m_EnumIterator != m_FormatMap.end( ) );
}
CFormatRegistrar::CFormatRegistrar( const Reference< XComponentContext >& rxContext,
const CDataFormatTranslator& aDataFormatTranslator ) :
m_DataFormatTranslator( aDataFormatTranslator ),
m_bHasSynthesizedLocale( false ),
m_xContext( rxContext )
{
}
// this function converts all DataFlavors of the given FlavorList into
// an appropriate FORMATETC structure, for some formats like unicodetext,
// text and text/html we will offer an accompany format e.g.:
//
// DataFlavor | Registered Clipformat | Registered accompany clipformat
// -------------------------|---------------------------|-----------------------------------
// text/plain;charset=ansi | CF_TEXT | CF_UNICODETEXT
// | | CF_LOCALE (if charset != GetACP()
// | |
// text/plain;charset=oem | CF_OEMTEXT | CF_UNICODETEXT
// | | CF_LOCALE (if charset != GetOEMCP()
// | |
// text/plain;charset=utf-16| CF_UNICODETEXT | CF_TEXT
// | |
// text/html | HTML (Hypertext ...) | HTML Format
// | |
//
// if some tries to register different text formats with different charsets the last
// registered wins and the others are ignored
void CFormatRegistrar::RegisterFormats(
const Reference< XTransferable >& aXTransferable, CFormatEtcContainer& aFormatEtcContainer )
{
Sequence< DataFlavor > aFlavorList = aXTransferable->getTransferDataFlavors( );
sal_Int32 nFlavors = aFlavorList.getLength( );
bool bUnicodeRegistered = false;
DataFlavor aFlavor;
for( sal_Int32 i = 0; i < nFlavors; i++ )
{
aFlavor = aFlavorList[i];
CFormatEtc fetc = m_DataFormatTranslator.getFormatEtcFromDataFlavor( aFlavor );
// maybe an internal format so we ignore it
if ( CF_INVALID == fetc.getClipformat( ) )
continue;
if ( !needsToSynthesizeAccompanyFormats( fetc ) )
aFormatEtcContainer.addFormatEtc( fetc );
else
{
// if we haven't registered any text format up to now
if ( CDataFormatTranslator::isTextFormat( fetc.getClipformat() ) && !bUnicodeRegistered )
{
// if the transferable supports unicode text we ignore
// any further text format the transferable offers
// because we can create it from Unicode text in addition
// we register CF_TEXT for non unicode clients
if ( CDataFormatTranslator::isUnicodeTextFormat( fetc.getClipformat() ) )
{
aFormatEtcContainer.addFormatEtc( fetc ); // add CF_UNICODE
aFormatEtcContainer.addFormatEtc(
CDataFormatTranslator::getFormatEtcForClipformat( CF_TEXT ) ); // add CF_TEXT
bUnicodeRegistered = true;
}
else if ( !hasUnicodeFlavor( aXTransferable ) )
{
// we try to investigate the charset and make a valid
// windows codepage from this charset the default
// return value is the result of GetACP( )
OUString charset = getCharsetFromDataFlavor( aFlavor );
sal_uInt32 txtCP = getWinCPFromMimeCharset( charset );
// we try to get a Locale appropriate for this codepage
if ( findLocaleForTextCodePage( ) )
{
m_TxtCodePage = txtCP;
aFormatEtcContainer.addFormatEtc(
CDataFormatTranslator::getFormatEtcForClipformat( CF_UNICODETEXT ) );
if ( !IsOEMCP( m_TxtCodePage ) )
aFormatEtcContainer.addFormatEtc(
CDataFormatTranslator::getFormatEtcForClipformat( CF_TEXT ) );
else
aFormatEtcContainer.addFormatEtc(
CDataFormatTranslator::getFormatEtcForClipformat( CF_OEMTEXT ) );
aFormatEtcContainer.addFormatEtc(
CDataFormatTranslator::getFormatEtcForClipformat( CF_LOCALE ) );
// we save the flavor so it's easier when
// queried for it in XTDataObject::GetData(...)
m_RegisteredTextFlavor = aFlavor;
m_bHasSynthesizedLocale = true;
}
}
}
else if ( CDataFormatTranslator::isTextHtmlFormat( fetc.getClipformat( ) ) ) // Html (Hyper Text...)
{
// we add text/html ( HTML (HyperText Markup Language) )
aFormatEtcContainer.addFormatEtc( fetc );
// and HTML Format
aFormatEtcContainer.addFormatEtc(
CDataFormatTranslator::getFormatEtcForClipformatName( "HTML Format" ) );
}
}
}
}
bool CFormatRegistrar::hasSynthesizedLocale( ) const
{
return m_bHasSynthesizedLocale;
}
LCID CFormatRegistrar::getSynthesizedLocale( )
{
return m_TxtLocale;
}
sal_uInt32 CFormatRegistrar::getRegisteredTextCodePage( )
{
return m_TxtCodePage;
}
DataFlavor CFormatRegistrar::getRegisteredTextFlavor( ) const
{
return m_RegisteredTextFlavor;
}
bool CFormatRegistrar::isSynthesizeableFormat( const CFormatEtc& aFormatEtc )
{
return ( CDataFormatTranslator::isOemOrAnsiTextFormat( aFormatEtc.getClipformat() ) ||
CDataFormatTranslator::isUnicodeTextFormat( aFormatEtc.getClipformat() ) ||
CDataFormatTranslator::isHTMLFormat( aFormatEtc.getClipformat() ) );
}
inline
bool CFormatRegistrar::needsToSynthesizeAccompanyFormats( const CFormatEtc& aFormatEtc )
{
return ( CDataFormatTranslator::isOemOrAnsiTextFormat( aFormatEtc.getClipformat() ) ||
CDataFormatTranslator::isUnicodeTextFormat( aFormatEtc.getClipformat() ) ||
CDataFormatTranslator::isTextHtmlFormat( aFormatEtc.getClipformat( ) ) );
}
OUString CFormatRegistrar::getCharsetFromDataFlavor( const DataFlavor& aFlavor )
{
OUString charset;
try
{
Reference< XMimeContentTypeFactory > xMimeFac =
MimeContentTypeFactory::create(m_xContext);
Reference< XMimeContentType > xMimeType( xMimeFac->createMimeContentType( aFlavor.MimeType ) );
if ( xMimeType->hasParameter( TEXTPLAIN_PARAM_CHARSET ) )
charset = xMimeType->getParameterValue( TEXTPLAIN_PARAM_CHARSET );
else
charset = getMimeCharsetFromWinCP( GetACP( ), PRE_WINDOWS_CODEPAGE );
}
catch(NoSuchElementException&)
{
OSL_FAIL( "Unexpected" );
}
catch(...)
{
OSL_FAIL( "Invalid data flavor" );
}
return charset;
}
bool CFormatRegistrar::hasUnicodeFlavor( const Reference< XTransferable >& aXTransferable ) const
{
DataFlavor aFlavor = m_DataFormatTranslator.getDataFlavorFromFormatEtc(CF_UNICODETEXT);
return aXTransferable->isDataFlavorSupported( aFlavor );
}
bool CFormatRegistrar::findLocaleForTextCodePage( )
{
m_TxtLocale = 0;
EnumSystemLocalesA( CFormatRegistrar::EnumLocalesProc, LCID_INSTALLED );
return IsValidLocale( m_TxtLocale, LCID_INSTALLED );
}
bool CFormatRegistrar::isLocaleCodePage( LCID lcid, LCTYPE lctype, sal_uInt32 codepage )
{
char buff[6];
sal_uInt32 localeCodePage;
OSL_ASSERT( IsValidLocale( lcid, LCID_INSTALLED ) );
// get the ansi codepage of the current locale
GetLocaleInfoA( lcid, lctype, buff, sizeof( buff ) );
localeCodePage = atol( buff );
return ( localeCodePage == codepage );
}
inline
bool CFormatRegistrar::isLocaleOemCodePage( LCID lcid, sal_uInt32 codepage )
{
return isLocaleCodePage( lcid, LOCALE_IDEFAULTCODEPAGE, codepage );
}
inline
bool CFormatRegistrar::isLocaleAnsiCodePage( LCID lcid, sal_uInt32 codepage )
{
return isLocaleCodePage( lcid, LOCALE_IDEFAULTANSICODEPAGE, codepage );
}
BOOL CALLBACK CFormatRegistrar::EnumLocalesProc( LPSTR lpLocaleStr )
{
// the lpLocaleStr parameter is hexadecimal
LCID lcid = strtol( lpLocaleStr, nullptr, 16 );
if ( isLocaleAnsiCodePage( lcid, CFormatRegistrar::m_TxtCodePage ) ||
isLocaleOemCodePage( lcid, CFormatRegistrar::m_TxtCodePage ) )
{
CFormatRegistrar::m_TxtLocale = lcid;
return false; // stop enumerating
}
return true;
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */