Line data Source code
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 "XMLStarBasicExportHandler.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 325 : XMLStarBasicExportHandler::XMLStarBasicExportHandler() :
36 : sStarBasic("StarBasic"),
37 : sLibrary("Library"),
38 : sMacroName("MacroName"),
39 : sStarOffice("StarOffice"),
40 325 : sApplication("application")
41 : {
42 325 : }
43 :
44 650 : XMLStarBasicExportHandler::~XMLStarBasicExportHandler()
45 : {
46 650 : }
47 :
48 0 : void XMLStarBasicExportHandler::Export(
49 : SvXMLExport& rExport,
50 : const OUString& rEventQName,
51 : Sequence<PropertyValue> & rValues,
52 : bool bUseWhitespace)
53 : {
54 : rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_LANGUAGE,
55 0 : rExport.GetNamespaceMap().GetQNameByKey(
56 0 : XML_NAMESPACE_OOO, sStarBasic ) );
57 0 : rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_EVENT_NAME, rEventQName);
58 :
59 0 : OUString sLocation, sName;
60 0 : sal_Int32 nCount = rValues.getLength();
61 0 : for(sal_Int32 i = 0; i < nCount; i++)
62 : {
63 0 : if (sLibrary.equals(rValues[i].Name))
64 : {
65 0 : OUString sTmp;
66 0 : rValues[i].Value >>= sTmp;
67 : sLocation = GetXMLToken(
68 0 : (sTmp.equalsIgnoreAsciiCase(sApplication) ||
69 0 : sTmp.equalsIgnoreAsciiCase(sStarOffice) ) ? XML_APPLICATION
70 0 : : XML_DOCUMENT );
71 : }
72 0 : else if (sMacroName.equals(rValues[i].Name))
73 : {
74 0 : rValues[i].Value >>= sName;
75 : }
76 : // else: disregard
77 : }
78 :
79 0 : if( !sLocation.isEmpty() )
80 : {
81 0 : OUStringBuffer sTmp( sLocation.getLength() + sName.getLength() + 1 );
82 0 : sTmp = sLocation;
83 0 : sTmp.append( ':' );
84 0 : sTmp.append( sName );
85 : rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_MACRO_NAME,
86 0 : sTmp.makeStringAndClear());
87 : }
88 : else
89 : {
90 0 : rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_MACRO_NAME, sName );
91 : }
92 :
93 : SvXMLElementExport aEventElemt(rExport, XML_NAMESPACE_SCRIPT,
94 : XML_EVENT_LISTENER,
95 0 : bUseWhitespace, false);
96 0 : }
97 :
98 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|