xmloff/source/script/XMLScriptExportHandler.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 "XMLScriptExportHandler.hxx"
  21
  22 #include <com/sun/star/beans/PropertyValue.hpp>
  23 #include <xmloff/xmlexp.hxx>
  24 #include <xmloff/xmltoken.hxx>
  25 #include <xmloff/nmspmap.hxx>
  26 #include <xmloff/xmlnmspe.hxx>
  27
  28
  29 using namespace ::com::sun::star::uno;
  30 using namespace ::xmloff::token;
  31
  32 using ::com::sun::star::beans::PropertyValue;
  33
  34
  35 XMLScriptExportHandler::XMLScriptExportHandler() :
  36     sURL("Script")
  37 {
  38 }
  39
  40 XMLScriptExportHandler::~XMLScriptExportHandler()
  41 {
  42 }
  43
  44 void XMLScriptExportHandler::Export(
  45     SvXMLExport& rExport,
  46     const OUString& rEventQName,
  47     Sequence<PropertyValue> & rValues,
  48     bool bUseWhitespace)
  49 {
  50
  51     rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_LANGUAGE,
  52                          rExport.GetNamespaceMap().GetQNameByKey(
  53                              XML_NAMESPACE_OOO, GetXMLToken(XML_SCRIPT) ) );
  54     rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_EVENT_NAME, rEventQName);
  55
  56     sal_Int32 nCount = rValues.getLength();
  57     for(sal_Int32 i = 0; i < nCount; i++)
  58     {
  59         if (sURL.equals(rValues[i].Name))
  60         {
  61             OUString sTmp;
  62             rValues[i].Value >>= sTmp;
  63             rExport.AddAttribute(XML_NAMESPACE_XLINK, XML_HREF, sTmp);
  64
  65             // #i110911# xlink:type="simple" is required
  66             rExport.AddAttribute(XML_NAMESPACE_XLINK, XML_TYPE, XML_SIMPLE);
  67         }
  68         // else: disregard
  69     }
  70
  71     SvXMLElementExport aEventElemt(rExport, XML_NAMESPACE_SCRIPT,
  72                                    XML_EVENT_LISTENER,
  73                                    bUseWhitespace, false);
  74 }
  75
  76 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */