1 files changed, 111 insertions, 0 deletions
diff --git a/xmloff/source/script/XMLStarBasicExportHandler.cxx b/xmloff/source/script/XMLStarBasicExportHandler.cxx
new file mode 100644
index 000000000000..ee945f4a74cc
--- /dev/null
+++ b/xmloff/source/script/XMLStarBasicExportHandler.cxx
@@ -0,0 +1,111 @@
+/*************************************************************************
+ *
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * Copyright 2000, 2010 Oracle and/or its affiliates.
+ *
+ * OpenOffice.org - a multi-platform office productivity suite
+ *
+ * This file is part of OpenOffice.org.
+ *
+ * OpenOffice.org is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License version 3
+ * only, as published by the Free Software Foundation.
+ *
+ * OpenOffice.org is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Lesser General Public License version 3 for more details
+ * (a copy is included in the LICENSE file that accompanied this code).
+ *
+ * You should have received a copy of the GNU Lesser General Public License
+ * version 3 along with OpenOffice.org.  If not, see
+ * <http://www.openoffice.org/license.html>
+ * for a copy of the LGPLv3 License.
+ *
+ ************************************************************************/
+
+// MARKER(update_precomp.py): autogen include statement, do not remove
+#include "precompiled_xmloff.hxx"
+#include "XMLStarBasicExportHandler.hxx"
+
+#ifndef _COM_SUN_STAR_BEANS_PROPERTYVALUE_HPP
+#include <com/sun/star/beans/PropertyValue.hpp>
+#endif
+#include <tools/debug.hxx>
+#include <xmloff/xmlexp.hxx>
+#include <xmloff/xmltoken.hxx>
+#include <xmloff/nmspmap.hxx>
+#include "xmlnmspe.hxx"
+
+
+using namespace ::com::sun::star::uno;
+using namespace ::xmloff::token;
+
+using ::rtl::OUString;
+using ::rtl::OUStringBuffer;
+using ::com::sun::star::beans::PropertyValue;
+
+
+XMLStarBasicExportHandler::XMLStarBasicExportHandler() :
+    sStarBasic(RTL_CONSTASCII_USTRINGPARAM("StarBasic")),
+    sLibrary(RTL_CONSTASCII_USTRINGPARAM("Library")),
+    sMacroName(RTL_CONSTASCII_USTRINGPARAM("MacroName")),
+    sStarOffice(RTL_CONSTASCII_USTRINGPARAM("StarOffice")),
+    sApplication(RTL_CONSTASCII_USTRINGPARAM("application"))
+{
+}
+
+XMLStarBasicExportHandler::~XMLStarBasicExportHandler()
+{
+}
+
+void XMLStarBasicExportHandler::Export(
+    SvXMLExport& rExport,
+    const OUString& rEventQName,
+    Sequence<PropertyValue> & rValues,
+    sal_Bool bUseWhitespace)
+{
+    rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_LANGUAGE,
+                         rExport.GetNamespaceMap().GetQNameByKey(
+                             XML_NAMESPACE_OOO, sStarBasic ) );
+    rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_EVENT_NAME, rEventQName);
+
+    OUString sLocation, sName;
+    sal_Int32 nCount = rValues.getLength();
+    for(sal_Int32 i = 0; i < nCount; i++)
+    {
+        if (sLibrary.equals(rValues[i].Name))
+        {
+            OUString sTmp;
+            rValues[i].Value >>= sTmp;
+            sLocation = GetXMLToken(
+                (sTmp.equalsIgnoreAsciiCase(sApplication) ||
+                 sTmp.equalsIgnoreAsciiCase(sStarOffice) ) ? XML_APPLICATION
+                                                           : XML_DOCUMENT );
+        }
+        else if (sMacroName.equals(rValues[i].Name))
+        {
+            rValues[i].Value >>= sName;
+        }
+        // else: disregard
+    }
+
+    if( sLocation.getLength() )
+    {
+        OUStringBuffer sTmp( sLocation.getLength() + sName.getLength() + 1 );
+        sTmp = sLocation;
+        sTmp.append( sal_Unicode( ':' ) );
+        sTmp.append( sName );
+        rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_MACRO_NAME,
+                            sTmp.makeStringAndClear());
+    }
+    else
+    {
+        rExport.AddAttribute(XML_NAMESPACE_SCRIPT, XML_MACRO_NAME, sName );
+    }
+
+    SvXMLElementExport aEventElemt(rExport, XML_NAMESPACE_SCRIPT,
+                                   XML_EVENT_LISTENER,
+                                   bUseWhitespace, sal_False);
+}