LibreOffice Module xmloff (master) 1
XMLStarBasicExportHandler.cxx
Go to the documentation of this file.
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
21
22#include <com/sun/star/beans/PropertyValue.hpp>
23#include <xmloff/xmlexp.hxx>
24#include <xmloff/xmltoken.hxx>
27
28
29using namespace ::com::sun::star::uno;
30using namespace ::xmloff::token;
31
32using ::com::sun::star::beans::PropertyValue;
33
34
35constexpr OUStringLiteral gsStarBasic(u"StarBasic");
36constexpr OUStringLiteral gsLibrary(u"Library");
37constexpr OUStringLiteral gsMacroName(u"MacroName");
38constexpr OUStringLiteral gsStarOffice(u"StarOffice");
39constexpr OUStringLiteral gsApplication(u"application");
40
42{
43}
44
46{
47}
48
50 SvXMLExport& rExport,
51 const OUString& rEventQName,
52 const Sequence<PropertyValue> & rValues,
53 bool bUseWhitespace)
54{
59
60 OUString sLocation, sName;
61 for(const auto& rValue : rValues)
62 {
63 if (gsLibrary == rValue.Name)
64 {
65 OUString sTmp;
66 rValue.Value >>= sTmp;
67 sLocation = GetXMLToken(
68 (sTmp.equalsIgnoreAsciiCase(gsApplication) ||
69 sTmp.equalsIgnoreAsciiCase(gsStarOffice) ) ? XML_APPLICATION
70 : XML_DOCUMENT );
71 }
72 else if (gsMacroName == rValue.Name)
73 {
74 rValue.Value >>= sName;
75 }
76 // else: disregard
77 }
78
79 if( !sLocation.isEmpty() )
80 {
81 OUString sTmp = sLocation + ":" + sName;
83 sTmp);
84 }
85 else
86 {
88 }
89
90 SvXMLElementExport aEventElemt(rExport, XML_NAMESPACE_SCRIPT,
92 bUseWhitespace, false);
93}
94
95/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
constexpr OUStringLiteral gsStarOffice(u"StarOffice")
constexpr OUStringLiteral gsApplication(u"application")
constexpr OUStringLiteral gsLibrary(u"Library")
constexpr OUStringLiteral gsMacroName(u"MacroName")
constexpr OUStringLiteral gsStarBasic(u"StarBasic")
const SvXMLNamespaceMap & GetNamespaceMap() const
Definition: xmlexp.hxx:385
void AddAttribute(sal_uInt16 nPrefix, const OUString &rName, const OUString &rValue)
Definition: xmlexp.cxx:907
OUString GetQNameByKey(sal_uInt16 nKey, const OUString &rLocalName, bool bCache=true) const
virtual void Export(SvXMLExport &rExport, const OUString &rEventName, const css::uno::Sequence< css::beans::PropertyValue > &rValues, bool bUseWhitespace) override
virtual ~XMLStarBasicExportHandler() override
OUString sName
Handling of tokens in XML:
const OUString & GetXMLToken(enum XMLTokenEnum eToken)
return the OUString representation for eToken
Definition: xmltoken.cxx:3541
constexpr sal_uInt16 XML_NAMESPACE_OOO
constexpr sal_uInt16 XML_NAMESPACE_SCRIPT