1*cdf0e10cSrcweir /************************************************************************* 2*cdf0e10cSrcweir * 3*cdf0e10cSrcweir * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4*cdf0e10cSrcweir * 5*cdf0e10cSrcweir * Copyright 2000, 2010 Oracle and/or its affiliates. 6*cdf0e10cSrcweir * 7*cdf0e10cSrcweir * OpenOffice.org - a multi-platform office productivity suite 8*cdf0e10cSrcweir * 9*cdf0e10cSrcweir * This file is part of OpenOffice.org. 10*cdf0e10cSrcweir * 11*cdf0e10cSrcweir * OpenOffice.org is free software: you can redistribute it and/or modify 12*cdf0e10cSrcweir * it under the terms of the GNU Lesser General Public License version 3 13*cdf0e10cSrcweir * only, as published by the Free Software Foundation. 14*cdf0e10cSrcweir * 15*cdf0e10cSrcweir * OpenOffice.org is distributed in the hope that it will be useful, 16*cdf0e10cSrcweir * but WITHOUT ANY WARRANTY; without even the implied warranty of 17*cdf0e10cSrcweir * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18*cdf0e10cSrcweir * GNU Lesser General Public License version 3 for more details 19*cdf0e10cSrcweir * (a copy is included in the LICENSE file that accompanied this code). 20*cdf0e10cSrcweir * 21*cdf0e10cSrcweir * You should have received a copy of the GNU Lesser General Public License 22*cdf0e10cSrcweir * version 3 along with OpenOffice.org. If not, see 23*cdf0e10cSrcweir * <http://www.openoffice.org/license.html> 24*cdf0e10cSrcweir * for a copy of the LGPLv3 License. 25*cdf0e10cSrcweir * 26*cdf0e10cSrcweir ************************************************************************/ 27*cdf0e10cSrcweir 28*cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove 29*cdf0e10cSrcweir #include "precompiled_xmloff.hxx" 30*cdf0e10cSrcweir 31*cdf0e10cSrcweir #include <xmloff/xmlscripti.hxx> 32*cdf0e10cSrcweir #include "xmloff/xmlnmspe.hxx" 33*cdf0e10cSrcweir #include <xmloff/xmltoken.hxx> 34*cdf0e10cSrcweir #include <xmloff/xmlimp.hxx> 35*cdf0e10cSrcweir #include <xmloff/nmspmap.hxx> 36*cdf0e10cSrcweir #include <xmloff/XMLEventsImportContext.hxx> 37*cdf0e10cSrcweir #include "xmlbasici.hxx" 38*cdf0e10cSrcweir 39*cdf0e10cSrcweir #include <com/sun/star/document/XEventsSupplier.hpp> 40*cdf0e10cSrcweir #include <com/sun/star/document/XEmbeddedScripts.hpp> 41*cdf0e10cSrcweir 42*cdf0e10cSrcweir using ::rtl::OUString; 43*cdf0e10cSrcweir using namespace com::sun::star; 44*cdf0e10cSrcweir using namespace com::sun::star::uno; 45*cdf0e10cSrcweir using namespace com::sun::star::lang; 46*cdf0e10cSrcweir using namespace com::sun::star::frame; 47*cdf0e10cSrcweir using namespace com::sun::star::document; 48*cdf0e10cSrcweir using namespace com::sun::star::xml::sax; 49*cdf0e10cSrcweir using namespace ::xmloff::token; 50*cdf0e10cSrcweir 51*cdf0e10cSrcweir 52*cdf0e10cSrcweir // ============================================================================= 53*cdf0e10cSrcweir // XMLScriptChildContext: context for <office:script> element 54*cdf0e10cSrcweir // ============================================================================= 55*cdf0e10cSrcweir 56*cdf0e10cSrcweir class XMLScriptChildContext : public SvXMLImportContext 57*cdf0e10cSrcweir { 58*cdf0e10cSrcweir private: 59*cdf0e10cSrcweir ::com::sun::star::uno::Reference< ::com::sun::star::frame::XModel > m_xModel; 60*cdf0e10cSrcweir ::com::sun::star::uno::Reference< ::com::sun::star::document::XEmbeddedScripts > m_xDocumentScripts; 61*cdf0e10cSrcweir ::rtl::OUString m_aLanguage; 62*cdf0e10cSrcweir 63*cdf0e10cSrcweir public: 64*cdf0e10cSrcweir XMLScriptChildContext( SvXMLImport& rImport, sal_uInt16 nPrfx, const ::rtl::OUString& rLName, 65*cdf0e10cSrcweir const ::com::sun::star::uno::Reference< ::com::sun::star::frame::XModel>& rxModel, 66*cdf0e10cSrcweir const ::rtl::OUString& rLanguage ); 67*cdf0e10cSrcweir virtual ~XMLScriptChildContext(); 68*cdf0e10cSrcweir 69*cdf0e10cSrcweir virtual SvXMLImportContext* CreateChildContext( sal_uInt16 nPrefix, const ::rtl::OUString& rLocalName, 70*cdf0e10cSrcweir const ::com::sun::star::uno::Reference< ::com::sun::star::xml::sax::XAttributeList >& xAttrList ); 71*cdf0e10cSrcweir 72*cdf0e10cSrcweir virtual void EndElement(); 73*cdf0e10cSrcweir }; 74*cdf0e10cSrcweir 75*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 76*cdf0e10cSrcweir 77*cdf0e10cSrcweir XMLScriptChildContext::XMLScriptChildContext( SvXMLImport& rImport, sal_uInt16 nPrfx, const ::rtl::OUString& rLName, 78*cdf0e10cSrcweir const Reference< frame::XModel >& rxModel, const ::rtl::OUString& rLanguage ) 79*cdf0e10cSrcweir :SvXMLImportContext( rImport, nPrfx, rLName ) 80*cdf0e10cSrcweir ,m_xModel( rxModel ) 81*cdf0e10cSrcweir ,m_xDocumentScripts( rxModel, UNO_QUERY ) 82*cdf0e10cSrcweir ,m_aLanguage( rLanguage ) 83*cdf0e10cSrcweir { 84*cdf0e10cSrcweir } 85*cdf0e10cSrcweir 86*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 87*cdf0e10cSrcweir 88*cdf0e10cSrcweir XMLScriptChildContext::~XMLScriptChildContext() 89*cdf0e10cSrcweir { 90*cdf0e10cSrcweir } 91*cdf0e10cSrcweir 92*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 93*cdf0e10cSrcweir 94*cdf0e10cSrcweir SvXMLImportContext* XMLScriptChildContext::CreateChildContext( 95*cdf0e10cSrcweir sal_uInt16 nPrefix, const ::rtl::OUString& rLocalName, 96*cdf0e10cSrcweir const Reference< xml::sax::XAttributeList >& xAttrList ) 97*cdf0e10cSrcweir { 98*cdf0e10cSrcweir SvXMLImportContext* pContext = NULL; 99*cdf0e10cSrcweir 100*cdf0e10cSrcweir if ( m_xDocumentScripts.is() ) 101*cdf0e10cSrcweir { // document supports embedding scripts/macros 102*cdf0e10cSrcweir ::rtl::OUString aBasic( GetImport().GetNamespaceMap().GetPrefixByKey( XML_NAMESPACE_OOO ) ); 103*cdf0e10cSrcweir aBasic += ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":Basic" ) ); 104*cdf0e10cSrcweir 105*cdf0e10cSrcweir if ( m_aLanguage == aBasic && nPrefix == XML_NAMESPACE_OOO && IsXMLToken( rLocalName, XML_LIBRARIES ) ) 106*cdf0e10cSrcweir pContext = new XMLBasicImportContext( GetImport(), nPrefix, rLocalName, m_xModel ); 107*cdf0e10cSrcweir } 108*cdf0e10cSrcweir 109*cdf0e10cSrcweir if ( !pContext ) 110*cdf0e10cSrcweir pContext = SvXMLImportContext::CreateChildContext( nPrefix, rLocalName, xAttrList ); 111*cdf0e10cSrcweir 112*cdf0e10cSrcweir return pContext; 113*cdf0e10cSrcweir } 114*cdf0e10cSrcweir 115*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 116*cdf0e10cSrcweir 117*cdf0e10cSrcweir void XMLScriptChildContext::EndElement() 118*cdf0e10cSrcweir { 119*cdf0e10cSrcweir } 120*cdf0e10cSrcweir 121*cdf0e10cSrcweir // ============================================================================= 122*cdf0e10cSrcweir // XMLScriptContext: context for <office:scripts> element 123*cdf0e10cSrcweir // ============================================================================= 124*cdf0e10cSrcweir 125*cdf0e10cSrcweir XMLScriptContext::XMLScriptContext( SvXMLImport& rImport, sal_uInt16 nPrfx, const OUString& rLName, 126*cdf0e10cSrcweir const Reference<XModel>& rDocModel ) 127*cdf0e10cSrcweir :SvXMLImportContext( rImport, nPrfx, rLName ) 128*cdf0e10cSrcweir ,m_xModel( rDocModel ) 129*cdf0e10cSrcweir { 130*cdf0e10cSrcweir } 131*cdf0e10cSrcweir 132*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 133*cdf0e10cSrcweir 134*cdf0e10cSrcweir XMLScriptContext::~XMLScriptContext() 135*cdf0e10cSrcweir { 136*cdf0e10cSrcweir } 137*cdf0e10cSrcweir 138*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 139*cdf0e10cSrcweir 140*cdf0e10cSrcweir SvXMLImportContext* XMLScriptContext::CreateChildContext( 141*cdf0e10cSrcweir sal_uInt16 nPrefix, const OUString& rLName, 142*cdf0e10cSrcweir const Reference<XAttributeList>& xAttrList ) 143*cdf0e10cSrcweir { 144*cdf0e10cSrcweir SvXMLImportContext* pContext = NULL; 145*cdf0e10cSrcweir 146*cdf0e10cSrcweir if ( nPrefix == XML_NAMESPACE_OFFICE ) 147*cdf0e10cSrcweir { 148*cdf0e10cSrcweir if ( IsXMLToken( rLName, XML_EVENT_LISTENERS ) ) 149*cdf0e10cSrcweir { 150*cdf0e10cSrcweir Reference< XEventsSupplier> xSupplier( GetImport().GetModel(), UNO_QUERY ); 151*cdf0e10cSrcweir pContext = new XMLEventsImportContext( GetImport(), nPrefix, rLName, xSupplier ); 152*cdf0e10cSrcweir } 153*cdf0e10cSrcweir else if ( IsXMLToken( rLName, XML_SCRIPT ) ) 154*cdf0e10cSrcweir { 155*cdf0e10cSrcweir ::rtl::OUString aAttrName( GetImport().GetNamespaceMap().GetPrefixByKey( XML_NAMESPACE_SCRIPT ) ); 156*cdf0e10cSrcweir aAttrName += ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( ":language" ) ); 157*cdf0e10cSrcweir if ( xAttrList.is() ) 158*cdf0e10cSrcweir { 159*cdf0e10cSrcweir ::rtl::OUString aLanguage = xAttrList->getValueByName( aAttrName ); 160*cdf0e10cSrcweir 161*cdf0e10cSrcweir if ( m_xModel.is() ) 162*cdf0e10cSrcweir { 163*cdf0e10cSrcweir uno::Sequence< beans::PropertyValue > aMedDescr = m_xModel->getArgs(); 164*cdf0e10cSrcweir sal_Int32 nNewLen = aMedDescr.getLength() + 1; 165*cdf0e10cSrcweir aMedDescr.realloc( nNewLen ); 166*cdf0e10cSrcweir aMedDescr[nNewLen-1].Name = ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( "BreakMacroSignature" ) ); 167*cdf0e10cSrcweir aMedDescr[nNewLen-1].Value <<= (sal_Bool)sal_True; 168*cdf0e10cSrcweir m_xModel->attachResource( m_xModel->getURL(), aMedDescr ); 169*cdf0e10cSrcweir 170*cdf0e10cSrcweir pContext = new XMLScriptChildContext( GetImport(), nPrefix, rLName, m_xModel, aLanguage ); 171*cdf0e10cSrcweir } 172*cdf0e10cSrcweir } 173*cdf0e10cSrcweir } 174*cdf0e10cSrcweir } 175*cdf0e10cSrcweir 176*cdf0e10cSrcweir if ( !pContext ) 177*cdf0e10cSrcweir pContext = SvXMLImportContext::CreateChildContext( nPrefix, rLName, xAttrList); 178*cdf0e10cSrcweir 179*cdf0e10cSrcweir return pContext; 180*cdf0e10cSrcweir } 181*cdf0e10cSrcweir 182*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 183*cdf0e10cSrcweir 184*cdf0e10cSrcweir void XMLScriptContext::EndElement() 185*cdf0e10cSrcweir { 186*cdf0e10cSrcweir } 187*cdf0e10cSrcweir 188*cdf0e10cSrcweir // ----------------------------------------------------------------------------- 189