diff options
Diffstat (limited to 'xmlscript')
39 files changed, 11418 insertions, 0 deletions
diff --git a/xmlscript/CppunitTest_xmlscript_cppunit.mk b/xmlscript/CppunitTest_xmlscript_cppunit.mk new file mode 100644 index 000000000..cedf2c50e --- /dev/null +++ b/xmlscript/CppunitTest_xmlscript_cppunit.mk @@ -0,0 +1,43 @@ +# -*- Mode: makefile-gmake; tab-width: 4; indent-tabs-mode: t -*- +# +# This file is part of the LibreOffice project. +# +# This Source Code Form is subject to the terms of the Mozilla Public +# License, v. 2.0. If a copy of the MPL was not distributed with this +# file, You can obtain one at http://mozilla.org/MPL/2.0/. +# + +$(eval $(call gb_CppunitTest_CppunitTest,xmlscript_cppunit)) + +$(eval $(call gb_CppunitTest_add_exception_objects,xmlscript_cppunit, \ + xmlscript/qa/cppunit/test \ +)) + +$(eval $(call gb_CppunitTest_use_sdk_api,xmlscript_cppunit)) +$(eval $(call gb_CppunitTest_use_ure,xmlscript_cppunit)) +$(eval $(call gb_CppunitTest_use_vcl,xmlscript_cppunit)) +$(eval $(call gb_CppunitTest_use_rdb,xmlscript_cppunit,services)) + +$(eval $(call gb_CppunitTest_use_custom_headers,xmlscript_cppunit,\ + officecfg/registry \ +)) + +$(eval $(call gb_CppunitTest_use_externals,xmlscript_cppunit,\ + libxml2 \ +)) + +$(eval $(call gb_CppunitTest_use_configuration,xmlscript_cppunit)) + +$(eval $(call gb_CppunitTest_use_libraries,xmlscript_cppunit, \ + comphelper \ + cppu \ + cppuhelper \ + fwk \ + sal \ + test \ + unotest \ + utl \ + xmlscript \ +)) + +# vim: set noet sw=4 ts=4: diff --git a/xmlscript/IwyuFilter_xmlscript.yaml b/xmlscript/IwyuFilter_xmlscript.yaml new file mode 100644 index 000000000..ee208d992 --- /dev/null +++ b/xmlscript/IwyuFilter_xmlscript.yaml @@ -0,0 +1,2 @@ +--- +assumeFilename: xmlscript/source/xmldlg_imexp/xmldlg_import.cxx diff --git a/xmlscript/Library_xmlscript.mk b/xmlscript/Library_xmlscript.mk new file mode 100644 index 000000000..7a26dc333 --- /dev/null +++ b/xmlscript/Library_xmlscript.mk @@ -0,0 +1,54 @@ +# -*- Mode: makefile-gmake; tab-width: 4; indent-tabs-mode: t -*- +# +# This file is part of the LibreOffice project. +# +# This Source Code Form is subject to the terms of the Mozilla Public +# License, v. 2.0. If a copy of the MPL was not distributed with this +# file, You can obtain one at http://mozilla.org/MPL/2.0/. +# + +$(eval $(call gb_Library_Library,xmlscript)) + +$(eval $(call gb_Library_use_external,xmlscript,boost_headers)) + +$(eval $(call gb_Library_set_componentfile,xmlscript,xmlscript/util/xmlscript,services)) + +$(eval $(call gb_Library_use_sdk_api,xmlscript)) + +$(eval $(call gb_Library_use_libraries,xmlscript,\ + comphelper \ + cppu \ + cppuhelper \ + sal \ + tl \ + i18nlangtag \ +)) + +$(eval $(call gb_Library_set_include,xmlscript,\ + -I$(SRCDIR)/xmlscript/source/inc \ + $$(INCLUDE) \ +)) + +$(eval $(call gb_Library_add_defs,xmlscript,\ + -DXMLSCRIPT_DLLIMPLEMENTATION \ +)) + +$(eval $(call gb_Library_set_precompiled_header,xmlscript,xmlscript/inc/pch/precompiled_xmlscript)) + +$(eval $(call gb_Library_add_exception_objects,xmlscript,\ + xmlscript/source/xml_helper/xml_byteseq \ + xmlscript/source/xml_helper/xml_element \ + xmlscript/source/xml_helper/xml_impctx \ + xmlscript/source/xmldlg_imexp/xmldlg_addfunc \ + xmlscript/source/xmldlg_imexp/xmldlg_expmodels \ + xmlscript/source/xmldlg_imexp/xmldlg_export \ + xmlscript/source/xmldlg_imexp/xmldlg_impmodels \ + xmlscript/source/xmldlg_imexp/xmldlg_import \ + xmlscript/source/xmlflat_imexp/xmlbas_export \ + xmlscript/source/xmllib_imexp/xmllib_export \ + xmlscript/source/xmllib_imexp/xmllib_import \ + xmlscript/source/xmlmod_imexp/xmlmod_export \ + xmlscript/source/xmlmod_imexp/xmlmod_import \ +)) + +# vim: set noet sw=4 ts=4: diff --git a/xmlscript/Makefile b/xmlscript/Makefile new file mode 100644 index 000000000..0997e6284 --- /dev/null +++ b/xmlscript/Makefile @@ -0,0 +1,14 @@ +# -*- Mode: makefile-gmake; tab-width: 4; indent-tabs-mode: t -*- +# +# This file is part of the LibreOffice project. +# +# This Source Code Form is subject to the terms of the Mozilla Public +# License, v. 2.0. If a copy of the MPL was not distributed with this +# file, You can obtain one at http://mozilla.org/MPL/2.0/. +# + +module_directory:=$(dir $(realpath $(firstword $(MAKEFILE_LIST)))) + +include $(module_directory)/../solenv/gbuild/partial_build.mk + +# vim: set noet sw=4 ts=4: diff --git a/xmlscript/Module_xmlscript.mk b/xmlscript/Module_xmlscript.mk new file mode 100644 index 000000000..c76702a70 --- /dev/null +++ b/xmlscript/Module_xmlscript.mk @@ -0,0 +1,21 @@ +# -*- Mode: makefile-gmake; tab-width: 4; indent-tabs-mode: t -*- +# +# This file is part of the LibreOffice project. +# +# This Source Code Form is subject to the terms of the Mozilla Public +# License, v. 2.0. If a copy of the MPL was not distributed with this +# file, You can obtain one at http://mozilla.org/MPL/2.0/. +# + +$(eval $(call gb_Module_Module,xmlscript)) + +$(eval $(call gb_Module_add_targets,xmlscript,\ + Library_xmlscript \ + Package_dtd \ +)) + +$(eval $(call gb_Module_add_check_targets,xmlscript,\ + CppunitTest_xmlscript_cppunit \ +)) + +# vim: set noet sw=4 ts=4: diff --git a/xmlscript/Package_dtd.mk b/xmlscript/Package_dtd.mk new file mode 100644 index 000000000..de8d0dec7 --- /dev/null +++ b/xmlscript/Package_dtd.mk @@ -0,0 +1,19 @@ +# -*- Mode: makefile-gmake; tab-width: 4; indent-tabs-mode: t -*- +# +# This file is part of the LibreOffice project. +# +# This Source Code Form is subject to the terms of the Mozilla Public +# License, v. 2.0. If a copy of the MPL was not distributed with this +# file, You can obtain one at http://mozilla.org/MPL/2.0/. +# + +$(eval $(call gb_Package_Package,xmlscript_dtd,$(SRCDIR)/xmlscript)) + +$(eval $(call gb_Package_add_files,xmlscript_dtd,$(LIBO_SHARE_FOLDER)/dtd/officedocument/1_0,\ + dtd/dialog.dtd \ + dtd/libraries.dtd \ + dtd/library.dtd \ + dtd/module.dtd \ +)) + +# vim: set noet sw=4 ts=4: diff --git a/xmlscript/README.md b/xmlscript/README.md new file mode 100644 index 000000000..3f0b05aa8 --- /dev/null +++ b/xmlscript/README.md @@ -0,0 +1,6 @@ +# XML Dialogs + +This code is used to (de)serialize basic dialogs to XML for storage +inside documents. While the XML -appears- to have some hierarchical +structure, that is only a fabrication, parsing and underlying toolkit +widget structure is sadly linear and flat. diff --git a/xmlscript/dtd/dialog.dtd b/xmlscript/dtd/dialog.dtd new file mode 100644 index 000000000..7290b8d22 --- /dev/null +++ b/xmlscript/dtd/dialog.dtd @@ -0,0 +1,426 @@ +<!-- + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . +--> + +<!ENTITY % boolean "(true|false)"> +<!ENTITY % numeric "CDATA"> + +<!ENTITY % default-attributes "dlg:id CDATA #REQUIRED + dlg:left %numeric; #REQUIRED + dlg:top %numeric; #REQUIRED + dlg:width %numeric; #REQUIRED + dlg:height %numeric; #REQUIRED + dlg:style-id CDATA #IMPLIED + dlg:tab-index %numeric; #IMPLIED + dlg:disabled %boolean; #IMPLIED + dlg:printable %boolean; #IMPLIED + dlg:page %numeric; #IMPLIED + dlg:tag CDATA #IMPLIED + dlg:help-text CDATA #IMPLIED + dlg:help-url CDATA #IMPLIED + "> + +<!ENTITY % event "(script:event| + script:listener-event| + dlg:event + )"> + +<!ENTITY % control "(dlg:bulletinboard| + dlg:button| + dlg:checkbox| + dlg:combobox| + dlg:menulist| + dlg:radiogroup| + dlg:titledbox| + dlg:textfield| + dlg:text| + dlg:filecontrol| + dlg:img| + dlg:timefield| + dlg:datefield| + dlg:numericfield| + dlg:currencyfield| + dlg:patternfield| + dlg:formattedfield| + dlg:fixedline| + dlg:progressmeter| + dlg:scrollbar| + dlg:table| + dlg:linklabel + )"> + +<!ELEMENT dlg:window (dlg:styles*, (%event;)*, dlg:bulletinboard*)> +<!ATTLIST dlg:window %default-attributes; + dlg:closeable %boolean; #IMPLIED + dlg:moveable %boolean; #IMPLIED + dlg:resizeable %boolean; #IMPLIED + dlg:title CDATA #IMPLIED + dlg:withtitlebar CDATA #IMPLIED + dlg:image-src CDATA #IMPLIED + xmlns:dlg CDATA #FIXED "http://openoffice.org/2000/dialog" + xmlns:script CDATA #FIXED "http://openoffice.org/2000/script" + > + +<!ELEMENT dlg:styles (dlg:style+)> + +<!ELEMENT dlg:style EMPTY> +<!ATTLIST dlg:style dlg:style-id CDATA #REQUIRED + dlg:background-color %numeric; #IMPLIED + dlg:text-color %numeric; #IMPLIED + dlg:textline-color %numeric; #IMPLIED + dlg:fill-color %numeric; #IMPLIED + dlg:border CDATA #IMPLIED + dlg:font-name CDATA #IMPLIED + dlg:font-height %numeric; #IMPLIED + dlg:font-width %numeric; #IMPLIED + dlg:font-stylename CDATA #IMPLIED + dlg:font-family (decorative|modern|roman|script|swiss|system) #IMPLIED + dlg:font-charset (ansi|mac|ibmpc_437|ibmpc_850|ibmpc_860|ibmpc_861|ibmpc_863|ibmpc_865|system|symbol) #IMPLIED + dlg:font-pitch (fixed|variable) #IMPLIED + dlg:font-charwidth %numeric; #IMPLIED + dlg:font-weight %numeric; #IMPLIED + dlg:font-slant (oblique|italic|reverse_oblique|reverse_italic) #IMPLIED + dlg:font-underline (single|double|dotted|dash|longdash|dashdot|dashdotdot|smallwave|wave|doublewave|bold|bolddotted|bolddash|boldlongdash|bolddashdot|bolddashdotdot|boldwave) #IMPLIED + dlg:font-strikeout (single|double|bold|slash|x) #IMPLIED + dlg:font-orientation CDATA #IMPLIED + dlg:font-kerning %boolean; #IMPLIED + dlg:font-wordlinemode %boolean; #IMPLIED + dlg:font-type (raster|device|scalable) #IMPLIED + dlg:font-relief (none|embossed|engraved) #IMPLIED + dlg:font-emphasismark (none|dot|circle|disc|accent|above|below) #IMPLIED + dlg:look (none|3d|simple) #IMPLIED + > + +<!ELEMENT script:event EMPTY> +<!ATTLIST script:event script:location CDATA #IMPLIED + script:language CDATA #REQUIRED + script:macro-name CDATA #REQUIRED + script:event-name CDATA #REQUIRED + > +<!ELEMENT script:listener-event EMPTY> +<!ATTLIST script:listener-event script:location CDATA #IMPLIED + script:language CDATA #REQUIRED + script:macro-name CDATA #REQUIRED + script:listener-type CDATA #REQUIRED + script:listener-method CDATA #REQUIRED + script:listener-param CDATA #IMPLIED + > +<!-- deprecated --> +<!ELEMENT dlg:event EMPTY> +<!ATTLIST dlg:event dlg:listener-type CDATA #REQUIRED + dlg:event-method CDATA #REQUIRED + dlg:script-type CDATA #IMPLIED + dlg:script-code CDATA #IMPLIED + dlg:param CDATA #IMPLIED + > +<!-- /deprecated --> + +<!ELEMENT dlg:bulletinboard ((%control;)*)> +<!ATTLIST dlg:bulletinboard dlg:left %numeric; #IMPLIED + dlg:top %numeric; #IMPLIED + > + +<!ELEMENT dlg:button ((%event;)*)> +<!ATTLIST dlg:button %default-attributes; + dlg:value CDATA #IMPLIED + dlg:align (left|center|right) #IMPLIED + dlg:valign (top|center|bottom) #IMPLIED + dlg:checked %boolean; #IMPLIED + dlg:image-src CDATA #IMPLIED + dlg:image-position (left-top|left-center|left-bottom|right-top|right-center|right-bottom|top-left|top-center|top-right|bottom-left|bottom-center|bottom-right|center) #IMPLIED + dlg:image-align (top|left|right|bottom) #IMPLIED + dlg:default %boolean; #IMPLIED + dlg:tabstop %boolean; #IMPLIED + dlg:button-type (standard|ok|cancel|help) #IMPLIED + dlg:repeat %numeric; #IMPLIED + dlg:toggled (0|1) #IMPLIED + dlg:grab-focus (true|false) #IMPLIED + dlg:multiline %boolean; #IMPLIED + > + +<!ELEMENT dlg:checkbox ((%event;)*)> +<!ATTLIST dlg:checkbox %default-attributes; + dlg:value CDATA #IMPLIED + dlg:align (left|center|right) #IMPLIED + dlg:valign (top|center|bottom) #IMPLIED + dlg:checked %boolean; #IMPLIED + dlg:tristate %boolean; #IMPLIED + dlg:tabstop %boolean; #IMPLIED + dlg:image-src CDATA #IMPLIED + dlg:image-position (left-top|left-center|left-bottom|right-top|right-center|right-bottom|top-left|top-center|top-right|bottom-left|bottom-center|bottom-right|center) #IMPLIED + dlg:multiline %boolean; #IMPLIED + > + +<!ELEMENT dlg:combobox (dlg:menupopup?, (%event;)*)> +<!ATTLIST dlg:combobox %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:readonly %boolean; #IMPLIED + dlg:autocomplete %boolean; #IMPLIED + dlg:spin %boolean; #IMPLIED + dlg:maxlength %numeric; #IMPLIED + dlg:linecount %numeric; #IMPLIED + dlg:value CDATA #IMPLIED + dlg:hide-inactive-selection %boolean; #IMPLIED + dlg:align (left|center|right) #IMPLIED + > + +<!ELEMENT dlg:menulist (dlg:menupopup?, (%event;)*)> +<!ATTLIST dlg:menulist %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:spin %boolean; #IMPLIED + dlg:multiselection %boolean; #IMPLIED + dlg:readonly %boolean; #IMPLIED + dlg:linecount %numeric; #IMPLIED + dlg:align (left|center|right) #IMPLIED + > + +<!ELEMENT dlg:menupopup (dlg:menuitem+)> +<!ELEMENT dlg:menuitem EMPTY> +<!ATTLIST dlg:menuitem dlg:value CDATA #REQUIRED + dlg:selected %boolean; #IMPLIED + > + +<!ELEMENT dlg:radiogroup (dlg:radio+)> +<!ELEMENT dlg:radio ((%event;)*)> +<!ATTLIST dlg:radio %default-attributes; + dlg:value CDATA #IMPLIED + dlg:align (left|center|right) #IMPLIED + dlg:valign (top|center|bottom) #IMPLIED + dlg:checked %boolean; #IMPLIED + dlg:tabstop %boolean; #IMPLIED + dlg:image-src CDATA #IMPLIED + dlg:image-position (left-top|left-center|left-bottom|right-top|right-center|right-bottom|top-left|top-center|top-right|bottom-left|bottom-center|bottom-right|center) #IMPLIED + dlg:multiline %boolean; #IMPLIED + > + +<!ELEMENT dlg:titledbox (dlg:title?, dlg:radio*, (%control;)*, (%event;)*)> +<!ATTLIST dlg:titledbox %default-attributes; + > +<!ELEMENT dlg:title EMPTY> +<!ATTLIST dlg:title dlg:value CDATA #IMPLIED + > + +<!ELEMENT dlg:text ((%event;)*)> +<!ATTLIST dlg:text %default-attributes; + dlg:value CDATA #IMPLIED + dlg:align (left|center|right) #IMPLIED + dlg:valign (top|center|bottom) #IMPLIED + dlg:multiline %boolean; #IMPLIED + dlg:tabstop %boolean; #IMPLIED + > + + +<!ELEMENT dlg:linklabel ((%event;)*)> +<!ATTLIST dlg:linklabel %default-attributes; + dlg:value CDATA #IMPLIED + dlg:url CDATA #IMPLIED + dlg:align (left|center|right) #IMPLIED + dlg:valign (top|center|bottom) #IMPLIED + dlg:multiline %boolean; #IMPLIED + dlg:tabstop %boolean; #IMPLIED + > + +<!ELEMENT dlg:textfield ((%event;)*)> +<!ATTLIST dlg:textfield %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:align (left|center|right) #IMPLIED + dlg:readonly %boolean; #IMPLIED + dlg:echochar CDATA #IMPLIED + dlg:hard-linebreaks %boolean; #IMPLIED + dlg:hscroll %boolean; #IMPLIED + dlg:vscroll %boolean; #IMPLIED + dlg:maxlength %numeric; #IMPLIED + dlg:multiline %boolean; #IMPLIED + dlg:value CDATA #IMPLIED + dlg:hide-inactive-selection %boolean; #IMPLIED + dlg:lineend-format (carriage-return|line-feed|carriage-return-line-feed) #IMPLIED + > + +<!ELEMENT dlg:img ((%event;)*)> +<!ATTLIST dlg:img %default-attributes; + dlg:src CDATA #IMPLIED + dlg:scale-image %boolean; #IMPLIED + dlg:scale-mode (none|isotropic|anisotropic) #IMPLIED + dlg:tabstop %boolean; #IMPLIED + > + +<!ELEMENT dlg:filecontrol ((%event;)*)> +<!ATTLIST dlg:filecontrol %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:value CDATA #IMPLIED + dlg:hide-inactive-selection %boolean; #IMPLIED + dlg:readonly %boolean; #IMPLIED + > + +<!ELEMENT dlg:treecontrol ((%event;)*)> +<!ATTLIST dlg:treecontrol %default-attributes; + dlg:selectiontype CDATA #IMPLIED + dlg:rootdisplayed %boolean; #IMPLIED + dlg:showshandles %boolean; #IMPLIED + dlg:showsroothandles %boolean; #IMPLIED + dlg:rowheight %boolean; #IMPLIED + dlg:editable %numeric; #IMPLIED + dlg:invokesstopnodeediting %boolean; #IMPLIED + > + +<!ELEMENT dlg:currencyfield ((%event;)*)> +<!ATTLIST dlg:currencyfield %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:readonly %boolean; #IMPLIED + dlg:currency-symbol CDATA #IMPLIED + dlg:strict-format %boolean; #IMPLIED + dlg:decimal-accuracy %numeric; #IMPLIED + dlg:thousands-separator %boolean; #IMPLIED + dlg:value %numeric; #IMPLIED + dlg:value-min %numeric; #IMPLIED + dlg:value-max %numeric; #IMPLIED + dlg:value-step %numeric; #IMPLIED + dlg:spin %boolean; #IMPLIED + dlg:repeat %numeric; #IMPLIED + dlg:hide-inactive-selection %boolean; #IMPLIED + dlg:prepend-symbol %boolean; #IMPLIED + dlg:enforce-format %boolean; #IMPLIED + > + +<!ELEMENT dlg:datefield ((%event;)*)> +<!ATTLIST dlg:datefield %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:readonly %boolean; #IMPLIED + dlg:strict-format %boolean; #IMPLIED + dlg:date-format (system_short|system_short_YY|system_short_YYYY|system_long|short_DDMMYY|short_MMDDYY|short_YYMMDD|short_DDMMYYYY|short_MMDDYYYY|short_YYYYMMDD|short_YYMMDD_DIN5008|short_YYYYMMDD_DIN5008) #IMPLIED + dlg:show-century %boolean; #IMPLIED + dlg:value CDATA #IMPLIED + dlg:value-min CDATA #IMPLIED + dlg:value-max CDATA #IMPLIED + dlg:spin %boolean; #IMPLIED + dlg:repeat %numeric; #IMPLIED + dlg:hide-inactive-selection %boolean; #IMPLIED + dlg:dropdown %boolean; #IMPLIED + dlg:text CDATA #IMPLIED + dlg:enforce-format %boolean; #IMPLIED + > + +<!ELEMENT dlg:numericfield ((%event;)*)> +<!ATTLIST dlg:numericfield %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:readonly %boolean; #IMPLIED + dlg:strict-format %boolean; #IMPLIED + dlg:decimal-accuracy %numeric; #IMPLIED + dlg:thousands-separator %boolean; #IMPLIED + dlg:value %numeric; #IMPLIED + dlg:value-min %numeric; #IMPLIED + dlg:value-max %numeric; #IMPLIED + dlg:value-step %numeric; #IMPLIED + dlg:spin %boolean; #IMPLIED + dlg:repeat %numeric; #IMPLIED + dlg:hide-inactive-selection %boolean; #IMPLIED + dlg:enforce-format %boolean; #IMPLIED + > + +<!ELEMENT dlg:timefield ((%event;)*)> +<!ATTLIST dlg:timefield %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:readonly %boolean; #IMPLIED + dlg:strict-format %boolean; #IMPLIED + dlg:time-format (24h_short|24h_long|12h_short|12h_long|Duration_short|Duration_long) #IMPLIED + dlg:value CDATA #IMPLIED + dlg:value-min CDATA #IMPLIED + dlg:value-max CDATA #IMPLIED + dlg:spin %boolean; #IMPLIED + dlg:repeat %numeric; #IMPLIED + dlg:hide-inactive-selection %boolean; #IMPLIED + dlg:text CDATA #IMPLIED + dlg:enforce-format %boolean; #IMPLIED + > + +<!ELEMENT dlg:patternfield ((%event;)*)> +<!ATTLIST dlg:patternfield %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:readonly %boolean; #IMPLIED + dlg:strict-format %boolean; #IMPLIED + dlg:edit-mask CDATA #IMPLIED + dlg:literal-mask CDATA #IMPLIED + dlg:value CDATA #IMPLIED + dlg:maxlength %numeric; #IMPLIED + dlg:hide-inactive-selection %boolean; #IMPLIED + > + +<!ELEMENT dlg:formattedfield ((%event;)*)> +<!ATTLIST dlg:formattedfield %default-attributes; + dlg:tabstop %boolean; #IMPLIED + dlg:readonly %boolean; #IMPLIED + dlg:strict-format %boolean; #IMPLIED + dlg:maxlength %numeric; #IMPLIED + dlg:spin %boolean; #IMPLIED + dlg:align (left|center|right) #IMPLIED + dlg:text CDATA #IMPLIED + dlg:value-default CDATA #IMPLIED + dlg:value-max %numeric; #IMPLIED + dlg:value-min %numeric; #IMPLIED + dlg:value %numeric; #IMPLIED + dlg:format-code CDATA #IMPLIED + dlg:format-locale CDATA #IMPLIED + dlg:repeat %numeric; #IMPLIED + dlg:hide-inactive-selection %boolean; #IMPLIED + dlg:treat-as-number %boolean; #IMPLIED + dlg:enforce-format %boolean; #IMPLIED + > + +<!ELEMENT dlg:fixedline ((%event;)*)> +<!ATTLIST dlg:fixedline %default-attributes; + dlg:align (horizontal|vertical) #IMPLIED + dlg:value CDATA #IMPLIED + > + +<!ELEMENT dlg:scrollbar ((%event;)*)> +<!ATTLIST dlg:scrollbar %default-attributes; + dlg:align (horizontal|vertical) #IMPLIED + dlg:curpos %numeric; #IMPLIED + dlg:maxpos %numeric; #IMPLIED + dlg:minpos %numeric; #IMPLIED + dlg:increment %numeric; #IMPLIED + dlg:pageincrement %numeric; #IMPLIED + dlg:visible-size %numeric; #IMPLIED + dlg:repeat %numeric; #IMPLIED + dlg:tabstop %boolean; #IMPLIED + dlg:live-scroll %boolean; #IMPLIED + dlg:symbol-color %numeric; #IMPLIED + > + +<!ELEMENT dlg:progressmeter ((%event;)*)> +<!ATTLIST dlg:progressmeter %default-attributes; + dlg:value %numeric; #IMPLIED + dlg:value-min %numeric; #IMPLIED + dlg:value-max %numeric; #IMPLIED + > + +<!ELEMENT dlg:table ((%event;)*)> +<!ATTLIST dlg:table %default-attributes; + dlg:showcolumnheader %boolean; #IMPLIED + dlg:showrowheader %boolean; #IMPLIED + dlg:gridline-color %numeric; #IMPLIED + dlg:usegridlines %boolean; #IMPLIED + dlg:headerbackground-color %numeric; #IMPLIED + dlg:headertext-color %numeric; #IMPLIED + dlg:activeselectionbackground-color %numeric; #IMPLIED + dlg:activeselectiontext-color %numeric; #IMPLIED + dlg:inactiveselectionbackground-color %numeric; #IMPLIED + dlg:inactiveselectiontext-color %numeric; #IMPLIED + dlg:selectiontype CDATA #IMPLIED + dlg:valign (top|center|bottom) #IMPLIED + dlg:tabstop %boolean; #IMPLIED + > diff --git a/xmlscript/dtd/libraries.dtd b/xmlscript/dtd/libraries.dtd new file mode 100644 index 000000000..3b3b82e53 --- /dev/null +++ b/xmlscript/dtd/libraries.dtd @@ -0,0 +1,34 @@ +<!-- + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . +--> + +<!ENTITY % boolean "(true|false)"> + +<!ELEMENT library:libraries (library:library)*> +<!ATTLIST library:libraries + xmlns:library CDATA #FIXED "http://openoffice.org/2000/library" + xmlns:xlink CDATA #FIXED "http://www.w3.org/1999/xlink" +> + +<!ELEMENT library:library EMPTY> +<!ATTLIST library:library + library:name CDATA #REQUIRED + xlink:href CDATA #IMPLIED + xlink:type CDATA #IMPLIED + library:link %boolean; #REQUIRED + library:readonly %boolean; #IMPLIED +> diff --git a/xmlscript/dtd/library.dtd b/xmlscript/dtd/library.dtd new file mode 100644 index 000000000..c0341ed54 --- /dev/null +++ b/xmlscript/dtd/library.dtd @@ -0,0 +1,33 @@ +<!-- + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . +--> + +<!ENTITY % boolean "(true|false)"> + +<!ELEMENT library:library (library:element)*> +<!ATTLIST library:library + xmlns:library CDATA #FIXED "http://openoffice.org/2000/library" + library:name CDATA #REQUIRED + library:readonly %boolean; #REQUIRED + library:passwordprotected %boolean; #REQUIRED + library:preload %boolean; #IMPLIED +> + +<!ELEMENT library:element EMPTY> +<!ATTLIST library:element + library:name CDATA #REQUIRED +> diff --git a/xmlscript/dtd/module.dtd b/xmlscript/dtd/module.dtd new file mode 100644 index 000000000..b77d62f46 --- /dev/null +++ b/xmlscript/dtd/module.dtd @@ -0,0 +1,24 @@ +<!-- + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . +--> + +<!ELEMENT script:module (#PCDATA)> +<!ATTLIST script:module + xmlns:script CDATA #FIXED "http://openoffice.org/2000/script" + script:name CDATA #REQUIRED + script:language CDATA #REQUIRED +> diff --git a/xmlscript/inc/pch/precompiled_xmlscript.cxx b/xmlscript/inc/pch/precompiled_xmlscript.cxx new file mode 100644 index 000000000..85735abe9 --- /dev/null +++ b/xmlscript/inc/pch/precompiled_xmlscript.cxx @@ -0,0 +1,12 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + */ + +#include "precompiled_xmlscript.hxx" + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/inc/pch/precompiled_xmlscript.hxx b/xmlscript/inc/pch/precompiled_xmlscript.hxx new file mode 100644 index 000000000..45c831b54 --- /dev/null +++ b/xmlscript/inc/pch/precompiled_xmlscript.hxx @@ -0,0 +1,44 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + */ + +/* + This file has been autogenerated by update_pch.sh. It is possible to edit it + manually (such as when an include file has been moved/renamed/removed). All such + manual changes will be rewritten by the next run of update_pch.sh (which presumably + also fixes all possible problems, so it's usually better to use it). + + Generated on 2021-03-08 13:22:55 using: + ./bin/update_pch xmlscript xmlscript --cutoff=4 --exclude:system --exclude:module --include:local + + If after updating build fails, use the following command to locate conflicting headers: + ./bin/update_pch_bisect ./xmlscript/inc/pch/precompiled_xmlscript.hxx "make xmlscript.build" --find-conflicts +*/ + +#include <sal/config.h> +#if PCH_LEVEL >= 1 +#endif // PCH_LEVEL >= 1 +#if PCH_LEVEL >= 2 +#include <osl/diagnose.h> +#include <rtl/instance.hxx> +#include <rtl/locale.h> +#include <rtl/ref.hxx> +#include <rtl/ustring.hxx> +#include <sal/log.hxx> +#endif // PCH_LEVEL >= 2 +#if PCH_LEVEL >= 3 +#include <com/sun/star/uno/Reference.hxx> +#include <tools/diagnose_ex.h> +#endif // PCH_LEVEL >= 3 +#if PCH_LEVEL >= 4 +#include <xml_import.hxx> +#include <xmlscript/xml_helper.hxx> +#include <xmlscript/xmlns.h> +#endif // PCH_LEVEL >= 4 + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/qa/cppunit/data/EmptyPopupItems.xdl b/xmlscript/qa/cppunit/data/EmptyPopupItems.xdl new file mode 100644 index 000000000..827469e95 --- /dev/null +++ b/xmlscript/qa/cppunit/data/EmptyPopupItems.xdl @@ -0,0 +1,13 @@ +<?xml version="1.0" encoding="UTF-8"?> +<!DOCTYPE dlg:window PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "dialog.dtd"> +<dlg:window xmlns:dlg="http://openoffice.org/2000/dialog" xmlns:script="http://openoffice.org/2000/script" dlg:id="TestDialog" dlg:left="116" dlg:top="56" dlg:width="175" dlg:height="123" dlg:closeable="true" dlg:moveable="true"> + <dlg:bulletinboard> + <dlg:combobox dlg:id="ComboBox1" dlg:tab-index="0" dlg:left="9" dlg:top="15" dlg:width="92" dlg:height="15" dlg:spin="true"> + <dlg:menupopup> + <dlg:menuitem dlg:value="Eintrag1"/> + <dlg:menuitem dlg:value=""/> + <dlg:menuitem dlg:value="Eintrag2"/> + </dlg:menupopup> + </dlg:combobox> + </dlg:bulletinboard> +</dlg:window>
\ No newline at end of file diff --git a/xmlscript/qa/cppunit/data/test.xml b/xmlscript/qa/cppunit/data/test.xml new file mode 100644 index 000000000..06e44309b --- /dev/null +++ b/xmlscript/qa/cppunit/data/test.xml @@ -0,0 +1,123 @@ +<?xml version="1.0" encoding="UTF-8"?> +<!DOCTYPE dialog:dialogs SYSTEM "../dtd/dialog.dtd"> +<!-- + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . +--> + +<window xmlns="http://openoffice.org/2000/dialog" + xmlns:dlg="http://openoffice.org/2000/dialog" + xmlns:script="http://openoffice.org/2000/script" + style-id="dialog" + id="window1" title="Test-Dialog" left="50" top="50" height="690" width="400" + closeable="true" moveable="true" resizeable="true" disabled="false" +> + + <script:event script:event-name="on-rowchange" script:macro-name="ExecutingMacro" script:location="application" script:language="StarBasic"/> + + <dlg:styles xmlns:dlg="http://openoffice.org/2000/dialog"> + <dlg:style style-id="bla" background-color="0xffffff" dlg:text-color="255" dlg:textline-color="0xff0000" dlg:font-underline="single"/> + <dlg:style style-id="bla3" background-color="888888" dlg:text-color="0xffffff" font-name="Arial" font-height="24" font-relief="embossed" font-emphasismark="dot"/> + <dlg:style style-id="no_border" border="none" fill-color="0xff"/> + <dlg:style style-id="dialog" border="3d" dlg:text-color="255" dlg:textline-color="0xff0000"/> + </dlg:styles> + + <dlg:bulletinboard xmlns:ns="http://www.fake" xmlns:dlg="http://openoffice.org/2000/dialog"> + + <button dlg:id="button1" ns:value="hallo" dlg:left="50" ns:top="50" ns:checked="true" width="50" height="50" style-id="bla3" xmlns:ns="http://openoffice.org/2000/dialog"> + <dlg:event listener-type="com.sun.star.awt.XKeyListener" event-method="keyReleased" script-type="StarBasic" script-code="application:ExecutingMacro"/> + <script:event script:event-name="on-rowchange" script:macro-name="ExecutingMacro" script:location="application" script:language="StarBasic"/> + <script:listener-event script:macro-name="ExecutingMacro" script:location="application" script:language="StarBasic" script:listener-type="com.sun.star.awt.XMouseListener" script:listener-method="mouseEntered"/> + <script:listener-event script:macro-name="ExecutingMacro" script:location="application" script:language="StarBasic" script:listener-type="com.sun.star.awt.XMouseListener" script:listener-method="mousePressed" script:listener-param="parameter0, so this will never ever be a script:event, but always a script:listener-event element!"/> + </button> + + <button dlg:id="button3" dlg:image-src="file:///f|src641/xmlscript/test/w3c.jpg" dlg:image-align="right" ns:value="help button" dlg:left="250" ns:top="50" width="50" height="50" style-id="bla" button-type="help" xmlns:ns="http://openoffice.org/2000/dialog"/> + + <checkbox id="check1" help-text="helphelphelp!!!" help-url="http://www.xml.org" value="checked" left="50" top="150" width="100" height="20" checked="true"/> + <checkbox id="check2" value="dontknow" left="50" top="170" width="100" height="20" tristate="true"/> + <checkbox id="check3" value="tristate_checked" left="50" top="190" width="100" height="20" checked="true" tristate="true"/> + + <menulist id="list1" multiselection="true" left="50" top="400" width="100" height="100"> + <menupopup> + <menuitem value="item1"/> + <menuitem value="item2 sel" selected="true"/> + <menuitem value="item3 sel" selected="true"/> + </menupopup> + </menulist> + + <dlg:menulist id="list2" left="250" top="400" width="100" height="100"> + <menupopup> + <menuitem value="item4" selected="false"/> + <menuitem value="item5 sel" selected="true"/> + <menuitem value="item6"/> + </menupopup> + </dlg:menulist> + + <combobox id="combo1" value="combotext1" left="250" top="150" width="50" height="50"> + <menupopup> + <menuitem value="Citem1"/> + <menuitem value="Citem2"/> + </menupopup> + </combobox> + + <combobox id="combo2" value="combotext2" left="310" top="150" width="50" height="50" spin="true"> + <menupopup> + <menuitem value="Citem3"/> + <menuitem value="Citem4"/> + </menupopup> + </combobox> + + <radiogroup> + <radio id="radio1" value="default radio" left="50" top="250" width="100" height="20"/> + <radio id="radio2" value="checked" left="50" top="270" width="100" height="20" checked="true"/> + <radio id="radio3" value="unchecked" left="50" top="290" width="100" height="20" checked="false"/> + </radiogroup> + + <titledbox id="groupbox1" left="250" top="250" width="120" height="100"> + <script:listener-event script:macro-name="ExecutingMacro" script:location="application" script:language="StarBasic" script:listener-type="com.sun.star.awt.XMouseListener" script:listener-method="mouseEntered"/> + <title value="grouped"/> + <radio id="radio5" value="default radio" left="5" top="15" width="100" height="20"/> + <radio id="radio7" value="unchecked" left="5" top="35" width="100" height="20" checked="false"/> + <radio id="radio8" value="checked" left="5" top="55" width="100" height="20" checked="true"/> + </titledbox> + + <text id="fixed1" left="50" top="520" width="180" height="20" value="fixed text is here..." multiline="true" align="center"> + <script:listener-event script:macro-name="ExecutingMacro" script:location="application" script:language="StarBasic" script:listener-type="com.sun.star.awt.XMouseListener" script:listener-method="mouseEntered"/> + </text> + <textfield id="field1" left="250" top="520" width="50" height="40" value="edit no text here..." readonly="true" vscroll="true" multiline="true" align="right" style-id="no_border"/> + <textfield id="field2" left="320" top="520" width="50" height="40" value="hidden text" hscroll="true" echochar="*" align="left"/> + <img id="image1" scale-image="true" left="50" top="585" width="80" height="20" src="file:///f|src641/xmlscript/test/w3c.jpg"> + <script:listener-event script:macro-name="ExecutingMacro" script:location="application" script:language="StarBasic" script:listener-type="com.sun.star.awt.XMouseListener" script:listener-method="mouseEntered"/> + </img> + <filecontrol id="file1" left="150" top="585" width="100" height="20" value="../../test/w3c.jpg"/> + + <datefield id="datefield1" left="20" top="610" width="100" height="20" show-century="false" date-format="short_DDMMYY" spin="true" value="20010301"/> + <timefield id="time1" left="20" top="635" width="100" height="20" time-format="24h_long" value-min="0" value-max="24000000" strict-format="true" value="12000000" spin="true"/> + <patternfield id="pattern1" maxlength="4" left="20" top="0" width="100" height="20" value="pattern" strict-format="true" readonly="true"/> + <currencyfield id="currency1" left="200" top="610" width="100" height="20" value="5.6075" value-min="0.5" value-max="10.0" value-step="0.1" spin="true" thousands-separator="true" currency-symbol="$" prepend-symbol="true"/> + <numericfield id="numeric1" left="200" top="635" width="100" height="20" value="5.6075" value-min="0.5" value-max="10.0" value-step="0.1" thousands-separator="true"/> + <fixedline style-id="bla3" id="fixedline1" left="20" top="660" width="150" height="20" value="FixedLineLabel" align="horizontal"/> + <progressmeter style-id="no_border" id="progress1" left="200" top="660" width="80" height="20" align="horizontal" value="50" value-min="0" value-max="80"/> + <scrollbar style-id="dialog" id="scrollbar1" left="300" top="660" width="80" height="20" align="horizontal" curpos="50" maxpos="200" increment="1" pageincrement="10"/> + + <formattedfield style-id="dialog" treat-as-number="true" id="ffield0" left="20" top="110" width="80" height="20" align="center" text="first ffield" + dlg:value-max="750" dlg:value-min="0" dlg:value="2" spin="true"/> + <formattedfield style-id="dialog" id="ffield1" left="250" top="110" width="80" height="20" align="center" text="second ffield" + dlg:format-code="[$$-409]#.##0,00;[ROT]-[$$-409]#.##0,00" dlg:format-locale="de;DE;WIN" dlg:value-max="750" dlg:value-min="0" dlg:value="4" spin="true"/> + + </dlg:bulletinboard> + +</window> diff --git a/xmlscript/qa/cppunit/data/w3c.jpg b/xmlscript/qa/cppunit/data/w3c.jpg Binary files differnew file mode 100644 index 000000000..c541c20dc --- /dev/null +++ b/xmlscript/qa/cppunit/data/w3c.jpg diff --git a/xmlscript/qa/cppunit/test.cxx b/xmlscript/qa/cppunit/test.cxx new file mode 100644 index 000000000..aa8bd934e --- /dev/null +++ b/xmlscript/qa/cppunit/test.cxx @@ -0,0 +1,220 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + */ + +#include <test/bootstrapfixture.hxx> +#include <test/xmltesttools.hxx> +#include <unotest/macros_test.hxx> +#include <unotools/tempfile.hxx> + +#include <com/sun/star/frame/Desktop.hpp> +#include <com/sun/star/frame/DispatchHelper.hpp> +#include <com/sun/star/beans/XPropertySet.hpp> +#include <com/sun/star/container/XNameContainer.hpp> +#include <com/sun/star/io/XInputStream.hpp> +#include <com/sun/star/io/XInputStreamProvider.hpp> +#include <com/sun/star/io/XOutputStream.hpp> + +#include <comphelper/processfactory.hxx> +#include <comphelper/propertysequence.hxx> + +#include <config_folders.h> +#include <osl/file.hxx> +#include <rtl/ustrbuf.hxx> +#include <rtl/byteseq.hxx> +#include <sal/log.hxx> + +#include <xmlscript/xmldlg_imexp.hxx> +#include <xmlscript/xml_helper.hxx> +#include <cppuhelper/bootstrap.hxx> + +using namespace ::cppu; +using namespace ::com::sun::star::uno; + +using namespace ::com::sun::star; + +/// Sample tests for import +class XmlScriptTest : public test::BootstrapFixture, public unotest::MacrosTest, public XmlTestTools +{ + OUString maDataPath; + + void testBasicElements(); + void testEmptyPopupItems(); + + Reference<container::XNameContainer> importFile(std::u16string_view sFileName); + void exportToFile(std::u16string_view sFileName, + Reference<container::XNameContainer> const& xDialogModel); + +public: + virtual void setUp() override; + + virtual void registerNamespaces(xmlXPathContextPtr& pXmlXpathCtx) override + { + xmlXPathRegisterNs(pXmlXpathCtx, BAD_CAST("dlg"), + BAD_CAST("http://openoffice.org/2000/dialog")); + xmlXPathRegisterNs(pXmlXpathCtx, BAD_CAST("script"), + BAD_CAST("http://openoffice.org/2000/script")); + } + CPPUNIT_TEST_SUITE(XmlScriptTest); + CPPUNIT_TEST(testBasicElements); + CPPUNIT_TEST(testEmptyPopupItems); + CPPUNIT_TEST_SUITE_END(); +}; + +void XmlScriptTest::setUp() +{ + test::BootstrapFixture::setUp(); + maDataPath = "/xmlscript/qa/cppunit/data/"; + + mxDesktop.set(frame::Desktop::create(mxComponentContext)); +} + +Reference<container::XNameContainer> XmlScriptTest::importFile(std::u16string_view sFileName) +{ + OUString sFullName = m_directories.getURLFromSrc(maDataPath) + sFileName; + osl::File aFile(sFullName); + CPPUNIT_ASSERT_EQUAL(osl::FileBase::E_None, aFile.open(osl_File_OpenFlag_Read)); + sal_uInt64 nBytes; + aFile.getSize(nBytes); + std::vector<sal_Int8> bytes(nBytes); + sal_uInt64 nBytesRead; + aFile.read(bytes.data(), nBytes, nBytesRead); + CPPUNIT_ASSERT_EQUAL_MESSAGE("File not read correctly", nBytes, nBytesRead); + aFile.close(); + + Reference<container::XNameContainer> xDialogModel( + mxComponentContext->getServiceManager()->createInstanceWithContext( + "com.sun.star.awt.UnoControlDialogModel", mxComponentContext), + UNO_QUERY); + + ::xmlscript::importDialogModel(::xmlscript::createInputStream(std::move(bytes)), xDialogModel, + mxComponentContext, nullptr); + + Reference<lang::XComponent> xDialogModelComp(xDialogModel, UNO_QUERY); + if (xDialogModelComp) + xDialogModelComp->dispose(); + + return xDialogModel; +} + +void XmlScriptTest::exportToFile(std::u16string_view sURL, + Reference<container::XNameContainer> const& xDialogModel) +{ + Reference<io::XInputStreamProvider> xProvider( + ::xmlscript::exportDialogModel(xDialogModel, mxComponentContext, nullptr)); + Reference<io::XInputStream> xStream(xProvider->createInputStream()); + + Sequence<sal_Int8> bytes; + sal_Int32 nRead = xStream->readBytes(bytes, xStream->available()); + for (;;) + { + Sequence<sal_Int8> readBytes; + nRead = xStream->readBytes(readBytes, 1024); + if (!nRead) + break; + + sal_Int32 nPos = bytes.getLength(); + bytes.realloc(nPos + nRead); + memcpy(bytes.getArray() + nPos, readBytes.getConstArray(), static_cast<sal_uInt32>(nRead)); + } + + osl::File aFile(OUString{ sURL }); + CPPUNIT_ASSERT_EQUAL(osl::FileBase::E_None, aFile.open(osl_File_OpenFlag_Write)); + sal_uInt64 nBytesWritten; + CPPUNIT_ASSERT_EQUAL(osl::FileBase::E_None, + aFile.write(bytes.getConstArray(), bytes.getLength(), nBytesWritten)); + aFile.close(); +} + +void XmlScriptTest::testBasicElements() +{ + // Import + Reference<container::XNameContainer> xModel(importFile(u"test.xml")); + CPPUNIT_ASSERT(xModel.is()); + + // Export + utl::TempFile aTempFile; + aTempFile.EnableKillingFile(); + exportToFile(aTempFile.GetURL(), xModel); + + // Parse & check + xmlDocUniquePtr pXmlDoc = parseXml(aTempFile); + CPPUNIT_ASSERT(pXmlDoc); + + // Ensure we have all elements + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:button[1]", "id", "button1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:button[2]", "id", "button3"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:checkbox[1]", "id", "check1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:checkbox[2]", "id", "check2"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:checkbox[3]", "id", "check3"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:menulist[1]", "id", "list1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:menulist[2]", "id", "list2"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:combobox[1]", "id", "combo1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:radiogroup[1]/dlg:radio[1]", "id", + "radio1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:radiogroup[1]/dlg:radio[2]", "id", + "radio2"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:radiogroup[1]/dlg:radio[3]", "id", + "radio3"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:titledbox[1]", "id", "groupbox1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:radiogroup[2]/dlg:radio[1]", "id", + "radio5"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:radiogroup[2]/dlg:radio[2]", "id", + "radio7"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:radiogroup[2]/dlg:radio[3]", "id", + "radio8"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:text[1]", "id", "fixed1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:textfield[1]", "id", "field1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:textfield[2]", "id", "field2"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:img[1]", "id", "image1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:filecontrol[1]", "id", "file1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:datefield[1]", "id", "datefield1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:timefield[1]", "id", "time1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:patternfield[1]", "id", "pattern1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:currencyfield[1]", "id", "currency1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:numericfield[1]", "id", "numeric1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:fixedline[1]", "id", "fixedline1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:progressmeter[1]", "id", "progress1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:scrollbar[1]", "id", "scrollbar1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:formattedfield[1]", "id", "ffield0"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:formattedfield[2]", "id", "ffield1"); + + Reference<lang::XComponent> xDialogModelComp(xModel, UNO_QUERY); + if (xDialogModelComp) + xDialogModelComp->dispose(); +} + +void XmlScriptTest::testEmptyPopupItems() +{ + // Import + Reference<container::XNameContainer> xModel(importFile(u"EmptyPopupItems.xdl")); + CPPUNIT_ASSERT(xModel.is()); + + // Export + utl::TempFile aTempFile; + aTempFile.EnableKillingFile(); + exportToFile(aTempFile.GetURL(), xModel); + + // Parse & check + xmlDocUniquePtr pXmlDoc = parseXml(aTempFile); + CPPUNIT_ASSERT(pXmlDoc); + + // Ensure we have 3 items in combobox after import/export and second one is empty + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:combobox/dlg:menupopup/dlg:menuitem[1]", + "value", "Eintrag1"); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:combobox/dlg:menupopup/dlg:menuitem[2]", + "value", ""); + assertXPath(pXmlDoc, "/dlg:window/dlg:bulletinboard/dlg:combobox/dlg:menupopup/dlg:menuitem[3]", + "value", "Eintrag2"); +} + +CPPUNIT_TEST_SUITE_REGISTRATION(XmlScriptTest); + +CPPUNIT_PLUGIN_IMPLEMENT(); + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/inc/misc.hxx b/xmlscript/source/inc/misc.hxx new file mode 100644 index 000000000..d70f6b063 --- /dev/null +++ b/xmlscript/source/inc/misc.hxx @@ -0,0 +1,50 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#pragma once + +#include <com/sun/star/uno/Any.hxx> + +namespace xmlscript +{ + +template< typename T > +inline void extract_throw( T * p, css::uno::Any const & a ) +{ + if (! (a >>= *p)) + { + throw css::uno::RuntimeException( + "expected " + cppu::UnoType<T>::get().getTypeName(), + css::uno::Reference< + css::uno::XInterface>() ); + } +} + +template< typename T > +inline T extract_throw( css::uno::Any const & a ) +{ + T v = T(); + extract_throw<T>( &v, a ); + return v; +} + +} + + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/inc/xml_import.hxx b/xmlscript/source/inc/xml_import.hxx new file mode 100644 index 000000000..913634738 --- /dev/null +++ b/xmlscript/source/inc/xml_import.hxx @@ -0,0 +1,44 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ +#pragma once + +#include <com/sun/star/xml/input/XRoot.hpp> +#include <com/sun/star/xml/sax/XDocumentHandler.hpp> + +namespace xmlscript +{ +// IMPORTING + +/** Creates a document handler to be used for SAX1 parser that can handle + namespaces. Namespace URI are mapped to integer ids for performance. + Implementing the XImporter interface, you will get a startRootElement() + for the root element of your XML document and subsequent + startChildElement() callbacks for each sub element. + Namespaces of tags are identified by their integer value. + + @param xRoot + initial object being called for root context + @return + document handler for parser +*/ +css::uno::Reference<css::xml::sax::XDocumentHandler> +createDocumentHandler(css::uno::Reference<css::xml::input::XRoot> const& xRoot); +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xml_helper/xml_byteseq.cxx b/xmlscript/source/xml_helper/xml_byteseq.cxx new file mode 100644 index 000000000..2ae8ecea1 --- /dev/null +++ b/xmlscript/source/xml_helper/xml_byteseq.cxx @@ -0,0 +1,158 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include <string.h> + +#include <cppuhelper/implbase.hxx> +#include <xmlscript/xml_helper.hxx> +#include <com/sun/star/io/XInputStream.hpp> +#include <com/sun/star/io/XOutputStream.hpp> + +using namespace osl; +using namespace com::sun::star; +using namespace com::sun::star::uno; + + +namespace xmlscript +{ + +namespace { + +class BSeqInputStream + : public ::cppu::WeakImplHelper< io::XInputStream > +{ + std::vector<sal_Int8> _seq; + sal_Int32 _nPos; + +public: + explicit BSeqInputStream( std::vector<sal_Int8>&& rSeq ) + : _seq( std::move(rSeq) ) + , _nPos( 0 ) + {} + + // XInputStream + virtual sal_Int32 SAL_CALL readBytes( + Sequence< sal_Int8 > & rData, sal_Int32 nBytesToRead ) override; + virtual sal_Int32 SAL_CALL readSomeBytes( + Sequence< sal_Int8 > & rData, sal_Int32 nMaxBytesToRead ) override; + virtual void SAL_CALL skipBytes( + sal_Int32 nBytesToSkip ) override; + virtual sal_Int32 SAL_CALL available() override; + virtual void SAL_CALL closeInput() override; +}; + +} + +sal_Int32 BSeqInputStream::readBytes( + Sequence< sal_Int8 > & rData, sal_Int32 nBytesToRead ) +{ + nBytesToRead = ((nBytesToRead > static_cast<sal_Int32>(_seq.size()) - _nPos) + ? _seq.size() - _nPos + : nBytesToRead); + + if (rData.getLength() != nBytesToRead) + rData.realloc( nBytesToRead ); + if (nBytesToRead != 0) { + memcpy(rData.getArray(), &_seq[_nPos], nBytesToRead); + } + _nPos += nBytesToRead; + return nBytesToRead; +} + +sal_Int32 BSeqInputStream::readSomeBytes( + Sequence< sal_Int8 > & rData, sal_Int32 nMaxBytesToRead ) +{ + return readBytes( rData, nMaxBytesToRead ); +} + +void BSeqInputStream::skipBytes( + sal_Int32 /*nBytesToSkip*/ ) +{ +} + +sal_Int32 BSeqInputStream::available() +{ + return _seq.size() - _nPos; +} + +void BSeqInputStream::closeInput() +{ +} + +namespace { + +class BSeqOutputStream + : public ::cppu::WeakImplHelper< io::XOutputStream > +{ + std::vector<sal_Int8> * _seq; + +public: + explicit BSeqOutputStream( std::vector<sal_Int8> * seq ) + : _seq( seq ) + {} + + // XOutputStream + virtual void SAL_CALL writeBytes( + Sequence< sal_Int8 > const & rData ) override; + virtual void SAL_CALL flush() override; + virtual void SAL_CALL closeOutput() override; +}; + +} + +void BSeqOutputStream::writeBytes( Sequence< sal_Int8 > const & rData ) +{ + sal_Int32 nPos = _seq->size(); + _seq->resize( nPos + rData.getLength() ); + if (rData.getLength() != 0) { + memcpy( _seq->data() + nPos, + rData.getConstArray(), + rData.getLength() ); + } +} +void BSeqOutputStream::flush() +{ +} + +void BSeqOutputStream::closeOutput() +{ +} + +Reference< io::XInputStream > createInputStream( std::vector<sal_Int8>&& rInData ) +{ + return new BSeqInputStream( std::move(rInData) ); +} + +Reference< io::XInputStream > createInputStream( const sal_Int8* pData, int len ) +{ + std::vector<sal_Int8> rInData(len); + if (len != 0) { + memcpy( rInData.data(), pData, len); + } + return new BSeqInputStream( std::move(rInData) ); +} + +Reference< io::XOutputStream > createOutputStream( std::vector<sal_Int8> * pOutData ) +{ + return new BSeqOutputStream( pOutData ); +} + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xml_helper/xml_element.cxx b/xmlscript/source/xml_helper/xml_element.cxx new file mode 100644 index 000000000..2c7c71c58 --- /dev/null +++ b/xmlscript/source/xml_helper/xml_element.cxx @@ -0,0 +1,111 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include <xmlscript/xml_helper.hxx> +#include <o3tl/safeint.hxx> +#include <osl/diagnose.h> +#include <com/sun/star/xml/sax/XDocumentHandler.hpp> + +using namespace com::sun::star; +using namespace com::sun::star::uno; + +namespace xmlscript +{ + +void XMLElement::addAttribute( OUString const & rAttrName, OUString const & rValue ) +{ + _attrNames.push_back( rAttrName ); + _attrValues.push_back( rValue ); +} + +void XMLElement::addSubElement( Reference< xml::sax::XAttributeList > const & xElem ) +{ + _subElems.push_back( xElem ); +} + +Reference< xml::sax::XAttributeList > const & XMLElement::getSubElement( sal_Int32 nIndex ) +{ + return _subElems[ static_cast<size_t>(nIndex) ]; +} + +void XMLElement::dumpSubElements( Reference< xml::sax::XDocumentHandler > const & xOut ) +{ + for (const Reference<XAttributeList> & _subElem : _subElems) + { + XMLElement * pElem = static_cast< XMLElement * >( _subElem.get() ); + pElem->dump( xOut ); + } +} + +void XMLElement::dump( Reference< xml::sax::XDocumentHandler > const & xOut ) +{ + xOut->ignorableWhitespace( OUString() ); + xOut->startElement( _name, static_cast< xml::sax::XAttributeList * >( this ) ); + // write sub elements + dumpSubElements( xOut ); + xOut->ignorableWhitespace( OUString() ); + xOut->endElement( _name ); +} + +// XAttributeList +sal_Int16 XMLElement::getLength() +{ + return static_cast<sal_Int16>(_attrNames.size()); +} + +OUString XMLElement::getNameByIndex( sal_Int16 nPos ) +{ + OSL_ASSERT( nPos >= 0 && o3tl::make_unsigned(nPos) < _attrNames.size() ); + return _attrNames[ nPos ]; +} + +OUString XMLElement::getTypeByIndex( sal_Int16 nPos ) +{ + OSL_ASSERT( nPos >= 0 && o3tl::make_unsigned(nPos) < _attrNames.size() ); + // xxx todo + return OUString(); +} + +OUString XMLElement::getTypeByName( OUString const & /*rName*/ ) +{ + // xxx todo + return OUString(); +} + +OUString XMLElement::getValueByIndex( sal_Int16 nPos ) +{ + OSL_ASSERT( nPos >= 0 && o3tl::make_unsigned(nPos) < _attrNames.size() ); + return _attrValues[ nPos ]; +} + +OUString XMLElement::getValueByName( OUString const & rName ) +{ + for ( size_t nPos = 0; nPos < _attrNames.size(); ++nPos ) + { + if (_attrNames[ nPos ] == rName) + { + return _attrValues[ nPos ]; + } + } + return OUString(); +} + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xml_helper/xml_impctx.cxx b/xmlscript/source/xml_helper/xml_impctx.cxx new file mode 100644 index 000000000..1b4247ba8 --- /dev/null +++ b/xmlscript/source/xml_helper/xml_impctx.cxx @@ -0,0 +1,717 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include <sal/config.h> + +#include <xml_import.hxx> + +#include <cppuhelper/implbase.hxx> +#include <cppuhelper/supportsservice.hxx> +#include <com/sun/star/container/NoSuchElementException.hpp> +#include <com/sun/star/xml/input/XAttributes.hpp> +#include <com/sun/star/lang/XInitialization.hpp> +#include <com/sun/star/uno/XComponentContext.hpp> +#include <com/sun/star/lang/XServiceInfo.hpp> +#include <sal/log.hxx> + +#include <memory> +#include <unordered_map> +#include <vector> + +using namespace ::osl; +using namespace ::com::sun::star; +using namespace ::com::sun::star::uno; + +namespace xmlscript +{ + +const sal_Int32 UID_UNKNOWN = -1; + +typedef std::unordered_map< OUString, sal_Int32 > t_OUString2LongMap; + +namespace { + +struct PrefixEntry +{ + ::std::vector< sal_Int32 > m_Uids; + + PrefixEntry() + { m_Uids.reserve( 4 ); } +}; + +} + +typedef std::unordered_map< + OUString, std::unique_ptr<PrefixEntry> > t_OUString2PrefixMap; + +namespace { + +struct ElementEntry +{ + Reference< xml::input::XElement > m_xElement; + ::std::vector< OUString > m_prefixes; + + ElementEntry() + { m_prefixes.reserve( 2 ); } +}; + +class ExtendedAttributes; + +class MGuard +{ + Mutex * m_pMutex; +public: + explicit MGuard( std::unique_ptr<Mutex> const & pMutex ) + : m_pMutex( pMutex.get() ) + { if (m_pMutex) m_pMutex->acquire(); } + ~MGuard() noexcept + { if (m_pMutex) m_pMutex->release(); } +}; + +class DocumentHandlerImpl : + public ::cppu::WeakImplHelper< xml::sax::XDocumentHandler, + xml::input::XNamespaceMapping, + lang::XInitialization, + css::lang::XServiceInfo > +{ + friend class ExtendedAttributes; + + Reference< xml::input::XRoot > m_xRoot; + + t_OUString2LongMap m_URI2Uid; + sal_Int32 m_uid_count; + + sal_Int32 m_nLastURI_lookup; + OUString m_aLastURI_lookup; + + t_OUString2PrefixMap m_prefixes; + sal_Int32 m_nLastPrefix_lookup; + OUString m_aLastPrefix_lookup; + + std::vector< ElementEntry > m_elements; + sal_Int32 m_nSkipElements; + + std::unique_ptr<Mutex> m_pMutex; + + inline Reference< xml::input::XElement > getCurrentElement() const; + + inline sal_Int32 getUidByURI( OUString const & rURI ); + inline sal_Int32 getUidByPrefix( OUString const & rPrefix ); + + inline void pushPrefix( + OUString const & rPrefix, OUString const & rURI ); + inline void popPrefix( OUString const & rPrefix ); + + inline void getElementName( + OUString const & rQName, sal_Int32 * pUid, OUString * pLocalName ); + +public: + DocumentHandlerImpl( + Reference< xml::input::XRoot > const & xRoot, + bool bSingleThreadedUse ); + + // XServiceInfo + virtual OUString SAL_CALL getImplementationName() override; + virtual sal_Bool SAL_CALL supportsService( + OUString const & servicename ) override; + virtual Sequence< OUString > SAL_CALL getSupportedServiceNames() override; + + // XInitialization + virtual void SAL_CALL initialize( + Sequence< Any > const & arguments ) override; + + // XDocumentHandler + virtual void SAL_CALL startDocument() override; + virtual void SAL_CALL endDocument() override; + virtual void SAL_CALL startElement( + OUString const & rQElementName, + Reference< xml::sax::XAttributeList > const & xAttribs ) override; + virtual void SAL_CALL endElement( + OUString const & rQElementName ) override; + virtual void SAL_CALL characters( + OUString const & rChars ) override; + virtual void SAL_CALL ignorableWhitespace( + OUString const & rWhitespaces ) override; + virtual void SAL_CALL processingInstruction( + OUString const & rTarget, OUString const & rData ) override; + virtual void SAL_CALL setDocumentLocator( + Reference< xml::sax::XLocator > const & xLocator ) override; + + // XNamespaceMapping + virtual sal_Int32 SAL_CALL getUidByUri( OUString const & Uri ) override; + virtual OUString SAL_CALL getUriByUid( sal_Int32 Uid ) override; +}; + +} + +constexpr OUStringLiteral g_sXMLNS_PREFIX_UNKNOWN( u"<<< unknown prefix >>>" ); +constexpr OUStringLiteral g_sXMLNS( u"xmlns" ); + + +DocumentHandlerImpl::DocumentHandlerImpl( + Reference< xml::input::XRoot > const & xRoot, + bool bSingleThreadedUse ) + : m_xRoot( xRoot ), + m_uid_count( 0 ), + m_nLastURI_lookup( UID_UNKNOWN ), + m_aLastURI_lookup( "<<< unknown URI >>>" ), + m_nLastPrefix_lookup( UID_UNKNOWN ), + m_aLastPrefix_lookup( "<<< unknown URI >>>" ), + m_nSkipElements( 0 ) +{ + m_elements.reserve( 10 ); + + if (! bSingleThreadedUse) + m_pMutex.reset(new Mutex); +} + +inline Reference< xml::input::XElement > +DocumentHandlerImpl::getCurrentElement() const +{ + MGuard aGuard( m_pMutex ); + if (m_elements.empty()) + return Reference< xml::input::XElement >(); + else + return m_elements.back().m_xElement; +} + +inline sal_Int32 DocumentHandlerImpl::getUidByURI( OUString const & rURI ) +{ + MGuard guard( m_pMutex ); + if (m_nLastURI_lookup == UID_UNKNOWN || m_aLastURI_lookup != rURI) + { + t_OUString2LongMap::const_iterator iFind( m_URI2Uid.find( rURI ) ); + if (iFind != m_URI2Uid.end()) // id found + { + m_nLastURI_lookup = iFind->second; + m_aLastURI_lookup = rURI; + } + else + { + m_nLastURI_lookup = m_uid_count; + ++m_uid_count; + m_URI2Uid[ rURI ] = m_nLastURI_lookup; + m_aLastURI_lookup = rURI; + } + } + return m_nLastURI_lookup; +} + +inline sal_Int32 DocumentHandlerImpl::getUidByPrefix( + OUString const & rPrefix ) +{ + // commonly the last added prefix is used often for several tags... + // good guess + if (m_nLastPrefix_lookup == UID_UNKNOWN || m_aLastPrefix_lookup != rPrefix) + { + t_OUString2PrefixMap::const_iterator iFind( + m_prefixes.find( rPrefix ) ); + if (iFind != m_prefixes.end()) + { + const PrefixEntry & rPrefixEntry = *iFind->second; + SAL_WARN_IF( rPrefixEntry.m_Uids.empty(), "xmlscript.xmlhelper", "rPrefixEntry.m_Uids is empty" ); + m_nLastPrefix_lookup = rPrefixEntry.m_Uids.back(); + m_aLastPrefix_lookup = rPrefix; + } + else + { + m_nLastPrefix_lookup = UID_UNKNOWN; + m_aLastPrefix_lookup = g_sXMLNS_PREFIX_UNKNOWN; + } + } + return m_nLastPrefix_lookup; +} + +inline void DocumentHandlerImpl::pushPrefix( + OUString const & rPrefix, OUString const & rURI ) +{ + // lookup id for URI + sal_Int32 nUid = getUidByURI( rURI ); + + // mark prefix with id + t_OUString2PrefixMap::const_iterator iFind( m_prefixes.find( rPrefix ) ); + if (iFind == m_prefixes.end()) // unused prefix + { + PrefixEntry * pEntry = new PrefixEntry(); + pEntry->m_Uids.push_back( nUid ); // latest id for prefix + m_prefixes[rPrefix].reset(pEntry); + } + else + { + PrefixEntry& rEntry = *iFind->second; + SAL_WARN_IF(rEntry.m_Uids.empty(), "xmlscript.xmlhelper", "pEntry->m_Uids is empty"); + rEntry.m_Uids.push_back(nUid); + } + + m_aLastPrefix_lookup = rPrefix; + m_nLastPrefix_lookup = nUid; +} + +inline void DocumentHandlerImpl::popPrefix( + OUString const & rPrefix ) +{ + t_OUString2PrefixMap::iterator iFind( m_prefixes.find( rPrefix ) ); + if (iFind != m_prefixes.end()) // unused prefix + { + PrefixEntry& rEntry = *iFind->second; + rEntry.m_Uids.pop_back(); // pop last id for prefix + if (rEntry.m_Uids.empty()) // erase prefix key + { + m_prefixes.erase(iFind); + } + } + + m_nLastPrefix_lookup = UID_UNKNOWN; + m_aLastPrefix_lookup = g_sXMLNS_PREFIX_UNKNOWN; +} + +inline void DocumentHandlerImpl::getElementName( + OUString const & rQName, sal_Int32 * pUid, OUString * pLocalName ) +{ + sal_Int32 nColonPos = rQName.indexOf( ':' ); + *pLocalName = (nColonPos >= 0 ? rQName.copy( nColonPos +1 ) : rQName); + *pUid = getUidByPrefix( + nColonPos >= 0 ? rQName.copy( 0, nColonPos ) : OUString() ); +} + +namespace { + +class ExtendedAttributes : + public ::cppu::WeakImplHelper< xml::input::XAttributes > +{ + sal_Int32 const m_nAttributes; + std::unique_ptr<sal_Int32[]> m_pUids; + std::unique_ptr<OUString[]> m_pLocalNames; + std::unique_ptr<OUString[]> m_pQNames; + std::unique_ptr<OUString[]> m_pValues; + +public: + inline ExtendedAttributes( + sal_Int32 nAttributes, + std::unique_ptr<sal_Int32[]> pUids, + std::unique_ptr<OUString[]> pLocalNames, + std::unique_ptr<OUString[]> pQNames, + Reference< xml::sax::XAttributeList > const & xAttributeList ); + + // XAttributes + virtual sal_Int32 SAL_CALL getLength() override; + virtual sal_Int32 SAL_CALL getIndexByQName( + OUString const & rQName ) override; + virtual sal_Int32 SAL_CALL getIndexByUidName( + sal_Int32 nUid, OUString const & rLocalName ) override; + virtual OUString SAL_CALL getQNameByIndex( + sal_Int32 nIndex ) override; + virtual sal_Int32 SAL_CALL getUidByIndex( + sal_Int32 nIndex ) override; + virtual OUString SAL_CALL getLocalNameByIndex( + sal_Int32 nIndex ) override; + virtual OUString SAL_CALL getValueByIndex( + sal_Int32 nIndex ) override; + virtual OUString SAL_CALL getValueByUidName( + sal_Int32 nUid, OUString const & rLocalName ) override; + virtual OUString SAL_CALL getTypeByIndex( + sal_Int32 nIndex ) override; +}; + +} + +inline ExtendedAttributes::ExtendedAttributes( + sal_Int32 nAttributes, + std::unique_ptr<sal_Int32[]> pUids, + std::unique_ptr<OUString[]> pLocalNames, std::unique_ptr<OUString[]> pQNames, + Reference< xml::sax::XAttributeList > const & xAttributeList ) + : m_nAttributes( nAttributes ) + , m_pUids( std::move(pUids) ) + , m_pLocalNames( std::move(pLocalNames) ) + , m_pQNames( std::move(pQNames) ) + , m_pValues( new OUString[ nAttributes ] ) +{ + for ( sal_Int32 nPos = 0; nPos < nAttributes; ++nPos ) + { + m_pValues[ nPos ] = xAttributeList->getValueByIndex( nPos ); + } +} + +// XServiceInfo + +OUString DocumentHandlerImpl::getImplementationName() +{ + return "com.sun.star.comp.xml.input.SaxDocumentHandler"; +} + +sal_Bool DocumentHandlerImpl::supportsService( OUString const & servicename ) +{ + return cppu::supportsService(this, servicename); +} + +Sequence< OUString > DocumentHandlerImpl::getSupportedServiceNames() +{ + return { "com.sun.star.xml.input.SaxDocumentHandler" }; +} + +// XInitialization + +void DocumentHandlerImpl::initialize( + Sequence< Any > const & arguments ) +{ + MGuard guard( m_pMutex ); + Reference< xml::input::XRoot > xRoot; + if (arguments.getLength() != 1 || + !(arguments[ 0 ] >>= xRoot) || + !xRoot.is()) + { + throw RuntimeException( "missing root instance!" ); + } + m_xRoot = xRoot; +} + +// XNamespaceMapping + +sal_Int32 DocumentHandlerImpl::getUidByUri( OUString const & Uri ) +{ + sal_Int32 uid = getUidByURI( Uri ); + SAL_WARN_IF( uid == UID_UNKNOWN, "xmlscript.xmlhelper", "uid UNKNOWN"); + return uid; +} + +OUString DocumentHandlerImpl::getUriByUid( sal_Int32 Uid ) +{ + MGuard guard( m_pMutex ); + for (const auto& rURIUid : m_URI2Uid) + { + if (rURIUid.second == Uid) + return rURIUid.first; + } + throw container::NoSuchElementException( "no such xmlns uid!" , static_cast< OWeakObject * >(this) ); +} + +// XDocumentHandler + +void DocumentHandlerImpl::startDocument() +{ + m_xRoot->startDocument( static_cast< xml::input::XNamespaceMapping * >( this ) ); +} + +void DocumentHandlerImpl::endDocument() +{ + m_xRoot->endDocument(); +} + +void DocumentHandlerImpl::startElement( + OUString const & rQElementName, + Reference< xml::sax::XAttributeList > const & xAttribs ) +{ + Reference< xml::input::XElement > xCurrentElement; + Reference< xml::input::XAttributes > xAttributes; + sal_Int32 nUid; + OUString aLocalName; + ElementEntry elementEntry; + + { // guard start: + MGuard aGuard( m_pMutex ); + // currently skipping elements and waiting for end tags? + if (m_nSkipElements > 0) + { + ++m_nSkipElements; // wait for another end tag + SAL_INFO("xmlscript.xmlhelper", " no context given on createChildElement() => ignoring element \"" << rQElementName << "\" ..."); + return; + } + + sal_Int16 nAttribs = xAttribs->getLength(); + + // save all namespace ids + std::unique_ptr<sal_Int32[]> pUids(new sal_Int32[ nAttribs ]); + std::unique_ptr<OUString[]> pPrefixes(new OUString[ nAttribs ]); + std::unique_ptr<OUString[]> pLocalNames(new OUString[ nAttribs ]); + std::unique_ptr<OUString[]> pQNames(new OUString[ nAttribs ]); + + // first recognize all xmlns attributes + sal_Int16 nPos; + for ( nPos = 0; nPos < nAttribs; ++nPos ) + { + // mark attribute to be collected further + // on with attribute's uid and current prefix + pUids[ nPos ] = 0; // modified + + pQNames[ nPos ] = xAttribs->getNameByIndex( nPos ); + OUString const & rQAttributeName = pQNames[ nPos ]; + + if (rQAttributeName.startsWith( g_sXMLNS )) + { + if (rQAttributeName.getLength() == 5) // set default namespace + { + OUString aDefNamespacePrefix; + pushPrefix( + aDefNamespacePrefix, + xAttribs->getValueByIndex( nPos ) ); + elementEntry.m_prefixes.push_back( aDefNamespacePrefix ); + pUids[ nPos ] = UID_UNKNOWN; + pPrefixes[ nPos ] = g_sXMLNS; + pLocalNames[ nPos ] = aDefNamespacePrefix; + } + else if (':' == rQAttributeName[ 5 ]) // set prefix + { + OUString aPrefix( rQAttributeName.copy( 6 ) ); + pushPrefix( aPrefix, xAttribs->getValueByIndex( nPos ) ); + elementEntry.m_prefixes.push_back( aPrefix ); + pUids[ nPos ] = UID_UNKNOWN; + pPrefixes[ nPos ] = g_sXMLNS; + pLocalNames[ nPos ] = aPrefix; + } + // else just a name starting with xmlns, but no prefix + } + } + + // now read out attribute prefixes (all namespace prefixes have been set) + for ( nPos = 0; nPos < nAttribs; ++nPos ) + { + if (pUids[ nPos ] >= 0) // no xmlns: attribute + { + OUString const & rQAttributeName = pQNames[ nPos ]; + SAL_WARN_IF(rQAttributeName.startsWith( "xmlns:" ), "xmlscript.xmlhelper", "### unexpected xmlns!" ); + + // collect attribute's uid and current prefix + sal_Int32 nColonPos = rQAttributeName.indexOf( ':' ); + if (nColonPos >= 0) + { + pPrefixes[ nPos ] = rQAttributeName.copy( 0, nColonPos ); + pLocalNames[ nPos ] = rQAttributeName.copy( nColonPos +1 ); + } + else + { + pPrefixes[ nPos ].clear(); + pLocalNames[ nPos ] = rQAttributeName; + // leave local names unmodified + } + pUids[ nPos ] = getUidByPrefix( pPrefixes[ nPos ] ); + } + } + pPrefixes.reset(); + // ownership of arrays belongs to attribute list + xAttributes = new ExtendedAttributes(nAttribs, std::move(pUids), std::move(pLocalNames), + std::move(pQNames), xAttribs); + + getElementName( rQElementName, &nUid, &aLocalName ); + + // create new child context and append to list + if (! m_elements.empty()) + xCurrentElement = m_elements.back().m_xElement; + } // :guard end + + if (xCurrentElement.is()) + { + elementEntry.m_xElement = + xCurrentElement->startChildElement( nUid, aLocalName, xAttributes ); + } + else + { + elementEntry.m_xElement = + m_xRoot->startRootElement( nUid, aLocalName, xAttributes ); + } + + { + MGuard aGuard( m_pMutex ); + if (elementEntry.m_xElement.is()) + { + m_elements.push_back( std::move(elementEntry) ); + } + else + { + ++m_nSkipElements; + + // pop prefixes + for (sal_Int32 nPos = elementEntry.m_prefixes.size(); nPos--;) + popPrefix(elementEntry.m_prefixes[nPos]); + + SAL_INFO("xmlscript.xmlhelper", " no context given on createChildElement() => ignoring element \"" << rQElementName << "\" ..."); + } + } +} + +void DocumentHandlerImpl::endElement( + OUString const & rQElementName ) +{ + Reference< xml::input::XElement > xCurrentElement; + { + MGuard aGuard( m_pMutex ); + if (m_nSkipElements) + { + --m_nSkipElements; + SAL_INFO("xmlscript.xmlhelper", "### received endElement() for \"" << rQElementName << "\"."); + return; + } + + // popping context + SAL_WARN_IF( m_elements.empty(), "xmlscript.xmlhelper", "m_elements is empty" ); + ElementEntry& rEntry = m_elements.back(); + xCurrentElement = rEntry.m_xElement; + +#if OSL_DEBUG_LEVEL > 0 + sal_Int32 nUid; + OUString aLocalName; + getElementName( rQElementName, &nUid, &aLocalName ); + SAL_WARN_IF( xCurrentElement->getLocalName() != aLocalName, "xmlscript.xmlhelper", "xCurrentElement->getLocalName() != aLocalName" ); + SAL_WARN_IF( xCurrentElement->getUid() != nUid, "xmlscript.xmlhelper", "xCurrentElement->getUid() != nUid" ); +#endif + + // pop prefixes + for ( sal_Int32 nPos = rEntry.m_prefixes.size(); nPos--; ) + { + popPrefix( rEntry.m_prefixes[ nPos ] ); + } + m_elements.pop_back(); + } + xCurrentElement->endElement(); +} + +void DocumentHandlerImpl::characters( OUString const & rChars ) +{ + Reference< xml::input::XElement > xCurrentElement( getCurrentElement() ); + if (xCurrentElement.is()) + xCurrentElement->characters( rChars ); +} + +void DocumentHandlerImpl::ignorableWhitespace( + OUString const & rWhitespaces ) +{ + Reference< xml::input::XElement > xCurrentElement( getCurrentElement() ); + if (xCurrentElement.is()) + xCurrentElement->ignorableWhitespace( rWhitespaces ); +} + +void DocumentHandlerImpl::processingInstruction( + OUString const & rTarget, OUString const & rData ) +{ + Reference< xml::input::XElement > xCurrentElement( getCurrentElement() ); + if (xCurrentElement.is()) + xCurrentElement->processingInstruction( rTarget, rData ); + else + m_xRoot->processingInstruction( rTarget, rData ); +} + +void DocumentHandlerImpl::setDocumentLocator( + Reference< xml::sax::XLocator > const & xLocator ) +{ + m_xRoot->setDocumentLocator( xLocator ); +} + +// XAttributes + +sal_Int32 ExtendedAttributes::getIndexByQName( OUString const & rQName ) +{ + for ( sal_Int32 nPos = m_nAttributes; nPos--; ) + { + if (m_pQNames[ nPos ] == rQName) + { + return nPos; + } + } + return -1; +} + +sal_Int32 ExtendedAttributes::getLength() +{ + return m_nAttributes; +} + +OUString ExtendedAttributes::getLocalNameByIndex( sal_Int32 nIndex ) +{ + if (nIndex < m_nAttributes) + return m_pLocalNames[ nIndex ]; + else + return OUString(); +} + +OUString ExtendedAttributes::getQNameByIndex( sal_Int32 nIndex ) +{ + if (nIndex < m_nAttributes) + return m_pQNames[ nIndex ]; + else + return OUString(); +} + +OUString ExtendedAttributes::getTypeByIndex( sal_Int32 nIndex ) +{ + SAL_WARN_IF( nIndex >= m_nAttributes , "xmlscript.xmlhelper", "nIndex is bigger then m_nAttributes"); + return OUString(); // unsupported +} + +OUString ExtendedAttributes::getValueByIndex( sal_Int32 nIndex ) +{ + if (nIndex < m_nAttributes) + return m_pValues[ nIndex ]; + else + return OUString(); +} + +sal_Int32 ExtendedAttributes::getIndexByUidName( + sal_Int32 nUid, OUString const & rLocalName ) +{ + for ( sal_Int32 nPos = m_nAttributes; nPos--; ) + { + if (m_pUids[ nPos ] == nUid && m_pLocalNames[ nPos ] == rLocalName) + { + return nPos; + } + } + return -1; +} + +sal_Int32 ExtendedAttributes::getUidByIndex( sal_Int32 nIndex ) +{ + if (nIndex < m_nAttributes) + return m_pUids[ nIndex ]; + else + return -1; +} + +OUString ExtendedAttributes::getValueByUidName( + sal_Int32 nUid, OUString const & rLocalName ) +{ + for ( sal_Int32 nPos = m_nAttributes; nPos--; ) + { + if (m_pUids[ nPos ] == nUid && m_pLocalNames[ nPos ] == rLocalName) + { + return m_pValues[ nPos ]; + } + } + return OUString(); +} + +Reference< xml::sax::XDocumentHandler > createDocumentHandler( + Reference< xml::input::XRoot > const & xRoot ) +{ + SAL_WARN_IF( !xRoot.is(), "xmlscript.xmlhelper", "xRoot is NULL" ); + if (xRoot.is()) + { + return new DocumentHandlerImpl(xRoot, true /* mt use */); + } + return Reference< xml::sax::XDocumentHandler >(); +} + +} + +extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface* +com_sun_star_comp_xml_input_SaxDocumentHandler_get_implementation( + css::uno::XComponentContext* , css::uno::Sequence<css::uno::Any> const& ) +{ + return cppu::acquire(new xmlscript::DocumentHandlerImpl({}, false /* mt use */)); +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmldlg_imexp/common.hxx b/xmlscript/source/xmldlg_imexp/common.hxx new file mode 100644 index 000000000..88b32b0a4 --- /dev/null +++ b/xmlscript/source/xmldlg_imexp/common.hxx @@ -0,0 +1,41 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#pragma once + +#include <sal/types.h> + +namespace xmlscript +{ +const sal_Int16 BORDER_NONE = 0; +const sal_Int16 BORDER_3D = 1; +const sal_Int16 BORDER_SIMPLE = 2; +const sal_Int16 BORDER_SIMPLE_COLOR = 3; + +struct StringTriple +{ + char const* first; + char const* second; + char const* third; +}; + +extern StringTriple const* const g_pEventTranslations; +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmldlg_imexp/exp_share.hxx b/xmlscript/source/xmldlg_imexp/exp_share.hxx new file mode 100644 index 000000000..919950c79 --- /dev/null +++ b/xmlscript/source/xmldlg_imexp/exp_share.hxx @@ -0,0 +1,258 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#pragma once + +#include <xmlscript/xmldlg_imexp.hxx> +#include <xmlscript/xml_helper.hxx> +#include <osl/diagnose.h> +#include <com/sun/star/xml/sax/XAttributeList.hpp> +#include <com/sun/star/beans/XPropertySet.hpp> +#include <com/sun/star/beans/XPropertyState.hpp> +#include <com/sun/star/awt/FontDescriptor.hpp> +#include <com/sun/star/awt/FontEmphasisMark.hpp> +#include <com/sun/star/awt/FontRelief.hpp> +#include <memory> +#include <vector> + + +namespace xmlscript +{ + +struct Style +{ + sal_uInt32 _backgroundColor; + sal_uInt32 _textColor; + sal_uInt32 _textLineColor; + sal_Int16 _border; + sal_Int32 _borderColor; + css::awt::FontDescriptor _descr; + sal_uInt16 _fontRelief; + sal_uInt16 _fontEmphasisMark; + sal_uInt32 _fillColor; + sal_Int16 _visualEffect; + + // current highest mask: 0x40 + short _all; + short _set; + + OUString _id; + + explicit Style( short all_ ) + : _backgroundColor(0) + , _textColor(0) + , _textLineColor(0) + , _border(0) + , _borderColor(0) + , _fontRelief(css::awt::FontRelief::NONE) + , _fontEmphasisMark(css::awt::FontEmphasisMark::NONE) + , _fillColor(0) + , _visualEffect(0) + , _all(all_) + , _set(0) + { + } + + css::uno::Reference< css::xml::sax::XAttributeList > createElement(); +}; +class StyleBag +{ + ::std::vector<Style> _styles; + +public: + ~StyleBag() ; + + OUString getStyleId( Style const & rStyle ); + + void dump( css::uno::Reference< css::xml::sax::XExtendedDocumentHandler > + const & xOut ); +}; + +class ElementDescriptor + : public ::xmlscript::XMLElement +{ + css::uno::Reference< css::beans::XPropertySet > _xProps; + css::uno::Reference< css::beans::XPropertyState > _xPropState; + css::uno::Reference< css::frame::XModel > _xDocument; + +public: + ElementDescriptor( + css::uno::Reference< css::beans::XPropertySet > const & xProps, + css::uno::Reference< css::beans::XPropertyState > const & xPropState, + OUString const & name, css::uno::Reference< css::frame::XModel > const & xDocument ) + : XMLElement( name ) + , _xProps( xProps ) + , _xPropState( xPropState ) + , _xDocument( xDocument ) + {} + explicit ElementDescriptor( + OUString const & name ) + : XMLElement( name ) + {} + + template<typename T> + inline void read( + OUString const & propName, OUString const & attrName, + bool forceAttribute = false ); + + template<typename T> + inline bool readProp( T * ret, OUString const & rPropName ); + css::uno::Any readProp( OUString const & rPropName ); + void readScrollableSettings(); + void readDefaults( bool supportPrintable = true, bool supportVisible = true ); + void readStringAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readDoubleAttr( + OUString const & rPropName, OUString const & rAttrName ) + { read<double>( rPropName, rAttrName ); } + void readLongAttr( + OUString const & rPropName, OUString const & rAttrName, + bool forceAttribute = false ) + { read<sal_Int32>( rPropName, rAttrName, forceAttribute ); } + void readHexLongAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readShortAttr( + OUString const & rPropName, OUString const & rAttrName ) + { read<sal_Int32>( rPropName, rAttrName ); } + inline void readBoolAttr( + OUString const & rPropName, OUString const & rAttrName ); + + void readAlignAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readVerticalAlignAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readImageAlignAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readImagePositionAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readDateAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readDateFormatAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readTimeAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readTimeFormatAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readOrientationAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readButtonTypeAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readLineEndFormatAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readSelectionTypeAttr( + OUString const & rPropName, OUString const & rAttrName ); + void readImageScaleModeAttr( + OUString const & rPropName, OUString const & rAttrName ); + + void readDataAwareAttr(OUString const & rAttrName ); + void readImageOrGraphicAttr(OUString const & rAttrName ); + + void addBoolAttr( + OUString const & rAttrName, bool bValue ) + { addAttribute( rAttrName, OUString::boolean(bValue) ); } + void addNumberFormatAttr( + css::uno::Reference< css::beans::XPropertySet > + const & xFormatProperties ); + + void readEvents(); + void readDialogModel( StyleBag * all_styles ); + void readBullitinBoard( StyleBag * all_styles ); + void readMultiPageModel( StyleBag * all_styles ); + void readFrameModel( StyleBag * all_styles ); + void readPageModel( StyleBag * all_styles ); + void readButtonModel( StyleBag * all_styles ); + void readEditModel( StyleBag * all_styles ); + void readCheckBoxModel( StyleBag * all_styles ); + void readRadioButtonModel( StyleBag * all_styles ); + void readComboBoxModel( StyleBag * all_styles ); + void readCurrencyFieldModel( StyleBag * all_styles ); + void readDateFieldModel( StyleBag * all_styles ); + void readFileControlModel( StyleBag * all_styles ); + void readTreeControlModel( StyleBag * all_styles ); + void readFixedTextModel( StyleBag * all_styles ); + void readGroupBoxModel( StyleBag * all_styles ); + void readImageControlModel( StyleBag * all_styles ); + void readListBoxModel( StyleBag * all_styles ); + void readNumericFieldModel( StyleBag * all_styles ); + void readPatternFieldModel( StyleBag * all_styles ); + void readFormattedFieldModel( StyleBag * all_styles ); + void readTimeFieldModel( StyleBag * all_styles ); + void readFixedLineModel( StyleBag * all_styles ); + void readProgressBarModel( StyleBag * all_styles ); + void readScrollBarModel( StyleBag * all_styles ); + void readSpinButtonModel( StyleBag * all_styles ); + void readFixedHyperLinkModel( StyleBag * all_styles ); + void readGridControlModel( StyleBag * all_styles ); +}; + +template<typename T> +inline void ElementDescriptor::read( + OUString const & propName, OUString const & attrName, + bool forceAttribute ) +{ + if (forceAttribute || + css::beans::PropertyState_DEFAULT_VALUE != + _xPropState->getPropertyState( propName )) + { + css::uno::Any a( _xProps->getPropertyValue( propName ) ); + T v = T(); + if (a >>= v) + addAttribute( attrName, OUString::number(v) ); + else + OSL_FAIL( "### unexpected property type!" ); + } +} + +template<> +inline void ElementDescriptor::read<sal_Bool>( + OUString const & propName, OUString const & attrName, + bool forceAttribute ) +{ + if (forceAttribute || + css::beans::PropertyState_DEFAULT_VALUE != + _xPropState->getPropertyState( propName )) + { + css::uno::Any a( _xProps->getPropertyValue( propName ) ); + bool v; + if (a >>= v) + addAttribute( attrName, OUString::boolean(v) ); + else + OSL_FAIL( "### unexpected property type!" ); + } +} + +inline void ElementDescriptor::readBoolAttr( + OUString const & rPropName, OUString const & rAttrName ) +{ + read<sal_Bool>( rPropName, rAttrName ); +} + +template<typename T> +inline bool ElementDescriptor::readProp( + T * ret, OUString const & rPropName ) +{ + _xProps->getPropertyValue( rPropName ) >>= *ret; + return css::beans::PropertyState_DEFAULT_VALUE != + _xPropState->getPropertyState( rPropName ); +} + +} + + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmldlg_imexp/imp_share.hxx b/xmlscript/source/xmldlg_imexp/imp_share.hxx new file mode 100644 index 000000000..12da21724 --- /dev/null +++ b/xmlscript/source/xmldlg_imexp/imp_share.hxx @@ -0,0 +1,1052 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#pragma once + +#include <xmlscript/xmldlg_imexp.hxx> +#include <cppuhelper/implbase.hxx> +#include <com/sun/star/uno/XComponentContext.hpp> +#include <com/sun/star/lang/XMultiServiceFactory.hpp> +#include <com/sun/star/container/XNameContainer.hpp> +#include <com/sun/star/beans/XPropertySet.hpp> +#include <com/sun/star/util/XNumberFormatsSupplier.hpp> +#include <com/sun/star/awt/XControlModel.hpp> +#include <com/sun/star/awt/FontDescriptor.hpp> +#include <com/sun/star/awt/FontEmphasisMark.hpp> +#include <com/sun/star/awt/FontRelief.hpp> +#include <com/sun/star/xml/input/XRoot.hpp> +#include <com/sun/star/xml/sax/SAXException.hpp> +#include <com/sun/star/container/ElementExistException.hpp> +#include <com/sun/star/lang/WrappedTargetRuntimeException.hpp> +#include <osl/diagnose.h> +#include <rtl/ref.hxx> +#include <o3tl/string_view.hxx> +#include <memory> +#include <vector> + +namespace xmlscript +{ + +inline sal_Int32 toInt32( OUString const & rStr ) +{ + sal_Int32 nVal; + if (rStr.getLength() > 2 && rStr[ 0 ] == '0' && rStr[ 1 ] == 'x') + nVal = o3tl::toUInt32(rStr.subView( 2 ), 16); + else + nVal = rStr.toInt32(); + return nVal; +} + +inline bool getBoolAttr( + sal_Bool * pRet, OUString const & rAttrName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + sal_Int32 nUid ) +{ + OUString aValue( xAttributes->getValueByUidName( nUid, rAttrName ) ); + if (!aValue.isEmpty()) + { + if ( aValue == "true" ) + { + *pRet = true; + return true; + } + else if ( aValue == "false" ) + { + *pRet = false; + return true; + } + else + { + throw css::xml::sax::SAXException( + rAttrName + ": no boolean value (true|false)!", + css::uno::Reference<css::uno::XInterface>(), css::uno::Any() ); + } + } + return false; +} + +inline bool getStringAttr( + OUString * pRet, OUString const & rAttrName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + sal_Int32 nUid ) +{ + *pRet = xAttributes->getValueByUidName( nUid, rAttrName ); + return (!pRet->isEmpty()); +} + +inline bool getLongAttr( + sal_Int32 * pRet, OUString const & rAttrName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + sal_Int32 nUid ) +{ + OUString aValue( xAttributes->getValueByUidName( nUid, rAttrName ) ); + if (!aValue.isEmpty()) + { + *pRet = toInt32( aValue ); + return true; + } + return false; +} + +class ImportContext; + +struct DialogImport + : public ::cppu::WeakImplHelper< css::xml::input::XRoot > +{ + friend class ImportContext; +private: + css::uno::Reference< css::uno::XComponentContext > _xContext; + css::uno::Reference< css::util::XNumberFormatsSupplier > _xSupplier; + + std::shared_ptr< std::vector< OUString > > _pStyleNames; + std::shared_ptr< std::vector< css::uno::Reference< css::xml::input::XElement > > > _pStyles; + + css::uno::Reference< css::frame::XModel > _xDoc; +public: + css::uno::Reference< css::container::XNameContainer > _xDialogModel; + css::uno::Reference< css::lang::XMultiServiceFactory > _xDialogModelFactory; + + sal_Int32 XMLNS_DIALOGS_UID, XMLNS_SCRIPT_UID; + + bool isEventElement( + sal_Int32 nUid, std::u16string_view rLocalName ) const + { + return ((XMLNS_SCRIPT_UID == nUid && (rLocalName == u"event" || rLocalName == u"listener-event" )) || + (XMLNS_DIALOGS_UID == nUid && rLocalName == u"event" )); + } + + void addStyle( + OUString const & rStyleId, + css::uno::Reference< css::xml::input::XElement > const & xStyle ); + css::uno::Reference< css::xml::input::XElement > getStyle( + std::u16string_view rStyleId ) const; + + css::uno::Reference< css::uno::XComponentContext > + const & getComponentContext() const { return _xContext; } + css::uno::Reference< css::util::XNumberFormatsSupplier > + const & getNumberFormatsSupplier(); + + DialogImport( + css::uno::Reference<css::uno::XComponentContext> const & xContext, + css::uno::Reference<css::container::XNameContainer> + const & xDialogModel, + std::shared_ptr< std::vector< OUString > > const & pStyleNames, + std::shared_ptr< std::vector< css::uno::Reference< css::xml::input::XElement > > > const & pStyles, + css::uno::Reference<css::frame::XModel> const & xDoc ) + : _xContext( xContext ) + , _pStyleNames( pStyleNames ) + , _pStyles( pStyles ) + , _xDoc( xDoc ) + , _xDialogModel( xDialogModel ) + , _xDialogModelFactory( xDialogModel, css::uno::UNO_QUERY_THROW ) + , XMLNS_DIALOGS_UID( 0 ) + , XMLNS_SCRIPT_UID( 0 ) + { OSL_ASSERT( _xDialogModel.is() && _xContext.is() ); } + DialogImport( const DialogImport& rOther ) : + ::cppu::WeakImplHelper< css::xml::input::XRoot >() + , _xContext( rOther._xContext ) + , _xSupplier( rOther._xSupplier ) + , _pStyleNames( rOther._pStyleNames ) + , _pStyles( rOther._pStyles ) + , _xDoc( rOther._xDoc ) + , _xDialogModel( rOther._xDialogModel ) + , _xDialogModelFactory( rOther._xDialogModelFactory ) + , XMLNS_DIALOGS_UID( rOther.XMLNS_DIALOGS_UID ) + , XMLNS_SCRIPT_UID( rOther.XMLNS_SCRIPT_UID ) {} + + virtual ~DialogImport() override; + + const css::uno::Reference< css::frame::XModel >& getDocOwner() const { return _xDoc; } + + // XRoot + virtual void SAL_CALL startDocument( + css::uno::Reference< css::xml::input::XNamespaceMapping > + const & xNamespaceMapping ) override; + virtual void SAL_CALL endDocument() override; + virtual void SAL_CALL processingInstruction( + OUString const & rTarget, OUString const & rData ) override; + virtual void SAL_CALL setDocumentLocator( + css::uno::Reference< css::xml::sax::XLocator > const & xLocator ) override; + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startRootElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; +}; + +class ElementBase + : public ::cppu::WeakImplHelper< css::xml::input::XElement > +{ +protected: + // We deliberately store these as raw pointers, otherwise we get reference cycles between DialogImport and the elements + DialogImport* m_pImport; + ElementBase* m_pParent; +private: + const sal_Int32 _nUid; + const OUString _aLocalName; +protected: + const css::uno::Reference< css::xml::input::XAttributes > _xAttributes; + +public: + ElementBase( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ); + virtual ~ElementBase() override; + + // XElement + virtual css::uno::Reference<css::xml::input::XElement> SAL_CALL getParent() override; + virtual OUString SAL_CALL getLocalName() override; + virtual sal_Int32 SAL_CALL getUid() override; + virtual css::uno::Reference< css::xml::input::XAttributes > + SAL_CALL getAttributes() override; + virtual void SAL_CALL ignorableWhitespace( + OUString const & rWhitespaces ) override; + virtual void SAL_CALL characters( OUString const & rChars ) override; + virtual void SAL_CALL processingInstruction( + OUString const & Target, OUString const & Data ) override; + virtual void SAL_CALL endElement() override; + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; +}; + +class StylesElement + : public ElementBase +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + + StylesElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ElementBase( pImport->XMLNS_DIALOGS_UID, + rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class StyleElement + : public ElementBase +{ + sal_Int32 _backgroundColor; + sal_Int32 _textColor; + sal_Int32 _textLineColor; + sal_Int16 _border; + sal_Int32 _borderColor; + css::awt::FontDescriptor _descr; + sal_Int16 _fontRelief; + sal_Int16 _fontEmphasisMark; + sal_Int32 _fillColor; + sal_Int16 _visualEffect; + + // current highest mask: 0x40 + short _inited, _hasValue; + + void setFontProperties( + css::uno::Reference< css::beans::XPropertySet > const & xProps ) const; + +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + void importTextColorStyle( + css::uno::Reference< css::beans::XPropertySet > const & xProps ); + void importTextLineColorStyle( + css::uno::Reference< css::beans::XPropertySet > const & xProps ); + void importFillColorStyle( + css::uno::Reference< css::beans::XPropertySet > const & xProps ); + void importBackgroundColorStyle( + css::uno::Reference< css::beans::XPropertySet > const & xProps ); + void importFontStyle( + css::uno::Reference< css::beans::XPropertySet > const & xProps ); + void importBorderStyle( + css::uno::Reference< css::beans::XPropertySet > const & xProps ); + void importVisualEffectStyle( + css::uno::Reference< css::beans::XPropertySet > const & xProps ); + + StyleElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ElementBase( pImport->XMLNS_DIALOGS_UID, + rLocalName, xAttributes, pParent, pImport ) + , _backgroundColor(0) + , _textColor(0) + , _textLineColor(0) + , _border(0) + , _borderColor(0) + , _fontRelief( css::awt::FontRelief::NONE ) + , _fontEmphasisMark( css::awt::FontEmphasisMark::NONE ) + , _fillColor(0) + , _visualEffect(0) + , _inited( 0 ) + , _hasValue( 0 ) + { + } +}; + +class MenuPopupElement + : public ElementBase +{ + std::vector< OUString > _itemValues; + std::vector< sal_Int16 > _itemSelected; + bool _allowEmptyItems; +public: + css::uno::Sequence< OUString > getItemValues(); + css::uno::Sequence< sal_Int16 > getSelectedItems(); + + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + + MenuPopupElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport, + bool aAllowEmptyItems) + : ElementBase( pImport->XMLNS_DIALOGS_UID, + rLocalName, xAttributes, pParent, pImport ) + , _allowEmptyItems(aAllowEmptyItems) + {} +}; + +class ControlElement + : public ElementBase +{ + friend class EventElement; + +protected: + sal_Int32 _nBasePosX, _nBasePosY; + + std::vector< css::uno::Reference< css::xml::input::XElement > > _events; + + OUString getControlId( + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + OUString getControlModelName( + OUString const& rDefaultModel, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + css::uno::Reference< css::xml::input::XElement > getStyle( + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); +public: + std::vector<css::uno::Reference< css::xml::input::XElement> >& getEvents() + { return _events; } + + ControlElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ); +}; + +class ImportContext +{ +protected: + DialogImport * const _pImport; + const css::uno::Reference< css::beans::XPropertySet > _xControlModel; + const OUString _aId; + +public: + ImportContext( + DialogImport * pImport, + css::uno::Reference< css::beans::XPropertySet > const & xControlModel_, + OUString const & id ) + : _pImport( pImport ), + _xControlModel( xControlModel_ ), + _aId( id ) + { OSL_ASSERT( _xControlModel.is() ); } + + const css::uno::Reference< css::beans::XPropertySet >& getControlModel() const + { return _xControlModel; } + + void importScollableSettings( css::uno::Reference< css::xml::input::XAttributes > const & xAttributes ); + void importDefaults( + sal_Int32 nBaseX, sal_Int32 nBaseY, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + bool supportPrintable = true ); + void importEvents( + std::vector< css::uno::Reference< css::xml::input::XElement > > + const & rEvents ); + + bool importStringProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importDoubleProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importBooleanProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importShortProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importLongProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importLongProperty( + sal_Int32 nOffset, + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importHexLongProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importAlignProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importVerticalAlignProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importGraphicOrImageProperty(OUString const & rAttrName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes ); + bool importImageAlignProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importImagePositionProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importDateProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importDateFormatProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importTimeProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importTimeFormatProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importOrientationProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importButtonTypeProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importLineEndFormatProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importSelectionTypeProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importDataAwareProperty( + OUString const & rPropName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); + bool importImageScaleModeProperty( + OUString const & rPropName, OUString const & rAttrName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ); +}; + +class ControlImportContext : public ImportContext +{ +public: + ControlImportContext( + DialogImport * pImport, + OUString const & rId, OUString const & rControlName ) + : ImportContext( + pImport, + css::uno::Reference< css::beans::XPropertySet >( + pImport->_xDialogModelFactory->createInstance( rControlName ), + css::uno::UNO_QUERY_THROW ), rId ) + {} + ControlImportContext( + DialogImport * pImport, + const css::uno::Reference< css::beans::XPropertySet >& xProps, OUString const & rControlName ) + : ImportContext( + pImport, + xProps, + rControlName ) + {} + + /// @throws css::xml::sax::SAXException + /// @throws css::uno::RuntimeException + void finish() + { + try + { + _pImport->_xDialogModel->insertByName( + _aId, css::uno::Any( + css::uno::Reference<css::awt::XControlModel>::query( + _xControlModel ) ) ); + } + catch(const css::container::ElementExistException &e) + { + throw css::lang::WrappedTargetRuntimeException("", e.Context, css::uno::Any(e)); + } + } +}; + +class WindowElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + WindowElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, nullptr, pImport ) + {} +}; + +class EventElement + : public ElementBase +{ +public: + virtual void SAL_CALL endElement() override; + + EventElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ElementBase( nUid, rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class BulletinBoardElement + : public ControlElement +{ + // we are the owner of this, so have to keep a reference to it + rtl::Reference<DialogImport> mxDialogImport; +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + + BulletinBoardElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ); +}; + +class ButtonElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + ButtonElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class CheckBoxElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + CheckBoxElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class ComboBoxElement + : public ControlElement +{ + css::uno::Reference< css::xml::input::XElement > _popup; +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + ComboBoxElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class MenuListElement + : public ControlElement +{ + css::uno::Reference< css::xml::input::XElement > _popup; +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + MenuListElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class RadioElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + + RadioElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class RadioGroupElement + : public ControlElement +{ + std::vector< css::uno::Reference< css::xml::input::XElement > > _radios; +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + void SAL_CALL endElement() override; + + RadioGroupElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class TitledBoxElement + : public BulletinBoardElement +{ + OUString _label; + std::vector< css::uno::Reference< css::xml::input::XElement > > _radios; +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + TitledBoxElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : BulletinBoardElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class TextElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + TextElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; +class FixedHyperLinkElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + FixedHyperLinkElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class TextFieldElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + TextFieldElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class ImageControlElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + ImageControlElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class FileControlElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + FileControlElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class TreeControlElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + TreeControlElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class CurrencyFieldElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + CurrencyFieldElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class DateFieldElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + DateFieldElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class NumericFieldElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + NumericFieldElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class TimeFieldElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + TimeFieldElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class PatternFieldElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + PatternFieldElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class FormattedFieldElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + FormattedFieldElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class FixedLineElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + FixedLineElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class ScrollBarElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + ScrollBarElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class SpinButtonElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + SpinButtonElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +class MultiPage + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + MultiPage( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + { + m_xContainer.set( m_pImport->_xDialogModelFactory->createInstance( "com.sun.star.awt.UnoMultiPageModel" ), css::uno::UNO_QUERY ); + } +private: + css::uno::Reference< css::container::XNameContainer > m_xContainer; +}; + +class Frame + : public ControlElement +{ + OUString _label; +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + Frame( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +private: + css::uno::Reference< css::container::XNameContainer > m_xContainer; +}; + +class Page + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + Page( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + { + m_xContainer.set( m_pImport->_xDialogModelFactory->createInstance( "com.sun.star.awt.UnoPageModel" ), css::uno::UNO_QUERY ); + } +private: + css::uno::Reference< css::container::XNameContainer > m_xContainer; +}; + +class ProgressBarElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + ProgressBarElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +//============================================================================== +class GridControlElement + : public ControlElement +{ +public: + virtual css::uno::Reference< css::xml::input::XElement > + SAL_CALL startChildElement( + sal_Int32 nUid,::rtl::OUString const & rLocalName, + css::uno::Reference<css::xml::input::XAttributes> const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + GridControlElement(OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +} + + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmldlg_imexp/xmldlg_addfunc.cxx b/xmlscript/source/xmldlg_imexp/xmldlg_addfunc.cxx new file mode 100644 index 000000000..be3605de5 --- /dev/null +++ b/xmlscript/source/xmldlg_imexp/xmldlg_addfunc.cxx @@ -0,0 +1,95 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include <com/sun/star/io/XInputStreamProvider.hpp> +#include <com/sun/star/xml/sax/Parser.hpp> +#include <com/sun/star/xml/sax/Writer.hpp> + +#include <cppuhelper/implbase.hxx> +#include <xmlscript/xml_helper.hxx> +#include <xmlscript/xmldlg_imexp.hxx> + +using namespace ::rtl; +using namespace ::com::sun::star; +using namespace ::com::sun::star::frame; + +namespace xmlscript +{ + +namespace { + +class InputStreamProvider + : public ::cppu::WeakImplHelper< io::XInputStreamProvider > +{ + std::vector<sal_Int8> const _bytes; + +public: + explicit InputStreamProvider( std::vector<sal_Int8>&& rBytes ) + : _bytes( std::move(rBytes) ) + { + } + + // XInputStreamProvider + virtual uno::Reference< io::XInputStream > SAL_CALL createInputStream() override; +}; + +} + +uno::Reference< io::XInputStream > InputStreamProvider::createInputStream() +{ + return ::xmlscript::createInputStream( std::vector(_bytes) ); +} + +uno::Reference< io::XInputStreamProvider > exportDialogModel( + uno::Reference< container::XNameContainer > const & xDialogModel, + uno::Reference< uno::XComponentContext > const & xContext, + uno::Reference< XModel > const & xDocument ) +{ + uno::Reference< xml::sax::XWriter > xWriter = xml::sax::Writer::create(xContext); + + std::vector<sal_Int8> aBytes; + xWriter->setOutputStream( createOutputStream( &aBytes ) ); + + uno::Reference< xml::sax::XExtendedDocumentHandler > xHandler(xWriter, uno::UNO_QUERY_THROW); + exportDialogModel( xHandler, xDialogModel, xDocument ); + + return new InputStreamProvider( std::move(aBytes) ); +} + +void importDialogModel( + uno::Reference< io::XInputStream > const & xInput, + uno::Reference< container::XNameContainer > const & xDialogModel, + uno::Reference< uno::XComponentContext > const & xContext, + uno::Reference< XModel > const & xDocument ) +{ + uno::Reference< xml::sax::XParser > xParser = xml::sax::Parser::create( xContext ); + + // error handler, entity resolver omitted for this helper function + xParser->setDocumentHandler( importDialogModel( xDialogModel, xContext, xDocument ) ); + + xml::sax::InputSource source; + source.aInputStream = xInput; + source.sSystemId = "virtual file"; + + xParser->parseStream( source ); +} + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmldlg_imexp/xmldlg_expmodels.cxx b/xmlscript/source/xmldlg_imexp/xmldlg_expmodels.cxx new file mode 100644 index 000000000..823df0e9a --- /dev/null +++ b/xmlscript/source/xmldlg_imexp/xmldlg_expmodels.cxx @@ -0,0 +1,1275 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include "common.hxx" +#include "exp_share.hxx" +#include <misc.hxx> +#include <xmlscript/xmlns.h> + +#include <com/sun/star/container/XNameContainer.hpp> +#include <com/sun/star/util/XNumberFormatsSupplier.hpp> +#include <com/sun/star/lang/XServiceInfo.hpp> +#include <o3tl/any.hxx> +#include <rtl/ref.hxx> + +using namespace ::com::sun::star; +using namespace ::com::sun::star::uno; + +namespace xmlscript +{ + +static bool readBorderProps( + ElementDescriptor * element, Style & style ) +{ + if (element->readProp( &style._border, "Border" )) { + if (style._border == BORDER_SIMPLE /* simple */) + { + if (element->readProp( &style._borderColor, "BorderColor" )) + style._border = BORDER_SIMPLE_COLOR; + } + return true; + } + return false; +} + +static bool readFontProps( ElementDescriptor * element, Style & style ) +{ + bool ret = element->readProp( + &style._descr, "FontDescriptor" ); + ret |= element->readProp( + &style._fontEmphasisMark, "FontEmphasisMark" ); + ret |= element->readProp( + &style._fontRelief, "FontRelief" ); + return ret; +} + +void ElementDescriptor::readMultiPageModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id" , all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readLongAttr( "MultiPageValue", XMLNS_DIALOGS_PREFIX ":value" ); + Any aDecorationAny( _xProps->getPropertyValue( "Decoration" ) ); + bool bDecoration = true; + if ( (aDecorationAny >>= bDecoration) && !bDecoration ) + addAttribute( XMLNS_DIALOGS_PREFIX ":withtabs", "false" ); + + readEvents(); + uno::Reference< container::XNameContainer > xPagesContainer( _xProps, uno::UNO_QUERY ); + if ( xPagesContainer.is() && xPagesContainer->getElementNames().hasElements() ) + { + rtl::Reference<ElementDescriptor> pElem = new ElementDescriptor( _xProps, _xPropState, XMLNS_DIALOGS_PREFIX ":bulletinboard", _xDocument ); + pElem->readBullitinBoard( all_styles ); + addSubElement( pElem ); + } +} + +void ElementDescriptor::readFrameModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x8 | 0x20 ); + + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + OUString aTitle; + + if ( readProp( "Label" ) >>= aTitle) + { + rtl::Reference<ElementDescriptor> title = new ElementDescriptor( _xProps, _xPropState, XMLNS_DIALOGS_PREFIX ":title", _xDocument ); + title->addAttribute( XMLNS_DIALOGS_PREFIX ":value", aTitle ); + addSubElement( title ); + } + uno::Reference< container::XNameContainer > xControlContainer( _xProps, uno::UNO_QUERY ); + if ( xControlContainer.is() && xControlContainer->getElementNames().hasElements() ) + { + rtl::Reference<ElementDescriptor> pElem = new ElementDescriptor( _xProps, _xPropState, XMLNS_DIALOGS_PREFIX ":bulletinboard", _xDocument ); + pElem->readBullitinBoard( all_styles ); + addSubElement( pElem ); + } + readEvents(); +} + +void ElementDescriptor::readPageModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readStringAttr( "Title", XMLNS_DIALOGS_PREFIX ":title" ); + uno::Reference< container::XNameContainer > xControlContainer( _xProps, uno::UNO_QUERY ); + if ( xControlContainer.is() && xControlContainer->getElementNames().hasElements() ) + { + rtl::Reference<ElementDescriptor> pElem = new ElementDescriptor( _xProps, _xPropState, XMLNS_DIALOGS_PREFIX ":bulletinboard", _xDocument ); + pElem->readBullitinBoard( all_styles ); + addSubElement( pElem ); + } + readEvents(); +} + +void ElementDescriptor::readButtonModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "DefaultButton", XMLNS_DIALOGS_PREFIX ":default" ); + readStringAttr( "Label", XMLNS_DIALOGS_PREFIX ":value" ); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign" ); + readButtonTypeAttr( "PushButtonType", XMLNS_DIALOGS_PREFIX ":button-type" ); + readImageOrGraphicAttr(XMLNS_DIALOGS_PREFIX ":image-src"); + readImagePositionAttr( "ImagePosition", XMLNS_DIALOGS_PREFIX ":image-position" ); + readImageAlignAttr( "ImageAlign", XMLNS_DIALOGS_PREFIX ":image-align" ); + + if (extract_throw<bool>( _xProps->getPropertyValue( "Repeat" ) )) + readLongAttr( "RepeatDelay", XMLNS_DIALOGS_PREFIX ":repeat", true /* force */ ); + + if (extract_throw<bool>( _xProps->getPropertyValue( "Toggle" ) )) + addAttribute( XMLNS_DIALOGS_PREFIX ":toggled", "1" ); + + readBoolAttr( "FocusOnClick", XMLNS_DIALOGS_PREFIX ":grab-focus" ); + readBoolAttr( "MultiLine",XMLNS_DIALOGS_PREFIX ":multiline" ); + + // State + sal_Int16 nState = 0; + if (readProp( "State" ) >>= nState) + { + switch (nState) + { + case 0: + addAttribute( XMLNS_DIALOGS_PREFIX ":checked", "false" ); + break; + case 1: + addAttribute( XMLNS_DIALOGS_PREFIX ":checked", "true" ); + break; + default: + OSL_FAIL( "### unexpected radio state!" ); + break; + } + } + + readEvents(); +} + +void ElementDescriptor::readCheckBoxModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x8 | 0x20 | 0x40 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (readProp( "VisualEffect" ) >>= aStyle._visualEffect) + aStyle._set |= 0x40; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readStringAttr( "Label", XMLNS_DIALOGS_PREFIX ":value" ); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign" ); + readImageOrGraphicAttr(XMLNS_DIALOGS_PREFIX ":image-src"); + readImagePositionAttr( "ImagePosition", XMLNS_DIALOGS_PREFIX ":image-position" ); + readBoolAttr( "MultiLine", XMLNS_DIALOGS_PREFIX ":multiline" ); + + bool bTriState = false; + if ((readProp( "TriState" ) >>= bTriState) && bTriState) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":tristate", "true" ); + } + sal_Int16 nState = 0; + if (_xProps->getPropertyValue( "State" ) >>= nState) + { + switch (nState) + { + case 0: + addAttribute( XMLNS_DIALOGS_PREFIX ":checked", "false" ); + break; + case 1: + addAttribute( XMLNS_DIALOGS_PREFIX ":checked", "true" ); + break; + case 2: // tristate=true exported, checked omitted => don't know! + OSL_ENSURE( bTriState, "### detected tristate value, but TriState is not set!" ); + break; + default: + OSL_FAIL( "### unexpected checkbox state!" ); + break; + } + } + readEvents(); +} + +void ElementDescriptor::readComboBoxModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readStringAttr( "Text", XMLNS_DIALOGS_PREFIX ":value" ); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readBoolAttr( "Autocomplete", XMLNS_DIALOGS_PREFIX ":autocomplete" ); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readBoolAttr( "HideInactiveSelection", XMLNS_DIALOGS_PREFIX ":hide-inactive-selection" ); + readBoolAttr( "Dropdown", XMLNS_DIALOGS_PREFIX ":spin" ); + readShortAttr( "MaxTextLen", XMLNS_DIALOGS_PREFIX ":maxlength" ); + readShortAttr( "LineCount", XMLNS_DIALOGS_PREFIX ":linecount" ); + // Cell Range, Ref Cell etc. + readDataAwareAttr( XMLNS_DIALOGS_PREFIX ":linked-cell" ); + readDataAwareAttr( XMLNS_DIALOGS_PREFIX ":source-cell-range" ); + + // string item list + Sequence< OUString > itemValues; + if ((readProp( "StringItemList" ) >>= itemValues) && itemValues.hasElements()) + { + rtl::Reference<ElementDescriptor> popup = new ElementDescriptor( _xProps, _xPropState, XMLNS_DIALOGS_PREFIX ":menupopup", _xDocument ); + + for ( const auto& rItemValue : std::as_const(itemValues) ) + { + rtl::Reference<ElementDescriptor> item = new ElementDescriptor( _xProps, _xPropState, XMLNS_DIALOGS_PREFIX ":menuitem", _xDocument ); + item->addAttribute( XMLNS_DIALOGS_PREFIX ":value", rItemValue ); + popup->addSubElement( item ); + } + + addSubElement( popup ); + } + readEvents(); +} + +void ElementDescriptor::readListBoxModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "MultiSelection", XMLNS_DIALOGS_PREFIX ":multiselection" ); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readBoolAttr( "Dropdown", XMLNS_DIALOGS_PREFIX ":spin" ); + readShortAttr( "LineCount", XMLNS_DIALOGS_PREFIX ":linecount" ); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readDataAwareAttr( XMLNS_DIALOGS_PREFIX ":linked-cell" ); + readDataAwareAttr( XMLNS_DIALOGS_PREFIX ":source-cell-range" ); + // string item list + Sequence< OUString > itemValues; + if ((readProp( "StringItemList" ) >>= itemValues) && itemValues.hasElements()) + { + rtl::Reference<ElementDescriptor> popup = new ElementDescriptor( _xProps, _xPropState, XMLNS_DIALOGS_PREFIX ":menupopup", _xDocument ); + + for ( const auto& rItemValue : std::as_const(itemValues) ) + { + rtl::Reference<ElementDescriptor> item = new ElementDescriptor(_xProps, _xPropState, XMLNS_DIALOGS_PREFIX ":menuitem", _xDocument ); + item->addAttribute( XMLNS_DIALOGS_PREFIX ":value", rItemValue ); + popup->addSubElement( item ); + } + + Sequence< sal_Int16 > selected; + if (readProp( "SelectedItems" ) >>= selected) + { + sal_Int16 const * pSelected = selected.getConstArray(); + for ( sal_Int32 nPos = selected.getLength(); nPos--; ) + { + ElementDescriptor * item = static_cast< ElementDescriptor * >( + popup->getSubElement( pSelected[ nPos ] ).get() ); + item->addAttribute( XMLNS_DIALOGS_PREFIX ":selected", "true" ); + } + } + + addSubElement( popup ); + } + readEvents(); +} + +void ElementDescriptor::readRadioButtonModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x8 | 0x20 | 0x40 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (readProp( "VisualEffect" ) >>= aStyle._visualEffect) + aStyle._set |= 0x40; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id" , all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr("Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readStringAttr( "Label", XMLNS_DIALOGS_PREFIX ":value" ); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign" ); + readImageOrGraphicAttr(XMLNS_DIALOGS_PREFIX ":image-src"); + readImagePositionAttr( "ImagePosition", XMLNS_DIALOGS_PREFIX ":image-position" ); + readBoolAttr( "MultiLine", XMLNS_DIALOGS_PREFIX ":multiline" ); + readStringAttr( "GroupName", XMLNS_DIALOGS_PREFIX ":group-name" ); + + sal_Int16 nState = 0; + if (readProp( "State" ) >>= nState) + { + switch (nState) + { + case 0: + addAttribute(XMLNS_DIALOGS_PREFIX ":checked", "false" ); + break; + case 1: + addAttribute( XMLNS_DIALOGS_PREFIX ":checked", "true" ); + break; + default: + OSL_FAIL( "### unexpected radio state!" ); + break; + } + } + readDataAwareAttr( XMLNS_DIALOGS_PREFIX ":linked-cell" ); + readEvents(); +} + +void ElementDescriptor::readGroupBoxModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x2 | 0x8 | 0x20 ); + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + + OUString aTitle; + if (readProp( "Label" ) >>= aTitle) + { + rtl::Reference<ElementDescriptor> title = new ElementDescriptor( _xProps, _xPropState, XMLNS_DIALOGS_PREFIX ":title", _xDocument ); + title->addAttribute( XMLNS_DIALOGS_PREFIX ":value", aTitle ); + addSubElement( title ); + } + + readEvents(); +} + +void ElementDescriptor::readFixedTextModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readStringAttr( "Label", XMLNS_DIALOGS_PREFIX ":value" ); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign" ); + readBoolAttr( "MultiLine", XMLNS_DIALOGS_PREFIX ":multiline" ); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "NoLabel", XMLNS_DIALOGS_PREFIX ":nolabel" ); + readEvents(); +} + +void ElementDescriptor::readFixedHyperLinkModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readStringAttr( "Label",XMLNS_DIALOGS_PREFIX ":value" ); + readStringAttr( "URL", XMLNS_DIALOGS_PREFIX ":url" ); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign" ); + readBoolAttr( "MultiLine", XMLNS_DIALOGS_PREFIX ":multiline" ); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "NoLabel", XMLNS_DIALOGS_PREFIX ":nolabel" ); + readEvents(); +} + +void ElementDescriptor::readEditModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "HideInactiveSelection", XMLNS_DIALOGS_PREFIX ":hide-inactive-selection" ); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign" ); + readBoolAttr( "HardLineBreaks", XMLNS_DIALOGS_PREFIX ":hard-linebreaks" ); + readBoolAttr( "HScroll", XMLNS_DIALOGS_PREFIX ":hscroll" ); + readBoolAttr( "VScroll", XMLNS_DIALOGS_PREFIX ":vscroll" ); + readShortAttr( "MaxTextLen", XMLNS_DIALOGS_PREFIX ":maxlength" ); + readBoolAttr( "MultiLine", XMLNS_DIALOGS_PREFIX ":multiline" ); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readStringAttr( "Text", XMLNS_DIALOGS_PREFIX ":value" ); + readLineEndFormatAttr( "LineEndFormat", XMLNS_DIALOGS_PREFIX ":lineend-format" ); + sal_Int16 nEcho = 0; + if (readProp( "EchoChar" ) >>= nEcho) + { + sal_Unicode cEcho = static_cast<sal_Unicode>(nEcho); + addAttribute( XMLNS_DIALOGS_PREFIX ":echochar", OUString( &cEcho, 1 ) ); + } + readDataAwareAttr( XMLNS_DIALOGS_PREFIX ":linked-cell" ); + readEvents(); +} + +void ElementDescriptor::readImageControlModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x4 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "ScaleImage", XMLNS_DIALOGS_PREFIX ":scale-image" ); + readImageScaleModeAttr( "ScaleMode", XMLNS_DIALOGS_PREFIX ":scale-mode" ); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readImageOrGraphicAttr(XMLNS_DIALOGS_PREFIX ":src"); + readEvents(); +} + +void ElementDescriptor::readFileControlModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "HideInactiveSelection", XMLNS_DIALOGS_PREFIX ":hide-inactive-selection" ); + readStringAttr( "Text", XMLNS_DIALOGS_PREFIX ":value" ); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readEvents(); +} + +void ElementDescriptor::readTreeControlModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readSelectionTypeAttr( "SelectionType", XMLNS_DIALOGS_PREFIX ":selectiontype" ); + + readBoolAttr( "RootDisplayed", XMLNS_DIALOGS_PREFIX ":rootdisplayed" ); + readBoolAttr( "ShowsHandles", XMLNS_DIALOGS_PREFIX ":showshandles" ); + readBoolAttr( "ShowsRootHandles", XMLNS_DIALOGS_PREFIX ":showsroothandles" ); + readBoolAttr( "Editable", XMLNS_DIALOGS_PREFIX ":editable" ); + readBoolAttr( "InvokesStopNodeEditing", XMLNS_DIALOGS_PREFIX ":invokesstopnodeediting" ); + readLongAttr( "RowHeight", XMLNS_DIALOGS_PREFIX ":rowheight" ); + readEvents(); +} + +void ElementDescriptor::readCurrencyFieldModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign" ); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readBoolAttr( "HideInactiveSelection", XMLNS_DIALOGS_PREFIX ":hide-inactive-selection" ); + readBoolAttr( "StrictFormat", XMLNS_DIALOGS_PREFIX ":strict-format" ); + readStringAttr( "CurrencySymbol", XMLNS_DIALOGS_PREFIX ":currency-symbol" ); + readShortAttr( "DecimalAccuracy", XMLNS_DIALOGS_PREFIX ":decimal-accuracy" ); + readBoolAttr( "ShowThousandsSeparator", XMLNS_DIALOGS_PREFIX ":thousands-separator" ); + readDoubleAttr( "Value", XMLNS_DIALOGS_PREFIX ":value" ); + readDoubleAttr( "ValueMin", XMLNS_DIALOGS_PREFIX ":value-min" ); + readDoubleAttr( "ValueMax", XMLNS_DIALOGS_PREFIX ":value-max" ); + readDoubleAttr( "ValueStep", XMLNS_DIALOGS_PREFIX ":value-step" ); + readBoolAttr( "Spin", XMLNS_DIALOGS_PREFIX ":spin" ); + if (extract_throw<bool>( _xProps->getPropertyValue( "Repeat" ) )) + readLongAttr( "RepeatDelay", XMLNS_DIALOGS_PREFIX ":repeat", true /* force */ ); + readBoolAttr("PrependCurrencySymbol", XMLNS_DIALOGS_PREFIX ":prepend-symbol" ); + readBoolAttr( "EnforceFormat", XMLNS_DIALOGS_PREFIX ":enforce-format" ); + readEvents(); +} + +void ElementDescriptor::readDateFieldModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign" ); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readBoolAttr( "HideInactiveSelection", XMLNS_DIALOGS_PREFIX ":hide-inactive-selection" ); + readBoolAttr( "StrictFormat", XMLNS_DIALOGS_PREFIX ":strict-format" ); + readDateFormatAttr( "DateFormat", XMLNS_DIALOGS_PREFIX ":date-format" ); + readBoolAttr( "DateShowCentury", XMLNS_DIALOGS_PREFIX ":show-century" ); + readDateAttr( "Date", XMLNS_DIALOGS_PREFIX ":value" ); + readDateAttr( "DateMin", XMLNS_DIALOGS_PREFIX ":value-min" ); + readDateAttr( "DateMax", XMLNS_DIALOGS_PREFIX ":value-max" ); + readBoolAttr( "Spin", XMLNS_DIALOGS_PREFIX ":spin" ); + if (extract_throw<bool>( _xProps->getPropertyValue( "Repeat" ) )) + readLongAttr( "RepeatDelay", XMLNS_DIALOGS_PREFIX ":repeat", true /* force */ ); + readBoolAttr( "Dropdown", XMLNS_DIALOGS_PREFIX ":dropdown" ); + readStringAttr( "Text", XMLNS_DIALOGS_PREFIX ":text" ); + readBoolAttr( "EnforceFormat", XMLNS_DIALOGS_PREFIX ":enforce-format" ); + readEvents(); +} + +void ElementDescriptor::readNumericFieldModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign" ); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readBoolAttr( "HideInactiveSelection", XMLNS_DIALOGS_PREFIX ":hide-inactive-selection" ); + readBoolAttr( "StrictFormat", XMLNS_DIALOGS_PREFIX ":strict-format" ); + readShortAttr( "DecimalAccuracy", XMLNS_DIALOGS_PREFIX ":decimal-accuracy" ); + readBoolAttr( "ShowThousandsSeparator", XMLNS_DIALOGS_PREFIX ":thousands-separator" ); + readDoubleAttr( "Value", XMLNS_DIALOGS_PREFIX ":value" ); + readDoubleAttr( "ValueMin", XMLNS_DIALOGS_PREFIX ":value-min" ); + readDoubleAttr( "ValueMax", XMLNS_DIALOGS_PREFIX ":value-max" ); + readDoubleAttr( "ValueStep", XMLNS_DIALOGS_PREFIX ":value-step" ); + readBoolAttr( "Spin", XMLNS_DIALOGS_PREFIX ":spin" ); + if (extract_throw<bool>( _xProps->getPropertyValue( "Repeat" ) )) + readLongAttr( "RepeatDelay", XMLNS_DIALOGS_PREFIX ":repeat", true /* force */ ); + readBoolAttr( "EnforceFormat", XMLNS_DIALOGS_PREFIX ":enforce-format" ); + readEvents(); +} + +void ElementDescriptor::readTimeFieldModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop"); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readBoolAttr( "HideInactiveSelection", XMLNS_DIALOGS_PREFIX ":hide-inactive-selection" ); + readBoolAttr( "StrictFormat", XMLNS_DIALOGS_PREFIX ":strict-format" ); + readTimeFormatAttr( "TimeFormat", XMLNS_DIALOGS_PREFIX ":time-format" ); + readTimeAttr( "Time", XMLNS_DIALOGS_PREFIX ":value" ); + readTimeAttr( "TimeMin", XMLNS_DIALOGS_PREFIX ":value-min" ); + readTimeAttr( "TimeMax", XMLNS_DIALOGS_PREFIX ":value-max" ); + readBoolAttr( "Spin", XMLNS_DIALOGS_PREFIX ":spin" ); + if (extract_throw<bool>( _xProps->getPropertyValue( "Repeat" ) )) + readLongAttr( "RepeatDelay", XMLNS_DIALOGS_PREFIX ":repeat", true /* force */ ); + readStringAttr( "Text", XMLNS_DIALOGS_PREFIX ":text" ); + readBoolAttr( "EnforceFormat", XMLNS_DIALOGS_PREFIX ":enforce-format" ); + readEvents(); +} + +void ElementDescriptor::readPatternFieldModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readBoolAttr( "HideInactiveSelection", XMLNS_DIALOGS_PREFIX ":hide-inactive-selection" ); + readBoolAttr( "StrictFormat", XMLNS_DIALOGS_PREFIX ":strict-format" ); + readStringAttr( "Text", XMLNS_DIALOGS_PREFIX ":value" ); + readShortAttr( "MaxTextLen", XMLNS_DIALOGS_PREFIX ":maxlength" ); + readStringAttr( "EditMask", XMLNS_DIALOGS_PREFIX ":edit-mask" ); + readStringAttr( "LiteralMask", XMLNS_DIALOGS_PREFIX ":literal-mask" ); + readEvents(); +} + +void ElementDescriptor::readFormattedFieldModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "ReadOnly", XMLNS_DIALOGS_PREFIX ":readonly" ); + readBoolAttr( "HideInactiveSelection",XMLNS_DIALOGS_PREFIX ":hide-inactive-selection" ); + readBoolAttr( "StrictFormat", XMLNS_DIALOGS_PREFIX ":strict-format" ); + readStringAttr( "Text", XMLNS_DIALOGS_PREFIX ":text" ); + readAlignAttr( "Align", XMLNS_DIALOGS_PREFIX ":align" ); + readShortAttr( "MaxTextLen", XMLNS_DIALOGS_PREFIX ":maxlength" ); + readBoolAttr( "Spin", XMLNS_DIALOGS_PREFIX ":spin" ); + if (extract_throw<bool>( _xProps->getPropertyValue( "Repeat" ) )) + readLongAttr( "RepeatDelay",XMLNS_DIALOGS_PREFIX ":repeat", true /* force */ ); + + Any a( readProp( "EffectiveDefault" ) ); + switch (a.getValueTypeClass()) + { + case TypeClass_DOUBLE: + addAttribute( XMLNS_DIALOGS_PREFIX ":value-default", OUString::number( *o3tl::forceAccess<double>(a) ) ); + break; + case TypeClass_STRING: + addAttribute( XMLNS_DIALOGS_PREFIX ":value-default", *o3tl::forceAccess<OUString>(a) ); + break; + default: + break; + } + readDoubleAttr( "EffectiveMin", XMLNS_DIALOGS_PREFIX ":value-min" ); + readDoubleAttr( "EffectiveMax", XMLNS_DIALOGS_PREFIX ":value-max" ); + readDoubleAttr( "EffectiveValue", XMLNS_DIALOGS_PREFIX ":value" ); + + // format spec + sal_Int32 nKey = 0; + if (readProp( "FormatKey" ) >>= nKey) + { + Reference< util::XNumberFormatsSupplier > xSupplier; + if (readProp( "FormatsSupplier" ) >>= xSupplier) + { + addNumberFormatAttr( + xSupplier->getNumberFormats()->getByKey( nKey ) ); + } + } + readBoolAttr( "TreatAsNumber", XMLNS_DIALOGS_PREFIX ":treat-as-number" ); + readBoolAttr( "EnforceFormat", XMLNS_DIALOGS_PREFIX ":enforce-format" ); + + readEvents(); +} + +void ElementDescriptor::readSpinButtonModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x4 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readOrientationAttr( "Orientation", XMLNS_DIALOGS_PREFIX ":align" ); + readLongAttr( "SpinIncrement", XMLNS_DIALOGS_PREFIX ":increment" ); + readLongAttr( "SpinValue", XMLNS_DIALOGS_PREFIX ":curval" ); + readLongAttr( "SpinValueMax", XMLNS_DIALOGS_PREFIX ":maxval" ); + readLongAttr( "SpinValueMin", XMLNS_DIALOGS_PREFIX ":minval" ); + readLongAttr( "Repeat", XMLNS_DIALOGS_PREFIX ":repeat" ); + readLongAttr( "RepeatDelay", XMLNS_DIALOGS_PREFIX ":repeat-delay" ); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readHexLongAttr( "SymbolColor", XMLNS_DIALOGS_PREFIX ":symbol-color" ); + readDataAwareAttr( XMLNS_DIALOGS_PREFIX ":linked-cell" ); + readEvents(); +} + +void ElementDescriptor::readFixedLineModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x2 | 0x8 | 0x20 ); + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readStringAttr( "Label", XMLNS_DIALOGS_PREFIX ":value" ); + readOrientationAttr( "Orientation", XMLNS_DIALOGS_PREFIX ":align" ); + readEvents(); +} + +void ElementDescriptor::readProgressBarModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x4 | 0x10 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readProp( "FillColor" ) >>= aStyle._descr) + aStyle._set |= 0x10; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readLongAttr( "ProgressValue", XMLNS_DIALOGS_PREFIX ":value" ); + readLongAttr( "ProgressValueMin", XMLNS_DIALOGS_PREFIX ":value-min" ); + readLongAttr( "ProgressValueMax", XMLNS_DIALOGS_PREFIX ":value-max" ); + readEvents(); +} + +void ElementDescriptor::readScrollBarModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x4 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults(); + readOrientationAttr( "Orientation", XMLNS_DIALOGS_PREFIX ":align" ); + readLongAttr( "BlockIncrement", XMLNS_DIALOGS_PREFIX ":pageincrement" ); + readLongAttr( "LineIncrement", XMLNS_DIALOGS_PREFIX ":increment" ); + readLongAttr( "ScrollValue", XMLNS_DIALOGS_PREFIX ":curpos" ); + readLongAttr( "ScrollValueMax", XMLNS_DIALOGS_PREFIX ":maxpos" ); + readLongAttr( "ScrollValueMin", XMLNS_DIALOGS_PREFIX ":minpos" ); + readLongAttr( "VisibleSize", XMLNS_DIALOGS_PREFIX ":visible-size" ); + readLongAttr( "RepeatDelay", XMLNS_DIALOGS_PREFIX ":repeat" ); + readBoolAttr( "Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop" ); + readBoolAttr( "LiveScroll", XMLNS_DIALOGS_PREFIX ":live-scroll" ); + readHexLongAttr( "SymbolColor", XMLNS_DIALOGS_PREFIX ":symbol-color" ); + readDataAwareAttr( XMLNS_DIALOGS_PREFIX ":linked-cell" ); + readEvents(); +} + +void ElementDescriptor::readGridControlModel( StyleBag * all_styles ) +{ + // collect styles + Style aStyle( 0x1 | 0x2 | 0x4 | 0x8 | 0x20 ); + if (readProp("BackgroundColor") >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readBorderProps( this, aStyle )) + aStyle._set |= 0x4; + if (readProp("TextColor") >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp("TextLineColor") >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id",all_styles->getStyleId( aStyle ) ); + } + // collect elements + readDefaults(); + readBoolAttr("Tabstop", XMLNS_DIALOGS_PREFIX ":tabstop"); + readVerticalAlignAttr( "VerticalAlign", XMLNS_DIALOGS_PREFIX ":valign"); + readSelectionTypeAttr( "SelectionModel", XMLNS_DIALOGS_PREFIX ":selectiontype"); + readBoolAttr( "ShowColumnHeader", XMLNS_DIALOGS_PREFIX ":showcolumnheader"); + readBoolAttr( "ShowRowHeader", XMLNS_DIALOGS_PREFIX ":showrowheader"); + readHexLongAttr( "GridLineColor", XMLNS_DIALOGS_PREFIX ":gridline-color"); + readBoolAttr( "UseGridLines", XMLNS_DIALOGS_PREFIX ":usegridlines" ); + readHexLongAttr( "HeaderBackgroundColor", XMLNS_DIALOGS_PREFIX ":headerbackground-color"); + readHexLongAttr( "HeaderTextColor", XMLNS_DIALOGS_PREFIX ":headertext-color"); + readHexLongAttr( "ActiveSelectionBackgroundColor", XMLNS_DIALOGS_PREFIX ":activeselectionbackground-color"); + readHexLongAttr( "ActiveSelectionTextColor", XMLNS_DIALOGS_PREFIX ":activeselectiontext-color"); + readHexLongAttr( "InactiveSelectionBackgroundColor", XMLNS_DIALOGS_PREFIX ":inactiveselectionbackground-color"); + readHexLongAttr( "InactiveSelectionTextColor", XMLNS_DIALOGS_PREFIX ":inactiveselectiontext-color"); + readEvents(); +} + +void ElementDescriptor::readDialogModel( StyleBag * all_styles ) +{ + // collect elements + addAttribute( "xmlns:" XMLNS_DIALOGS_PREFIX, XMLNS_DIALOGS_URI ); + addAttribute( "xmlns:" XMLNS_SCRIPT_PREFIX, XMLNS_SCRIPT_URI ); + + // collect styles + Style aStyle( 0x1 | 0x2 | 0x8 | 0x20 ); + if (readProp( "BackgroundColor" ) >>= aStyle._backgroundColor) + aStyle._set |= 0x1; + if (readProp( "TextColor" ) >>= aStyle._textColor) + aStyle._set |= 0x2; + if (readProp( "TextLineColor" ) >>= aStyle._textLineColor) + aStyle._set |= 0x20; + if (readFontProps( this, aStyle )) + aStyle._set |= 0x8; + if (aStyle._set) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", all_styles->getStyleId( aStyle ) ); + } + + // collect elements + readDefaults( false, false ); + readBoolAttr("Closeable", XMLNS_DIALOGS_PREFIX ":closeable" ); + readBoolAttr( "Moveable", XMLNS_DIALOGS_PREFIX ":moveable" ); + readBoolAttr( "Sizeable", XMLNS_DIALOGS_PREFIX ":resizeable" ); + readStringAttr( "Title", XMLNS_DIALOGS_PREFIX ":title" ); + + readScrollableSettings(); + Any aDecorationAny( _xProps->getPropertyValue( "Decoration" ) ); + bool bDecoration = false; + if ( (aDecorationAny >>= bDecoration) && !bDecoration ) + addAttribute( XMLNS_DIALOGS_PREFIX ":withtitlebar", "false" ); + readImageOrGraphicAttr(XMLNS_DIALOGS_PREFIX ":image-src"); + readEvents(); +} + +void ElementDescriptor::readBullitinBoard( StyleBag * all_styles ) +{ + // collect elements + ::std::vector< rtl::Reference<ElementDescriptor> > all_elements; + // read out all props + Reference< container::XNameContainer > xDialogModel( _xProps, UNO_QUERY ); + if ( !xDialogModel.is() ) + return; // #TODO throw??? + const Sequence< OUString > aElements( xDialogModel->getElementNames() ); + + rtl::Reference<ElementDescriptor> pRadioGroup; + + for ( const auto& rElement : aElements ) + { + Any aControlModel( xDialogModel->getByName( rElement ) ); + Reference< beans::XPropertySet > xProps; + OSL_VERIFY( aControlModel >>= xProps ); + if (! xProps.is()) + continue; + Reference< beans::XPropertyState > xPropState( xProps, UNO_QUERY ); + OSL_ENSURE( xPropState.is(), "no XPropertyState!" ); + if (! xPropState.is()) + continue; + Reference< lang::XServiceInfo > xServiceInfo( xProps, UNO_QUERY ); + OSL_ENSURE( xServiceInfo.is(), "no XServiceInfo!" ); + if (! xServiceInfo.is()) + continue; + + rtl::Reference<ElementDescriptor> pElem; + + // group up radio buttons + if ( xServiceInfo->supportsService( "com.sun.star.awt.UnoControlRadioButtonModel" ) ) + { + if (! pRadioGroup) // open radiogroup + { + pRadioGroup = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":radiogroup", _xDocument ); + all_elements.push_back( pRadioGroup ); + } + + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":radio", _xDocument ); + pElem->readRadioButtonModel( all_styles ); + pRadioGroup->addSubElement( pElem ); + } + else // no radio + { + pRadioGroup = nullptr; // close radiogroup + + if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlButtonModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":button", _xDocument ); + pElem->readButtonModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlCheckBoxModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":checkbox", _xDocument ); + pElem->readCheckBoxModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlComboBoxModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":combobox", _xDocument ); + pElem->readComboBoxModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlListBoxModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":menulist", _xDocument ); + pElem->readListBoxModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlGroupBoxModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":titledbox", _xDocument ); + pElem->readGroupBoxModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoMultiPageModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":multipage", _xDocument ); + pElem->readMultiPageModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoFrameModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":frame", _xDocument ); + pElem->readFrameModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoPageModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":page", _xDocument ); + pElem->readPageModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlFixedTextModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":text", _xDocument ); + pElem->readFixedTextModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlEditModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":textfield", _xDocument ); + pElem->readEditModel( all_styles ); + } + // FixedHyperLink + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlFixedHyperlinkModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":linklabel", _xDocument ); + pElem->readFixedHyperLinkModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlImageControlModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":img", _xDocument ); + pElem->readImageControlModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlFileControlModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":filecontrol", _xDocument ); + pElem->readFileControlModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.tree.TreeControlModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":treecontrol", _xDocument ); + pElem->readTreeControlModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlCurrencyFieldModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":currencyfield", _xDocument ); + pElem->readCurrencyFieldModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlDateFieldModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":datefield", _xDocument ); + pElem->readDateFieldModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlNumericFieldModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":numericfield", _xDocument ); + pElem->readNumericFieldModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlTimeFieldModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":timefield", _xDocument); + pElem->readTimeFieldModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlPatternFieldModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":patternfield", _xDocument ); + pElem->readPatternFieldModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlFormattedFieldModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":formattedfield", _xDocument ); + pElem->readFormattedFieldModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlFixedLineModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":fixedline", _xDocument ); + pElem->readFixedLineModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlScrollBarModel" ) ) + { + pElem = new ElementDescriptor(xProps, xPropState, XMLNS_DIALOGS_PREFIX ":scrollbar", _xDocument ); + pElem->readScrollBarModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlSpinButtonModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":spinbutton", _xDocument ); + pElem->readSpinButtonModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.UnoControlProgressBarModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":progressmeter", _xDocument ); + pElem->readProgressBarModel( all_styles ); + } + else if (xServiceInfo->supportsService( "com.sun.star.awt.grid.UnoControlGridModel" ) ) + { + pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":table", _xDocument ); + pElem->readGridControlModel( all_styles ); + } + + if (pElem) + { + all_elements.push_back( pElem ); + } + else + { + OSL_FAIL( "unknown control type!" ); + continue; + } + } + } + for (const rtl::Reference<ElementDescriptor> & p : all_elements) + { + addSubElement( p ); + } +} + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmldlg_imexp/xmldlg_export.cxx b/xmlscript/source/xmldlg_imexp/xmldlg_export.cxx new file mode 100644 index 000000000..cc561a08d --- /dev/null +++ b/xmlscript/source/xmldlg_imexp/xmldlg_export.cxx @@ -0,0 +1,1419 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include "common.hxx" +#include "exp_share.hxx" +#include <xmlscript/xmlns.h> + +#include <o3tl/any.hxx> +#include <sal/log.hxx> +#include <tools/diagnose_ex.h> + +#include <com/sun/star/awt/CharSet.hpp> +#include <com/sun/star/awt/FontFamily.hpp> +#include <com/sun/star/awt/FontPitch.hpp> +#include <com/sun/star/awt/FontSlant.hpp> +#include <com/sun/star/awt/FontStrikeout.hpp> +#include <com/sun/star/awt/FontType.hpp> +#include <com/sun/star/awt/FontUnderline.hpp> +#include <com/sun/star/awt/ImagePosition.hpp> +#include <com/sun/star/awt/ImageScaleMode.hpp> +#include <com/sun/star/awt/LineEndFormat.hpp> +#include <com/sun/star/awt/PushButtonType.hpp> +#include <com/sun/star/awt/VisualEffect.hpp> +#include <com/sun/star/frame/XModel.hpp> +#include <com/sun/star/util/Date.hpp> +#include <com/sun/star/util/Time.hpp> +#include <tools/date.hxx> +#include <tools/time.hxx> + +#include <com/sun/star/io/XPersistObject.hpp> + +#include <com/sun/star/script/XScriptEventsSupplier.hpp> +#include <com/sun/star/script/ScriptEventDescriptor.hpp> + +#include <com/sun/star/style/VerticalAlignment.hpp> + +#include <com/sun/star/lang/XMultiServiceFactory.hpp> +#include <com/sun/star/lang/XServiceInfo.hpp> +#include <com/sun/star/lang/Locale.hpp> + +#include <com/sun/star/view/SelectionType.hpp> + +#include <com/sun/star/form/binding/XListEntrySink.hpp> +#include <com/sun/star/form/binding/XBindableValue.hpp> +#include <com/sun/star/table/CellAddress.hpp> +#include <com/sun/star/table/CellRangeAddress.hpp> +#include <com/sun/star/document/XStorageBasedDocument.hpp> +#include <com/sun/star/document/GraphicStorageHandler.hpp> +#include <com/sun/star/document/XGraphicStorageHandler.hpp> +#include <com/sun/star/graphic/XGraphic.hpp> +#include <com/sun/star/xml/sax/XExtendedDocumentHandler.hpp> + +#include <comphelper/processfactory.hxx> +#include <i18nlangtag/languagetag.hxx> +#include <rtl/ref.hxx> + +using namespace ::com::sun::star; +using namespace ::com::sun::star::uno; + +namespace xmlscript +{ + +Reference< xml::sax::XAttributeList > Style::createElement() +{ + rtl::Reference<ElementDescriptor> pStyle = new ElementDescriptor( XMLNS_DIALOGS_PREFIX ":style" ); + + // style-id + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":style-id", _id ); + + // background-color + if (_set & 0x1) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":background-color", "0x" + OUString::number(_backgroundColor,16)); + } + + // text-color + if (_set & 0x2) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":text-color", "0x" + OUString::number(_textColor,16)); + } + + // textline-color + if (_set & 0x20) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":textline-color", "0x" + OUString::number(_textLineColor,16)); + } + + // fill-color + if (_set & 0x10) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":fill-color", "0x" + OUString::number(_fillColor,16)); + } + + // border + if (_set & 0x4) + { + switch (_border) + { + case BORDER_NONE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":border", "none" ); + break; + case BORDER_3D: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":border", "3d" ); + break; + case BORDER_SIMPLE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":border", "simple" ); + break; + case BORDER_SIMPLE_COLOR: { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":border", "0x" + OUString::number(_borderColor,16)); + break; + } + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected border value!" ); + break; + } + } + + // visual effect (look) + if (_set & 0x40) + { + switch (_visualEffect) + { + case awt::VisualEffect::NONE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":look", "none" ); + break; + case awt::VisualEffect::LOOK3D: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":look", "3d" ); + break; + case awt::VisualEffect::FLAT: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":look", "simple" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected visual effect value!" ); + break; + } + } + + // font- + if (_set & 0x8) + { + awt::FontDescriptor def_descr; + + // dialog:font-name CDATA #IMPLIED + if (def_descr.Name != _descr.Name) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-name", _descr.Name ); + } + // dialog:font-height %numeric; #IMPLIED + if (def_descr.Height != _descr.Height) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-height", OUString::number( _descr.Height ) ); + } + // dialog:font-width %numeric; #IMPLIED + if (def_descr.Width != _descr.Width) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-width", OUString::number( _descr.Width ) ); + } + // dialog:font-stylename CDATA #IMPLIED + if (def_descr.StyleName != _descr.StyleName) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-stylename", _descr.StyleName ); + } + // dialog:font-family "(decorative|modern|roman|script|swiss|system)" #IMPLIED + if (def_descr.Family != _descr.Family) + { + switch (_descr.Family) + { + case awt::FontFamily::DECORATIVE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-family", "decorative" ); + break; + case awt::FontFamily::MODERN: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-family", "modern" ); + break; + case awt::FontFamily::ROMAN: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-family", "roman" ); + break; + case awt::FontFamily::SCRIPT: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-family", "script" ); + break; + case awt::FontFamily::SWISS: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-family", "swiss" ); + break; + case awt::FontFamily::SYSTEM: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-family", "system" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected font-family!" ); + break; + } + } + // dialog:font-charset "(ansi|mac|ibmpc_437|ibmpc_850|ibmpc_860|ibmpc_861|ibmpc_863|ibmpc_865|system|symbol)" #IMPLIED + if (def_descr.CharSet != _descr.CharSet) + { + switch (_descr.CharSet) + { + case awt::CharSet::ANSI: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "ansi" ); + break; + case awt::CharSet::MAC: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "mac" ); + break; + case awt::CharSet::IBMPC_437: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "ibmpc_437" ); + break; + case awt::CharSet::IBMPC_850: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "ibmpc_850" ); + break; + case awt::CharSet::IBMPC_860: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "ibmpc_860" ); + break; + case awt::CharSet::IBMPC_861: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "ibmpc_861" ); + break; + case awt::CharSet::IBMPC_863: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "ibmpc_863" ); + break; + case awt::CharSet::IBMPC_865: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "ibmpc_865" ); + break; + case awt::CharSet::SYSTEM: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "system" ); + break; + case awt::CharSet::SYMBOL: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charset", "symbol" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected font-charset!" ); + break; + } + } + // dialog:font-pitch "(fixed|variable)" #IMPLIED + if (def_descr.Pitch != _descr.Pitch) + { + switch (_descr.Pitch) + { + case awt::FontPitch::FIXED: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-pitch", "fixed" ); + break; + case awt::FontPitch::VARIABLE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-pitch", "variable" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected font-pitch!" ); + break; + } + } + // dialog:font-charwidth CDATA #IMPLIED + if (def_descr.CharacterWidth != _descr.CharacterWidth) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-charwidth", OUString::number( _descr.CharacterWidth ) ); + } + // dialog:font-weight CDATA #IMPLIED + if (def_descr.Weight != _descr.Weight) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-weight", OUString::number( _descr.Weight ) ); + } + // dialog:font-slant "(oblique|italic|reverse_oblique|reverse_italic)" #IMPLIED + if (def_descr.Slant != _descr.Slant) + { + switch (_descr.Slant) + { + case awt::FontSlant_OBLIQUE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-slant", "oblique" ); + break; + case awt::FontSlant_ITALIC: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-slant", "italic" ); + break; + case awt::FontSlant_REVERSE_OBLIQUE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-slant", "reverse_oblique" ); + break; + case awt::FontSlant_REVERSE_ITALIC: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-slant", "reverse_italic" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected font-slant!" ); + break; + } + } + // dialog:font-underline "(single|double|dotted|dash|longdash|dashdot|dashdotdot|smallwave|wave|doublewave|bold|bolddotted|bolddash|boldlongdash|bolddashdot|bolddashdotdot|boldwave)" #IMPLIED + if (def_descr.Underline != _descr.Underline) + { + switch (_descr.Underline) + { + case awt::FontUnderline::SINGLE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "single" ); + break; + case awt::FontUnderline::DOUBLE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "double" ); + break; + case awt::FontUnderline::DOTTED: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "dotted" ); + break; + case awt::FontUnderline::DASH: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "dash" ); + break; + case awt::FontUnderline::LONGDASH: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "longdash" ); + break; + case awt::FontUnderline::DASHDOT: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "dashdot" ); + break; + case awt::FontUnderline::DASHDOTDOT: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "dashdotdot" ); + break; + case awt::FontUnderline::SMALLWAVE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "smallwave" ); + break; + case awt::FontUnderline::WAVE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "wave" ); + break; + case awt::FontUnderline::DOUBLEWAVE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "doublewave" ); + break; + case awt::FontUnderline::BOLD: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "bold" ); + break; + case awt::FontUnderline::BOLDDOTTED: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "bolddotted" ); + break; + case awt::FontUnderline::BOLDDASH: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "bolddash" ); + break; + case awt::FontUnderline::BOLDLONGDASH: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "boldlongdash" ); + break; + case awt::FontUnderline::BOLDDASHDOT: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "bolddashdot" ); + break; + case awt::FontUnderline::BOLDDASHDOTDOT: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "bolddashdotdot" ); + break; + case awt::FontUnderline::BOLDWAVE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-underline", "boldwave" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected font-underline!" ); + break; + } + } + // dialog:font-strikeout "(single|double|bold|slash|x)" #IMPLIED + if (def_descr.Strikeout != _descr.Strikeout) + { + switch (_descr.Strikeout) + { + case awt::FontStrikeout::SINGLE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-strikeout", "single" ); + break; + case awt::FontStrikeout::DOUBLE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-strikeout", "double" ); + break; + case awt::FontStrikeout::BOLD: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-strikeout", "bold" ); + break; + case awt::FontStrikeout::SLASH: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-strikeout", "slash" ); + break; + case awt::FontStrikeout::X: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-strikeout", "x" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected font-strikeout!" ); + break; + } + } + // dialog:font-orientation CDATA #IMPLIED + if (def_descr.Orientation != _descr.Orientation) + { + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-orientation", OUString::number( _descr.Orientation ) ); + } + // dialog:font-kerning %boolean; #IMPLIED + if (bool(def_descr.Kerning) != bool(_descr.Kerning)) + { + pStyle->addBoolAttr( XMLNS_DIALOGS_PREFIX ":font-kerning", _descr.Kerning ); + } + // dialog:font-wordlinemode %boolean; #IMPLIED + if (bool(def_descr.WordLineMode) != bool(_descr.WordLineMode)) + { + pStyle->addBoolAttr( XMLNS_DIALOGS_PREFIX ":font-wordlinemode", _descr.WordLineMode ); + } + // dialog:font-type "(raster|device|scalable)" #IMPLIED + if (def_descr.Type != _descr.Type) + { + switch (_descr.Type) + { + case awt::FontType::RASTER: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-type", "raster" ); + break; + case awt::FontType::DEVICE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-type", "device" ); + break; + case awt::FontType::SCALABLE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-type", "scalable" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected font-type!" ); + break; + } + } + + // additional attributes not in FontDescriptor struct + // dialog:font-relief (none|embossed|engraved) #IMPLIED + switch (_fontRelief) + { + case awt::FontRelief::NONE: // don't export default + break; + case awt::FontRelief::EMBOSSED: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-relief", "embossed" ); + break; + case awt::FontRelief::ENGRAVED: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-relief", "engraved" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected font-relief!" ); + break; + } + // dialog:font-emphasismark (none|dot|circle|disc|accent|above|below) #IMPLIED + switch (_fontEmphasisMark) + { + case awt::FontEmphasisMark::NONE: // don't export default + break; + case awt::FontEmphasisMark::DOT: + pStyle->addAttribute(XMLNS_DIALOGS_PREFIX ":font-emphasismark", "dot" ); + break; + case awt::FontEmphasisMark::CIRCLE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-emphasismark", "circle" ); + break; + case awt::FontEmphasisMark::DISC: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-emphasismark", "disc" ); + break; + case awt::FontEmphasisMark::ACCENT: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-emphasismark", "accent" ); + break; + case awt::FontEmphasisMark::ABOVE: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-emphasismark", "above" ); + break; + case awt::FontEmphasisMark::BELOW: + pStyle->addAttribute( XMLNS_DIALOGS_PREFIX ":font-emphasismark", "below" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected font-emphasismark!" ); + break; + } + } + + return pStyle; +} + +void ElementDescriptor::addNumberFormatAttr( + Reference< beans::XPropertySet > const & xFormatProperties ) +{ + OUString sFormat; + lang::Locale locale; + OSL_VERIFY( xFormatProperties->getPropertyValue( "FormatString" ) >>= sFormat ); + OSL_VERIFY( xFormatProperties->getPropertyValue( "Locale" ) >>= locale ); + + addAttribute(XMLNS_DIALOGS_PREFIX ":format-code", sFormat ); + + // format-locale + LanguageTag aLanguageTag( locale); + OUString aStr; + if (aLanguageTag.isIsoLocale()) + { + // Old style "lll;CC" for compatibility, I really don't know what may + // consume this. + if (aLanguageTag.getCountry().isEmpty()) + aStr = aLanguageTag.getLanguage(); + else + aStr = aLanguageTag.getLanguage() + ";" + aLanguageTag.getCountry(); + } + else + { + aStr = aLanguageTag.getBcp47( false); + } + addAttribute( XMLNS_DIALOGS_PREFIX ":format-locale", aStr ); +} + +Any ElementDescriptor::readProp( OUString const & rPropName ) +{ + if (beans::PropertyState_DEFAULT_VALUE != _xPropState->getPropertyState( rPropName )) + { + return _xProps->getPropertyValue( rPropName ); + } + return Any(); +} + +void ElementDescriptor::readStringAttr( + OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE != + _xPropState->getPropertyState( rPropName )) + { + Any a( _xProps->getPropertyValue( rPropName ) ); + OUString v; + if (a >>= v) + addAttribute( rAttrName, v ); + else + SAL_WARN( "xmlscript.xmldlg", "### unexpected property type!" ); + } +} + +void ElementDescriptor::readHexLongAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE != _xPropState->getPropertyState( rPropName )) + { + Any a( _xProps->getPropertyValue( rPropName ) ); + if (auto n = o3tl::tryAccess<sal_uInt32>(a)) + { + addAttribute( rAttrName, "0x" + OUString::number(*n, 16) ); + } + } +} + +void ElementDescriptor::readDateFormatAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + if (auto n = o3tl::tryAccess<sal_Int16>(a)) + { + switch (*n) + { + case 0: + addAttribute( rAttrName, "system_short" ); + break; + case 1: + addAttribute( rAttrName, "system_short_YY" ); + break; + case 2: + addAttribute( rAttrName, "system_short_YYYY" ); + break; + case 3: + addAttribute( rAttrName, "system_long" ); + break; + case 4: + addAttribute( rAttrName, "short_DDMMYY" ); + break; + case 5: + addAttribute( rAttrName, "short_MMDDYY" ); + break; + case 6: + addAttribute( rAttrName, "short_YYMMDD" ); + break; + case 7: + addAttribute( rAttrName, "short_DDMMYYYY" ); + break; + case 8: + addAttribute( rAttrName, "short_MMDDYYYY" ); + break; + case 9: + addAttribute( rAttrName, "short_YYYYMMDD" ); + break; + case 10: + addAttribute( rAttrName, "short_YYMMDD_DIN5008" ); + break; + case 11: + addAttribute( rAttrName, "short_YYYYMMDD_DIN5008" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected date format!" ); + break; + } + } + else + OSL_FAIL( "### unexpected property type!" ); +} + +void ElementDescriptor::readDateAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + if (a.getValueTypeClass() == TypeClass_STRUCT && a.getValueType() == cppu::UnoType<util::Date>::get()) + { + util::Date aUDate; + if (a >>= aUDate) + { + ::Date aTDate(aUDate); + addAttribute( rAttrName, OUString::number( aTDate.GetDate() ) ); + } + else + OSL_FAIL( "### internal error" ); + } + else + OSL_FAIL( "### unexpected property type!" ); +} + +void ElementDescriptor::readTimeAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + if (a.getValueTypeClass() == TypeClass_STRUCT && a.getValueType() == cppu::UnoType<util::Time>::get()) + { + util::Time aUTime; + if (a >>= aUTime) + { + ::tools::Time aTTime(aUTime); + addAttribute( rAttrName, OUString::number( aTTime.GetTime() / ::tools::Time::nanoPerCenti ) ); + } + else + OSL_FAIL( "### internal error" ); + } + else + OSL_FAIL( "### unexpected property type!" ); +} + +void ElementDescriptor::readTimeFormatAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + if (auto n = o3tl::tryAccess<sal_Int16>(a)) + { + switch (*n) + { + case 0: + addAttribute( rAttrName, "24h_short" ); + break; + case 1: + addAttribute( rAttrName, "24h_long" ); + break; + case 2: + addAttribute( rAttrName, "12h_short" ); + break; + case 3: + addAttribute( rAttrName, "12h_long" ); + break; + case 4: + addAttribute( rAttrName, "Duration_short" ); + break; + case 5: + addAttribute( rAttrName, "Duration_long" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### unexpected time format!" ); + break; + } + } + else + OSL_FAIL( "### unexpected property type!" ); +} + +void ElementDescriptor::readAlignAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + if (auto n = o3tl::tryAccess<sal_Int16>(a)) + { + switch (*n) + { + case 0: + addAttribute( rAttrName, "left" ); + break; + case 1: + addAttribute( rAttrName, "center" ); + break; + case 2: + addAttribute( rAttrName, "right" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### illegal alignment value!" ); + break; + } + } + else + OSL_FAIL( "### unexpected property type!" ); +} + +void ElementDescriptor::readVerticalAlignAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + if (a.getValueTypeClass() == TypeClass_ENUM && a.getValueType() == cppu::UnoType<style::VerticalAlignment>::get()) + { + style::VerticalAlignment eAlign; + a >>= eAlign; + switch (eAlign) + { + case style::VerticalAlignment_TOP: + addAttribute( rAttrName, "top" ); + break; + case style::VerticalAlignment_MIDDLE: + addAttribute( rAttrName, "center" ); + break; + case style::VerticalAlignment_BOTTOM: + addAttribute( rAttrName, "bottom" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### illegal vertical alignment value!" ); + break; + } + } + else + OSL_FAIL( "### unexpected property type!" ); +} + +void ElementDescriptor::readImageOrGraphicAttr(OUString const & rAttrName) +{ + OUString sURL; + if (beans::PropertyState_DEFAULT_VALUE != _xPropState->getPropertyState("Graphic")) + { + uno::Reference<graphic::XGraphic> xGraphic; + _xProps->getPropertyValue("Graphic") >>= xGraphic; + if (xGraphic.is()) + { + Reference< document::XStorageBasedDocument > xDocStorage( _xDocument, UNO_QUERY ); + if ( xDocStorage.is() ) + { + Reference<XComponentContext> xContext = ::comphelper::getProcessComponentContext(); + uno::Reference<document::XGraphicStorageHandler> xGraphicStorageHandler; + xGraphicStorageHandler.set(document::GraphicStorageHandler::createWithStorage(xContext, xDocStorage->getDocumentStorage())); + if (xGraphicStorageHandler.is()) + { + sURL = xGraphicStorageHandler->saveGraphic(xGraphic); + } + } + } + } + // tdf#130793 Above fails if the dialog is not part of a document. Export the ImageURL then. + if (sURL.isEmpty() + && beans::PropertyState_DEFAULT_VALUE != _xPropState->getPropertyState("ImageURL")) + { + _xProps->getPropertyValue("ImageURL") >>= sURL; + } + if (!sURL.isEmpty()) + addAttribute(rAttrName, sURL); +} + +void ElementDescriptor::readImageAlignAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + if (auto n = o3tl::tryAccess<sal_Int16>(a)) + { + switch (*n) + { + case 0: + addAttribute( rAttrName, "left" ); + break; + case 1: + addAttribute( rAttrName, "top" ); + break; + case 2: + addAttribute( rAttrName, "right" ); + break; + case 3: + addAttribute( rAttrName, "bottom" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### illegal image alignment value!" ); + break; + } + } + else + OSL_FAIL( "### unexpected property type!" ); +} + +void ElementDescriptor::readImagePositionAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + auto n = o3tl::tryAccess<sal_Int16>(a); + if (!n) + return; + + switch (*n) + { + case awt::ImagePosition::LeftTop: + addAttribute( rAttrName, "left-top" ); + break; + case awt::ImagePosition::LeftCenter: + addAttribute( rAttrName, "left-center" ); + break; + case awt::ImagePosition::LeftBottom: + addAttribute( rAttrName, "left-bottom" ); + break; + case awt::ImagePosition::RightTop: + addAttribute( rAttrName, "right-top" ); + break; + case awt::ImagePosition::RightCenter: + addAttribute( rAttrName, "right-center" ); + break; + case awt::ImagePosition::RightBottom: + addAttribute( rAttrName, "right-bottom" ); + break; + case awt::ImagePosition::AboveLeft: + addAttribute( rAttrName, "top-left" ); + break; + case awt::ImagePosition::AboveCenter: + addAttribute( rAttrName, "top-center" ); + break; + case awt::ImagePosition::AboveRight: + addAttribute( rAttrName, "top-right" ); + break; + case awt::ImagePosition::BelowLeft: + addAttribute( rAttrName, "bottom-left" ); + break; + case awt::ImagePosition::BelowCenter: + addAttribute( rAttrName, "bottom-center" ); + break; + case awt::ImagePosition::BelowRight: + addAttribute( rAttrName, "bottom-right" ); + break; + case awt::ImagePosition::Centered: + addAttribute( rAttrName, "center" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### illegal image position value!" ); + break; + } +} + +void ElementDescriptor::readButtonTypeAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + auto n = o3tl::tryAccess<sal_Int16>(a); + if (!n) + return; + + switch (static_cast<awt::PushButtonType>(*n)) + { + case awt::PushButtonType_STANDARD: + addAttribute( rAttrName, "standard" ); + break; + case awt::PushButtonType_OK: + addAttribute( rAttrName, "ok" ); + break; + case awt::PushButtonType_CANCEL: + addAttribute( rAttrName, "cancel" ); + break; + case awt::PushButtonType_HELP: + addAttribute( rAttrName, "help" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### illegal button-type value!" ); + break; + } +} + +void ElementDescriptor::readOrientationAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + auto n = o3tl::tryAccess<sal_Int32>(a); + if (!n) + return; + + switch (*n) + { + case 0: + addAttribute( rAttrName, "horizontal" ); + break; + case 1: + addAttribute( rAttrName, "vertical" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### illegal orientation value!" ); + break; + } +} + +void ElementDescriptor::readLineEndFormatAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any a( _xProps->getPropertyValue( rPropName ) ); + auto n = o3tl::tryAccess<sal_Int16>(a); + if (!n) + return; + + switch (*n) + { + case awt::LineEndFormat::CARRIAGE_RETURN: + addAttribute( rAttrName, "carriage-return" ); + break; + case awt::LineEndFormat::LINE_FEED: + addAttribute( rAttrName, "line-feed" ); + break; + case awt::LineEndFormat::CARRIAGE_RETURN_LINE_FEED: + addAttribute( rAttrName, "carriage-return-line-feed" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### illegal line end format value!" ); + break; + } +} + +void ElementDescriptor::readDataAwareAttr( OUString const & rAttrName ) +{ + Reference< lang::XMultiServiceFactory > xFac; + if ( _xDocument.is() ) + xFac.set( _xDocument, uno::UNO_QUERY ); + + Reference< form::binding::XBindableValue > xBinding( _xProps, UNO_QUERY ); + + if ( xFac.is() && xBinding.is() && rAttrName == XMLNS_DIALOGS_PREFIX ":linked-cell" ) + { + try + { + Reference< beans::XPropertySet > xConvertor( xFac->createInstance( "com.sun.star.table.CellAddressConversion" ), uno::UNO_QUERY ); + Reference< beans::XPropertySet > xBindable( xBinding->getValueBinding(), UNO_QUERY ); + if ( xBindable.is() ) + { + table::CellAddress aAddress; + xBindable->getPropertyValue( "BoundCell" ) >>= aAddress; + xConvertor->setPropertyValue( "Address", Any( aAddress ) ); + OUString sAddress; + xConvertor->getPropertyValue( "PersistentRepresentation" ) >>= sAddress; + if ( !sAddress.isEmpty() ) + addAttribute( rAttrName, sAddress ); + + SAL_INFO("xmlscript.xmldlg", "*** Bindable value " << sAddress ); + + } + } + catch( uno::Exception& ) + { + } + } + Reference< form::binding::XListEntrySink > xEntrySink( _xProps, UNO_QUERY ); + if ( !(xEntrySink.is() && rAttrName == XMLNS_DIALOGS_PREFIX ":source-cell-range") ) + return; + + Reference< beans::XPropertySet > xListSource( xEntrySink->getListEntrySource(), UNO_QUERY ); + if ( !xListSource.is() ) + return; + + try + { + Reference< beans::XPropertySet > xConvertor( xFac->createInstance( "com.sun.star.table.CellRangeAddressConversion" ), uno::UNO_QUERY ); + + table::CellRangeAddress aAddress; + xListSource->getPropertyValue( "CellRange" ) >>= aAddress; + + OUString sAddress; + xConvertor->setPropertyValue( "Address", Any( aAddress ) ); + xConvertor->getPropertyValue( "PersistentRepresentation" ) >>= sAddress; + SAL_INFO("xmlscript.xmldlg","**** cell range source list " << sAddress ); + if ( !sAddress.isEmpty() ) + addAttribute( rAttrName, sAddress ); + } + catch( uno::Exception& ) + { + } +} + +void ElementDescriptor::readSelectionTypeAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any aSelectionType ( _xProps->getPropertyValue( rPropName ) ); + + if (aSelectionType.getValueTypeClass() != TypeClass_ENUM || + aSelectionType.getValueType() != cppu::UnoType<view::SelectionType>::get()) + return; + + ::view::SelectionType eSelectionType; + aSelectionType >>= eSelectionType; + + switch (eSelectionType) + { + case ::view::SelectionType_NONE: + addAttribute( rAttrName, "none" ); + break; + case ::view::SelectionType_SINGLE: + addAttribute( rAttrName, "single" ); + break; + case ::view::SelectionType_MULTI: + addAttribute( rAttrName, "multi" ); + break; + case ::view::SelectionType_RANGE: + addAttribute( rAttrName, "range" ); + break; + default: + SAL_WARN( "xmlscript.xmldlg", "### illegal selection type value!" ); + break; + } +} + +void ElementDescriptor::readScrollableSettings() +{ + readLongAttr( "ScrollHeight", + XMLNS_DIALOGS_PREFIX ":scrollheight" ); + readLongAttr( "ScrollWidth", + XMLNS_DIALOGS_PREFIX ":scrollwidth" ); + readLongAttr( "ScrollTop", + XMLNS_DIALOGS_PREFIX ":scrolltop" ); + readLongAttr( "ScrollLeft", + XMLNS_DIALOGS_PREFIX ":scrollleft" ); + readBoolAttr( "HScroll", + XMLNS_DIALOGS_PREFIX ":hscroll" ); + readBoolAttr( "VScroll", + XMLNS_DIALOGS_PREFIX ":vscroll" ); +} + +void ElementDescriptor::readImageScaleModeAttr( OUString const & rPropName, OUString const & rAttrName ) +{ + if (beans::PropertyState_DEFAULT_VALUE == _xPropState->getPropertyState( rPropName )) + return; + + Any aImageScaleMode( _xProps->getPropertyValue( rPropName ) ); + + if (aImageScaleMode.getValueTypeClass() != TypeClass_SHORT) + return; + + sal_Int16 nImageScaleMode = 0; + aImageScaleMode >>= nImageScaleMode; + + switch(nImageScaleMode) + { + case ::awt::ImageScaleMode::NONE: + addAttribute( rAttrName, "none" ); + break; + case ::awt::ImageScaleMode::ISOTROPIC: + addAttribute( rAttrName, "isotropic" ); + break; + case ::awt::ImageScaleMode::ANISOTROPIC: + addAttribute( rAttrName, "anisotropic" ); + break; + default: + OSL_ENSURE( false, "### illegal image scale mode value."); + break; + } +} + +void ElementDescriptor::readDefaults( bool supportPrintable, bool supportVisible ) +{ + Any a( _xProps->getPropertyValue( "Name" ) ); + + // The following is a hack to allow 'form' controls to override the default + // control supported by dialogs. This should work well for both VBA support and + // normal LibreOffice (when normal 'Dialogs' decide to support form control models) + // In the future VBA support might require custom models ( and not the just the form + // variant of a control that we currently use ) In this case the door is still open, + // we just need to define a new way for the 'ServiceName' to be extracted from the + // incoming model. E.g. the use of supporting service + // "com.sun.star.form.FormComponent", 'ServiceName' and XPersistObject + // is only an implementation detail here, in the future some other + // method (perhaps a custom prop) could be used instead. + Reference< lang::XServiceInfo > xSrvInfo( _xProps, UNO_QUERY ); + if ( xSrvInfo.is() && xSrvInfo->supportsService( "com.sun.star.form.FormComponent" ) ) + { + Reference< io::XPersistObject > xPersist( _xProps, UNO_QUERY ); + if ( xPersist.is() ) + { + OUString sCtrlName = xPersist->getServiceName(); + if ( !sCtrlName.isEmpty() ) + addAttribute( XMLNS_DIALOGS_PREFIX ":control-implementation", sCtrlName ); + } + } + addAttribute( XMLNS_DIALOGS_PREFIX ":id", *o3tl::doAccess<OUString>(a) ); + readShortAttr( "TabIndex", XMLNS_DIALOGS_PREFIX ":tab-index" ); + + bool bEnabled = false; + if (_xProps->getPropertyValue( "Enabled" ) >>= bEnabled) + { + if (! bEnabled) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":disabled", "true" ); + } + } + else + { + SAL_WARN( "xmlscript.xmldlg", "unexpected property type for \"Enabled\": not bool!" ); + } + + if (supportVisible) try + { + bool bVisible = true; + if (_xProps->getPropertyValue("EnableVisible" ) >>= bVisible) + { + + // only write out the non default case + if (! bVisible) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":visible", "false" ); + } + } + } + catch( Exception& ) + { + DBG_UNHANDLED_EXCEPTION("xmlscript.xmldlg"); + } + // force writing of pos/size + a = _xProps->getPropertyValue( "PositionX" ); + if (auto n = o3tl::tryAccess<sal_Int32>(a)) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":left", OUString::number(*n) ); + } + a = _xProps->getPropertyValue( "PositionY" ); + if (auto n = o3tl::tryAccess<sal_Int32>(a)) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":top", OUString::number(*n) ); + } + a = _xProps->getPropertyValue( "Width" ); + if (auto n = o3tl::tryAccess<sal_Int32>(a)) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":width", OUString::number(*n) ); + } + a = _xProps->getPropertyValue( "Height" ); + if (auto n = o3tl::tryAccess<sal_Int32>(a)) + { + addAttribute( XMLNS_DIALOGS_PREFIX ":height", OUString::number(*n) ); + } + + if (supportPrintable) + { + readBoolAttr( "Printable", XMLNS_DIALOGS_PREFIX ":printable" ); + } + readLongAttr( "Step", XMLNS_DIALOGS_PREFIX ":page" ); + readStringAttr( "Tag", XMLNS_DIALOGS_PREFIX ":tag" ); + readStringAttr( "HelpText", XMLNS_DIALOGS_PREFIX ":help-text" ); + readStringAttr( "HelpURL", XMLNS_DIALOGS_PREFIX ":help-url" ); +} + +void ElementDescriptor::readEvents() +{ + Reference< script::XScriptEventsSupplier > xSupplier( _xProps, UNO_QUERY ); + if (!xSupplier.is()) + return; + + Reference< container::XNameContainer > xEvents( xSupplier->getEvents() ); + if (!xEvents.is()) + return; + + const Sequence< OUString > aNames( xEvents->getElementNames() ); + for ( const auto& rName : aNames ) + { + script::ScriptEventDescriptor descr; + if (xEvents->getByName( rName ) >>= descr) + { + SAL_WARN_IF( descr.ListenerType.isEmpty() || + descr.EventMethod.isEmpty() || + descr.ScriptCode.isEmpty() || + descr.ScriptType.isEmpty() , "xmlscript.xmldlg", "### invalid event descr!" ); + + OUString aEventName; + + if (descr.AddListenerParam.isEmpty()) + { + // detection of event-name + OString listenerType( OUStringToOString( descr.ListenerType, RTL_TEXTENCODING_ASCII_US ) ); + OString eventMethod( OUStringToOString( descr.EventMethod, RTL_TEXTENCODING_ASCII_US ) ); + StringTriple const * p = g_pEventTranslations; + while (p->first) + { + if (0 == ::rtl_str_compare( p->second, eventMethod.getStr() ) && + 0 == ::rtl_str_compare( p->first, listenerType.getStr() )) + { + aEventName = OUString( p->third, ::rtl_str_getLength( p->third ), RTL_TEXTENCODING_ASCII_US ); + break; + } + ++p; + } + } + + rtl::Reference<ElementDescriptor> pElem; + + if (!aEventName.isEmpty()) // script:event + { + pElem = new ElementDescriptor( XMLNS_SCRIPT_PREFIX ":event" ); + pElem->addAttribute( XMLNS_SCRIPT_PREFIX ":event-name", aEventName ); + } + else // script:listener-event + { + pElem = new ElementDescriptor( XMLNS_SCRIPT_PREFIX ":listener-event" ); + pElem->addAttribute( XMLNS_SCRIPT_PREFIX ":listener-type", descr.ListenerType ); + pElem->addAttribute( XMLNS_SCRIPT_PREFIX ":listener-method", descr.EventMethod ); + + if (!descr.AddListenerParam.isEmpty()) + { + pElem->addAttribute( XMLNS_SCRIPT_PREFIX ":listener-param", descr.AddListenerParam ); + } + } + if ( descr.ScriptType == "StarBasic" ) + { + // separate optional location + sal_Int32 nIndex = descr.ScriptCode.indexOf( ':' ); + if (nIndex >= 0) + { + pElem->addAttribute( XMLNS_SCRIPT_PREFIX ":location", descr.ScriptCode.copy( 0, nIndex ) ); + pElem->addAttribute( XMLNS_SCRIPT_PREFIX ":macro-name", descr.ScriptCode.copy( nIndex +1 ) ); + } + else + { + pElem->addAttribute( XMLNS_SCRIPT_PREFIX ":macro-name", descr.ScriptCode ); + } + } + else + { + pElem->addAttribute(XMLNS_SCRIPT_PREFIX ":macro-name", descr.ScriptCode ); + } + + // language + pElem->addAttribute( XMLNS_SCRIPT_PREFIX ":language", descr.ScriptType ); + + addSubElement( pElem ); + } + else + { + SAL_WARN( "xmlscript.xmldlg", "### unexpected event type in container!" ); + } + } +} + +static bool equalFont( Style const & style1, Style const & style2 ) +{ + awt::FontDescriptor const & f1 = style1._descr; + awt::FontDescriptor const & f2 = style2._descr; + return ( + f1.Name == f2.Name && + f1.Height == f2.Height && + f1.Width == f2.Width && + f1.StyleName == f2.StyleName && + f1.Family == f2.Family && + f1.CharSet == f2.CharSet && + f1.Pitch == f2.Pitch && + f1.CharacterWidth == f2.CharacterWidth && + f1.Weight == f2.Weight && + f1.Slant == f2.Slant && + f1.Underline == f2.Underline && + f1.Strikeout == f2.Strikeout && + f1.Orientation == f2.Orientation && + bool(f1.Kerning) == bool(f2.Kerning) && + bool(f1.WordLineMode) == bool(f2.WordLineMode) && + f1.Type == f2.Type && + style1._fontRelief == style2._fontRelief && + style1._fontEmphasisMark == style2._fontEmphasisMark + ); +} + +OUString StyleBag::getStyleId( Style const & rStyle ) +{ + if (! rStyle._set) // nothing set + { + return OUString(); // everything default: no need to export a specific style + } + + // lookup existing style + for (auto & rExistingStyle : _styles) + { + short demanded_defaults = ~rStyle._set & rStyle._all; + // test, if defaults are not set + if ((~rExistingStyle._set & demanded_defaults) == demanded_defaults && + (rStyle._set & (rExistingStyle._all & ~rExistingStyle._set)) == 0) + { + short bset = rStyle._set & rExistingStyle._set; + if ((bset & 0x1) && + rStyle._backgroundColor != rExistingStyle._backgroundColor) + continue; + if ((bset & 0x2) && + rStyle._textColor != rExistingStyle._textColor) + continue; + if ((bset & 0x20) && + rStyle._textLineColor != rExistingStyle._textLineColor) + continue; + if ((bset & 0x10) && + rStyle._fillColor != rExistingStyle._fillColor) + continue; + if ((bset & 0x4) && + (rStyle._border != rExistingStyle._border || + (rStyle._border == BORDER_SIMPLE_COLOR && + rStyle._borderColor != rExistingStyle._borderColor))) + continue; + if ((bset & 0x8) && + !equalFont( rStyle, rExistingStyle )) + continue; + if ((bset & 0x40) && + rStyle._visualEffect != rExistingStyle._visualEffect) + continue; + + // merge in + short bnset = rStyle._set & ~rExistingStyle._set; + if (bnset & 0x1) + rExistingStyle._backgroundColor = rStyle._backgroundColor; + if (bnset & 0x2) + rExistingStyle._textColor = rStyle._textColor; + if (bnset & 0x20) + rExistingStyle._textLineColor = rStyle._textLineColor; + if (bnset & 0x10) + rExistingStyle._fillColor = rStyle._fillColor; + if (bnset & 0x4) { + rExistingStyle._border = rStyle._border; + rExistingStyle._borderColor = rStyle._borderColor; + } + if (bnset & 0x8) { + rExistingStyle._descr = rStyle._descr; + rExistingStyle._fontRelief = rStyle._fontRelief; + rExistingStyle._fontEmphasisMark = rStyle._fontEmphasisMark; + } + if (bnset & 0x40) + rExistingStyle._visualEffect = rStyle._visualEffect; + + rExistingStyle._all |= rStyle._all; + rExistingStyle._set |= rStyle._set; + + return rExistingStyle._id; + } + } + + // no appr style found, append new + Style aNewStyle( rStyle ); + aNewStyle._id = OUString::number( _styles.size() ); + _styles.push_back( aNewStyle ); + return _styles.back()._id; +} + +StyleBag::~StyleBag() +{ +} + +void StyleBag::dump( Reference< xml::sax::XExtendedDocumentHandler > const & xOut ) +{ + if ( _styles.empty()) + return; + + OUString aStylesName( XMLNS_DIALOGS_PREFIX ":styles" ); + xOut->ignorableWhitespace( OUString() ); + xOut->startElement( aStylesName, Reference< xml::sax::XAttributeList >() ); + // export styles + for (auto & _style : _styles) + { + Reference< xml::sax::XAttributeList > xAttr( _style.createElement() ); + static_cast< ElementDescriptor * >( xAttr.get() )->dump( xOut ); + } + xOut->ignorableWhitespace( OUString() ); + xOut->endElement( aStylesName ); +} + +void exportDialogModel( + Reference< xml::sax::XExtendedDocumentHandler > const & xOut, + Reference< container::XNameContainer > const & xDialogModel, + Reference< frame::XModel > const & xDocument ) +{ + StyleBag all_styles; + // window + Reference< beans::XPropertySet > xProps( xDialogModel, UNO_QUERY ); + OSL_ASSERT( xProps.is() ); + Reference< beans::XPropertyState > xPropState( xProps, UNO_QUERY ); + OSL_ASSERT( xPropState.is() ); + + rtl::Reference<ElementDescriptor> pElem = new ElementDescriptor( xProps, xPropState, XMLNS_DIALOGS_PREFIX ":bulletinboard", xDocument ); + pElem->readBullitinBoard( &all_styles ); + + xOut->startDocument(); + + xOut->unknown( + "<!DOCTYPE dlg:window PUBLIC \"-//OpenOffice.org//DTD OfficeDocument 1.0//EN\"" + " \"dialog.dtd\">" ); + xOut->ignorableWhitespace( OUString() ); + + OUString aWindowName( XMLNS_DIALOGS_PREFIX ":window" ); + rtl::Reference<ElementDescriptor> pWindow = new ElementDescriptor( xProps, xPropState, aWindowName, xDocument ); + pWindow->readDialogModel( &all_styles ); + xOut->ignorableWhitespace( OUString() ); + xOut->startElement( aWindowName, pWindow ); + // dump out events + pWindow->dumpSubElements( xOut ); + // dump out stylebag + all_styles.dump( xOut ); + + if ( xDialogModel->getElementNames().hasElements() ) + { + // open up bulletinboard + OUString aBBoardName( XMLNS_DIALOGS_PREFIX ":bulletinboard" ); + xOut->ignorableWhitespace( OUString() ); + xOut->startElement( aBBoardName, pElem ); + + pElem->dumpSubElements( xOut ); + // end bulletinboard + xOut->ignorableWhitespace( OUString() ); + xOut->endElement( aBBoardName ); + } + + // end window + xOut->ignorableWhitespace( OUString() ); + xOut->endElement( aWindowName ); + + xOut->endDocument(); +} + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmldlg_imexp/xmldlg_impmodels.cxx b/xmlscript/source/xmldlg_imexp/xmldlg_impmodels.cxx new file mode 100644 index 000000000..bea460715 --- /dev/null +++ b/xmlscript/source/xmldlg_imexp/xmldlg_impmodels.cxx @@ -0,0 +1,1901 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include "imp_share.hxx" +#include <com/sun/star/beans/XPropertySet.hpp> +#include <com/sun/star/util/MalformedNumberFormatException.hpp> +#include <com/sun/star/xml/sax/SAXException.hpp> + +#include <cppuhelper/exc_hlp.hxx> +#include <sal/log.hxx> +#include <tools/diagnose_ex.h> +#include <i18nlangtag/languagetag.hxx> + +using namespace ::com::sun::star; +using namespace ::com::sun::star::uno; + +namespace xmlscript +{ + +Reference< xml::input::XElement > Frame::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if ( !m_xContainer.is() ) + m_xContainer.set( m_pImport->_xDialogModelFactory->createInstance( "com.sun.star.awt.UnoFrameModel" ), UNO_QUERY ); + // event + if (m_pImport->isEventElement( nUid, rLocalName )) + { + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); + } + else if ( rLocalName == "bulletinboard" ) + { + // Create new DialogImport for this container + rtl::Reference<DialogImport> pFrameImport = new DialogImport( *m_pImport ); + pFrameImport->_xDialogModel = m_xContainer; + return new BulletinBoardElement( rLocalName, xAttributes, this, pFrameImport.get() ); + } + else if ( rLocalName == "title" ) + { + getStringAttr( &_label, "value", xAttributes, m_pImport->XMLNS_DIALOGS_UID ); + + return new ElementBase( m_pImport->XMLNS_DIALOGS_UID, rLocalName, xAttributes, this, m_pImport ); + } + else + { + SAL_INFO("xmlscript.xmldlg","****** ARGGGGG!!!! **********"); + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } +} + +void Frame::endElement() +{ + if ( !m_xContainer.is() ) + m_xContainer.set( m_pImport->_xDialogModelFactory->createInstance( "com.sun.star.awt.UnoFrameModel" ), UNO_QUERY ); + Reference< beans::XPropertySet > xProps( m_xContainer, UNO_QUERY_THROW ); + // m_pImport is what we need to add to ( e.g. the dialog in this case ) + ControlImportContext ctx( m_pImport, xProps, getControlId( _xAttributes ) ); + + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( 0, 0, _xAttributes ); // inherited from BulletinBoardElement + if (!_label.isEmpty()) + { + xControlModel->setPropertyValue( "Label" , Any( _label ) ); + } + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + + +Reference< xml::input::XElement > MultiPage::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (m_pImport->isEventElement( nUid, rLocalName )) + { + return new EventElement( + nUid, rLocalName, xAttributes, this, m_pImport ); + } + else if ( rLocalName == "bulletinboard" ) + { + // Create new DialogImport for this container + + rtl::Reference<DialogImport> pMultiPageImport = new DialogImport( *m_pImport ); + pMultiPageImport->_xDialogModel = m_xContainer; + return new BulletinBoardElement( rLocalName, xAttributes, this, pMultiPageImport.get() ); + } + else + { + + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } +} + +void MultiPage::endElement() +{ + Reference< beans::XPropertySet > xProps( m_xContainer, UNO_QUERY_THROW ); + // m_pImport is what we need to add to ( e.g. the dialog in this case ) + ControlImportContext ctx( m_pImport, xProps, getControlId( _xAttributes )); + + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + pStyle->importBackgroundColorStyle( xControlModel ); + } + + ctx.importDefaults( 0, 0, _xAttributes ); // inherited from BulletinBoardElement + ctx.importLongProperty("MultiPageValue" , "value", _xAttributes ); + ctx.importBooleanProperty( "Decoration", "withtabs", _xAttributes) ; + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +Reference< xml::input::XElement > Page::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (m_pImport->isEventElement( nUid, rLocalName )) + { + return new EventElement( + nUid, rLocalName, xAttributes, this, m_pImport ); + } + else if ( rLocalName == "bulletinboard" ) + { + + rtl::Reference<DialogImport> pPageImport = new DialogImport( *m_pImport ); + pPageImport->_xDialogModel = m_xContainer; + return new BulletinBoardElement( rLocalName, xAttributes, this, pPageImport.get() ); + } + else + { + + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } +} + +void Page::endElement() +{ + Reference< beans::XPropertySet > xProps( m_xContainer, UNO_QUERY_THROW ); + + ControlImportContext ctx( m_pImport, xProps, getControlId( _xAttributes )); + + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + pStyle->importBackgroundColorStyle( xControlModel ); + } + + ctx.importDefaults( 0, 0, _xAttributes ); // inherited from BulletinBoardElement + ctx.importStringProperty( "Title", "title", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// progressmeter +Reference< xml::input::XElement > ProgressBarElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( + nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void ProgressBarElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlProgressBarModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFillColorStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importLongProperty( "ProgressValue", "value", _xAttributes ); + ctx.importLongProperty( "ProgressValueMin", "value-min", _xAttributes ); + ctx.importLongProperty( "ProgressValueMax", "value-max", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// scrollbar +Reference< xml::input::XElement > ScrollBarElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void ScrollBarElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), getControlModelName( "com.sun.star.awt.UnoControlScrollBarModel" , _xAttributes ) ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importOrientationProperty( "Orientation" , "align", _xAttributes ); + ctx.importLongProperty( "BlockIncrement" , "pageincrement" , _xAttributes ); + ctx.importLongProperty( "LineIncrement" , "increment" , _xAttributes ); + ctx.importLongProperty( "ScrollValue" ,"curpos", _xAttributes ); + ctx.importLongProperty( "ScrollValueMax" , "maxpos" , _xAttributes ); + ctx.importLongProperty( "ScrollValueMin","minpos", _xAttributes ); + ctx.importLongProperty( "VisibleSize", "visible-size", _xAttributes ); + ctx.importLongProperty( "RepeatDelay", "repeat", _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop" , _xAttributes ); + ctx.importBooleanProperty( "LiveScroll", "live-scroll", _xAttributes ); + ctx.importHexLongProperty( "SymbolColor", "symbol-color", _xAttributes ); + + ctx.importDataAwareProperty( "linked-cell" , _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// spinbutton +Reference< xml::input::XElement > SpinButtonElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void SpinButtonElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), getControlModelName( "com.sun.star.awt.UnoControlSpinButtonModel", _xAttributes ) ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importOrientationProperty( "Orientation", "align", _xAttributes ); + ctx.importLongProperty("SpinIncrement", "increment", _xAttributes ); + ctx.importLongProperty("SpinValue", "curval" ,_xAttributes ); + ctx.importLongProperty("SpinValueMax", "maxval", _xAttributes ); + ctx.importLongProperty( "SpinValueMin","minval",_xAttributes ); + ctx.importLongProperty( "Repeat", "repeat", _xAttributes ); + ctx.importLongProperty( "RepeatDelay", "repeat-delay",_xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importHexLongProperty( "SymbolColor", "symbol-color" , _xAttributes ); + ctx.importDataAwareProperty( "linked-cell" , _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// fixedline +Reference< xml::input::XElement > FixedLineElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void FixedLineElement::endElement() +{ + ControlImportContext ctx(m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlFixedLineModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importStringProperty( "Label", "value", _xAttributes ); + ctx.importOrientationProperty( "Orientation", "align", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// patternfield +Reference< xml::input::XElement > PatternFieldElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void PatternFieldElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlPatternFieldModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty( "ReadOnly", "readonly" , _xAttributes ); + ctx.importBooleanProperty( "StrictFormat", "strict-format", _xAttributes ); + ctx.importBooleanProperty( "HideInactiveSelection", "hide-inactive-selection", _xAttributes ); + ctx.importStringProperty( "Text", "value", _xAttributes ); + ctx.importShortProperty( "MaxTextLen", "maxlength", _xAttributes ); + ctx.importStringProperty( "EditMask", "edit-mask", _xAttributes ); + ctx.importStringProperty( "LiteralMask", "literal-mask", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// formattedfield +Reference< xml::input::XElement > FormattedFieldElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void FormattedFieldElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlFormattedFieldModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty( "ReadOnly", "readonly" , _xAttributes ); + ctx.importBooleanProperty( "StrictFormat", "strict-format" , _xAttributes ); + ctx.importBooleanProperty( "HideInactiveSelection", "hide-inactive-selection", _xAttributes ); + ctx.importAlignProperty( "Align" , "align" , _xAttributes ); + ctx.importDoubleProperty( "EffectiveMin", "value-min" , _xAttributes ); + ctx.importDoubleProperty( "EffectiveMax", "value-max", _xAttributes); + ctx.importDoubleProperty( "EffectiveValue", "value", _xAttributes ); + ctx.importStringProperty( "Text", "text", _xAttributes ); + ctx.importShortProperty( "MaxTextLen", "maxlength", _xAttributes ); + ctx.importBooleanProperty( "Spin", "spin", _xAttributes ); + if (ctx.importLongProperty( "RepeatDelay", "repeat", _xAttributes )) + ctx.getControlModel()->setPropertyValue( "Repeat" , Any(true) ); + + OUString sDefault(_xAttributes->getValueByUidName(m_pImport->XMLNS_DIALOGS_UID, "value-default") ); + if (!sDefault.isEmpty()) + { + double d = sDefault.toDouble(); + if (d != 0.0 || sDefault == "0" || sDefault == "0.0" ) + { + ctx.getControlModel()->setPropertyValue( "EffectiveDefault", Any( d ) ); + } + else // treat as string + { + ctx.getControlModel()->setPropertyValue( "EffectiveDefault", Any( sDefault ) ); + } + } + + // format spec + ctx.getControlModel()->setPropertyValue("FormatsSupplier", Any( m_pImport->getNumberFormatsSupplier() ) ); + + OUString sFormat( _xAttributes->getValueByUidName(m_pImport->XMLNS_DIALOGS_UID, "format-code" ) ); + if (!sFormat.isEmpty()) + { + lang::Locale locale; + + OUString sLocale( _xAttributes->getValueByUidName( m_pImport->XMLNS_DIALOGS_UID, "format-locale" ) ); + if (!sLocale.isEmpty()) + { + // split locale + // Don't know what may have written what we read here, so parse all + // old style including the trailing ";Variant" if present. + sal_Int32 semi0 = sLocale.indexOf( ';' ); + if (semi0 < 0) // no semi at all, try new BCP47 or just language + { + locale = LanguageTag::convertToLocale( sLocale, false); + } + else + { + sal_Int32 semi1 = sLocale.indexOf( ';', semi0 +1 ); + if (semi1 > semi0) // language;country;variant + { + SAL_WARN( "xmlscript.xmldlg", "format-locale with variant that is ignored: " << sLocale); + locale.Language = sLocale.copy( 0, semi0 ); + locale.Country = sLocale.copy( semi0 +1, semi1 - semi0 -1 ); + // Ignore Variant that no one knows what it would be. + } + else // language;country + { + locale.Language = sLocale.copy( 0, semi0 ); + locale.Country = sLocale.copy( semi0 +1 ); + } + } + } + + try + { + Reference< util::XNumberFormats > xFormats( + m_pImport->getNumberFormatsSupplier()->getNumberFormats() ); + sal_Int32 nKey = xFormats->queryKey( sFormat, locale, true ); + if (-1 == nKey) + { + nKey = xFormats->addNew( sFormat, locale ); + } + ctx.getControlModel()->setPropertyValue("FormatKey", Any( nKey ) ); + } + catch (const util::MalformedNumberFormatException & exc) + { + css::uno::Any anyEx = cppu::getCaughtException(); + SAL_WARN( "xmlscript.xmldlg", exceptionToString(anyEx) ); + // rethrow + throw xml::sax::SAXException( exc.Message, Reference< XInterface >(), anyEx ); + } + } + ctx.importBooleanProperty("TreatAsNumber", "treat-as-number" , _xAttributes ); + ctx.importBooleanProperty("EnforceFormat", "enforce-format", _xAttributes ); + + ctx.importDataAwareProperty( "linked-cell" , _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// timefield +Reference< xml::input::XElement > TimeFieldElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void TimeFieldElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlTimeFieldModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty("Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty("ReadOnly", "readonly", _xAttributes ); + ctx.importBooleanProperty( "StrictFormat", "strict-format", _xAttributes ); + ctx.importBooleanProperty("HideInactiveSelection","hide-inactive-selection", _xAttributes ); + ctx.importTimeFormatProperty( "TimeFormat", "time-format", _xAttributes ); + ctx.importTimeProperty( "Time", "value", _xAttributes ); + ctx.importTimeProperty( "TimeMin", "value-min", _xAttributes ); + ctx.importTimeProperty( "TimeMax", "value-max", _xAttributes ); + ctx.importBooleanProperty( "Spin", "spin", _xAttributes ); + if (ctx.importLongProperty( "RepeatDelay", "repeat", _xAttributes )) + ctx.getControlModel()->setPropertyValue("Repeat", Any(true) ); + ctx.importStringProperty( "Text", "text" , _xAttributes ); + ctx.importBooleanProperty( "EnforceFormat", "enforce-format" , _xAttributes ); + + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// numericfield +Reference< xml::input::XElement > NumericFieldElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void NumericFieldElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlNumericFieldModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importAlignProperty( "Align", "align", _xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", _xAttributes ); + ctx.importBooleanProperty( "Tabstop","tabstop",_xAttributes ); + ctx.importBooleanProperty( "ReadOnly", "readonly",_xAttributes ); + ctx.importBooleanProperty( "StrictFormat", "strict-format", _xAttributes ); + ctx.importBooleanProperty( "HideInactiveSelection", "hide-inactive-selection", _xAttributes ); + ctx.importShortProperty( "DecimalAccuracy", "decimal-accuracy", _xAttributes ); + ctx.importBooleanProperty( "ShowThousandsSeparator", "thousands-separator", _xAttributes ); + ctx.importDoubleProperty( "Value", "value", _xAttributes ); + ctx.importDoubleProperty( "ValueMin", "value-min", _xAttributes ); + ctx.importDoubleProperty( "ValueMax", "value-max", _xAttributes ); + ctx.importDoubleProperty( "ValueStep", "value-step", _xAttributes ); + ctx.importBooleanProperty( "Spin", "spin", _xAttributes ); + if (ctx.importLongProperty( "RepeatDelay", "repeat", _xAttributes )) + ctx.getControlModel()->setPropertyValue("Repeat", Any(true) ); + ctx.importBooleanProperty( "EnforceFormat", "enforce-format", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// datefield +Reference< xml::input::XElement > DateFieldElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void DateFieldElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlDateFieldModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importAlignProperty( "Align", "align", _xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty( "ReadOnly", "readonly", _xAttributes ); + ctx.importBooleanProperty( "StrictFormat", "strict-format", _xAttributes ); + ctx.importBooleanProperty( "HideInactiveSelection", "hide-inactive-selection", _xAttributes ); + ctx.importDateFormatProperty( "DateFormat", "date-format", _xAttributes ); + ctx.importBooleanProperty( "DateShowCentury", "show-century", _xAttributes ); + ctx.importDateProperty( "Date", "value", _xAttributes ); + ctx.importDateProperty( "DateMin", "value-min", _xAttributes ); + ctx.importDateProperty( "DateMax", "value-max", _xAttributes ); + ctx.importBooleanProperty( "Spin", "spin", _xAttributes ); + if (ctx.importLongProperty( "RepeatDelay", "repeat", _xAttributes )) + ctx.getControlModel()->setPropertyValue( "Repeat", Any(true) ); + ctx.importBooleanProperty( "Dropdown", "dropdown", _xAttributes ); + ctx.importStringProperty( "Text", "text", _xAttributes ); + ctx.importBooleanProperty( "EnforceFormat", "enforce-format", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// currencyfield +Reference< xml::input::XElement > CurrencyFieldElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!" , Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void CurrencyFieldElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlCurrencyFieldModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importAlignProperty( "Align", "align", _xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", _xAttributes ); + ctx.importBooleanProperty("Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty( "ReadOnly", "readonly" , _xAttributes ); + ctx.importBooleanProperty( "StrictFormat", "strict-format", _xAttributes ); + ctx.importBooleanProperty( "HideInactiveSelection", "hide-inactive-selection", _xAttributes ); + ctx.importStringProperty( "CurrencySymbol", "currency-symbol", _xAttributes ); + ctx.importShortProperty( "DecimalAccuracy", "decimal-accuracy", _xAttributes ); + ctx.importBooleanProperty( "ShowThousandsSeparator", "thousands-separator", _xAttributes ); + ctx.importDoubleProperty( "Value", "value", _xAttributes ); + ctx.importDoubleProperty( "ValueMin", "value-min", _xAttributes ); + ctx.importDoubleProperty( "ValueMax", "value-max", _xAttributes ); + ctx.importDoubleProperty( "ValueStep", "value-step", _xAttributes ); + ctx.importBooleanProperty( "Spin", "spin", _xAttributes ); + if (ctx.importLongProperty( "RepeatDelay", "repeat", _xAttributes )) + ctx.getControlModel()->setPropertyValue( "Repeat", Any(true) ); + ctx.importBooleanProperty( "PrependCurrencySymbol", "prepend-symbol", _xAttributes ); + ctx.importBooleanProperty( "EnforceFormat", "enforce-format", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// filecontrol +Reference< xml::input::XElement > FileControlElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void FileControlElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlFileControlModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty("HideInactiveSelection","hide-inactive-selection", _xAttributes ); + ctx.importStringProperty( "Text", "value", _xAttributes ); + ctx.importBooleanProperty( "ReadOnly", "readonly", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// treecontrol +Reference< xml::input::XElement > TreeControlElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void TreeControlElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.tree.TreeControlModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importSelectionTypeProperty( "SelectionType", "selectiontype", _xAttributes ); + ctx.importBooleanProperty( "RootDisplayed", "rootdisplayed", _xAttributes ); + ctx.importBooleanProperty( "ShowsHandles", "showshandles", _xAttributes ); + ctx.importBooleanProperty( "ShowsRootHandles", "showsroothandles" ,_xAttributes ); + ctx.importBooleanProperty( "Editable", "editable", _xAttributes ); + ctx.importBooleanProperty( "RowHeight", "readonly", _xAttributes ); + ctx.importBooleanProperty( "InvokesStopNodeEditing", "invokesstopnodeediting", _xAttributes ); + + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// imagecontrol +Reference< xml::input::XElement > ImageControlElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!" , Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void ImageControlElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlImageControlModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "ScaleImage", "scale-image", _xAttributes ); + ctx.importImageScaleModeProperty( "ScaleMode" , "scale-mode" , _xAttributes ); + ctx.importGraphicOrImageProperty("src" , _xAttributes); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// textfield +Reference< xml::input::XElement > TextElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void TextElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlFixedTextModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importStringProperty( "Label", "value", _xAttributes ); + ctx.importAlignProperty( "Align", "align", _xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", _xAttributes ); + ctx.importBooleanProperty( "MultiLine", "multiline" ,_xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty( "NoLabel", "nolabel", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// FixedHyperLink +Reference< xml::input::XElement > FixedHyperLinkElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!" , Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void FixedHyperLinkElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlFixedHyperlinkModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importStringProperty( "Label", "value", _xAttributes ); + ctx.importStringProperty( "URL", "url", _xAttributes ); + + ctx.importAlignProperty( "Align", "align" ,_xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", _xAttributes ); + ctx.importBooleanProperty( "MultiLine", "multiline", _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty( "NoLabel", "nolabel", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// edit +Reference< xml::input::XElement > TextFieldElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void TextFieldElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlEditModel" ); + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty("Tabstop", "tabstop", _xAttributes ); + ctx.importAlignProperty( "Align", "align", _xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", _xAttributes ); + ctx.importBooleanProperty( "HardLineBreaks", "hard-linebreaks", _xAttributes ); + ctx.importBooleanProperty( "HScroll", "hscroll" ,_xAttributes ); + ctx.importBooleanProperty( "VScroll", "vscroll", _xAttributes ); + ctx.importBooleanProperty("HideInactiveSelection", "hide-inactive-selection", _xAttributes ); + ctx.importShortProperty( "MaxTextLen", "maxlength", _xAttributes ); + ctx.importBooleanProperty( "MultiLine", "multiline", _xAttributes ); + ctx.importBooleanProperty( "ReadOnly", "readonly", _xAttributes ); + ctx.importStringProperty( "Text", "value", _xAttributes ); + ctx.importLineEndFormatProperty( "LineEndFormat", "lineend-format", _xAttributes ); + OUString aValue; + if (getStringAttr( &aValue, "echochar", _xAttributes, m_pImport->XMLNS_DIALOGS_UID ) && !aValue.isEmpty() ) + { + SAL_WARN_IF( aValue.getLength() != 1, "xmlscript.xmldlg", "### more than one character given for echochar!" ); + sal_Int16 nChar = 0; + if(!aValue.isEmpty()) + { + nChar = static_cast<sal_Int16>(aValue[ 0 ]); + } + xControlModel->setPropertyValue( "EchoChar", Any( nChar ) ); + } + + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// titledbox +Reference< xml::input::XElement > TitledBoxElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (m_pImport->isEventElement( nUid, rLocalName )) + { + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); + } + else if (m_pImport->XMLNS_DIALOGS_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // title + else if ( rLocalName == "title" ) + { + getStringAttr( &_label, "value", xAttributes, m_pImport->XMLNS_DIALOGS_UID ); + + return new ElementBase( m_pImport->XMLNS_DIALOGS_UID, rLocalName, xAttributes, this, m_pImport ); + } + // radio + else if ( rLocalName == "radio" ) + { + // don't create radios here, => titledbox must be inserted first due to radio grouping, + // possible predecessors! + Reference< xml::input::XElement > xRet( + new RadioElement( rLocalName, xAttributes, this, m_pImport ) ); + _radios.push_back( xRet ); + return xRet; + } + else + { + return BulletinBoardElement::startChildElement( nUid, rLocalName, xAttributes ); + } +} + +void TitledBoxElement::endElement() +{ + { + ControlImportContext ctx(m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlGroupBoxModel" ); + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( 0, 0, _xAttributes ); // inherited from BulletinBoardElement + + if (!_label.isEmpty()) + { + xControlModel->setPropertyValue( "Label", Any( _label ) ); + } + + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); + } + + // create radios AFTER group box! + for (Reference<XElement>& xRadio : _radios) + { + Reference< xml::input::XAttributes > xAttributes( xRadio->getAttributes() ); + + ControlImportContext ctx( m_pImport, getControlId( xAttributes ), getControlModelName( "com.sun.star.awt.UnoControlRadioButtonModel", xAttributes ) ); + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + pStyle->importVisualEffectStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", xAttributes ); + ctx.importStringProperty( "Label", "value", xAttributes ); + ctx.importAlignProperty( "Align", "align", xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", xAttributes ); + ctx.importGraphicOrImageProperty("image-src" , _xAttributes); + ctx.importImagePositionProperty( "ImagePosition", "image-position", xAttributes ); + ctx.importBooleanProperty( "MultiLine", "multiline", xAttributes ); + ctx.importStringProperty( "GroupName", "group-name", xAttributes ); + + sal_Int16 nVal = 0; + sal_Bool bChecked = false; + if (getBoolAttr( &bChecked, "checked", xAttributes, m_pImport->XMLNS_DIALOGS_UID ) && bChecked) + { + nVal = 1; + } + xControlModel->setPropertyValue( "State", Any( nVal ) ); + ctx.importDataAwareProperty( "linked-cell" , xAttributes ); + ::std::vector< Reference< xml::input::XElement > > & radioEvents = + static_cast< RadioElement * >( xRadio.get() )->getEvents(); + ctx.importEvents( radioEvents ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + radioEvents.clear(); + + ctx.finish(); + } + // avoid ring-reference: + // vector< radio elements > holding radio elements holding this (via _pParent) + _radios.clear(); +} + +// radio +Reference< xml::input::XElement > RadioElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException("expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +// radiogroup +Reference< xml::input::XElement > RadioGroupElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if (m_pImport->XMLNS_DIALOGS_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // radio + else if ( rLocalName == "radio" ) + { + // don't create radios here, => titledbox must be inserted first due to radio grouping, + // possible predecessors! + Reference< xml::input::XElement > xRet( + new RadioElement( rLocalName, xAttributes, this, m_pImport ) ); + _radios.push_back( xRet ); + return xRet; + } + else + { + throw xml::sax::SAXException( "expected radio element!", Reference< XInterface >(), Any() ); + } +} +void RadioGroupElement::endElement() +{ + for (Reference<XElement>& xRadio : _radios) + { + Reference< xml::input::XAttributes > xAttributes( + xRadio->getAttributes() ); + + ControlImportContext ctx( m_pImport, getControlId( xAttributes ), getControlModelName( "com.sun.star.awt.UnoControlRadioButtonModel", xAttributes ) ); + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + pStyle->importVisualEffectStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, xAttributes ); + ctx.importBooleanProperty("Tabstop", "tabstop", xAttributes ); + ctx.importStringProperty( "Label", "value", xAttributes ); + ctx.importAlignProperty( "Align", "align", xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", xAttributes ); + ctx.importGraphicOrImageProperty("image-src" , _xAttributes); + ctx.importImagePositionProperty( "ImagePosition", "image-position", xAttributes ); + ctx.importBooleanProperty( "MultiLine", "multiline", xAttributes ); + ctx.importStringProperty( "GroupName", "group-name", xAttributes ); + sal_Int16 nVal = 0; + sal_Bool bChecked = false; + if (getBoolAttr( &bChecked, "checked", xAttributes, m_pImport->XMLNS_DIALOGS_UID ) && bChecked) + { + nVal = 1; + } + xControlModel->setPropertyValue( "State", Any( nVal ) ); + + ctx.importDataAwareProperty( "linked-cell", xAttributes ); + + ::std::vector< Reference< xml::input::XElement > > & radioEvents = + static_cast< RadioElement * >( xRadio.get() )->getEvents(); + ctx.importEvents( radioEvents ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + radioEvents.clear(); + + ctx.finish(); + } + // avoid ring-reference: + // vector< radio elements > holding radio elements holding this (via _pParent) + _radios.clear(); +} + +// menupopup +Reference< xml::input::XElement > MenuPopupElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if (m_pImport->XMLNS_DIALOGS_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // menuitem + else if ( rLocalName == "menuitem" ) + { + OUString aValue( xAttributes->getValueByUidName( m_pImport->XMLNS_DIALOGS_UID,"value" ) ); + SAL_WARN_IF( aValue.isEmpty() && !_allowEmptyItems, "xmlscript.xmldlg", "### menuitem has no value?" ); + if ((!aValue.isEmpty()) || _allowEmptyItems) + { + _itemValues.push_back( aValue ); + + OUString aSel( xAttributes->getValueByUidName( m_pImport->XMLNS_DIALOGS_UID, "selected" ) ); + if (!aSel.isEmpty() && aSel == "true") + { + _itemSelected.push_back( static_cast<sal_Int16>(_itemValues.size()) -1 ); + } + } + return new ElementBase( m_pImport->XMLNS_DIALOGS_UID, rLocalName, xAttributes, this, m_pImport ); + } + else + { + throw xml::sax::SAXException("expected menuitem!" , Reference< XInterface >(), Any() ); + } +} +Sequence< OUString > MenuPopupElement::getItemValues() +{ + Sequence< OUString > aRet( _itemValues.size() ); + OUString * pRet = aRet.getArray(); + for ( size_t nPos = _itemValues.size(); nPos--; ) + { + pRet[ nPos ] = _itemValues[ nPos ]; + } + return aRet; +} +Sequence< sal_Int16 > MenuPopupElement::getSelectedItems() +{ + Sequence< sal_Int16 > aRet( _itemSelected.size() ); + sal_Int16 * pRet = aRet.getArray(); + for ( size_t nPos = _itemSelected.size(); nPos--; ) + { + pRet[ nPos ] = _itemSelected[ nPos ]; + } + return aRet; +} + +// menulist +Reference< xml::input::XElement > MenuListElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (m_pImport->isEventElement( nUid, rLocalName )) + { + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); + } + else if (m_pImport->XMLNS_DIALOGS_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // menupopup + else if ( rLocalName == "menupopup" ) + { + _popup = new MenuPopupElement( rLocalName, xAttributes, this, m_pImport, false ); + return _popup; + } + else + { + throw xml::sax::SAXException( "expected event or menupopup element!", Reference< XInterface >(), Any() ); + } +} + +void MenuListElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), getControlModelName( "com.sun.star.awt.UnoControlListBoxModel", _xAttributes ) ); + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty( "MultiSelection", "multiselection", _xAttributes ); + ctx.importBooleanProperty( "ReadOnly", "readonly", _xAttributes ); + ctx.importBooleanProperty( "Dropdown", "spin", _xAttributes ); + ctx.importShortProperty( "LineCount", "linecount", _xAttributes ); + ctx.importAlignProperty( "Align", "align", _xAttributes ); + bool bHasLinkedCell = ctx.importDataAwareProperty( "linked-cell" , _xAttributes ); + bool bHasSrcRange = ctx.importDataAwareProperty( "source-cell-range" , _xAttributes ); + if (_popup.is()) + { + MenuPopupElement * p = static_cast< MenuPopupElement * >( _popup.get() ); + if ( !bHasSrcRange ) + xControlModel->setPropertyValue( "StringItemList", Any( p->getItemValues() ) ); + if ( !bHasLinkedCell ) + xControlModel->setPropertyValue( "SelectedItems", Any( p->getSelectedItems() ) ); + + } + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// combobox +Reference< xml::input::XElement > ComboBoxElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (m_pImport->isEventElement( nUid, rLocalName )) + { + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); + } + else if (m_pImport->XMLNS_DIALOGS_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // menupopup + else if ( rLocalName == "menupopup" ) + { + _popup = new MenuPopupElement( rLocalName, xAttributes, this, m_pImport, true ); + return _popup; + } + else + { + throw xml::sax::SAXException( "expected event or menupopup element!", Reference< XInterface >(), Any() ); + } +} +void ComboBoxElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), getControlModelName( "com.sun.star.awt.UnoControlComboBoxModel", _xAttributes ) ); + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importBooleanProperty( "ReadOnly", "readonly", _xAttributes ); + ctx.importBooleanProperty( "Autocomplete", "autocomplete", _xAttributes ); + ctx.importBooleanProperty( "Dropdown", "spin", _xAttributes ); + ctx.importBooleanProperty( "HideInactiveSelection", "hide-inactive-selection", _xAttributes ); + ctx.importShortProperty( "MaxTextLen", "maxlength" ,_xAttributes ); + ctx.importShortProperty( "LineCount", "linecount" ,_xAttributes ); + ctx.importStringProperty( "Text", "value", _xAttributes ); + ctx.importAlignProperty( "Align", "align", _xAttributes ); + ctx.importDataAwareProperty( "linked-cell" , _xAttributes ); + bool bHasSrcRange = ctx.importDataAwareProperty( "source-cell-range" , _xAttributes ); + if (_popup.is() && !bHasSrcRange ) + { + MenuPopupElement * p = static_cast< MenuPopupElement * >( _popup.get() ); + xControlModel->setPropertyValue( "StringItemList", Any( p->getItemValues() ) ); + } + + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// checkbox +Reference< xml::input::XElement > CheckBoxElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void CheckBoxElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlCheckBoxModel" ); + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + pStyle->importVisualEffectStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importStringProperty( "Label", "value", _xAttributes ); + ctx.importAlignProperty( "Align", "align", _xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", _xAttributes ); + ctx.importGraphicOrImageProperty("image-src" , _xAttributes); + ctx.importImagePositionProperty( "ImagePosition", "image-position", _xAttributes ); + ctx.importBooleanProperty( "MultiLine", "multiline", _xAttributes ); + + sal_Bool bTriState = false; + if (getBoolAttr( &bTriState, "tristate", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + xControlModel->setPropertyValue( "TriState", Any( bTriState ) ); + } + sal_Bool bChecked = false; + if (getBoolAttr( &bChecked, "checked", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + // has "checked" attribute + sal_Int16 nVal = (bChecked ? 1 : 0); + xControlModel->setPropertyValue( "State", Any( nVal ) ); + } + else + { + sal_Int16 nVal = (bTriState ? 2 : 0); // if tristate set, but checked omitted => don't know! + xControlModel->setPropertyValue( "State", Any( nVal ) ); + } + + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// button +Reference< xml::input::XElement > ButtonElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); +} + +void ButtonElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.UnoControlButtonModel" ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + const Reference< beans::XPropertySet >& xControlModel( ctx.getControlModel() ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importStringProperty( "Label", "value", _xAttributes ); + ctx.importAlignProperty( "Align", "align", _xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", _xAttributes ); + ctx.importBooleanProperty( "DefaultButton", "default", _xAttributes ); + ctx.importButtonTypeProperty( "PushButtonType", "button-type", _xAttributes ); + ctx.importGraphicOrImageProperty("image-src" , _xAttributes); + ctx.importImagePositionProperty( "ImagePosition", "image-position", _xAttributes ); + ctx.importImageAlignProperty( "ImageAlign", "image-align", _xAttributes ); + if (ctx.importLongProperty( "RepeatDelay", "repeat", _xAttributes )) + ctx.getControlModel()->setPropertyValue( "Repeat", Any(true) ); + sal_Int32 toggled = 0; + if (getLongAttr( &toggled, "toggled", _xAttributes, m_pImport->XMLNS_DIALOGS_UID ) && toggled == 1) + ctx.getControlModel()->setPropertyValue( "Toggle" , Any(true)); + ctx.importBooleanProperty( "FocusOnClick", "grab-focus", _xAttributes ); + ctx.importBooleanProperty( "MultiLine", "multiline", _xAttributes ); + // State + sal_Bool bChecked = false; + if (getBoolAttr( &bChecked, "checked", _xAttributes, m_pImport->XMLNS_DIALOGS_UID ) && bChecked) + { + ctx.getControlModel()->setPropertyValue( "State" , Any( sal_Int16(1) ) ); + } + + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +// bulletinboard +Reference< xml::input::XElement > BulletinBoardElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if (m_pImport->XMLNS_DIALOGS_UID != nUid) + { + throw xml::sax::SAXException("illegal namespace!", Reference< XInterface >(), Any() ); + } + // button + else if ( rLocalName == "button" ) + { + return new ButtonElement( rLocalName, xAttributes, this, m_pImport ); + } + // checkbox + else if ( rLocalName == "checkbox" ) + { + return new CheckBoxElement( rLocalName, xAttributes, this, m_pImport ); + } + // combobox + else if ( rLocalName == "combobox" ) + { + return new ComboBoxElement( rLocalName, xAttributes, this, m_pImport ); + } + // listbox + else if ( rLocalName == "menulist" ) + { + return new MenuListElement( rLocalName, xAttributes, this, m_pImport ); + } + // radiogroup + else if ( rLocalName == "radiogroup" ) + { + return new RadioGroupElement( rLocalName, xAttributes, this, m_pImport ); + } + // titledbox + else if ( rLocalName == "titledbox" ) + { + return new TitledBoxElement( rLocalName, xAttributes, this, m_pImport ); + } + // text + else if ( rLocalName == "text" ) + { + return new TextElement( rLocalName, xAttributes, this, m_pImport ); + } + else if ( rLocalName == "linklabel" ) + { + return new FixedHyperLinkElement( rLocalName, xAttributes, this, m_pImport ); + } + // textfield + else if ( rLocalName == "textfield" ) + { + return new TextFieldElement( rLocalName, xAttributes, this, m_pImport ); + } + // img + else if ( rLocalName == "img" ) + { + return new ImageControlElement( rLocalName, xAttributes, this, m_pImport ); + } + // filecontrol + else if ( rLocalName == "filecontrol" ) + { + return new FileControlElement( rLocalName, xAttributes, this, m_pImport ); + } + // treecontrol + else if ( rLocalName == "treecontrol" ) + { + return new TreeControlElement( rLocalName, xAttributes, this, m_pImport ); + } + // currencyfield + else if ( rLocalName == "currencyfield" ) + { + return new CurrencyFieldElement( rLocalName, xAttributes, this, m_pImport ); + } + // datefield + else if ( rLocalName == "datefield" ) + { + return new DateFieldElement( rLocalName, xAttributes, this, m_pImport ); + } + // datefield + else if ( rLocalName == "numericfield" ) + { + return new NumericFieldElement( rLocalName, xAttributes, this, m_pImport ); + } + // timefield + else if ( rLocalName == "timefield" ) + { + return new TimeFieldElement( rLocalName, xAttributes, this, m_pImport ); + } + // patternfield + else if ( rLocalName == "patternfield" ) + { + return new PatternFieldElement( rLocalName, xAttributes, this, m_pImport ); + } + // formattedfield + else if ( rLocalName == "formattedfield" ) + { + return new FormattedFieldElement( rLocalName, xAttributes, this, m_pImport ); + } + // fixedline + else if ( rLocalName == "fixedline" ) + { + return new FixedLineElement( rLocalName, xAttributes, this, m_pImport ); + } + // scrollbar + else if ( rLocalName == "scrollbar" ) + { + return new ScrollBarElement( rLocalName, xAttributes, this, m_pImport ); + } + // spinbutton + else if ( rLocalName == "spinbutton" ) + { + return new SpinButtonElement( rLocalName, xAttributes, this, m_pImport ); + } + // progressmeter + else if ( rLocalName == "progressmeter" ) + { + return new ProgressBarElement( rLocalName, xAttributes, this, m_pImport ); + } + // table + else if (rLocalName == "table") + { + return new GridControlElement( rLocalName, xAttributes, this, m_pImport ); + } + else if ( rLocalName == "multipage" ) + { + return new MultiPage( rLocalName, xAttributes, this, m_pImport ); + } + else if ( rLocalName == "frame" ) + { + return new Frame( rLocalName, xAttributes, this, m_pImport ); + } + else if ( rLocalName == "page" ) + { + return new Page( rLocalName, xAttributes, this, m_pImport ); + } + // bulletinboard + else if ( rLocalName == "bulletinboard" ) + { + return new BulletinBoardElement( rLocalName, xAttributes, this, m_pImport ); + } + else + { + throw xml::sax::SAXException( "expected styles, bulletinboard or bulletinboard element, not: " + rLocalName, Reference< XInterface >(), Any() ); + } +} + +BulletinBoardElement::BulletinBoardElement( + OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ControlElement( rLocalName, xAttributes, pParent, pImport ), + mxDialogImport(pImport) +{ + OUString aValue( _xAttributes->getValueByUidName( m_pImport->XMLNS_DIALOGS_UID, "left" ) ); + if (!aValue.isEmpty()) + { + _nBasePosX += toInt32( aValue ); + } + aValue = _xAttributes->getValueByUidName( m_pImport->XMLNS_DIALOGS_UID, "top" ); + if (!aValue.isEmpty()) + { + _nBasePosY += toInt32( aValue ); + } +} + +// style +Reference< xml::input::XElement > StyleElement::startChildElement( + sal_Int32 /*nUid*/, OUString const & /*rLocalName*/, + Reference< xml::input::XAttributes > const & /*xAttributes*/ ) +{ + throw xml::sax::SAXException( "unexpected sub elements of style!", Reference< XInterface >(), Any() ); +} + +void StyleElement::endElement() +{ + OUString aStyleId( _xAttributes->getValueByUidName( m_pImport->XMLNS_DIALOGS_UID, "style-id" ) ); + if (aStyleId.isEmpty()) + { + throw xml::sax::SAXException( "missing style-id attribute!", Reference< XInterface >(), Any() ); + } + + m_pImport->addStyle( aStyleId, this ); +} + +// styles +Reference< xml::input::XElement > StylesElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if (m_pImport->XMLNS_DIALOGS_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // style + else if ( rLocalName == "style" ) + { + return new StyleElement( rLocalName, xAttributes, this, m_pImport ); + } + else + { + throw xml::sax::SAXException( "expected style element!", Reference< XInterface >(), Any() ); + } +} + +// window +Reference< xml::input::XElement > WindowElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (m_pImport->isEventElement( nUid, rLocalName )) + { + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); + } + else if (m_pImport->XMLNS_DIALOGS_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // styles + else if ( rLocalName == "styles" ) + { + return new StylesElement( rLocalName, xAttributes, this, m_pImport ); + } + // bulletinboard + else if ( rLocalName == "bulletinboard" ) + { + return new BulletinBoardElement( rLocalName, xAttributes, this, m_pImport ); + } + else + { + throw xml::sax::SAXException( "expected styles or bulletinboard element!", Reference< XInterface >(), Any() ); + } +} + +void WindowElement::endElement() +{ + Reference< beans::XPropertySet > xProps( + m_pImport->_xDialogModel, UNO_QUERY_THROW ); + ImportContext ctx( m_pImport, xProps, getControlId( _xAttributes ) ); + + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importBackgroundColorStyle( xProps ); + pStyle->importTextColorStyle( xProps ); + pStyle->importTextLineColorStyle( xProps ); + pStyle->importFontStyle( xProps ); + } + + ctx.importDefaults( 0, 0, _xAttributes, false ); + ctx.importBooleanProperty( "Closeable", "closeable", _xAttributes ); + ctx.importBooleanProperty( "Moveable", "moveable", _xAttributes ); + ctx.importBooleanProperty("Sizeable", "resizeable", _xAttributes ); + ctx.importStringProperty("Title", "title", _xAttributes ); + ctx.importBooleanProperty("Decoration", "withtitlebar", _xAttributes ); + ctx.importGraphicOrImageProperty("image-src" , _xAttributes); + ctx.importScollableSettings( _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); +} + +// table +Reference< xml::input::XElement > GridControlElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + // event + if (!m_pImport->isEventElement( nUid, rLocalName )) + { + throw xml::sax::SAXException( "expected event element!", Reference< XInterface >(), Any() ); + } + + return new EventElement( nUid, rLocalName, xAttributes, this, m_pImport ); + +} + +void GridControlElement::endElement() +{ + ControlImportContext ctx( m_pImport, getControlId( _xAttributes ), "com.sun.star.awt.grid.UnoControlGridModel"); + Reference< beans::XPropertySet > xControlModel( ctx.getControlModel() ); + Reference< xml::input::XElement > xStyle( getStyle( _xAttributes ) ); + if (xStyle.is()) + { + StyleElement * pStyle = static_cast< StyleElement * >( xStyle.get () ); + pStyle->importBackgroundColorStyle( xControlModel ); + pStyle->importBorderStyle( xControlModel ); + pStyle->importTextColorStyle( xControlModel ); + pStyle->importTextLineColorStyle( xControlModel ); + pStyle->importFontStyle( xControlModel ); + } + ctx.importDefaults( _nBasePosX, _nBasePosY, _xAttributes ); + ctx.importBooleanProperty( "Tabstop", "tabstop", _xAttributes ); + ctx.importVerticalAlignProperty( "VerticalAlign", "valign", _xAttributes ); + ctx.importSelectionTypeProperty( "SelectionModel", "selectiontype", _xAttributes ); + ctx.importBooleanProperty( "ShowColumnHeader", "showcolumnheader", _xAttributes ); + ctx.importBooleanProperty( "ShowRowHeader", "showrowheader", _xAttributes ); + ctx.importHexLongProperty( "GridLineColor", "gridline-color", _xAttributes ); + ctx.importBooleanProperty( "UseGridLines", "usegridlines", _xAttributes ); + ctx.importHexLongProperty( "HeaderBackgroundColor", "headerbackground-color", _xAttributes ); + ctx.importHexLongProperty( "HeaderTextColor", "headertext-color", _xAttributes ); + ctx.importHexLongProperty( "ActiveSelectionBackgroundColor", "activeselectionbackground-color", _xAttributes ); + ctx.importHexLongProperty( "ActiveSelectionTextColor", "activeselectiontext-color", _xAttributes ); + ctx.importHexLongProperty( "InactiveSelectionBackgroundColor", "inactiveselectionbackground-color", _xAttributes ); + ctx.importHexLongProperty( "InactiveSelectionTextColor", "inactiveselectiontext-color", _xAttributes ); + ctx.importEvents( _events ); + // avoid ring-reference: + // vector< event elements > holding event elements holding this (via _pParent) + _events.clear(); + + ctx.finish(); +} + +//################################################################################################## + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmldlg_imexp/xmldlg_import.cxx b/xmlscript/source/xmldlg_imexp/xmldlg_import.cxx new file mode 100644 index 000000000..5cac12605 --- /dev/null +++ b/xmlscript/source/xmldlg_imexp/xmldlg_import.cxx @@ -0,0 +1,1777 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include "common.hxx" +#include "imp_share.hxx" +#include <xml_import.hxx> +#include <xmlscript/xmlns.h> + +#include <com/sun/star/awt/CharSet.hpp> +#include <com/sun/star/awt/FontFamily.hpp> +#include <com/sun/star/awt/FontPitch.hpp> +#include <com/sun/star/awt/FontSlant.hpp> +#include <com/sun/star/awt/FontStrikeout.hpp> +#include <com/sun/star/awt/FontType.hpp> +#include <com/sun/star/awt/FontUnderline.hpp> +#include <com/sun/star/awt/ImagePosition.hpp> +#include <com/sun/star/awt/ImageScaleMode.hpp> +#include <com/sun/star/awt/LineEndFormat.hpp> +#include <com/sun/star/awt/PushButtonType.hpp> +#include <com/sun/star/awt/VisualEffect.hpp> +#include <com/sun/star/frame/XModel.hpp> +#include <com/sun/star/style/VerticalAlignment.hpp> +#include <com/sun/star/util/Date.hpp> +#include <com/sun/star/util/Time.hpp> +#include <sal/log.hxx> +#include <tools/date.hxx> +#include <tools/diagnose_ex.h> +#include <tools/time.hxx> +#include <osl/diagnose.h> + +#include <com/sun/star/script/XScriptEventsSupplier.hpp> +#include <com/sun/star/script/ScriptEventDescriptor.hpp> + +#include <com/sun/star/view/SelectionType.hpp> +#include <com/sun/star/form/binding/XBindableValue.hpp> +#include <com/sun/star/form/binding/XValueBinding.hpp> +#include <com/sun/star/form/binding/XListEntrySink.hpp> +#include <com/sun/star/beans/NamedValue.hpp> +#include <com/sun/star/table/CellAddress.hpp> +#include <com/sun/star/table/CellRangeAddress.hpp> +#include <com/sun/star/document/XGraphicStorageHandler.hpp> +#include <com/sun/star/document/XStorageBasedDocument.hpp> +#include <com/sun/star/graphic/XGraphic.hpp> +#include <com/sun/star/util/NumberFormatsSupplier.hpp> + +using namespace ::com::sun::star; +using namespace ::com::sun::star::uno; +using namespace ::com::sun::star::frame; + +namespace xmlscript +{ + +void EventElement::endElement() +{ + static_cast< ControlElement * >( m_pParent )->_events.emplace_back(this ); +} + +ControlElement::ControlElement( + OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : ElementBase( + pImport->XMLNS_DIALOGS_UID, rLocalName, xAttributes, pParent, pImport ) +{ + if (m_pParent) + { + // inherit position + _nBasePosX = static_cast< ControlElement * >( m_pParent )->_nBasePosX; + _nBasePosY = static_cast< ControlElement * >( m_pParent )->_nBasePosY; + } + else + { + _nBasePosX = 0; + _nBasePosY = 0; + } +} + +Reference< xml::input::XElement > ControlElement::getStyle( + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aStyleId( xAttributes->getValueByUidName( m_pImport->XMLNS_DIALOGS_UID,"style-id" ) ); + if (!aStyleId.isEmpty()) + { + return m_pImport->getStyle( aStyleId ); + } + return Reference< xml::input::XElement >(); +} + +OUString ControlElement::getControlId( + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aId( xAttributes->getValueByUidName( m_pImport->XMLNS_DIALOGS_UID, "id" ) ); + if (aId.isEmpty()) + { + throw xml::sax::SAXException( "missing id attribute!", Reference< XInterface >(), Any() ); + } + return aId; +} + +OUString ControlElement::getControlModelName( + OUString const& rDefaultModel, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aModel = xAttributes->getValueByUidName( m_pImport->XMLNS_DIALOGS_UID, "control-implementation"); + if (aModel.isEmpty()) + aModel = rDefaultModel; + return aModel; +} + +void StyleElement::importTextColorStyle( + Reference< beans::XPropertySet > const & xProps ) +{ + if ((_inited & 0x2) != 0) + { + if ((_hasValue & 0x2) != 0) + { + xProps->setPropertyValue("TextColor", Any( _textColor ) ); + } + return; + } + _inited |= 0x2; + + if (getLongAttr( &_textColor, "text-color", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + _hasValue |= 0x2; + xProps->setPropertyValue( "TextColor", Any( _textColor ) ); + return; + } +} + +void StyleElement::importTextLineColorStyle( + Reference< beans::XPropertySet > const & xProps ) +{ + if ((_inited & 0x20) != 0) + { + if ((_hasValue & 0x20) != 0) + { + xProps->setPropertyValue( "TextLineColor", Any( _textLineColor ) ); + } + return; + } + _inited |= 0x20; + + if (getLongAttr( &_textLineColor, "textline-color", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + _hasValue |= 0x20; + xProps->setPropertyValue( "TextLineColor", Any( _textLineColor ) ); + } +} + +void StyleElement::importFillColorStyle( + Reference< beans::XPropertySet > const & xProps ) +{ + if ((_inited & 0x10) != 0) + { + if ((_hasValue & 0x10) != 0) + { + xProps->setPropertyValue( "FillColor", Any( _fillColor ) ); + } + return; + } + _inited |= 0x10; + + if (getLongAttr( &_fillColor, "fill-color", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + _hasValue |= 0x10; + xProps->setPropertyValue( "FillColor", Any( _fillColor ) ); + } +} + +void StyleElement::importBackgroundColorStyle( + Reference< beans::XPropertySet > const & xProps ) +{ + if ((_inited & 0x1) != 0) + { + if ((_hasValue & 0x1) != 0) + { + xProps->setPropertyValue( "BackgroundColor", Any( _backgroundColor ) ); + } + return; + } + _inited |= 0x1; + + if (getLongAttr( &_backgroundColor, "background-color", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + _hasValue |= 0x1; + xProps->setPropertyValue( "BackgroundColor", Any( _backgroundColor ) ); + } +} + +void StyleElement::importBorderStyle( + Reference< beans::XPropertySet > const & xProps ) +{ + if ((_inited & 0x4) != 0) + { + if ((_hasValue & 0x4) != 0) + { + xProps->setPropertyValue( "Border", Any( _border == BORDER_SIMPLE_COLOR ? BORDER_SIMPLE : _border ) ); + if (_border == BORDER_SIMPLE_COLOR) + xProps->setPropertyValue( "BorderColor", Any(_borderColor) ); + } + return; + } + _inited |= 0x4; + + OUString aValue; + if (!getStringAttr(&aValue, "border", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + return; + + if ( aValue == "none" ) + _border = BORDER_NONE; + else if ( aValue == "3d" ) + _border = BORDER_3D; + else if ( aValue == "simple" ) + _border = BORDER_SIMPLE; + else { + _border = BORDER_SIMPLE_COLOR; + _borderColor = toInt32(aValue); + } + + _hasValue |= 0x4; + importBorderStyle(xProps); // write values +} + +void StyleElement::importVisualEffectStyle( + Reference<beans::XPropertySet> const & xProps ) +{ + if ((_inited & 0x40) != 0) + { + if ((_hasValue & 0x40) != 0) + { + xProps->setPropertyValue( "VisualEffect", Any(_visualEffect) ); + } + return; + } + _inited |= 0x40; + + OUString aValue; + if (!getStringAttr( &aValue, "look", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + return; + + if ( aValue == "none" ) + { + _visualEffect = awt::VisualEffect::NONE; + } + else if ( aValue == "3d" ) + { + _visualEffect = awt::VisualEffect::LOOK3D; + } + else if ( aValue == "simple" ) + { + _visualEffect = awt::VisualEffect::FLAT; + } + else + OSL_ASSERT( false ); + + _hasValue |= 0x40; + xProps->setPropertyValue( "VisualEffect", Any(_visualEffect) ); +} + +void StyleElement::setFontProperties( + Reference< beans::XPropertySet > const & xProps ) const +{ + xProps->setPropertyValue("FontDescriptor", Any( _descr ) ); + xProps->setPropertyValue("FontEmphasisMark", Any( _fontEmphasisMark ) ); + xProps->setPropertyValue("FontRelief", Any( _fontRelief ) ); +} + +void StyleElement::importFontStyle( + Reference< beans::XPropertySet > const & xProps ) +{ + if ((_inited & 0x8) != 0) + { + if ((_hasValue & 0x8) != 0) + { + setFontProperties( xProps ); + } + return; + } + _inited |= 0x8; + + OUString aValue; + bool bFontImport; + + // dialog:font-name CDATA #IMPLIED + bFontImport = getStringAttr( &_descr.Name, "font-name", _xAttributes, m_pImport->XMLNS_DIALOGS_UID ); + + // dialog:font-height %numeric; #IMPLIED + if (getStringAttr( &aValue, "font-height", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + _descr.Height = static_cast<sal_Int16>(toInt32( aValue )); + bFontImport = true; + } + // dialog:font-width %numeric; #IMPLIED + if (getStringAttr(&aValue, "font-width", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + _descr.Width = static_cast<sal_Int16>(toInt32( aValue )); + bFontImport = true; + } + // dialog:font-stylename CDATA #IMPLIED + bFontImport |= getStringAttr( &_descr.StyleName, "font-stylename", _xAttributes, m_pImport->XMLNS_DIALOGS_UID ); + + // dialog:font-family "(decorative|modern|roman|script|swiss|system)" #IMPLIED + if (getStringAttr(&aValue, "font-family", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + if ( aValue == "decorative" ) + { + _descr.Family = awt::FontFamily::DECORATIVE; + } + else if ( aValue == "modern" ) + { + _descr.Family = awt::FontFamily::MODERN; + } + else if ( aValue == "roman" ) + { + _descr.Family = awt::FontFamily::ROMAN; + } + else if ( aValue == "script" ) + { + _descr.Family = awt::FontFamily::SCRIPT; + } + else if ( aValue == "swiss" ) + { + _descr.Family = awt::FontFamily::SWISS; + } + else if ( aValue == "system" ) + { + _descr.Family = awt::FontFamily::SYSTEM; + } + else + { + throw xml::sax::SAXException("invalid font-family style!", Reference< XInterface >(), Any() ); + } + bFontImport = true; + } + + // dialog:font-charset "(ansi|mac|ibmpc_437|ibmpc_850|ibmpc_860|ibmpc_861|ibmpc_863|ibmpc_865|system|symbol)" #IMPLIED + if (getStringAttr(&aValue, "font-charset", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + if ( aValue == "ansi" ) + { + _descr.CharSet = awt::CharSet::ANSI; + } + else if ( aValue == "mac" ) + { + _descr.CharSet = awt::CharSet::MAC; + } + else if ( aValue == "ibmpc_437" ) + { + _descr.CharSet = awt::CharSet::IBMPC_437; + } + else if ( aValue == "ibmpc_850" ) + { + _descr.CharSet = awt::CharSet::IBMPC_850; + } + else if ( aValue == "ibmpc_860" ) + { + _descr.CharSet = awt::CharSet::IBMPC_860; + } + else if ( aValue == "ibmpc_861" ) + { + _descr.CharSet = awt::CharSet::IBMPC_861; + } + else if ( aValue == "ibmpc_863" ) + { + _descr.CharSet = awt::CharSet::IBMPC_863; + } + else if ( aValue == "ibmpc_865" ) + { + _descr.CharSet = awt::CharSet::IBMPC_865; + } + else if ( aValue == "system" ) + { + _descr.CharSet = awt::CharSet::SYSTEM; + } + else if ( aValue == "symbol" ) + { + _descr.CharSet = awt::CharSet::SYMBOL; + } + else + { + throw xml::sax::SAXException("invalid font-charset style!", Reference< XInterface >(), Any() ); + } + bFontImport = true; + } + + // dialog:font-pitch "(fixed|variable)" #IMPLIED + if (getStringAttr( &aValue, "font-pitch", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + if ( aValue == "fixed" ) + { + _descr.Pitch = awt::FontPitch::FIXED; + } + else if ( aValue == "variable" ) + { + _descr.Pitch = awt::FontPitch::VARIABLE; + } + else + { + throw xml::sax::SAXException("invalid font-pitch style!", Reference< XInterface >(), Any() ); + } + bFontImport = true; + } + + // dialog:font-charwidth CDATA #IMPLIED + if (getStringAttr( &aValue, "font-charwidth", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + _descr.CharacterWidth = aValue.toFloat(); + bFontImport = true; + } + // dialog:font-weight CDATA #IMPLIED + if (getStringAttr( &aValue, "font-weight", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + _descr.Weight = aValue.toFloat(); + bFontImport = true; + } + + // dialog:font-slant "(oblique|italic|reverse_oblique|reverse_italic)" #IMPLIED + if (getStringAttr( &aValue, "font-slant", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + if ( aValue == "oblique" ) + { + _descr.Slant = awt::FontSlant_OBLIQUE; + } + else if ( aValue == "italic" ) + { + _descr.Slant = awt::FontSlant_ITALIC; + } + else if ( aValue == "reverse_oblique" ) + { + _descr.Slant = awt::FontSlant_REVERSE_OBLIQUE; + } + else if ( aValue == "reverse_italic" ) + { + _descr.Slant = awt::FontSlant_REVERSE_ITALIC; + } + else + { + throw xml::sax::SAXException("invalid font-slant style!", Reference< XInterface >(), Any() ); + } + bFontImport = true; + } + + // dialog:font-underline "(single|double|dotted|dash|longdash|dashdot|dashdotdot|smallwave|wave|doublewave|bold|bolddotted|bolddash|boldlongdash|bolddashdot|bolddashdotdot|boldwave)" #IMPLIED + if (getStringAttr( &aValue, "font-underline", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + if ( aValue == "single" ) + { + _descr.Underline = awt::FontUnderline::SINGLE; + } + else if ( aValue == "double" ) + { + _descr.Underline = awt::FontUnderline::DOUBLE; + } + else if ( aValue == "dotted" ) + { + _descr.Underline = awt::FontUnderline::DOTTED; + } + else if ( aValue == "dash" ) + { + _descr.Underline = awt::FontUnderline::DASH; + } + else if ( aValue == "longdash" ) + { + _descr.Underline = awt::FontUnderline::LONGDASH; + } + else if ( aValue == "dashdot" ) + { + _descr.Underline = awt::FontUnderline::DASHDOT; + } + else if ( aValue == "dashdotdot" ) + { + _descr.Underline = awt::FontUnderline::DASHDOTDOT; + } + else if ( aValue == "smallwave" ) + { + _descr.Underline = awt::FontUnderline::SMALLWAVE; + } + else if ( aValue == "wave" ) + { + _descr.Underline = awt::FontUnderline::WAVE; + } + else if ( aValue == "doublewave" ) + { + _descr.Underline = awt::FontUnderline::DOUBLEWAVE; + } + else if ( aValue == "bold" ) + { + _descr.Underline = awt::FontUnderline::BOLD; + } + else if ( aValue == "bolddotted" ) + { + _descr.Underline = awt::FontUnderline::BOLDDOTTED; + } + else if ( aValue == "bolddash" ) + { + _descr.Underline = awt::FontUnderline::BOLDDASH; + } + else if ( aValue == "boldlongdash" ) + { + _descr.Underline = awt::FontUnderline::BOLDLONGDASH; + } + else if ( aValue == "bolddashdot" ) + { + _descr.Underline = awt::FontUnderline::BOLDDASHDOT; + } + else if ( aValue == "bolddashdotdot" ) + { + _descr.Underline = awt::FontUnderline::BOLDDASHDOTDOT; + } + else if ( aValue == "boldwave" ) + { + _descr.Underline = awt::FontUnderline::BOLDWAVE; + } + else + { + throw xml::sax::SAXException("invalid font-underline style!", Reference< XInterface >(), Any() ); + } + bFontImport = true; + } + + // dialog:font-strikeout "(single|double|bold|slash|x)" #IMPLIED + if (getStringAttr( &aValue, "font-strikeout", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + if ( aValue == "single" ) + { + _descr.Strikeout = awt::FontStrikeout::SINGLE; + } + else if ( aValue == "double" ) + { + _descr.Strikeout = awt::FontStrikeout::DOUBLE; + } + else if ( aValue == "bold" ) + { + _descr.Strikeout = awt::FontStrikeout::BOLD; + } + else if ( aValue == "slash" ) + { + _descr.Strikeout = awt::FontStrikeout::SLASH; + } + else if ( aValue == "x" ) + { + _descr.Strikeout = awt::FontStrikeout::X; + } + else + { + throw xml::sax::SAXException( "invalid font-strikeout style!" , Reference< XInterface >(), Any() ); + } + bFontImport = true; + } + + // dialog:font-orientation CDATA #IMPLIED + if (getStringAttr( &aValue, "font-orientation", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + _descr.Orientation = aValue.toFloat(); + bFontImport = true; + } + // dialog:font-kerning %boolean; #IMPLIED + bFontImport |= getBoolAttr( &_descr.Kerning, "font-kerning", _xAttributes, m_pImport->XMLNS_DIALOGS_UID ); + // dialog:font-wordlinemode %boolean; #IMPLIED + bFontImport |= getBoolAttr( &_descr.WordLineMode,"font-wordlinemode", _xAttributes, m_pImport->XMLNS_DIALOGS_UID ); + + // dialog:font-type "(raster|device|scalable)" #IMPLIED + if (getStringAttr( &aValue, "font-type", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + if ( aValue == "raster" ) + { + _descr.Type = awt::FontType::RASTER; + } + else if ( aValue == "device" ) + { + _descr.Type = awt::FontType::DEVICE; + } + else if ( aValue == "scalable" ) + { + _descr.Type = awt::FontType::SCALABLE; + } + else + { + throw xml::sax::SAXException( "invalid font-type style!", Reference< XInterface >(), Any() ); + } + bFontImport = true; + } + + // additional properties which are not part of the FontDescriptor struct + // dialog:font-relief (none|embossed|engraved) #IMPLIED + if (getStringAttr( &aValue, "font-relief", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + if ( aValue == "none" ) + { + _fontRelief = awt::FontRelief::NONE; + } + else if ( aValue == "embossed" ) + { + _fontRelief = awt::FontRelief::EMBOSSED; + } + else if ( aValue == "engraved" ) + { + _fontRelief = awt::FontRelief::ENGRAVED; + } + else + { + throw xml::sax::SAXException("invalid font-relief style!", Reference< XInterface >(), Any() ); + } + bFontImport = true; + } + // dialog:font-emphasismark (none|dot|circle|disc|accent|above|below) #IMPLIED + if (getStringAttr(&aValue, "font-emphasismark", _xAttributes, m_pImport->XMLNS_DIALOGS_UID )) + { + if ( aValue == "none" ) + { + _fontEmphasisMark = awt::FontEmphasisMark::NONE; + } + else if ( aValue == "dot" ) + { + _fontEmphasisMark = awt::FontEmphasisMark::DOT; + } + else if ( aValue == "circle" ) + { + _fontEmphasisMark = awt::FontEmphasisMark::CIRCLE; + } + else if ( aValue == "disc" ) + { + _fontEmphasisMark = awt::FontEmphasisMark::DISC; + } + else if ( aValue == "accent" ) + { + _fontEmphasisMark = awt::FontEmphasisMark::ACCENT; + } + else if ( aValue == "above" ) + { + _fontEmphasisMark = awt::FontEmphasisMark::ABOVE; + } + else if ( aValue == "below" ) + { + _fontEmphasisMark = awt::FontEmphasisMark::BELOW; + } + else + { + throw xml::sax::SAXException( "invalid font-emphasismark style!", Reference< XInterface >(), Any() ); + } + bFontImport = true; + } + + if (bFontImport) + { + _hasValue |= 0x8; + setFontProperties( xProps ); + } +} + +bool ImportContext::importStringProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aValue( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aValue.isEmpty()) + { + _xControlModel->setPropertyValue( rPropName, Any( aValue ) ); + return true; + } + return false; +} + +bool ImportContext::importDoubleProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aValue( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aValue.isEmpty()) + { + _xControlModel->setPropertyValue( rPropName, Any( aValue.toDouble() ) ); + return true; + } + return false; +} + +bool ImportContext::importBooleanProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + sal_Bool bBool; + if (getBoolAttr( + &bBool, rAttrName, xAttributes, _pImport->XMLNS_DIALOGS_UID )) + { + _xControlModel->setPropertyValue( rPropName, Any( bBool ) ); + return true; + } + return false; +} + +bool ImportContext::importLongProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aValue( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aValue.isEmpty()) + { + _xControlModel->setPropertyValue( rPropName, Any( toInt32( aValue ) ) ); + return true; + } + return false; +} + +bool ImportContext::importLongProperty( + sal_Int32 nOffset, + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aValue( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aValue.isEmpty()) + { + _xControlModel->setPropertyValue( rPropName, Any( toInt32( aValue ) + nOffset ) ); + return true; + } + return false; +} + +bool ImportContext::importHexLongProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aValue( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aValue.isEmpty()) + { + _xControlModel->setPropertyValue( rPropName, Any( toInt32( aValue ) ) ); + return true; + } + return false; +} + +bool ImportContext::importShortProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aValue( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aValue.isEmpty()) + { + _xControlModel->setPropertyValue( rPropName, Any( static_cast<sal_Int16>(toInt32( aValue )) ) ); + return true; + } + return false; +} + +bool ImportContext::importAlignProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aAlign( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aAlign.isEmpty()) + { + sal_Int16 nAlign; + if ( aAlign == "left" ) + { + nAlign = 0; + } + else if ( aAlign == "center" ) + { + nAlign = 1; + } + else if ( aAlign == "right" ) + { + nAlign = 2; + } + else if ( aAlign == "none" ) + { + nAlign = 0; // default + } + else + { + throw xml::sax::SAXException("invalid align value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( nAlign ) ); + return true; + } + return false; +} + +bool ImportContext::importVerticalAlignProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aAlign( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aAlign.isEmpty()) + { + style::VerticalAlignment eAlign; + + if ( aAlign == "top" ) + { + eAlign = style::VerticalAlignment_TOP; + } + else if ( aAlign == "center" ) + { + eAlign = style::VerticalAlignment_MIDDLE; + } + else if ( aAlign == "bottom" ) + { + eAlign = style::VerticalAlignment_BOTTOM; + } + else + { + throw xml::sax::SAXException( "invalid vertical align value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( eAlign ) ); + return true; + } + return false; +} + +bool ImportContext::importGraphicOrImageProperty( + OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString sURL = xAttributes->getValueByUidName( _pImport->XMLNS_DIALOGS_UID, rAttrName ); + if ( !sURL.isEmpty() ) + { + Reference< document::XStorageBasedDocument > xDocStorage( _pImport->getDocOwner(), UNO_QUERY ); + + uno::Reference<graphic::XGraphic> xGraphic; + + uno::Reference<document::XGraphicStorageHandler> xGraphicStorageHandler; + if ( xDocStorage.is() ) + { + uno::Sequence< Any > aArgs{ Any(xDocStorage->getDocumentStorage()) }; + xGraphicStorageHandler.set( + _pImport->getComponentContext()->getServiceManager()->createInstanceWithArgumentsAndContext( "com.sun.star.comp.Svx.GraphicImportHelper" , aArgs, _pImport->getComponentContext() ), + UNO_QUERY ); + if (xGraphicStorageHandler.is()) + { + try + { + xGraphic = xGraphicStorageHandler->loadGraphic(sURL); + } + catch( const uno::Exception& ) + { + return false; + } + } + } + if (xGraphic.is()) + { + Reference<beans::XPropertySet> xProps = getControlModel(); + if (xProps.is()) + { + xProps->setPropertyValue("Graphic", Any(xGraphic)); + return true; + } + } + else if (!sURL.isEmpty()) + { + // tdf#130793 Above fails if the dialog is not part of a document. + // In this case we need to set the ImageURL. + Reference<beans::XPropertySet> xProps = getControlModel(); + if (xProps.is()) + { + xProps->setPropertyValue("ImageURL", Any(sURL)); + return true; + } + } + } + return false; +} + +bool ImportContext::importDataAwareProperty( + OUString const & rPropName, + Reference<xml::input::XAttributes> const & xAttributes ) +{ + OUString sLinkedCell; + OUString sCellRange; + if ( rPropName == "linked-cell" ) + sLinkedCell = xAttributes->getValueByUidName( _pImport->XMLNS_DIALOGS_UID, rPropName ); + if ( rPropName == "source-cell-range" ) + sCellRange = xAttributes->getValueByUidName( _pImport->XMLNS_DIALOGS_UID, rPropName ); + bool bRes = false; + Reference< lang::XMultiServiceFactory > xFac( _pImport->getDocOwner(), UNO_QUERY ); + if ( xFac.is() && ( !sLinkedCell.isEmpty() || !sCellRange.isEmpty() ) ) + { + // Set up cell link + if ( !sLinkedCell.isEmpty() ) + { + Reference< form::binding::XBindableValue > xBindable( getControlModel(), uno::UNO_QUERY ); + Reference< beans::XPropertySet > xConvertor( xFac->createInstance( "com.sun.star.table.CellAddressConversion" ), uno::UNO_QUERY ); + if ( xBindable.is() && xConvertor.is() ) + { + table::CellAddress aAddress; + xConvertor->setPropertyValue( "PersistentRepresentation" , uno::Any( sLinkedCell ) ); + xConvertor->getPropertyValue( "Address" ) >>= aAddress; + beans::NamedValue aArg1; + aArg1.Name = "BoundCell"; + aArg1.Value <<= aAddress; + + uno::Reference< form::binding::XValueBinding > xBinding( xFac->createInstanceWithArguments( "com.sun.star.table.CellValueBinding" , { uno::Any(aArg1) }), uno::UNO_QUERY ); + xBindable->setValueBinding( xBinding ); + bRes = true; + } + } + // Set up CellRange + if ( !sCellRange.isEmpty() ) + { + Reference< form::binding::XListEntrySink > xListEntrySink( getControlModel(), uno::UNO_QUERY ); + Reference< beans::XPropertySet > xConvertor( xFac->createInstance( "com.sun.star.table.CellRangeAddressConversion" ), uno::UNO_QUERY ); + if ( xListEntrySink.is() && xConvertor.is() ) + { + table::CellRangeAddress aAddress; + xConvertor->setPropertyValue( "PersistentRepresentation" , uno::Any( sCellRange ) ); + xConvertor->getPropertyValue( "Address" ) >>= aAddress; + beans::NamedValue aArg1; + aArg1.Name = "CellRange"; + aArg1.Value <<= aAddress; + + uno::Reference< form::binding::XListEntrySource > xSource( xFac->createInstanceWithArguments( "com.sun.star.table.CellRangeListSource" , { uno::Any(aArg1) } ), uno::UNO_QUERY ); + xListEntrySink->setListEntrySource( xSource ); + bRes = true; + } + } + } + return bRes; +} + +bool ImportContext::importImageAlignProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aAlign( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aAlign.isEmpty()) + { + sal_Int16 nAlign; + if ( aAlign == "left" ) + { + nAlign = 0; + } + else if ( aAlign == "top" ) + { + nAlign = 1; + } + else if ( aAlign == "right" ) + { + nAlign = 2; + } + else if ( aAlign == "bottom" ) + { + nAlign = 3; + } + else + { + throw xml::sax::SAXException( "invalid image align value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( nAlign ) ); + return true; + } + return false; +} + +bool ImportContext::importImagePositionProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aPosition( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aPosition.isEmpty()) + { + sal_Int16 nPosition; + if ( aPosition == "left-top" ) + { + nPosition = awt::ImagePosition::LeftTop; + } + else if ( aPosition == "left-center" ) + { + nPosition = awt::ImagePosition::LeftCenter; + } + else if ( aPosition == "left-bottom" ) + { + nPosition = awt::ImagePosition::LeftBottom; + } + else if ( aPosition == "right-top" ) + { + nPosition = awt::ImagePosition::RightTop; + } + else if ( aPosition == "right-center" ) + { + nPosition = awt::ImagePosition::RightCenter; + } + else if ( aPosition == "right-bottom" ) + { + nPosition = awt::ImagePosition::RightBottom; + } + else if ( aPosition == "top-left" ) + { + nPosition = awt::ImagePosition::AboveLeft; + } + else if ( aPosition == "top-center" ) + { + nPosition = awt::ImagePosition::AboveCenter; + } + else if ( aPosition == "top-right" ) + { + nPosition = awt::ImagePosition::AboveRight; + } + else if ( aPosition == "bottom-left" ) + { + nPosition = awt::ImagePosition::BelowLeft; + } + else if ( aPosition == "bottom-center" ) + { + nPosition = awt::ImagePosition::BelowCenter; + } + else if ( aPosition == "bottom-right" ) + { + nPosition = awt::ImagePosition::BelowRight; + } + else if ( aPosition == "center" ) + { + nPosition = awt::ImagePosition::Centered; + } + else + { + throw xml::sax::SAXException( "invalid image position value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( nPosition ) ); + return true; + } + return false; +} + +bool ImportContext::importButtonTypeProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString buttonType( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!buttonType.isEmpty()) + { + awt::PushButtonType nButtonType; + if ( buttonType == "standard" ) + { + nButtonType = awt::PushButtonType_STANDARD; + } + else if ( buttonType == "ok" ) + { + nButtonType = awt::PushButtonType_OK; + } + else if ( buttonType == "cancel" ) + { + nButtonType = awt::PushButtonType_CANCEL; + } + else if ( buttonType == "help" ) + { + nButtonType = awt::PushButtonType_HELP; + } + else + { + throw xml::sax::SAXException( "invalid button-type value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( static_cast<sal_Int16>(nButtonType) ) ); + return true; + } + return false; +} + +bool ImportContext::importDateFormatProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aFormat( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aFormat.isEmpty()) + { + sal_Int16 nFormat; + if ( aFormat == "system_short" ) + { + nFormat = 0; + } + else if ( aFormat == "system_short_YY" ) + { + nFormat = 1; + } + else if ( aFormat == "system_short_YYYY" ) + { + nFormat = 2; + } + else if ( aFormat == "system_long" ) + { + nFormat = 3; + } + else if ( aFormat == "short_DDMMYY" ) + { + nFormat = 4; + } + else if ( aFormat == "short_MMDDYY" ) + { + nFormat = 5; + } + else if ( aFormat == "short_YYMMDD" ) + { + nFormat = 6; + } + else if ( aFormat == "short_DDMMYYYY" ) + { + nFormat = 7; + } + else if ( aFormat == "short_MMDDYYYY" ) + { + nFormat = 8; + } + else if ( aFormat == "short_YYYYMMDD" ) + { + nFormat = 9; + } + else if ( aFormat == "short_YYMMDD_DIN5008" ) + { + nFormat = 10; + } + else if ( aFormat == "short_YYYYMMDD_DIN5008" ) + { + nFormat = 11; + } + else + { + throw xml::sax::SAXException( "invalid date-format value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( nFormat ) ); + return true; + } + return false; +} + +bool ImportContext::importTimeProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aValue( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aValue.isEmpty()) + { + ::tools::Time aTTime(toInt32( aValue ) * ::tools::Time::nanoPerCenti); + util::Time aUTime(aTTime.GetUNOTime()); + _xControlModel->setPropertyValue( rPropName, Any( aUTime ) ); + return true; + } + return false; +} + +bool ImportContext::importDateProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aValue( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aValue.isEmpty()) + { + ::Date aTDate(toInt32( aValue )); + util::Date aUDate(aTDate.GetUNODate()); + _xControlModel->setPropertyValue( rPropName, Any( aUDate ) ); + return true; + } + return false; +} + +bool ImportContext::importTimeFormatProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aFormat( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aFormat.isEmpty()) + { + sal_Int16 nFormat; + if ( aFormat == "24h_short" ) + { + nFormat = 0; + } + else if ( aFormat == "24h_long" ) + { + nFormat = 1; + } + else if ( aFormat == "12h_short" ) + { + nFormat = 2; + } + else if ( aFormat == "12h_long" ) + { + nFormat = 3; + } + else if ( aFormat == "Duration_short" ) + { + nFormat = 4; + } + else if ( aFormat == "Duration_long" ) + { + nFormat = 5; + } + else + { + throw xml::sax::SAXException( "invalid time-format value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( nFormat ) ); + return true; + } + return false; +} + +bool ImportContext::importOrientationProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aOrient( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aOrient.isEmpty()) + { + sal_Int32 nOrient; + if ( aOrient == "horizontal" ) + { + nOrient = 0; + } + else if ( aOrient == "vertical" ) + { + nOrient = 1; + } + else + { + throw xml::sax::SAXException( "invalid orientation value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( nOrient ) ); + return true; + } + return false; +} + +bool ImportContext::importLineEndFormatProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aFormat( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aFormat.isEmpty()) + { + sal_Int16 nFormat; + if ( aFormat == "carriage-return" ) + { + nFormat = awt::LineEndFormat::CARRIAGE_RETURN; + } + else if ( aFormat == "line-feed" ) + { + nFormat = awt::LineEndFormat::LINE_FEED; + } + else if ( aFormat == "carriage-return-line-feed" ) + { + nFormat = awt::LineEndFormat::CARRIAGE_RETURN_LINE_FEED; + } + else + { + throw xml::sax::SAXException( "invalid line end format value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( nFormat ) ); + return true; + } + return false; +} + +bool ImportContext::importSelectionTypeProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aSelectionType( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aSelectionType.isEmpty()) + { + view::SelectionType eSelectionType; + + if ( aSelectionType == "none" ) + { + eSelectionType = view::SelectionType_NONE; + } + else if ( aSelectionType == "single" ) + { + eSelectionType = view::SelectionType_SINGLE; + } + else if ( aSelectionType == "multi" ) + { + eSelectionType = view::SelectionType_MULTI; + } + else if ( aSelectionType == "range" ) + { + eSelectionType = view::SelectionType_RANGE; + } + else + { + throw xml::sax::SAXException( "invalid selection type value!", Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( eSelectionType ) ); + return true; + } + return false; +} + +bool ImportContext::importImageScaleModeProperty( + OUString const & rPropName, OUString const & rAttrName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + OUString aImageScaleMode( + xAttributes->getValueByUidName( + _pImport->XMLNS_DIALOGS_UID, rAttrName ) ); + if (!aImageScaleMode.isEmpty()) + { + sal_Int16 nImageScaleMode; + + if (aImageScaleMode == "none") + { + nImageScaleMode = awt::ImageScaleMode::NONE; + } + else if (aImageScaleMode == "isotropic") + { + nImageScaleMode = awt::ImageScaleMode::ISOTROPIC; + } + else if (aImageScaleMode == "anisotropic") + { + nImageScaleMode = awt::ImageScaleMode::ANISOTROPIC; + } + else + { + throw xml::sax::SAXException( "invalid scale image mode value!", + Reference< XInterface >(), Any() ); + } + + _xControlModel->setPropertyValue( rPropName, Any( nImageScaleMode ) ); + return true; + } + return false; +} + +StringTriple const s_aEventTranslations[] = +{ + // from xmloff/source/forms/formevents.cxx + // 28.09.2001 tbe added on-adjustmentvaluechange + { "com.sun.star.form.XApproveActionListener", "approveAction", "on-approveaction" }, + { "com.sun.star.awt.XActionListener", "actionPerformed", "on-performaction" }, + { "com.sun.star.form.XChangeListener", "changed", "on-change" }, + { "com.sun.star.awt.XTextListener", "textChanged", "on-textchange" }, + { "com.sun.star.awt.XItemListener", "itemStateChanged", "on-itemstatechange" }, + { "com.sun.star.awt.XFocusListener", "focusGained", "on-focus" }, + { "com.sun.star.awt.XFocusListener", "focusLost", "on-blur" }, + { "com.sun.star.awt.XKeyListener", "keyPressed", "on-keydown" }, + { "com.sun.star.awt.XKeyListener", "keyReleased", "on-keyup" }, + { "com.sun.star.awt.XMouseListener", "mouseEntered", "on-mouseover" }, + { "com.sun.star.awt.XMouseMotionListener", "mouseDragged", "on-mousedrag" }, + { "com.sun.star.awt.XMouseMotionListener", "mouseMoved", "on-mousemove" }, + { "com.sun.star.awt.XMouseListener", "mousePressed", "on-mousedown" }, + { "com.sun.star.awt.XMouseListener", "mouseReleased", "on-mouseup" }, + { "com.sun.star.awt.XMouseListener", "mouseExited", "on-mouseout" }, + { "com.sun.star.form.XResetListener", "approveReset", "on-approvereset" }, + { "com.sun.star.form.XResetListener", "resetted", "on-reset" }, + { "com.sun.star.form.XSubmitListener", "approveSubmit", "on-submit" }, + { "com.sun.star.form.XUpdateListener", "approveUpdate", "on-approveupdate" }, + { "com.sun.star.form.XUpdateListener", "updated", "on-update" }, + { "com.sun.star.form.XLoadListener", "loaded", "on-load" }, + { "com.sun.star.form.XLoadListener", "reloading", "on-startreload" }, + { "com.sun.star.form.XLoadListener", "reloaded", "on-reload" }, + { "com.sun.star.form.XLoadListener", "unloading", "on-startunload" }, + { "com.sun.star.form.XLoadListener", "unloaded", "on-unload" }, + { "com.sun.star.form.XConfirmDeleteListener", "confirmDelete", "on-confirmdelete" }, + { "com.sun.star.sdb.XRowSetApproveListener", "approveRowChange", "on-approverowchange" }, + { "com.sun.star.sdbc.XRowSetListener", "rowChanged", "on-rowchange" }, + { "com.sun.star.sdb.XRowSetApproveListener", "approveCursorMove", "on-approvecursormove" }, + { "com.sun.star.sdbc.XRowSetListener", "cursorMoved", "on-cursormove" }, + { "com.sun.star.form.XDatabaseParameterListener", "approveParameter", "on-supplyparameter" }, + { "com.sun.star.sdb.XSQLErrorListener", "errorOccured", "on-error" }, + { "com.sun.star.awt.XAdjustmentListener", "adjustmentValueChanged", "on-adjustmentvaluechange" }, + { nullptr, nullptr, nullptr } +}; + +StringTriple const * const g_pEventTranslations = s_aEventTranslations; + +void ImportContext::importEvents( + std::vector< Reference< xml::input::XElement > > const & rEvents ) +{ + Reference< script::XScriptEventsSupplier > xSupplier( + _xControlModel, UNO_QUERY ); + if (!xSupplier.is()) + return; + + Reference< container::XNameContainer > xEvents( xSupplier->getEvents() ); + if (!xEvents.is()) + return; + + for (const auto & rEvent : rEvents) + { + script::ScriptEventDescriptor descr; + + EventElement * pEventElement = static_cast< EventElement * >( rEvent.get() ); + sal_Int32 nUid = pEventElement->getUid(); + OUString aLocalName( pEventElement->getLocalName() ); + Reference< xml::input::XAttributes > xAttributes( pEventElement->getAttributes() ); + + // nowadays script events + if (_pImport->XMLNS_SCRIPT_UID == nUid) + { + if (!getStringAttr( &descr.ScriptType, "language" , xAttributes, _pImport->XMLNS_SCRIPT_UID ) || + !getStringAttr( &descr.ScriptCode, "macro-name", xAttributes, _pImport->XMLNS_SCRIPT_UID )) + { + throw xml::sax::SAXException( "missing language or macro-name attribute(s) of event!", Reference< XInterface >(), Any() ); + } + if ( descr.ScriptType == "StarBasic" ) + { + OUString aLocation; + if (getStringAttr( &aLocation, "location", xAttributes, _pImport->XMLNS_SCRIPT_UID )) + { + // prepend location + descr.ScriptCode = aLocation + ":" + descr.ScriptCode; + } + } + else if ( descr.ScriptType == "Script" ) + { + // Check if there is a protocol, if not assume + // this is an early scripting framework url ( without + // the protocol ) and fix it up!! + if ( descr.ScriptCode.indexOf( ':' ) == -1 ) + { + descr.ScriptCode = "vnd.sun.start.script:" + descr.ScriptCode; + } + } + + // script:event element + if ( aLocalName == "event" ) + { + OUString aEventName; + if (! getStringAttr( &aEventName, "event-name", xAttributes, _pImport->XMLNS_SCRIPT_UID )) + { + throw xml::sax::SAXException( "missing event-name attribute!", Reference< XInterface >(), Any() ); + } + + // lookup in table + OString str( OUStringToOString( aEventName, RTL_TEXTENCODING_ASCII_US ) ); + StringTriple const * p = g_pEventTranslations; + while (p->first) + { + if (0 == ::rtl_str_compare( p->third, str.getStr() )) + { + descr.ListenerType = OUString( + p->first, ::rtl_str_getLength( p->first ), + RTL_TEXTENCODING_ASCII_US ); + descr.EventMethod = OUString( + p->second, ::rtl_str_getLength( p->second ), + RTL_TEXTENCODING_ASCII_US ); + break; + } + ++p; + } + + if (! p->first) + { + throw xml::sax::SAXException( "no matching event-name found!", Reference< XInterface >(), Any() ); + } + } + else // script:listener-event element + { + SAL_WARN_IF( aLocalName != "listener-event", "xmlscript.xmldlg", "aLocalName != listener-event" ); + + if (!getStringAttr( &descr.ListenerType, "listener-type" , xAttributes, _pImport->XMLNS_SCRIPT_UID ) || + !getStringAttr( &descr.EventMethod , "listener-method", xAttributes, _pImport->XMLNS_SCRIPT_UID )) + { + throw xml::sax::SAXException("missing listener-type or listener-method attribute(s)!", Reference< XInterface >(), Any() ); + } + // optional listener param + getStringAttr( &descr.AddListenerParam, "listener-param", xAttributes, _pImport->XMLNS_SCRIPT_UID ); + } + } + else // deprecated dlg:event element + { + SAL_WARN_IF( _pImport->XMLNS_DIALOGS_UID != nUid || aLocalName != "event", "xmlscript.xmldlg", "_pImport->XMLNS_DIALOGS_UID != nUid || aLocalName != \"event\"" ); + + if (!getStringAttr( &descr.ListenerType, "listener-type", xAttributes, _pImport->XMLNS_DIALOGS_UID ) || + !getStringAttr( &descr.EventMethod, "event-method", xAttributes, _pImport->XMLNS_DIALOGS_UID )) + { + throw xml::sax::SAXException("missing listener-type or event-method attribute(s)!", Reference< XInterface >(), Any() ); + } + + getStringAttr( &descr.ScriptType, "script-type", xAttributes, _pImport->XMLNS_DIALOGS_UID ); + getStringAttr( &descr.ScriptCode, "script-code", xAttributes, _pImport->XMLNS_DIALOGS_UID ); + getStringAttr( &descr.AddListenerParam, "param", xAttributes, _pImport->XMLNS_DIALOGS_UID ); + } + + xEvents->insertByName( descr.ListenerType + "::" + descr.EventMethod, Any( descr ) ); + } +} +void ImportContext::importScollableSettings( + Reference< xml::input::XAttributes > const & _xAttributes ) +{ + importLongProperty( "ScrollHeight", + "scrollheight", + _xAttributes ); + importLongProperty( "ScrollWidth", + "scrollwidth", + _xAttributes ); + importLongProperty( "ScrollTop", + "scrolltop", + _xAttributes ); + importLongProperty( "ScrollLeft", + "scrollleft", + _xAttributes ); + importBooleanProperty( "HScroll", + "hscroll", + _xAttributes ); + importBooleanProperty( "VScroll", + "vscroll", + _xAttributes ); +} + +void ImportContext::importDefaults( + sal_Int32 nBaseX, sal_Int32 nBaseY, + Reference< xml::input::XAttributes > const & xAttributes, + bool supportPrintable ) +{ + _xControlModel->setPropertyValue( "Name", Any( _aId ) ); + + importShortProperty( "TabIndex", "tab-index", xAttributes ); + + sal_Bool bDisable = false; + if (getBoolAttr( &bDisable,"disabled", xAttributes, _pImport->XMLNS_DIALOGS_UID ) && bDisable) + { + _xControlModel->setPropertyValue( "Enabled", Any( false ) ); + } + + sal_Bool bVisible = true; + if (getBoolAttr( &bVisible, "visible", xAttributes, _pImport->XMLNS_DIALOGS_UID ) && !bVisible) + { + try + { + _xControlModel->setPropertyValue( "EnableVisible", Any( false ) ); + } + catch( Exception& ) + { + DBG_UNHANDLED_EXCEPTION("xmlscript.xmldlg"); + } + } + + if (!importLongProperty( nBaseX, "PositionX", "left", xAttributes ) || + !importLongProperty( nBaseY, "PositionY", "top", xAttributes ) || + !importLongProperty( "Width", "width", xAttributes ) || + !importLongProperty( "Height", "height", xAttributes )) + { + throw xml::sax::SAXException( "missing pos size attribute(s)!", Reference< XInterface >(), Any() ); + } + + if (supportPrintable) + { + importBooleanProperty("Printable", "printable", xAttributes ); + } + + sal_Int32 nLong; + if (! getLongAttr( &nLong, "page", xAttributes, _pImport->XMLNS_DIALOGS_UID )) + { + nLong = 0; + } + _xControlModel->setPropertyValue( "Step", Any( nLong ) ); + + importStringProperty("Tag", "tag", xAttributes ); + importStringProperty( "HelpText", "help-text", xAttributes ); + importStringProperty( "HelpURL", "help-url", xAttributes ); +} + +Reference< xml::input::XElement > ElementBase::getParent() +{ + return static_cast< xml::input::XElement * >( m_pParent ); +} + +OUString ElementBase::getLocalName() +{ + return _aLocalName; +} + +sal_Int32 ElementBase::getUid() +{ + return _nUid; +} + +Reference< xml::input::XAttributes > ElementBase::getAttributes() +{ + return _xAttributes; +} + +void ElementBase::ignorableWhitespace( + OUString const & /*rWhitespaces*/ ) +{ + // not used +} + +void ElementBase::characters( OUString const & /*rChars*/ ) +{ + // not used, all characters ignored +} + +void ElementBase::endElement() +{ +} + +void ElementBase::processingInstruction( + OUString const & /*Target*/, OUString const & /*Data*/ ) +{ +} + +Reference< xml::input::XElement > ElementBase::startChildElement( + sal_Int32 /*nUid*/, OUString const & /*rLocalName*/, + Reference< xml::input::XAttributes > const & /*xAttributes*/ ) +{ + throw xml::sax::SAXException( "unexpected element!", Reference< XInterface >(), Any() ); +} + +ElementBase::ElementBase( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes, + ElementBase * pParent, DialogImport * pImport ) + : m_pImport( pImport ) + , m_pParent( pParent ) + , _nUid( nUid ) + , _aLocalName( rLocalName ) + , _xAttributes( xAttributes ) +{ +} + +ElementBase::~ElementBase() +{ + SAL_INFO("xmlscript.xmldlg", "ElementBase::~ElementBase(): " << _aLocalName ); +} + +// XRoot + +void DialogImport::startDocument( + Reference< xml::input::XNamespaceMapping > const & xNamespaceMapping ) +{ + XMLNS_DIALOGS_UID = xNamespaceMapping->getUidByUri( XMLNS_DIALOGS_URI ); + XMLNS_SCRIPT_UID = xNamespaceMapping->getUidByUri( XMLNS_SCRIPT_URI ); +} + +void DialogImport::endDocument() +{ + // ignored +} + +void DialogImport::processingInstruction( + OUString const & /*rTarget*/, OUString const & /*rData*/ ) +{ + // ignored for now: xxx todo +} + +void DialogImport::setDocumentLocator( + Reference< xml::sax::XLocator > const & /*xLocator*/ ) +{ + // ignored for now: xxx todo +} + +Reference< xml::input::XElement > DialogImport::startRootElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if (XMLNS_DIALOGS_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // window + else if ( rLocalName == "window" ) + { + return new WindowElement( rLocalName, xAttributes, this ); + } + else + { + throw xml::sax::SAXException( "illegal root element (expected window) given: " + rLocalName, Reference< XInterface >(), Any() ); + } +} + +DialogImport::~DialogImport() +{ + SAL_INFO("xmlscript.xmldlg", "DialogImport::~DialogImport()." ); +} + +Reference< util::XNumberFormatsSupplier > const & DialogImport::getNumberFormatsSupplier() +{ + if (! _xSupplier.is()) + { + Reference< util::XNumberFormatsSupplier > xSupplier = util::NumberFormatsSupplier::createWithDefaultLocale( getComponentContext() ); + + ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() ); + if (! _xSupplier.is()) + { + _xSupplier = xSupplier; + } + } + return _xSupplier; +} + +void DialogImport::addStyle( + OUString const & rStyleId, + Reference< xml::input::XElement > const & xStyle ) +{ + (*_pStyleNames).push_back( rStyleId ); + (*_pStyles).push_back( xStyle ); +} + +Reference< xml::input::XElement > DialogImport::getStyle( + std::u16string_view rStyleId ) const +{ + for ( size_t nPos = 0; nPos < (*_pStyleNames).size(); ++nPos ) + { + if ( (*_pStyleNames)[ nPos ] == rStyleId) + { + return (*_pStyles)[ nPos ]; + } + } + return nullptr; +} + +Reference< xml::sax::XDocumentHandler > importDialogModel( + Reference< container::XNameContainer > const & xDialogModel, + Reference< XComponentContext > const & xContext, + Reference< XModel > const & xDocument ) +{ + // single set of styles and stylenames apply to all containers + auto pStyleNames = std::make_shared<std::vector< OUString >>(); + auto pStyles = std::make_shared<std::vector< css::uno::Reference< css::xml::input::XElement > >>(); + return ::xmlscript::createDocumentHandler( + new DialogImport(xContext, xDialogModel, pStyleNames, pStyles, xDocument)); +} +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmlflat_imexp/xmlbas_export.cxx b/xmlscript/source/xmlflat_imexp/xmlbas_export.cxx new file mode 100644 index 000000000..eefa92eaf --- /dev/null +++ b/xmlscript/source/xmlflat_imexp/xmlbas_export.cxx @@ -0,0 +1,377 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include <sal/config.h> + +#include "xmlbas_export.hxx" +#include <sal/log.hxx> +#include <xmlscript/xmlns.h> +#include <xmlscript/xml_helper.hxx> +#include <com/sun/star/beans/XPropertySet.hpp> +#include <com/sun/star/script/XLibraryContainer2.hpp> +#include <com/sun/star/script/XLibraryContainerPassword.hpp> +#include <com/sun/star/document/XEmbeddedScripts.hpp> +#include <com/sun/star/uno/XComponentContext.hpp> +#include <com/sun/star/xml/sax/SAXException.hpp> +#include <cppuhelper/supportsservice.hxx> +#include <tools/diagnose_ex.h> +#include <rtl/ref.hxx> + +using namespace ::com::sun::star; +using namespace ::com::sun::star::lang; +using namespace ::com::sun::star::uno; + +namespace xmlscript +{ + // XMLBasicExporterBase + + XMLBasicExporterBase::XMLBasicExporterBase( bool bOasis ) + :m_bOasis( bOasis ) + { + } + + XMLBasicExporterBase::~XMLBasicExporterBase() + { + } + + // XServiceInfo + sal_Bool XMLBasicExporterBase::supportsService( const OUString& rServiceName ) + { + return cppu::supportsService(this, rServiceName); + } + + // XInitialization + + void XMLBasicExporterBase::initialize( const Sequence< Any >& aArguments ) + { + std::scoped_lock aGuard( m_aMutex ); + + if ( aArguments.getLength() != 1 ) + { + throw RuntimeException( "XMLBasicExporterBase::initialize: invalid number of arguments!" ); + } + + aArguments[0] >>= m_xHandler; + + if ( !m_xHandler.is() ) + { + throw RuntimeException( "XMLBasicExporterBase::initialize: invalid argument format!" ); + } + } + + // XExporter + + void XMLBasicExporterBase::setSourceDocument( const Reference< XComponent >& rxDoc ) + { + std::scoped_lock aGuard( m_aMutex ); + + m_xModel.set( rxDoc, UNO_QUERY ); + + if ( !m_xModel.is() ) + { + throw IllegalArgumentException( "XMLBasicExporter::setSourceDocument: no document model!", Reference< XInterface >(), 1 ); + } + } + + // XFilter + +sal_Bool XMLBasicExporterBase::filter( const Sequence< beans::PropertyValue >& /*aDescriptor*/ ) + { + std::scoped_lock aGuard( m_aMutex ); + + bool bReturn = true; + + try + { + if ( m_xHandler.is() ) + { + m_xHandler->startDocument(); + + // ooo/script prefix and URI + OUString aPrefix; + OUString aURI; + if ( m_bOasis ) + { + aPrefix = XMLNS_OOO_PREFIX; + aURI = XMLNS_OOO_URI; + } + else + { + aPrefix = XMLNS_SCRIPT_PREFIX; + aURI = XMLNS_SCRIPT_URI; + } + + // ooo/script:libraries element + OUString aLibContElementName = aPrefix + ":libraries"; + rtl::Reference<XMLElement> pLibContElement = new XMLElement( aLibContElementName ); + + // ooo/script namespace attribute + pLibContElement->addAttribute( "xmlns:" + aPrefix, aURI ); + + // xlink namespace attribute + pLibContElement->addAttribute( "xmlns:" XMLNS_XLINK_PREFIX, XMLNS_XLINK_URI ); + + // <ooo/script:libraries... + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->startElement( aLibContElementName, pLibContElement ); + + Reference< script::XLibraryContainer2 > xLibContainer; + + // try the XEmbeddedScripts interface + Reference< document::XEmbeddedScripts > xDocumentScripts( m_xModel, UNO_QUERY ); + if ( xDocumentScripts.is() ) + xLibContainer = xDocumentScripts->getBasicLibraries(); + + if ( !xLibContainer.is() ) + { + // try the "BasicLibraries" property (old-style, for compatibility) + Reference< beans::XPropertySet > xPSet( m_xModel, UNO_QUERY ); + if ( xPSet.is() ) + xPSet->getPropertyValue("BasicLibraries" ) >>= xLibContainer; + } + + SAL_WARN_IF( !xLibContainer.is(), "xmlscript.xmlflat", "XMLBasicExporterBase::filter: nowhere to export to!" ); + + if ( xLibContainer.is() ) + { + const Sequence< OUString > aLibNames = xLibContainer->getElementNames(); + for ( const OUString& rLibName : aLibNames ) + { + if ( xLibContainer->hasByName( rLibName ) ) + { + OUString aTrueStr( "true" ); + + if ( xLibContainer->isLibraryLink( rLibName ) ) + { + // ooo/script:library-linked element + OUString aLibElementName = aPrefix + ":library-linked"; + rtl::Reference<XMLElement> pLibElement = new XMLElement( aLibElementName ); + + // ooo/script:name attribute + pLibElement->addAttribute( aPrefix + ":name", rLibName ); + + OUString aLinkURL( xLibContainer->getLibraryLinkURL( rLibName ) ); + if ( !aLinkURL.isEmpty() ) + { + // xlink:href attribute + pLibElement->addAttribute( XMLNS_XLINK_PREFIX ":href", aLinkURL ); + + // xlink:type attribute + pLibElement->addAttribute( XMLNS_XLINK_PREFIX ":type", "simple" ); + } + + if ( xLibContainer->isLibraryReadOnly( rLibName ) ) + { + // ooo/script:readonly attribute + pLibElement->addAttribute( aPrefix + ":readonly", aTrueStr ); + } + + // <ooo/script:library-linked... + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->startElement( aLibElementName, pLibElement ); + + // ...ooo/script:library-linked> + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->endElement( aLibElementName ); + } + else + { + // ooo/script:library-embedded element + OUString aLibElementName = aPrefix + ":library-embedded"; + rtl::Reference<XMLElement> pLibElement = new XMLElement( aLibElementName ); + + // ooo/script:name attribute + pLibElement->addAttribute( aPrefix + ":name", rLibName ); + + if ( xLibContainer->isLibraryReadOnly( rLibName ) ) + { + // ooo/script:readonly attribute + pLibElement->addAttribute( aPrefix + ":readonly", aTrueStr ); + } + + // TODO: password protected libraries + Reference< script::XLibraryContainerPassword > xPasswd( xLibContainer, UNO_QUERY ); + if ( xPasswd.is() && xPasswd->isLibraryPasswordProtected( rLibName ) ) + continue; + + // <ooo/script:library-embedded... + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->startElement( aLibElementName, pLibElement ); + + if ( !xLibContainer->isLibraryLoaded( rLibName ) ) + xLibContainer->loadLibrary( rLibName ); + + Reference< container::XNameContainer > xLib; + xLibContainer->getByName( rLibName ) >>= xLib; + + if ( xLib.is() ) + { + const Sequence< OUString > aModNames = xLib->getElementNames(); + for ( const OUString& rModName : aModNames ) + { + if ( xLib->hasByName( rModName ) ) + { + // ooo/script:module element + OUString aModElementName = aPrefix + ":module"; + rtl::Reference<XMLElement> pModElement = new XMLElement( aModElementName ); + + // ooo/script:name attribute + pModElement->addAttribute( aPrefix + ":name", rModName ); + + // <ooo/script:module... + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->startElement( aModElementName, pModElement ); + + // ooo/script:source-code element + OUString aSourceElementName = aPrefix + ":source-code"; + rtl::Reference<XMLElement> pSourceElement = new XMLElement( aSourceElementName ); + + // <ooo/script:source-code... + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->startElement( aSourceElementName, pSourceElement ); + + // module data + // TODO: write encrypted data for password protected libraries + OUString aSource; + xLib->getByName( rModName ) >>= aSource; + m_xHandler->characters( aSource ); + + // TODO: <ooo/script:byte-code> + + // ...ooo/script:source-code> + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->endElement( aSourceElementName ); + + // ...ooo/script:module> + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->endElement( aModElementName ); + } + } + } + + // ...ooo/script:library-embedded> + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->endElement( aLibElementName ); + } + } + } + } + + // ...ooo/script:libraries> + m_xHandler->ignorableWhitespace( OUString() ); + m_xHandler->endElement( aLibContElementName ); + + m_xHandler->endDocument(); + } + } + catch ( const container::NoSuchElementException& ) + { + TOOLS_INFO_EXCEPTION("xmlscript.xmlflat", "XMLBasicExporterBase::filter" ); + bReturn = false; + } + catch ( const lang::IllegalArgumentException& ) + { + TOOLS_INFO_EXCEPTION("xmlscript.xmlflat", "XMLBasicExporterBase::filter" ); + bReturn = false; + } + catch ( const lang::WrappedTargetException& ) + { + TOOLS_INFO_EXCEPTION("xmlscript.xmlflat", "XMLBasicExporterBase::filter:" ); + bReturn = false; + } + catch ( const xml::sax::SAXException& ) + { + TOOLS_INFO_EXCEPTION("xmlscript.xmlflat", "XMLBasicExporterBase::filter:" ); + bReturn = false; + } + + return bReturn; + } + + void XMLBasicExporterBase::cancel() + { + // cancel export + } + + // XMLBasicExporter + + XMLBasicExporter::XMLBasicExporter() + :XMLBasicExporterBase( false ) + { + } + + XMLBasicExporter::~XMLBasicExporter() + { + } + + // XServiceInfo + + OUString XMLBasicExporter::getImplementationName( ) + { + return "com.sun.star.comp.xmlscript.XMLBasicExporter"; + } + + Sequence< OUString > XMLBasicExporter::getSupportedServiceNames( ) + { + return { "com.sun.star.document.XMLBasicExporter" }; + } + + // XMLOasisBasicExporter + + XMLOasisBasicExporter::XMLOasisBasicExporter() + :XMLBasicExporterBase( true ) + { + } + + XMLOasisBasicExporter::~XMLOasisBasicExporter() + { + } + + // XServiceInfo + + OUString XMLOasisBasicExporter::getImplementationName( ) + { + return "com.sun.star.comp.xmlscript.XMLOasisBasicExporter"; + } + + Sequence< OUString > XMLOasisBasicExporter::getSupportedServiceNames( ) + { + return { "com.sun.star.document.XMLOasisBasicExporter" }; + } + +} // namespace xmlscript + +extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface * +com_sun_star_comp_xmlscript_XMLBasicExporter( + css::uno::XComponentContext *, + css::uno::Sequence<css::uno::Any> const &) +{ + return cppu::acquire(new xmlscript::XMLBasicExporter()); +} + +extern "C" SAL_DLLPUBLIC_EXPORT css::uno::XInterface * +com_sun_star_comp_xmlscript_XMLOasisBasicExporter( + css::uno::XComponentContext *, + css::uno::Sequence<css::uno::Any> const &) +{ + + return cppu::acquire(new xmlscript::XMLOasisBasicExporter()); +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmlflat_imexp/xmlbas_export.hxx b/xmlscript/source/xmlflat_imexp/xmlbas_export.hxx new file mode 100644 index 000000000..1ed5e9e5d --- /dev/null +++ b/xmlscript/source/xmlflat_imexp/xmlbas_export.hxx @@ -0,0 +1,92 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#pragma once + +#include <com/sun/star/xml/sax/XDocumentHandler.hpp> +#include <com/sun/star/document/XXMLBasicExporter.hpp> +#include <com/sun/star/frame/XModel.hpp> +#include <com/sun/star/lang/XServiceInfo.hpp> +#include <com/sun/star/lang/XInitialization.hpp> +#include <cppuhelper/implbase.hxx> +#include <mutex> + +namespace xmlscript +{ + + + typedef ::cppu::WeakImplHelper< + css::lang::XServiceInfo, + css::lang::XInitialization, + css::document::XXMLBasicExporter > XMLBasicExporterBase_BASE; + + class XMLBasicExporterBase : public XMLBasicExporterBase_BASE + { + private: + std::mutex m_aMutex; + css::uno::Reference< css::xml::sax::XDocumentHandler > m_xHandler; + css::uno::Reference< css::frame::XModel > m_xModel; + bool const m_bOasis; + + public: + explicit XMLBasicExporterBase(bool bOasis); + virtual ~XMLBasicExporterBase() override; + + // XServiceInfo + virtual sal_Bool SAL_CALL supportsService( const OUString& ServiceName ) override; + + // XInitialization + virtual void SAL_CALL initialize( const css::uno::Sequence< css::uno::Any >& aArguments ) override; + + // XExporter + virtual void SAL_CALL setSourceDocument( const css::uno::Reference< css::lang::XComponent >& rxDoc ) override; + + // XFilter + virtual sal_Bool SAL_CALL filter( const css::uno::Sequence< css::beans::PropertyValue >& aDescriptor ) override; + virtual void SAL_CALL cancel() override; + }; + + + class XMLBasicExporter : public XMLBasicExporterBase + { + public: + explicit XMLBasicExporter(); + virtual ~XMLBasicExporter() override; + + // XServiceInfo + virtual OUString SAL_CALL getImplementationName( ) override; + virtual css::uno::Sequence< OUString > SAL_CALL getSupportedServiceNames( ) override; + }; + + + class XMLOasisBasicExporter : public XMLBasicExporterBase + { + public: + explicit XMLOasisBasicExporter(); + virtual ~XMLOasisBasicExporter() override; + + // XServiceInfo + virtual OUString SAL_CALL getImplementationName( ) override; + virtual css::uno::Sequence< OUString > SAL_CALL getSupportedServiceNames( ) override; + }; + +} // namespace xmlscript + + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmllib_imexp/imp_share.hxx b/xmlscript/source/xmllib_imexp/imp_share.hxx new file mode 100644 index 000000000..d9ec1c442 --- /dev/null +++ b/xmlscript/source/xmllib_imexp/imp_share.hxx @@ -0,0 +1,219 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#pragma once + +#include <xmlscript/xmllib_imexp.hxx> + +#include <cppuhelper/implbase.hxx> + +#include <com/sun/star/xml/input/XRoot.hpp> +#include <com/sun/star/xml/sax/SAXException.hpp> +#include <rtl/ref.hxx> +#include <o3tl/string_view.hxx> + +#include <vector> + +namespace xmlscript +{ +inline sal_Int32 toInt32( OUString const & rStr ) +{ + sal_Int32 nVal; + if (rStr.getLength() > 2 && rStr[ 0 ] == '0' && rStr[ 1 ] == 'x') + { + nVal = o3tl::toUInt32(rStr.subView( 2 ), 16); + } + else + { + nVal = rStr.toInt32(); + } + return nVal; +} +inline bool getBoolAttr( + bool * pRet, OUString const & rAttrName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, sal_Int32 uid ) +{ + OUString aValue( + xAttributes->getValueByUidName( uid, rAttrName ) ); + if (!aValue.isEmpty()) + { + if ( aValue == "true" ) + { + *pRet = true; + return true; + } + else if ( aValue == "false" ) + { + *pRet = false; + return true; + } + else + { + throw css::xml::sax::SAXException(rAttrName + ": no boolean value (true|false)!", css::uno::Reference< css::uno::XInterface >(), css::uno::Any() ); + } + } + return false; +} + +inline bool getStringAttr( + OUString * pRet, OUString const & rAttrName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, sal_Int32 uid ) +{ + *pRet = xAttributes->getValueByUidName( uid, rAttrName ); + return (!pRet->isEmpty()); +} + +inline bool getLongAttr( + sal_Int32 * pRet, OUString const & rAttrName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + sal_Int32 uid ) +{ + OUString aValue( + xAttributes->getValueByUidName( uid, rAttrName ) ); + if (!aValue.isEmpty()) + { + *pRet = toInt32( aValue ); + return true; + } + return false; +} + +// Library import + +struct LibraryImport + : public ::cppu::WeakImplHelper< css::xml::input::XRoot > +{ + friend class LibrariesElement; + friend class LibraryElement; + + LibDescriptorArray* mpLibArray; + LibDescriptor* const mpLibDesc; // Single library mode + + sal_Int32 XMLNS_LIBRARY_UID; + sal_Int32 XMLNS_XLINK_UID; + +public: + explicit LibraryImport( LibDescriptorArray* pLibArray ) + : mpLibArray(pLibArray) + , mpLibDesc(nullptr) + , XMLNS_LIBRARY_UID(0) + , XMLNS_XLINK_UID(0) + { + } + + // Single library mode + explicit LibraryImport(LibDescriptor* pLibDesc) + : mpLibArray(nullptr) + , mpLibDesc(pLibDesc) + , XMLNS_LIBRARY_UID(0) + , XMLNS_XLINK_UID(0) + { + } + + virtual ~LibraryImport() override; + + // XRoot + virtual void SAL_CALL startDocument( + css::uno::Reference< css::xml::input::XNamespaceMapping > const & xNamespaceMapping ) override; + virtual void SAL_CALL endDocument() override; + virtual void SAL_CALL processingInstruction( + OUString const & rTarget, OUString const & rData ) override; + virtual void SAL_CALL setDocumentLocator( + css::uno::Reference< css::xml::sax::XLocator > const & xLocator ) override; + virtual css::uno::Reference< css::xml::input::XElement > SAL_CALL startRootElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes ) override; +}; + +class LibElementBase + : public ::cppu::WeakImplHelper< css::xml::input::XElement > +{ +protected: + rtl::Reference<LibraryImport> mxImport; + rtl::Reference<LibElementBase> mxParent; +private: + OUString const _aLocalName; + css::uno::Reference< css::xml::input::XAttributes > _xAttributes; + +public: + LibElementBase( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + LibElementBase * pParent, LibraryImport * pImport ); + virtual ~LibElementBase() override; + + // XElement + virtual css::uno::Reference< css::xml::input::XElement > SAL_CALL getParent() override; + virtual OUString SAL_CALL getLocalName() override; + virtual sal_Int32 SAL_CALL getUid() override; + virtual css::uno::Reference< css::xml::input::XAttributes > SAL_CALL getAttributes() override; + virtual void SAL_CALL ignorableWhitespace( + OUString const & rWhitespaces ) override; + virtual void SAL_CALL characters( OUString const & rChars ) override; + virtual void SAL_CALL processingInstruction( + OUString const & rTarget, OUString const & rData ) override; + virtual void SAL_CALL endElement() override; + virtual css::uno::Reference< css::xml::input::XElement > SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes ) override; +}; + +class LibrariesElement : public LibElementBase +{ + friend class LibraryElement; + + std::vector< LibDescriptor > mLibDescriptors; + +public: + virtual css::uno::Reference< css::xml::input::XElement > SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + LibrariesElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + LibraryImport * pImport ) + : LibElementBase( rLocalName, xAttributes, nullptr, pImport ) + {} +}; + +class LibraryElement : public LibElementBase +{ + std::vector< OUString > mElements; + +public: + + virtual css::uno::Reference< css::xml::input::XElement > SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes ) override; + virtual void SAL_CALL endElement() override; + + LibraryElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + LibElementBase * pParent, LibraryImport * pImport ) + : LibElementBase( rLocalName, xAttributes, pParent, pImport ) + {} +}; + +} + + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmllib_imexp/xmllib_export.cxx b/xmlscript/source/xmllib_imexp/xmllib_export.cxx new file mode 100644 index 000000000..00f8045a0 --- /dev/null +++ b/xmlscript/source/xmllib_imexp/xmllib_export.cxx @@ -0,0 +1,135 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include <rtl/ref.hxx> +#include <xmlscript/xmllib_imexp.hxx> +#include <xmlscript/xml_helper.hxx> +#include <xmlscript/xmlns.h> +#include <com/sun/star/xml/sax/XWriter.hpp> + +using namespace com::sun::star::uno; +using namespace com::sun::star; + +namespace xmlscript +{ + +constexpr OUStringLiteral aTrueStr = u"true"; +constexpr OUStringLiteral aFalseStr = u"false"; + +void +exportLibraryContainer( + Reference< xml::sax::XWriter > const & xOut, + const LibDescriptorArray* pLibArray ) +{ + xOut->startDocument(); + + xOut->unknown( + "<!DOCTYPE library:libraries PUBLIC \"-//OpenOffice.org//DTD OfficeDocument 1.0//EN\"" + " \"libraries.dtd\">" ); + xOut->ignorableWhitespace( OUString() ); + + OUString aLibrariesName( XMLNS_LIBRARY_PREFIX ":libraries" ); + rtl::Reference<XMLElement> pLibsElement = new XMLElement( aLibrariesName ); + + pLibsElement->addAttribute( "xmlns:" XMLNS_LIBRARY_PREFIX, XMLNS_LIBRARY_URI ); + pLibsElement->addAttribute( "xmlns:" XMLNS_XLINK_PREFIX, XMLNS_XLINK_URI ); + + xOut->ignorableWhitespace( OUString() ); + xOut->startElement( aLibrariesName, pLibsElement ); + + OUString sTrueStr(aTrueStr); + OUString sFalseStr(aFalseStr); + + int nLibCount = pLibArray->mnLibCount; + for( sal_Int32 i = 0 ; i < nLibCount ; i++ ) + { + LibDescriptor& rLib = pLibArray->mpLibs[i]; + + rtl::Reference<XMLElement> pLibElement(new XMLElement( XMLNS_LIBRARY_PREFIX ":library" )); + + pLibElement->addAttribute( XMLNS_LIBRARY_PREFIX ":name", rLib.aName ); + + if( !rLib.aStorageURL.isEmpty() ) + { + pLibElement->addAttribute( XMLNS_XLINK_PREFIX ":href", rLib.aStorageURL ); + pLibElement->addAttribute( XMLNS_XLINK_PREFIX ":type", "simple" ); + } + + pLibElement->addAttribute( XMLNS_LIBRARY_PREFIX ":link", rLib.bLink ? sTrueStr : sFalseStr ); + + if( rLib.bLink ) + { + pLibElement->addAttribute( XMLNS_LIBRARY_PREFIX ":readonly", rLib.bReadOnly ? sTrueStr : sFalseStr ); + } + + pLibElement->dump( xOut ); + } + + xOut->ignorableWhitespace( OUString() ); + xOut->endElement( aLibrariesName ); + + xOut->endDocument(); +} + +void +exportLibrary( + css::uno::Reference< css::xml::sax::XWriter > const & xOut, + const LibDescriptor& rLib ) +{ + xOut->startDocument(); + + xOut->unknown( + "<!DOCTYPE library:library PUBLIC \"-//OpenOffice.org//DTD OfficeDocument 1.0//EN\"" + " \"library.dtd\">" ); + xOut->ignorableWhitespace( OUString() ); + + rtl::Reference<XMLElement> pLibElement = new XMLElement( XMLNS_LIBRARY_PREFIX ":library" ); + + pLibElement->addAttribute( "xmlns:" XMLNS_LIBRARY_PREFIX, XMLNS_LIBRARY_URI ); + + pLibElement->addAttribute( XMLNS_LIBRARY_PREFIX ":name", rLib.aName ); + + OUString sTrueStr(aTrueStr); + OUString sFalseStr(aFalseStr); + + pLibElement->addAttribute( XMLNS_LIBRARY_PREFIX ":readonly", rLib.bReadOnly ? sTrueStr : sFalseStr ); + + pLibElement->addAttribute( XMLNS_LIBRARY_PREFIX ":passwordprotected", rLib.bPasswordProtected ? sTrueStr : sFalseStr ); + + if( rLib.bPreload ) + pLibElement->addAttribute( XMLNS_LIBRARY_PREFIX ":preload", sTrueStr ); + + for( const auto& rElementName : rLib.aElementNames ) + { + rtl::Reference<XMLElement> pElement(new XMLElement( XMLNS_LIBRARY_PREFIX ":element" )); + + pElement->addAttribute( XMLNS_LIBRARY_PREFIX ":name", + rElementName ); + + pLibElement->addSubElement( pElement ); + } + + pLibElement->dump( xOut ); + + xOut->endDocument(); +} + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmllib_imexp/xmllib_import.cxx b/xmlscript/source/xmllib_imexp/xmllib_import.cxx new file mode 100644 index 000000000..02c46a65f --- /dev/null +++ b/xmlscript/source/xmllib_imexp/xmllib_import.cxx @@ -0,0 +1,257 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include <sal/config.h> + +#include <sal/log.hxx> + +#include "imp_share.hxx" +#include <xml_import.hxx> +#include <xmlscript/xmlns.h> + +using namespace css; +using namespace css::uno; + +namespace xmlscript +{ + +Reference< xml::input::XElement > LibElementBase::getParent() +{ + return mxParent; +} + +OUString LibElementBase::getLocalName() +{ + return _aLocalName; +} + +sal_Int32 LibElementBase::getUid() +{ + return mxImport->XMLNS_LIBRARY_UID; +} + +Reference< xml::input::XAttributes > LibElementBase::getAttributes() +{ + return _xAttributes; +} + +void LibElementBase::ignorableWhitespace( + OUString const & /*rWhitespaces*/ ) +{ +} + +void LibElementBase::characters( OUString const & /*rChars*/ ) +{ + // not used, all characters ignored +} + +void LibElementBase::processingInstruction( + OUString const & /*rTarget*/, OUString const & /*rData*/ ) +{ +} + +void LibElementBase::endElement() +{ +} +Reference< xml::input::XElement > LibElementBase::startChildElement( + sal_Int32 /*nUid*/, OUString const & /*rLocalName*/, + Reference< xml::input::XAttributes > const & /*xAttributes*/ ) +{ + throw xml::sax::SAXException("unexpected element!", Reference< XInterface >(), Any() ); +} + +LibElementBase::LibElementBase( + OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes, + LibElementBase * pParent, LibraryImport * pImport ) + : mxImport( pImport ) + , mxParent( pParent ) + , _aLocalName( rLocalName ) + , _xAttributes( xAttributes ) +{ +} + +LibElementBase::~LibElementBase() +{ + SAL_INFO("xmlscript.xmllib", "LibElementBase::~LibElementBase(): " << _aLocalName ); +} + +// XRoot + +void LibraryImport::startDocument( + Reference< xml::input::XNamespaceMapping > const & xNamespaceMapping ) +{ + XMLNS_LIBRARY_UID = xNamespaceMapping->getUidByUri( XMLNS_LIBRARY_URI ); + XMLNS_XLINK_UID = xNamespaceMapping->getUidByUri( XMLNS_XLINK_URI ); +} + +void LibraryImport::endDocument() +{ +} + +void LibraryImport::processingInstruction( + OUString const & /*rTarget*/, OUString const & /*rData*/ ) +{ +} + +void LibraryImport::setDocumentLocator( + Reference< xml::sax::XLocator > const & /*xLocator*/ ) +{ +} + +Reference< xml::input::XElement > LibraryImport::startRootElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if (XMLNS_LIBRARY_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + else if ( mpLibArray && rLocalName == "libraries" ) + { + return new LibrariesElement( rLocalName, xAttributes, this ); + } + else if ( mpLibDesc && rLocalName == "library" ) + { + LibDescriptor& aDesc = *mpLibDesc; + aDesc.bLink = aDesc.bReadOnly = aDesc.bPasswordProtected = aDesc.bPreload = false; + + aDesc.aName = xAttributes->getValueByUidName(XMLNS_LIBRARY_UID, "name" ); + getBoolAttr( &aDesc.bReadOnly, "readonly", xAttributes, XMLNS_LIBRARY_UID ); + getBoolAttr( &aDesc.bPasswordProtected, "passwordprotected", xAttributes, XMLNS_LIBRARY_UID ); + getBoolAttr( &aDesc.bPreload, "preload", xAttributes, XMLNS_LIBRARY_UID ); + + return new LibraryElement( rLocalName, xAttributes, nullptr, this ); + } + else + { + throw xml::sax::SAXException( "illegal root element (expected libraries) given: " + rLocalName, Reference< XInterface >(), Any() ); + } +} + +LibraryImport::~LibraryImport() +{ + SAL_INFO("xmlscript.xmllib", "LibraryImport::~LibraryImport()." ); +} + +// libraries +Reference< xml::input::XElement > LibrariesElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if (mxImport->XMLNS_LIBRARY_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // library + else if ( rLocalName == "library" ) + { + LibDescriptor aDesc; + aDesc.bLink = aDesc.bReadOnly = aDesc.bPasswordProtected = aDesc.bPreload = false; + + aDesc.aName = xAttributes->getValueByUidName(mxImport->XMLNS_LIBRARY_UID, "name" ); + aDesc.aStorageURL = xAttributes->getValueByUidName( mxImport->XMLNS_XLINK_UID, "href" ); + getBoolAttr(&aDesc.bLink, "link", xAttributes, mxImport->XMLNS_LIBRARY_UID ); + getBoolAttr(&aDesc.bReadOnly, "readonly", xAttributes, mxImport->XMLNS_LIBRARY_UID ); + getBoolAttr(&aDesc.bPasswordProtected, "passwordprotected", xAttributes, mxImport->XMLNS_LIBRARY_UID ); + + mLibDescriptors.push_back( aDesc ); + return new LibraryElement( rLocalName, xAttributes, this, mxImport.get() ); + } + else + { + throw xml::sax::SAXException( "expected styles of bulletinboard element!", Reference< XInterface >(), Any() ); + } +} + +void LibrariesElement::endElement() +{ + sal_Int32 nLibCount = mxImport->mpLibArray->mnLibCount = static_cast<sal_Int32>(mLibDescriptors.size()); + mxImport->mpLibArray->mpLibs.reset( new LibDescriptor[ nLibCount ] ); + + for( sal_Int32 i = 0 ; i < nLibCount ; i++ ) + { + const LibDescriptor& rLib = mLibDescriptors[i]; + mxImport->mpLibArray->mpLibs[i] = rLib; + } +} + +// library +Reference< xml::input::XElement > LibraryElement::startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if (mxImport->XMLNS_LIBRARY_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // library + else if ( rLocalName == "element" ) + { + OUString aValue( xAttributes->getValueByUidName(mxImport->XMLNS_LIBRARY_UID, "name" ) ); + if (!aValue.isEmpty()) + mElements.push_back( aValue ); + + return new LibElementBase( rLocalName, xAttributes, this, mxImport.get() ); + } + else + { + throw xml::sax::SAXException( "expected styles or bulletinboard element!", Reference< XInterface >(), Any() ); + } +} + +void LibraryElement::endElement() +{ + sal_Int32 nElementCount = mElements.size(); + Sequence< OUString > aElementNames( nElementCount ); + OUString* pElementNames = aElementNames.getArray(); + for( sal_Int32 i = 0 ; i < nElementCount ; i++ ) + pElementNames[i] = mElements[i]; + + LibDescriptor* pLib = mxImport->mpLibDesc; + if( !pLib ) + pLib = &static_cast< LibrariesElement* >( mxParent.get() )->mLibDescriptors.back(); + pLib->aElementNames = aElementNames; +} + +Reference< css::xml::sax::XDocumentHandler > +importLibraryContainer( LibDescriptorArray* pLibArray ) +{ + return ::xmlscript::createDocumentHandler(new LibraryImport(pLibArray)); +} + +css::uno::Reference< css::xml::sax::XDocumentHandler > +importLibrary( LibDescriptor& rLib ) +{ + return ::xmlscript::createDocumentHandler(new LibraryImport(&rLib)); +} + +LibDescriptorArray::LibDescriptorArray( sal_Int32 nLibCount ) +{ + mnLibCount = nLibCount; + mpLibs.reset( new LibDescriptor[ mnLibCount ] ); +} + +LibDescriptorArray::~LibDescriptorArray() +{ +} + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmlmod_imexp/imp_share.hxx b/xmlscript/source/xmlmod_imexp/imp_share.hxx new file mode 100644 index 000000000..f914c973b --- /dev/null +++ b/xmlscript/source/xmlmod_imexp/imp_share.hxx @@ -0,0 +1,101 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#pragma once + +#include <xmlscript/xmlmod_imexp.hxx> + +#include <cppuhelper/implbase.hxx> +#include <rtl/ustrbuf.hxx> +#include <rtl/ref.hxx> + +#include <com/sun/star/xml/input/XRoot.hpp> + +namespace xmlscript +{ + +// Script module import + +struct ModuleImport + : public ::cppu::WeakImplHelper< css::xml::input::XRoot > +{ + friend class ModuleElement; + + ModuleDescriptor& mrModuleDesc; + + sal_Int32 XMLNS_SCRIPT_UID; + +public: + explicit ModuleImport(ModuleDescriptor& rModuleDesc) + : mrModuleDesc(rModuleDesc) + , XMLNS_SCRIPT_UID(0) + { + } + + virtual ~ModuleImport() override; + + // XRoot + virtual void SAL_CALL startDocument( + css::uno::Reference< css::xml::input::XNamespaceMapping > const & xNamespaceMapping ) override; + virtual void SAL_CALL endDocument() override; + virtual void SAL_CALL processingInstruction( + OUString const & rTarget, OUString const & rData ) override; + virtual void SAL_CALL setDocumentLocator( + css::uno::Reference< css::xml::sax::XLocator > const & xLocator ) override; + virtual css::uno::Reference< css::xml::input::XElement > SAL_CALL startRootElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes ) override; +}; + +class ModuleElement + : public ::cppu::WeakImplHelper< css::xml::input::XElement > +{ + rtl::Reference<ModuleImport> mxImport; + + OUString const _aLocalName; + css::uno::Reference< css::xml::input::XAttributes > _xAttributes; + OUStringBuffer _strBuffer{512}; + +public: + ModuleElement( + OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes, + ModuleImport * pImport ); + virtual ~ModuleElement() override; + + // XElement + virtual css::uno::Reference< css::xml::input::XElement > SAL_CALL getParent() override; + virtual OUString SAL_CALL getLocalName() override; + virtual sal_Int32 SAL_CALL getUid() override; + virtual css::uno::Reference< css::xml::input::XAttributes > SAL_CALL getAttributes() override; + virtual void SAL_CALL ignorableWhitespace( + OUString const & rWhitespaces ) override; + virtual void SAL_CALL characters( OUString const & rChars ) override; + virtual void SAL_CALL processingInstruction( + OUString const & rTarget, OUString const & rData ) override; + virtual void SAL_CALL endElement() override; + virtual css::uno::Reference< css::xml::input::XElement > SAL_CALL startChildElement( + sal_Int32 nUid, OUString const & rLocalName, + css::uno::Reference< css::xml::input::XAttributes > const & xAttributes ) override; +}; + +} + + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmlmod_imexp/xmlmod_export.cxx b/xmlscript/source/xmlmod_imexp/xmlmod_export.cxx new file mode 100644 index 000000000..55b447561 --- /dev/null +++ b/xmlscript/source/xmlmod_imexp/xmlmod_export.cxx @@ -0,0 +1,63 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include <xmlscript/xmlmod_imexp.hxx> +#include <xmlscript/xml_helper.hxx> +#include <xmlscript/xmlns.h> +#include <com/sun/star/xml/sax/XWriter.hpp> +#include <rtl/ref.hxx> + +using namespace com::sun::star::uno; +using namespace com::sun::star; + +namespace xmlscript +{ + +void +exportScriptModule( + Reference< xml::sax::XWriter > const & xOut, + const ModuleDescriptor& rMod ) +{ + xOut->startDocument(); + + xOut->unknown( + "<!DOCTYPE script:module PUBLIC \"-//OpenOffice.org//DTD OfficeDocument 1.0//EN\"" + " \"module.dtd\">"); + xOut->ignorableWhitespace( OUString() ); + + OUString aModuleName( XMLNS_SCRIPT_PREFIX ":module" ); + rtl::Reference<XMLElement> pModElement = new XMLElement( aModuleName ); + + pModElement->addAttribute( "xmlns:" XMLNS_SCRIPT_PREFIX, XMLNS_SCRIPT_URI ); + + pModElement->addAttribute( XMLNS_SCRIPT_PREFIX ":name", rMod.aName ); + pModElement->addAttribute( XMLNS_SCRIPT_PREFIX ":language", rMod.aLanguage ); + if( !rMod.aModuleType.isEmpty() ) + pModElement->addAttribute( XMLNS_SCRIPT_PREFIX ":moduleType", rMod.aModuleType ); + + xOut->ignorableWhitespace( OUString() ); + xOut->startElement( aModuleName, pModElement ); + xOut->characters( rMod.aCode ); + xOut->endElement( aModuleName ); + xOut->endDocument(); +} + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/source/xmlmod_imexp/xmlmod_import.cxx b/xmlscript/source/xmlmod_imexp/xmlmod_import.cxx new file mode 100644 index 000000000..2751d9856 --- /dev/null +++ b/xmlscript/source/xmlmod_imexp/xmlmod_import.cxx @@ -0,0 +1,154 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + */ + +#include <sal/config.h> + +#include <xmlscript/xmlns.h> +#include <com/sun/star/xml/sax/SAXException.hpp> +#include <sal/log.hxx> + +#include "imp_share.hxx" +#include <xml_import.hxx> + +using namespace css; +using namespace css::uno; + +namespace xmlscript +{ + +Reference< xml::input::XElement > ModuleElement::getParent() +{ + return nullptr; +} +OUString ModuleElement::getLocalName() +{ + return _aLocalName; +} +sal_Int32 ModuleElement::getUid() +{ + return mxImport->XMLNS_SCRIPT_UID; +} +Reference< xml::input::XAttributes > ModuleElement::getAttributes() +{ + return _xAttributes; +} + +void ModuleElement::ignorableWhitespace( + OUString const & /*rWhitespaces*/ ) +{ + // not used +} + +void ModuleElement::characters( OUString const & rChars ) +{ + _strBuffer.append( rChars ); +} + +void ModuleElement::processingInstruction( + OUString const & /*rTarget*/, OUString const & /*rData*/ ) +{ +} + +void ModuleElement::endElement() +{ + mxImport->mrModuleDesc.aCode = _strBuffer.makeStringAndClear(); +} + +Reference< xml::input::XElement > ModuleElement::startChildElement( + sal_Int32 /*nUid*/, OUString const & /*rLocalName*/, + Reference< xml::input::XAttributes > const & /*xAttributes*/ ) +{ + throw xml::sax::SAXException("unexpected element!", Reference< XInterface >(), Any() ); +} + +ModuleElement::ModuleElement( + OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes, + ModuleImport * pImport ) + : mxImport( pImport ) + , _aLocalName( rLocalName ) + , _xAttributes( xAttributes ) +{ +} + +ModuleElement::~ModuleElement() +{ + SAL_INFO("xmlscript.xmlmod", "ModuleElement::~ModuleElement(): " << _aLocalName ); +} + +// XRoot + +void ModuleImport::startDocument( + Reference< xml::input::XNamespaceMapping > const & xNamespaceMapping ) +{ + XMLNS_SCRIPT_UID = xNamespaceMapping->getUidByUri( XMLNS_SCRIPT_URI ); +} + +void ModuleImport::endDocument() +{ + // ignored +} + +void ModuleImport::processingInstruction( + OUString const & /*rTarget*/, OUString const & /*rData*/ ) +{ +} + +void ModuleImport::setDocumentLocator( + Reference< xml::sax::XLocator > const & /*xLocator*/ ) +{ +} + +Reference< xml::input::XElement > ModuleImport::startRootElement( + sal_Int32 nUid, OUString const & rLocalName, + Reference< xml::input::XAttributes > const & xAttributes ) +{ + if (XMLNS_SCRIPT_UID != nUid) + { + throw xml::sax::SAXException( "illegal namespace!", Reference< XInterface >(), Any() ); + } + // window + else if ( rLocalName == "module" ) + { + mrModuleDesc.aName = xAttributes->getValueByUidName( XMLNS_SCRIPT_UID, "name" ); + mrModuleDesc.aLanguage = xAttributes->getValueByUidName( XMLNS_SCRIPT_UID, "language" ); + mrModuleDesc.aModuleType = xAttributes->getValueByUidName( XMLNS_SCRIPT_UID, "moduleType" ); + + return new ModuleElement( rLocalName, xAttributes, this ); + } + else + { + throw xml::sax::SAXException("illegal root element (expected module) given: " + rLocalName, Reference< XInterface >(), Any() ); + } +} + +ModuleImport::~ModuleImport() +{ + SAL_INFO("xmlscript.xmlmod", "ModuleImport::~ModuleImport()." ); +} + +Reference< xml::sax::XDocumentHandler > +importScriptModule( ModuleDescriptor& rMod ) +{ + return ::xmlscript::createDocumentHandler(new ModuleImport(rMod)); +} + +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/xmlscript/util/xmlscript.component b/xmlscript/util/xmlscript.component new file mode 100644 index 000000000..305e91710 --- /dev/null +++ b/xmlscript/util/xmlscript.component @@ -0,0 +1,34 @@ +<?xml version="1.0" encoding="UTF-8"?> +<!-- + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (the "License"); you may not use this file + * except in compliance with the License. You may obtain a copy of + * the License at http://www.apache.org/licenses/LICENSE-2.0 . + --> + +<component loader="com.sun.star.loader.SharedLibrary" environment="@CPPU_ENV@" + xmlns="http://openoffice.org/2010/uno-components"> + <implementation name="com.sun.star.comp.xml.input.SaxDocumentHandler" + constructor="com_sun_star_comp_xml_input_SaxDocumentHandler_get_implementation"> + <service name="com.sun.star.xml.input.SaxDocumentHandler"/> + </implementation> + <implementation name="com.sun.star.comp.xmlscript.XMLBasicExporter" + constructor="com_sun_star_comp_xmlscript_XMLBasicExporter"> + <service name="com.sun.star.document.XMLBasicExporter"/> + </implementation> + <implementation name="com.sun.star.comp.xmlscript.XMLOasisBasicExporter" + constructor="com_sun_star_comp_xmlscript_XMLOasisBasicExporter"> + <service name="com.sun.star.document.XMLOasisBasicExporter"/> + </implementation> +</component> |
