/* -*- 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 #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "impastpl.hxx" using namespace ::com::sun::star; using namespace ::xmloff::token; // Class XMLAutoStyleFamily // ctor/dtor class XMLAutoStyleFamily XMLAutoStyleFamily::XMLAutoStyleFamily( XmlStyleFamily nFamily, OUString aStrName, rtl::Reference < SvXMLExportPropertyMapper > xMapper, OUString aStrPrefix, bool bAsFamily ) : mnFamily( nFamily ), maStrFamilyName(std::move( aStrName)), mxMapper(std::move( xMapper )), mnCount( 0 ), mnName( 0 ), maStrPrefix(std::move( aStrPrefix )), mbAsFamily( bAsFamily ) {} XMLAutoStyleFamily::XMLAutoStyleFamily( XmlStyleFamily nFamily ) : mnFamily(nFamily), mnCount(0), mnName(0), mbAsFamily(false) {} void XMLAutoStyleFamily::ClearEntries() { m_ParentSet.clear(); } static OUString data2string(void *data, const typelib_TypeDescriptionReference *type); static OUString struct2string(void *data, const typelib_TypeDescription *type) { assert(type->eTypeClass == typelib_TypeClass_STRUCT); OUStringBuffer result("{"); const typelib_CompoundTypeDescription *compoundType = &reinterpret_cast(type)->aBase; for (int i = 0; i < compoundType->nMembers; i++) { if (i > 0) result.append(":"); result.append( OUString::unacquired(&compoundType->ppMemberNames[i]) + "=" + data2string(static_cast(data)+compoundType->pMemberOffsets[i], compoundType->ppTypeRefs[i])); } result.append("}"); return result.makeStringAndClear(); } static OUString data2string(void *data, const typelib_TypeDescriptionReference *type) { switch (type->eTypeClass) { case typelib_TypeClass_VOID: return ""; case typelib_TypeClass_BOOLEAN: return *static_cast(data) ? OUString("true") : OUString("false"); case typelib_TypeClass_BYTE: return OUString::number(*static_cast(data)); case typelib_TypeClass_SHORT: return OUString::number(*static_cast(data)); case typelib_TypeClass_LONG: return OUString::number(*static_cast(data)); case typelib_TypeClass_HYPER: return OUString::number(*static_cast(data)); case typelib_TypeClass_UNSIGNED_SHORT: return OUString::number(*static_cast(data)); case typelib_TypeClass_UNSIGNED_LONG: return OUString::number((*static_cast(data)), 16); case typelib_TypeClass_UNSIGNED_HYPER: return OUString::number((*static_cast(data)), 16); case typelib_TypeClass_FLOAT: return OUString::number(*static_cast(data)); case typelib_TypeClass_DOUBLE: return OUString::number(*static_cast(data)); case typelib_TypeClass_CHAR: return ("U+" + OUString::number(*static_cast(data))); case typelib_TypeClass_STRING: return *static_cast(data); case typelib_TypeClass_TYPE: case typelib_TypeClass_SEQUENCE: case typelib_TypeClass_EXCEPTION: case typelib_TypeClass_INTERFACE: return "wtf"; case typelib_TypeClass_STRUCT: return struct2string(data, type->pType); case typelib_TypeClass_ENUM: return OUString::number(*static_cast(data)); default: assert(false); // this cannot happen I hope break; } return ""; } static OUString any2string(const uno::Any& any) { return data2string(const_cast(any.getValue()), any.pType); } // Class SvXMLAutoStylePoolProperties_Impl // ctor class SvXMLAutoStylePoolProperties_Impl XMLAutoStylePoolProperties::XMLAutoStylePoolProperties( XMLAutoStyleFamily& rFamilyData, std::vector< XMLPropertyState >&& rProperties, OUString const & rParentName ) : maProperties( std::move(rProperties) ), mnPos ( rFamilyData.mnCount ) { static bool bHack = (getenv("LIBO_ONEWAY_STABLE_ODF_EXPORT") != nullptr); if (bHack) { OUStringBuffer aStemBuffer(32); aStemBuffer.append( rFamilyData.maStrPrefix ); if (!rParentName.isEmpty()) { aStemBuffer.append("-" + rParentName); } // Create a name based on the properties used for(XMLPropertyState const & rState : maProperties) { if (rState.mnIndex == -1) continue; OUString sXMLName(rFamilyData.mxMapper->getPropertySetMapper()->GetEntryXMLName(rState.mnIndex)); if (sXMLName.isEmpty()) continue; aStemBuffer.append( "-" + OUString::number(static_cast(rFamilyData.mxMapper->getPropertySetMapper()->GetEntryNameSpace(rState.mnIndex))) + ":" + sXMLName + "=" + any2string(rState.maValue)); } #if 0 // Finally append an incremental counter in an attempt to make identical // styles always come out in the same order. Will see if this works. aStemBuffer.append("-z"); static sal_Int32 nCounter = 0; aStemBuffer.append(nCounter++)); #endif // create a name that hasn't been used before. The created name has not // to be added to the array, because it will never tried again msName = aStemBuffer; bool bWarned = false; while (rFamilyData.maNameSet.find(msName) != rFamilyData.maNameSet.end()) { if (!bWarned) SAL_WARN("xmloff", "Overlapping style name for " << msName); bWarned = true; rFamilyData.mnName++; msName = aStemBuffer + "-" + OUString::number( static_cast(rFamilyData.mnName) ); } rFamilyData.maNameSet.insert(msName); } else { // create a name that hasn't been used before. The created name has not // to be added to the array, because it will never tried again do { rFamilyData.mnName++; msName = rFamilyData.maStrPrefix + OUString::number( static_cast(rFamilyData.mnName) ); } while (rFamilyData.maNameSet.find(msName) != rFamilyData.maNameSet.end() || rFamilyData.maReservedNameSet.find(msName) != rFamilyData.maReservedNameSet.end()); } #if OSL_DEBUG_LEVEL > 0 std::set DebugProperties; for (XMLPropertyState const & rPropState : maProperties) { sal_Int32 const property(rPropState.mnIndex); // serious bug: will cause duplicate attributes to be exported assert(DebugProperties.find(property) == DebugProperties.end()); if (-1 != property) { DebugProperties.insert(property); } } #endif } bool operator<( const XMLAutoStyleFamily& r1, const XMLAutoStyleFamily& r2) { return r1.mnFamily < r2.mnFamily; } XMLAutoStylePoolParent::~XMLAutoStylePoolParent() { } namespace { struct ComparePartial { const XMLAutoStyleFamily& rFamilyData; bool operator()(const std::vector< XMLPropertyState >& lhs, const XMLAutoStylePoolProperties& rhs) const { return rFamilyData.mxMapper->LessPartial(lhs, rhs.GetProperties()); } bool operator()(const XMLAutoStylePoolProperties& lhs, const std::vector< XMLPropertyState >& rhs ) const { return rFamilyData.mxMapper->LessPartial(lhs.GetProperties(), rhs); } }; } // Adds an array of XMLPropertyState ( std::vector< XMLPropertyState > ) to list // if not added, yet. bool XMLAutoStylePoolParent::Add( XMLAutoStyleFamily& rFamilyData, std::vector< XMLPropertyState >&& rProperties, OUString& rName, bool bDontSeek ) { PropertiesListType::iterator pProperties = m_PropertiesList.end();; auto [itBegin, itEnd] = std::equal_range(m_PropertiesList.begin(), m_PropertiesList.end(), rProperties, ComparePartial{rFamilyData}); if (!bDontSeek) for (auto it = itBegin; it != itEnd; ++it) if (rFamilyData.mxMapper->Equals(it->GetProperties(), rProperties)) pProperties = it; bool bAdded = false; if( bDontSeek || pProperties == m_PropertiesList.end() ) { pProperties = m_PropertiesList.emplace(itBegin, rFamilyData, std::move(rProperties), msParent); bAdded = true; } rName = pProperties->GetName(); return bAdded; } // Adds an array of XMLPropertyState ( std::vector< XMLPropertyState > ) with a given name. // If the name exists already, nothing is done. If a style with a different name and // the same properties exists, a new one is added (like with bDontSeek). bool XMLAutoStylePoolParent::AddNamed( XMLAutoStyleFamily& rFamilyData, std::vector< XMLPropertyState >&& rProperties, const OUString& rName ) { if (rFamilyData.maNameSet.find(rName) != rFamilyData.maNameSet.end()) return false; auto it = std::lower_bound(m_PropertiesList.begin(), m_PropertiesList.end(), rProperties, ComparePartial{rFamilyData}); it = m_PropertiesList.emplace(it, rFamilyData, std::move(rProperties), msParent); // ignore the generated name it->SetName( rName ); return true; } // Search for an array of XMLPropertyState ( std::vector< XMLPropertyState > ) in list OUString XMLAutoStylePoolParent::Find( const XMLAutoStyleFamily& rFamilyData, const std::vector< XMLPropertyState >& rProperties ) const { OUString sName; auto [itBegin,itEnd] = std::equal_range(m_PropertiesList.begin(), m_PropertiesList.end(), rProperties, ComparePartial{rFamilyData}); for (auto it = itBegin; it != itEnd; ++it) if (rFamilyData.mxMapper->Equals(it->GetProperties(), rProperties)) sName = it->GetName(); return sName; } bool XMLAutoStylePoolParent::operator< (const XMLAutoStylePoolParent& rOther) const { return msParent < rOther.msParent; } // Class SvXMLAutoStylePool_Impl // ctor/dtor class SvXMLAutoStylePool_Impl SvXMLAutoStylePoolP_Impl::SvXMLAutoStylePoolP_Impl( SvXMLExport& rExp) : rExport( rExp ) { } SvXMLAutoStylePoolP_Impl::~SvXMLAutoStylePoolP_Impl() { } // Adds stylefamily-information to sorted list void SvXMLAutoStylePoolP_Impl::AddFamily( XmlStyleFamily nFamily, const OUString& rStrName, const rtl::Reference < SvXMLExportPropertyMapper > & rMapper, const OUString& rStrPrefix, bool bAsFamily ) { // store family in a list if not already stored SvXMLExportFlags nExportFlags = GetExport().getExportFlags(); bool bStylesOnly = (nExportFlags & SvXMLExportFlags::STYLES) && !(nExportFlags & SvXMLExportFlags::CONTENT); OUString aPrefix( rStrPrefix ); if( bStylesOnly ) { aPrefix = "M" + rStrPrefix; } #if OSL_DEBUG_LEVEL > 0 XMLAutoStyleFamily aTemp(nFamily); auto const iter = m_FamilySet.find(aTemp); if (iter != m_FamilySet.end()) { // FIXME: do we really intend to replace the previous nFamily // entry in this case ? SAL_WARN_IF( iter->mxMapper != rMapper, "xmloff", "Adding duplicate family " << rStrName << " with mismatching mapper ! " << typeid(iter->mxMapper.get()).name() << " " << typeid(*rMapper).name() ); } #endif m_FamilySet.emplace(nFamily, rStrName, rMapper, aPrefix, bAsFamily); } void SvXMLAutoStylePoolP_Impl::SetFamilyPropSetMapper( XmlStyleFamily nFamily, const rtl::Reference < SvXMLExportPropertyMapper > & rMapper ) { XMLAutoStyleFamily aTemp(nFamily); auto const iter = m_FamilySet.find(aTemp); if (iter != m_FamilySet.end()) const_cast(*iter).mxMapper = rMapper; } // Adds a name to list void SvXMLAutoStylePoolP_Impl::RegisterName( XmlStyleFamily nFamily, const OUString& rName ) { XMLAutoStyleFamily aTemp(nFamily); auto const iter = m_FamilySet.find(aTemp); assert(iter != m_FamilySet.end()); // family must be known const_cast(*iter).maNameSet.insert(rName); } // Adds a name to list void SvXMLAutoStylePoolP_Impl::RegisterDefinedName( XmlStyleFamily nFamily, const OUString& rName ) { XMLAutoStyleFamily aTemp(nFamily); auto const iter = m_FamilySet.find(aTemp); assert(iter != m_FamilySet.end()); // family must be known const_cast(*iter).maReservedNameSet.insert(rName); } // Retrieve the list of registered names void SvXMLAutoStylePoolP_Impl::GetRegisteredNames( uno::Sequence& rFamilies, uno::Sequence& rNames ) { // collect registered names + families std::vector aFamilies; std::vector aNames; // iterate over families for (XMLAutoStyleFamily const & rFamily : m_FamilySet) { // iterate over names for (const auto& rName : rFamily.maNameSet) { aFamilies.push_back( static_cast(rFamily.mnFamily) ); aNames.push_back( rName ); } } // copy the families + names into the sequence types assert(aFamilies.size() == aNames.size()); rFamilies.realloc( aFamilies.size() ); std::copy( aFamilies.begin(), aFamilies.end(), rFamilies.getArray() ); rNames.realloc( aNames.size() ); std::copy( aNames.begin(), aNames.end(), rNames.getArray() ); } /// retrieve the names of the properties used in the styles uno::Sequence SvXMLAutoStylePoolP_Impl::GetPropertyNames() { o3tl::sorted_vector aNames; // iterate over families for (XMLAutoStyleFamily const & rFamily : m_FamilySet) { rFamily.mxMapper->GetEntryAPINames(aNames); } return comphelper::containerToSequence(aNames); } // Adds an array of XMLPropertyState ( std::vector< XMLPropertyState > ) to list // if not added, yet. bool SvXMLAutoStylePoolP_Impl::Add( OUString& rName, XmlStyleFamily nFamily, const OUString& rParentName, ::std::vector< XMLPropertyState >&& rProperties, bool bDontSeek ) { XMLAutoStyleFamily aTemp(nFamily); auto const iter = m_FamilySet.find(aTemp); assert(iter != m_FamilySet.end()); // family must be known XMLAutoStyleFamily &rFamily = const_cast(*iter); auto itPair = rFamily.m_ParentSet.emplace(rParentName); XMLAutoStylePoolParent& rParent = const_cast(*itPair.first); bool bRet = false; if (rParent.Add(rFamily, std::move(rProperties), rName, bDontSeek)) { rFamily.mnCount++; bRet = true; } return bRet; } bool SvXMLAutoStylePoolP_Impl::AddNamed( const OUString& rName, XmlStyleFamily nFamily, const OUString& rParentName, std::vector< XMLPropertyState >&& rProperties ) { // get family and parent the same way as in Add() XMLAutoStyleFamily aTemp(nFamily); auto const iter = m_FamilySet.find(aTemp); assert(iter != m_FamilySet.end()); // family must be known XMLAutoStyleFamily &rFamily = const_cast(*iter); auto itPair = rFamily.m_ParentSet.emplace(rParentName); XMLAutoStylePoolParent& rParent = const_cast(*itPair.first); bool bRet = false; if (rParent.AddNamed(rFamily, std::move(rProperties), rName)) { rFamily.mnCount++; bRet = true; } return bRet; } // Search for an array of XMLPropertyState ( std::vector< XMLPropertyState > ) in list OUString SvXMLAutoStylePoolP_Impl::Find( XmlStyleFamily nFamily, const OUString& rParent, const std::vector< XMLPropertyState >& rProperties ) const { OUString sName; XMLAutoStyleFamily aTemp(nFamily); auto const iter = m_FamilySet.find(aTemp); assert(iter != m_FamilySet.end()); // family must be known XMLAutoStyleFamily const& rFamily = *iter; XMLAutoStylePoolParent aTmp(rParent); auto const it2 = rFamily.m_ParentSet.find(aTmp); if (it2 != rFamily.m_ParentSet.end()) { sName = it2->Find(rFamily, rProperties); } return sName; } std::vector SvXMLAutoStylePoolP_Impl::GetAutoStyleEntries() const { std::vector rReturnVector; for (XMLAutoStyleFamily const & rFamily : m_FamilySet) { rtl::Reference aPropertyMapper = rFamily.mxMapper->getPropertySetMapper(); for (XMLAutoStylePoolParent const & rParent : rFamily.m_ParentSet) { for (XMLAutoStylePoolProperties const & rProperty : rParent.GetPropertiesList()) { rReturnVector.emplace_back(); xmloff::AutoStyleEntry & rEntry = rReturnVector.back(); for (XMLPropertyState const & rPropertyState : rProperty.GetProperties()) { if (rPropertyState.mnIndex >= 0) { OUString sXmlName = aPropertyMapper->GetEntryXMLName(rPropertyState.mnIndex); rEntry.m_aXmlProperties.emplace_back(sXmlName, rPropertyState.maValue); } } } } } return rReturnVector; } namespace { struct AutoStylePoolExport { const OUString* mpParent; XMLAutoStylePoolProperties* mpProperties; AutoStylePoolExport() : mpParent(nullptr), mpProperties(nullptr) {} }; struct StyleComparator { bool operator() (const AutoStylePoolExport& a, const AutoStylePoolExport& b) { return (a.mpProperties->GetName() < b.mpProperties->GetName() || (a.mpProperties->GetName() == b.mpProperties->GetName() && *a.mpParent < *b.mpParent)); } }; } void SvXMLAutoStylePoolP_Impl::exportXML( XmlStyleFamily nFamily, const SvXMLAutoStylePoolP *pAntiImpl) const { // Get list of parents for current family (nFamily) XMLAutoStyleFamily aTemp(nFamily); auto const iter = m_FamilySet.find(aTemp); assert(iter != m_FamilySet.end()); // family must be known const XMLAutoStyleFamily &rFamily = *iter; sal_uInt32 nCount = rFamily.mnCount; if (!nCount) return; // create, initialize and fill helper-structure (SvXMLAutoStylePoolProperties_Impl) // which contains a parent-name and a SvXMLAutoStylePoolProperties_Impl std::vector aExpStyles(nCount); for (XMLAutoStylePoolParent const& rParent : rFamily.m_ParentSet) { size_t nProperties = rParent.GetPropertiesList().size(); for( size_t j = 0; j < nProperties; j++ ) { const XMLAutoStylePoolProperties & rProperties = rParent.GetPropertiesList()[j]; sal_uInt32 nPos = rProperties.GetPos(); assert(nPos < nCount); assert(!aExpStyles[nPos].mpProperties); aExpStyles[nPos].mpProperties = &const_cast(rProperties); aExpStyles[nPos].mpParent = &rParent.GetParent(); } } static bool bHack = (getenv("LIBO_ONEWAY_STABLE_ODF_EXPORT") != nullptr); if (bHack) { std::sort(aExpStyles.begin(), aExpStyles.end(), StyleComparator()); for (size_t i = 0; i < nCount; i++) { OUString oldName = aExpStyles[i].mpProperties->GetName(); sal_Int32 dashIx = oldName.indexOf('-'); OUString newName = (dashIx > 0 ? oldName.copy(0, dashIx) : oldName) + OUString::number(i); aExpStyles[i].mpProperties->SetName(newName); } } // create string to export for each XML-style. That means for each property-list OUString aStrFamilyName = rFamily.maStrFamilyName; for( size_t i = 0; i < nCount; i++ ) { assert(aExpStyles[i].mpProperties); if( aExpStyles[i].mpProperties ) { GetExport().AddAttribute( XML_NAMESPACE_STYLE, XML_NAME, aExpStyles[i].mpProperties->GetName() ); bool bExtensionNamespace = false; if( rFamily.mbAsFamily ) { GetExport().AddAttribute( XML_NAMESPACE_STYLE, XML_FAMILY, aStrFamilyName ); if(aStrFamilyName != "graphic" && aStrFamilyName != "drawing-page" && aStrFamilyName != "presentation" && aStrFamilyName != "chart" ) bExtensionNamespace = true; } if( !aExpStyles[i].mpParent->isEmpty() ) { GetExport().AddAttribute( XML_NAMESPACE_STYLE, XML_PARENT_STYLE_NAME, GetExport().EncodeStyleName( *aExpStyles[i].mpParent ) ); } OUString sName; if( rFamily.mbAsFamily ) sName = GetXMLToken(XML_STYLE); else sName = rFamily.maStrFamilyName; pAntiImpl->exportStyleAttributes(GetExport().GetAttrList(), nFamily, aExpStyles[i].mpProperties->GetProperties(), *rFamily.mxMapper, GetExport().GetMM100UnitConverter(), GetExport().GetNamespaceMap()); SvXMLElementExport aElem( GetExport(), XML_NAMESPACE_STYLE, sName, true, true ); sal_Int32 nStart(-1); sal_Int32 nEnd(-1); if (nFamily == XmlStyleFamily::PAGE_MASTER) { nStart = 0; sal_Int32 nIndex = 0; rtl::Reference< XMLPropertySetMapper > aPropMapper = rFamily.mxMapper->getPropertySetMapper(); sal_Int16 nContextID; while(nIndex < aPropMapper->GetEntryCount() && nEnd == -1) { nContextID = aPropMapper->GetEntryContextId( nIndex ); if (nContextID && ((nContextID & CTF_PM_FLAGMASK) != XML_PM_CTF_START)) nEnd = nIndex; nIndex++; } if (nEnd == -1) nEnd = nIndex; } rFamily.mxMapper->exportXML( GetExport(), aExpStyles[i].mpProperties->GetProperties(), nStart, nEnd, SvXmlExportFlags::IGN_WS, bExtensionNamespace ); pAntiImpl->exportStyleContent(GetExport().GetDocHandler(), nFamily, aExpStyles[i].mpProperties->GetProperties(), *rFamily.mxMapper, GetExport().GetMM100UnitConverter(), GetExport().GetNamespaceMap()); } } } void SvXMLAutoStylePoolP_Impl::ClearEntries() { for (auto & aI : m_FamilySet) const_cast(aI).ClearEntries(); } /* vim:set shiftwidth=4 softtabstop=4 expandtab: */