office-gobmx/xmloff/source/xforms/xformsapi.cxx
Noel Grandin 12008e1054 loplugin:ostr in xmloff
Change-Id: I24f5626e57e03217e4bcf77289c785e255b9f904
Reviewed-on: https://gerrit.libreoffice.org/c/core/+/167667
Reviewed-by: Noel Grandin <noel.grandin@collabora.co.uk>
Tested-by: Jenkins
2024-05-15 20:37:38 +02:00

295 lines
10 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 "xformsapi.hxx"
#include <com/sun/star/frame/XModel.hpp>
#include <com/sun/star/uno/Reference.hxx>
#include <com/sun/star/beans/XPropertySet.hpp>
#include <com/sun/star/container/XNameAccess.hpp>
#include <com/sun/star/xforms/XFormsSupplier.hpp>
#include <com/sun/star/xforms/XDataTypeRepository.hpp>
#include <com/sun/star/xforms/Model.hpp>
#include <com/sun/star/xforms/XModel2.hpp>
#include <com/sun/star/container/XNameContainer.hpp>
#include <com/sun/star/xsd/DataTypeClass.hpp>
#include <comphelper/processfactory.hxx>
#include <sal/log.hxx>
#include <comphelper/diagnose_ex.hxx>
#include <xmloff/xmltoken.hxx>
#include <xmloff/namespacemap.hxx>
#include <xmloff/xmlnamespace.hxx>
#include <xmloff/xmltkmap.hxx>
using com::sun::star::uno::Reference;
using com::sun::star::uno::Sequence;
using com::sun::star::uno::UNO_QUERY;
using com::sun::star::uno::UNO_QUERY_THROW;
using com::sun::star::beans::XPropertySet;
using com::sun::star::container::XNameAccess;
using com::sun::star::xforms::XFormsSupplier;
using com::sun::star::xforms::XDataTypeRepository;
using com::sun::star::xforms::Model;
using com::sun::star::xforms::XModel2;
using com::sun::star::container::XNameContainer;
using com::sun::star::uno::Any;
using com::sun::star::uno::Exception;
using namespace com::sun::star;
using namespace xmloff::token;
Reference<XModel2> xforms_createXFormsModel()
{
Reference<XModel2> xModel = Model::create( comphelper::getProcessComponentContext() );
return xModel;
}
void xforms_addXFormsModel(
const Reference<frame::XModel>& xDocument,
const Reference<xforms::XModel2>& xModel )
{
bool bSuccess = false;
try
{
Reference<XFormsSupplier> xSupplier( xDocument, UNO_QUERY );
if( xSupplier.is() )
{
Reference<XNameContainer> xForms = xSupplier->getXForms();
if( xForms.is() )
{
OUString sName;
xModel->getPropertyValue(u"ID"_ustr) >>= sName;
xForms->insertByName( sName, Any( xModel ) );
bSuccess = true;
}
}
}
catch( const Exception& )
{
; // no success!
}
// TODO: implement proper error handling
SAL_WARN_IF( !bSuccess, "xmloff", "can't import model" );
}
static Reference<XPropertySet> lcl_findXFormsBindingOrSubmission(
Reference<frame::XModel> const & xDocument,
const OUString& rBindingID,
bool bBinding )
{
// find binding by iterating over all models, and look for the
// given binding ID
Reference<XPropertySet> xRet;
try
{
// get supplier
Reference<XFormsSupplier> xSupplier( xDocument, UNO_QUERY );
if( xSupplier.is() )
{
// get XForms models
Reference<XNameContainer> xForms = xSupplier->getXForms();
if( xForms.is() )
{
// iterate over all models
const Sequence<OUString> aNames = xForms->getElementNames();
for( const auto& rName : aNames )
{
Reference<xforms::XModel2> xModel(
xForms->getByName( rName ), UNO_QUERY );
if( xModel.is() )
{
// ask model for bindings
Reference<XNameAccess> xBindings(
bBinding
? xModel->getBindings()
: xModel->getSubmissions(),
UNO_QUERY_THROW );
// finally, ask binding for name
if( xBindings->hasByName( rBindingID ) )
xRet.set( xBindings->getByName( rBindingID ),
UNO_QUERY );
}
if (xRet.is())
break;
}
}
}
}
catch( const Exception& )
{
; // no success!
}
// TODO: if (!xRet.is()) rImport.SetError(...);
return xRet;
}
Reference<XPropertySet> xforms_findXFormsBinding(
Reference<frame::XModel> const & xDocument,
const OUString& rBindingID )
{
return lcl_findXFormsBindingOrSubmission( xDocument, rBindingID, true );
}
Reference<XPropertySet> xforms_findXFormsSubmission(
Reference<frame::XModel> const & xDocument,
const OUString& rBindingID )
{
return lcl_findXFormsBindingOrSubmission( xDocument, rBindingID, false );
}
void xforms_setValueAny( Reference<XPropertySet> const & xPropertySet,
const OUString& rName,
const Any& rAny )
{
xPropertySet->setPropertyValue( rName, rAny );
}
const SvXMLTokenMapEntry aTypes[] =
{
{ XML_NAMESPACE_XSD, xmloff::token::XML_STRING, xmloff::token::XML_STRING },
{ XML_NAMESPACE_XSD, xmloff::token::XML_DECIMAL, xmloff::token::XML_DECIMAL },
{ XML_NAMESPACE_XSD, xmloff::token::XML_DOUBLE, xmloff::token::XML_DOUBLE },
{ XML_NAMESPACE_XSD, xmloff::token::XML_FLOAT, xmloff::token::XML_FLOAT },
{ XML_NAMESPACE_XSD, xmloff::token::XML_BOOLEAN, xmloff::token::XML_BOOLEAN },
{ XML_NAMESPACE_XSD, xmloff::token::XML_ANYURI, xmloff::token::XML_ANYURI },
{ XML_NAMESPACE_XSD, xmloff::token::XML_DATETIME_XSD, xmloff::token::XML_DATETIME_XSD },
{ XML_NAMESPACE_XSD, xmloff::token::XML_DATE, xmloff::token::XML_DATE },
{ XML_NAMESPACE_XSD, xmloff::token::XML_TIME, xmloff::token::XML_TIME },
{ XML_NAMESPACE_XSD, xmloff::token::XML_YEAR, xmloff::token::XML_YEAR },
{ XML_NAMESPACE_XSD, xmloff::token::XML_MONTH, xmloff::token::XML_MONTH },
{ XML_NAMESPACE_XSD, xmloff::token::XML_DAY, xmloff::token::XML_DAY },
XML_TOKEN_MAP_END
};
sal_uInt16 xforms_getTypeClass(
const Reference<XDataTypeRepository>& xRepository,
const SvXMLNamespaceMap& rNamespaceMap,
const OUString& rXMLName )
{
// translate name into token for local name
OUString sLocalName;
sal_uInt16 nPrefix = rNamespaceMap.GetKeyByAttrValueQName(rXMLName, &sLocalName);
static const SvXMLTokenMap aMap( aTypes );
sal_uInt16 nToken = aMap.Get( nPrefix, sLocalName );
sal_uInt16 nTypeClass = css::xsd::DataTypeClass::STRING;
if( nToken != XML_TOK_UNKNOWN )
{
// we found an XSD name: then get the proper API name for it
SAL_WARN_IF( !xRepository.is(), "xmloff", "can't find type without repository");
switch( nToken )
{
case XML_STRING:
nTypeClass = css::xsd::DataTypeClass::STRING;
break;
case XML_ANYURI:
nTypeClass = css::xsd::DataTypeClass::anyURI;
break;
case XML_DECIMAL:
nTypeClass = css::xsd::DataTypeClass::DECIMAL;
break;
case XML_DOUBLE:
nTypeClass = css::xsd::DataTypeClass::DOUBLE;
break;
case XML_FLOAT:
nTypeClass = css::xsd::DataTypeClass::FLOAT;
break;
case XML_BOOLEAN:
nTypeClass = css::xsd::DataTypeClass::BOOLEAN;
break;
case XML_DATETIME_XSD:
nTypeClass = css::xsd::DataTypeClass::DATETIME;
break;
case XML_DATE:
nTypeClass = css::xsd::DataTypeClass::DATE;
break;
case XML_TIME:
nTypeClass = css::xsd::DataTypeClass::TIME;
break;
case XML_YEAR:
nTypeClass = css::xsd::DataTypeClass::gYear;
break;
case XML_DAY:
nTypeClass = css::xsd::DataTypeClass::gDay;
break;
case XML_MONTH:
nTypeClass = css::xsd::DataTypeClass::gMonth;
break;
/* data types not yet supported:
nTypeClass = css::xsd::DataTypeClass::DURATION;
nTypeClass = css::xsd::DataTypeClass::gYearMonth;
nTypeClass = css::xsd::DataTypeClass::gMonthDay;
nTypeClass = css::xsd::DataTypeClass::hexBinary;
nTypeClass = css::xsd::DataTypeClass::base64Binary;
nTypeClass = css::xsd::DataTypeClass::QName;
nTypeClass = css::xsd::DataTypeClass::NOTATION;
*/
}
}
return nTypeClass;
}
OUString xforms_getTypeName(
const Reference<XDataTypeRepository>& xRepository,
const SvXMLNamespaceMap& rNamespaceMap,
const OUString& rXMLName )
{
OUString sLocalName;
sal_uInt16 nPrefix = rNamespaceMap.GetKeyByAttrValueQName(rXMLName, &sLocalName);
static const SvXMLTokenMap aMap( aTypes );
sal_uInt16 nToken = aMap.Get( nPrefix, sLocalName );
return ( nToken == XML_TOK_UNKNOWN )
? rXMLName
: xforms_getBasicTypeName( xRepository, rNamespaceMap, rXMLName );
}
OUString xforms_getBasicTypeName(
const Reference<XDataTypeRepository>& xRepository,
const SvXMLNamespaceMap& rNamespaceMap,
const OUString& rXMLName )
{
OUString sTypeName = rXMLName;
try
{
sTypeName =
xRepository->getBasicDataType(
xforms_getTypeClass( xRepository, rNamespaceMap, rXMLName ) )
->getName();
}
catch( const Exception& )
{
TOOLS_WARN_EXCEPTION("xmloff", "exception during type creation");
}
return sTypeName;
}
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */