e65c0fe553
Conflicts: avmedia/inc/avmedia/mediaitem.hxx avmedia/prj/build.lst avmedia/source/framework/mediaitem.cxx avmedia/source/gstreamer/gstcommon.hxx avmedia/source/gstreamer/gstframegrabber.cxx avmedia/source/gstreamer/gstframegrabber.hxx avmedia/source/gstreamer/gstmanager.cxx avmedia/source/gstreamer/gstmanager.hxx avmedia/source/gstreamer/gstplayer.cxx avmedia/source/gstreamer/gstplayer.hxx avmedia/source/gstreamer/gstuno.cxx avmedia/source/gstreamer/gstwindow.cxx avmedia/source/gstreamer/gstwindow.hxx avmedia/source/gstreamer/makefile.mk avmedia/source/quicktime/quicktimeuno.cxx avmedia/source/viewer/mediawindow.cxx avmedia/source/viewer/mediawindow_impl.cxx avmedia/source/viewer/mediawindow_impl.hxx avmedia/source/viewer/mediawindowbase_impl.cxx avmedia/source/win/winuno.cxx basic/inc/basic/basmgr.hxx basic/inc/basic/mybasic.hxx basic/inc/basic/process.hxx basic/inc/basic/sbmeth.hxx basic/inc/basic/sbmod.hxx basic/inc/basic/sbxdef.hxx basic/inc/basic/sbxvar.hxx basic/source/app/app.cxx basic/source/app/app.hxx basic/source/app/appbased.cxx basic/source/app/appedit.cxx basic/source/app/appwin.cxx basic/source/app/appwin.hxx basic/source/app/brkpnts.cxx basic/source/app/brkpnts.hxx basic/source/app/dialogs.cxx basic/source/app/dialogs.hxx basic/source/app/msgedit.cxx basic/source/app/mybasic.cxx basic/source/app/process.cxx basic/source/app/processw.hxx basic/source/app/textedit.cxx basic/source/basmgr/basicmanagerrepository.cxx basic/source/basmgr/basmgr.cxx basic/source/classes/disas.cxx basic/source/classes/eventatt.cxx basic/source/classes/image.cxx basic/source/classes/sb.cxx basic/source/classes/sbunoobj.cxx basic/source/classes/sbxmod.cxx basic/source/comp/codegen.cxx basic/source/comp/dim.cxx basic/source/comp/exprgen.cxx basic/source/comp/exprnode.cxx basic/source/comp/exprtree.cxx basic/source/comp/sbcomp.cxx basic/source/inc/expr.hxx basic/source/inc/object.hxx basic/source/inc/sbunoobj.hxx basic/source/runtime/dllmgr-x86.cxx basic/source/runtime/iosys.cxx basic/source/runtime/makefile.mk basic/source/runtime/methods.cxx basic/source/runtime/methods1.cxx basic/source/runtime/runtime.cxx basic/source/runtime/stdobj.cxx basic/source/runtime/step0.cxx basic/source/runtime/step1.cxx basic/source/runtime/step2.cxx basic/source/sbx/sbxarray.cxx basic/source/sbx/sbxbase.cxx basic/source/sbx/sbxbool.cxx basic/source/sbx/sbxbyte.cxx basic/source/sbx/sbxcoll.cxx basic/source/sbx/sbxconv.hxx basic/source/sbx/sbxcurr.cxx basic/source/sbx/sbxexec.cxx basic/source/sbx/sbxint.cxx basic/source/sbx/sbxobj.cxx basic/source/sbx/sbxscan.cxx basic/source/sbx/sbxstr.cxx basic/source/sbx/sbxvals.cxx basic/source/sbx/sbxvalue.cxx basic/source/sbx/sbxvar.cxx basic/workben/mgrtest.cxx configmgr/prj/build.lst configmgr/source/access.cxx configmgr/source/configurationprovider.cxx configmgr/source/defaultprovider.cxx configmgr/source/pad.cxx configmgr/source/services.cxx configmgr/source/update.cxx configmgr/source/xmlreader.cxx configmgr/source/xmlreader.hxx connectivity/prj/build.lst connectivity/qa/complex/connectivity/TestCase.java connectivity/source/cpool/Zregistration.cxx connectivity/source/drivers/adabas/Bservices.cxx connectivity/source/drivers/ado/Aservices.cxx connectivity/source/drivers/calc/Cservices.cxx connectivity/source/drivers/calc/makefile.mk connectivity/source/drivers/dbase/DIndex.cxx connectivity/source/drivers/dbase/DIndexIter.cxx connectivity/source/drivers/dbase/DNoException.cxx connectivity/source/drivers/dbase/DTable.cxx connectivity/source/drivers/dbase/Dservices.cxx connectivity/source/drivers/dbase/dindexnode.cxx connectivity/source/drivers/evoab/LNoException.cxx connectivity/source/drivers/evoab/LServices.cxx connectivity/source/drivers/evoab2/NServices.cxx connectivity/source/drivers/file/FNoException.cxx connectivity/source/drivers/file/FPreparedStatement.cxx connectivity/source/drivers/file/FResultSet.cxx connectivity/source/drivers/file/FStatement.cxx connectivity/source/drivers/file/quotedstring.cxx connectivity/source/drivers/flat/ETable.cxx connectivity/source/drivers/flat/Eservices.cxx connectivity/source/drivers/hsqldb/Hservices.cxx connectivity/source/drivers/jdbc/jservices.cxx connectivity/source/drivers/kab/KServices.cxx connectivity/source/drivers/macab/MacabServices.cxx connectivity/source/drivers/mozab/MResultSet.cxx connectivity/source/drivers/mozab/bootstrap/MNSFolders.cxx connectivity/source/drivers/mozab/bootstrap/MNSProfileDiscover.cxx connectivity/source/drivers/mysql/Yservices.cxx connectivity/source/drivers/odbc/OFunctions.cxx connectivity/source/drivers/odbc/oservices.cxx connectivity/source/inc/dbase/DIndexPage.hxx connectivity/source/inc/file/FTable.hxx connectivity/source/manager/mregistration.cxx connectivity/source/parse/PColumn.cxx desktop/prj/build.lst desktop/qa/deployment_misc/test_dp_version.cxx desktop/source/app/app.cxx desktop/source/app/appfirststart.cxx desktop/source/app/cmdlineargs.cxx desktop/source/app/cmdlineargs.hxx desktop/source/app/sofficemain.cxx desktop/source/deployment/gui/dp_gui.hrc desktop/source/deployment/gui/dp_gui_dialog2.cxx desktop/source/deployment/gui/dp_gui_dialog2.hxx desktop/source/deployment/gui/dp_gui_updatedialog.cxx desktop/source/deployment/gui/dp_gui_updatedialog.hxx desktop/source/deployment/manager/dp_extensionmanager.cxx desktop/source/deployment/manager/dp_extensionmanager.hxx desktop/source/deployment/misc/dp_misc.src desktop/source/deployment/registry/component/dp_component.cxx desktop/source/deployment/registry/configuration/dp_configuration.cxx desktop/source/deployment/registry/dp_backend.cxx desktop/source/deployment/registry/help/dp_help.cxx desktop/source/deployment/registry/script/dp_script.cxx desktop/source/migration/pages.cxx desktop/source/migration/pages.hxx desktop/source/migration/wizard.cxx desktop/source/migration/wizard.hrc desktop/source/migration/wizard.hxx desktop/source/migration/wizard.src desktop/source/pkgchk/unopkg/unopkg_shared.h desktop/source/so_comp/services.cxx desktop/source/splash/makefile.mk desktop/source/splash/services_spl.cxx desktop/source/splash/splash.cxx drawinglayer/source/processor2d/vclmetafileprocessor2d.cxx editeng/inc/editeng/adjitem.hxx editeng/inc/editeng/bolnitem.hxx editeng/inc/editeng/borderline.hxx editeng/inc/editeng/boxitem.hxx editeng/inc/editeng/brkitem.hxx editeng/inc/editeng/brshitem.hxx editeng/inc/editeng/bulitem.hxx editeng/inc/editeng/charreliefitem.hxx editeng/inc/editeng/charrotateitem.hxx editeng/inc/editeng/charscaleitem.hxx editeng/inc/editeng/cmapitem.hxx editeng/inc/editeng/colritem.hxx editeng/inc/editeng/crsditem.hxx editeng/inc/editeng/editdata.hxx editeng/inc/editeng/editeng.hxx editeng/inc/editeng/editobj.hxx editeng/inc/editeng/editstat.hxx editeng/inc/editeng/editview.hxx editeng/inc/editeng/emphitem.hxx editeng/inc/editeng/escpitem.hxx editeng/inc/editeng/fhgtitem.hxx editeng/inc/editeng/flstitem.hxx editeng/inc/editeng/fontitem.hxx editeng/inc/editeng/frmdiritem.hxx editeng/inc/editeng/fwdtitem.hxx editeng/inc/editeng/hyznitem.hxx editeng/inc/editeng/kernitem.hxx editeng/inc/editeng/langitem.hxx editeng/inc/editeng/lrspitem.hxx editeng/inc/editeng/lspcitem.hxx editeng/inc/editeng/numitem.hxx editeng/inc/editeng/outliner.hxx editeng/inc/editeng/paravertalignitem.hxx editeng/inc/editeng/pmdlitem.hxx editeng/inc/editeng/postitem.hxx editeng/inc/editeng/protitem.hxx editeng/inc/editeng/shaditem.hxx editeng/inc/editeng/sizeitem.hxx editeng/inc/editeng/svxacorr.hxx editeng/inc/editeng/svxfont.hxx editeng/inc/editeng/svxrtf.hxx editeng/inc/editeng/swafopt.hxx editeng/inc/editeng/tstpitem.hxx editeng/inc/editeng/twolinesitem.hxx editeng/inc/editeng/txtrange.hxx editeng/inc/editeng/udlnitem.hxx editeng/inc/editeng/ulspitem.hxx editeng/inc/editeng/wghtitem.hxx editeng/inc/editeng/writingmodeitem.hxx editeng/inc/editeng/xmlcnitm.hxx editeng/inc/helpid.hrc editeng/inc/pch/precompiled_editeng.hxx editeng/source/editeng/editdbg.cxx editeng/source/editeng/editdoc.cxx editeng/source/editeng/editdoc.hxx editeng/source/editeng/editdoc2.cxx editeng/source/editeng/editeng.cxx editeng/source/editeng/editobj.cxx editeng/source/editeng/editobj2.hxx editeng/source/editeng/editsel.cxx editeng/source/editeng/editundo.cxx editeng/source/editeng/editundo.hxx editeng/source/editeng/editview.cxx editeng/source/editeng/edtspell.hxx editeng/source/editeng/eehtml.cxx editeng/source/editeng/eehtml.hxx editeng/source/editeng/eeobj.cxx editeng/source/editeng/eerdll.cxx editeng/source/editeng/eertfpar.cxx editeng/source/editeng/impedit.cxx editeng/source/editeng/impedit.hxx editeng/source/editeng/impedit2.cxx editeng/source/editeng/impedit3.cxx editeng/source/editeng/impedit4.cxx editeng/source/editeng/impedit5.cxx editeng/source/editeng/makefile.mk editeng/source/items/bulitem.cxx editeng/source/items/charhiddenitem.cxx editeng/source/items/flditem.cxx editeng/source/items/frmitems.cxx editeng/source/items/makefile.mk editeng/source/items/numitem.cxx editeng/source/items/paraitem.cxx editeng/source/items/svxfont.cxx editeng/source/items/textitem.cxx editeng/source/items/writingmodeitem.cxx editeng/source/items/xmlcnitm.cxx editeng/source/misc/SvXMLAutoCorrectImport.cxx editeng/source/misc/svxacorr.cxx editeng/source/misc/txtrange.cxx editeng/source/misc/unolingu.cxx editeng/source/outliner/outleeng.cxx editeng/source/outliner/outliner.cxx editeng/source/outliner/outlundo.hxx editeng/source/outliner/outlvw.cxx editeng/source/outliner/paralist.cxx editeng/source/outliner/paralist.hxx editeng/source/rtf/rtfgrf.cxx editeng/source/rtf/rtfitem.cxx editeng/source/rtf/svxrtf.cxx editeng/source/uno/unoipset.cxx editeng/util/makefile.mk embeddedobj/prj/build.lst embeddedobj/source/commonembedding/miscobj.cxx eventattacher/prj/build.lst fileaccess/source/FileAccess.cxx formula/inc/formula/FormulaCompiler.hxx formula/inc/formula/token.hxx formula/inc/formula/tokenarray.hxx formula/source/core/api/FormulaCompiler.cxx formula/source/core/api/token.cxx formula/source/ui/dlg/FormulaHelper.cxx formula/source/ui/dlg/formula.cxx formula/source/ui/dlg/parawin.cxx formula/source/ui/dlg/structpg.cxx fpicker/prj/d.lst fpicker/source/aqua/FPentry.cxx fpicker/source/office/OfficeControlAccess.cxx fpicker/source/office/iodlg.cxx fpicker/source/office/iodlg.hxx fpicker/source/office/iodlg.src fpicker/source/office/iodlgimp.cxx fpicker/source/unx/gnome/FPentry.cxx fpicker/source/unx/gnome/SalGtkFilePicker.cxx fpicker/source/unx/gnome/SalGtkPicker.cxx fpicker/source/unx/kde4/KDE4FPEntry.cxx fpicker/source/win32/filepicker/FPentry.cxx framework/AllLangResTarget_fwe.mk framework/inc/dispatch/interaction.hxx framework/inc/framework/addonmenu.hxx framework/inc/framework/addonsoptions.hxx framework/inc/framework/bmkmenu.hxx framework/inc/framework/imageproducer.hxx framework/inc/framework/sfxhelperfunctions.hxx framework/inc/framework/statusbarconfiguration.hxx framework/inc/framework/titlehelper.hxx framework/inc/framework/toolboxconfiguration.hxx framework/inc/threadhelp/lockhelper.hxx framework/inc/xml/eventsdocumenthandler.hxx framework/inc/xml/statusbardocumenthandler.hxx framework/inc/xml/toolboxconfiguration.hxx framework/inc/xml/toolboxconfigurationdefines.hxx framework/inc/xml/toolboxdocumenthandler.hxx framework/prj/build.lst framework/qa/complex/ModuleManager/makefile.mk framework/qa/complex/accelerators/makefile.mk framework/qa/complex/framework/recovery/makefile.mk framework/qa/complex/imageManager/_XInitialization.java framework/source/classes/menumanager.cxx framework/source/dispatch/interaction.cxx framework/source/fwe/classes/bmkmenu.cxx framework/source/fwe/helper/actiontriggerhelper.cxx framework/source/fwe/helper/imageproducer.cxx framework/source/fwe/xml/menuconfiguration.cxx framework/source/fwe/xml/toolboxdocumenthandler.cxx framework/source/helper/uiconfigelementwrapperbase.cxx framework/source/helper/uielementwrapperbase.cxx framework/source/inc/pattern/window.hxx framework/source/jobs/jobdata.cxx framework/source/layoutmanager/layoutmanager.cxx framework/source/layoutmanager/panel.hxx framework/source/loadenv/loadenv.cxx framework/source/register/registerservices.cxx framework/source/services/menudocumenthandler.cxx framework/source/uiconfiguration/moduleuiconfigurationmanager.cxx framework/source/uiconfiguration/uiconfigurationmanager.cxx framework/source/uiconfiguration/uiconfigurationmanagerimpl.cxx framework/source/uielement/addonstoolbarmanager.cxx framework/source/uielement/controlmenucontroller.cxx framework/source/uielement/fontsizemenucontroller.cxx framework/source/uielement/imagebuttontoolbarcontroller.cxx framework/source/uielement/macrosmenucontroller.cxx framework/source/uielement/menubarmanager.cxx framework/source/uielement/newmenucontroller.cxx framework/source/uielement/togglebuttontoolbarcontroller.cxx framework/source/uielement/toolbarmanager.cxx framework/source/uielement/toolbarsmenucontroller.cxx framework/test/makefile.mk framework/test/threadtest/makefile.mk framework/test/typecfg/makefile.mk framework/util/guiapps/makefile.mk framework/util/makefile.mk idl/inc/bastype.hxx idl/inc/hash.hxx idl/inc/lex.hxx idl/inc/module.hxx idl/inc/object.hxx idl/inc/slot.hxx idl/inc/types.hxx idl/source/cmptools/hash.cxx idl/source/cmptools/lex.cxx idl/source/objects/basobj.cxx idl/source/objects/bastype.cxx idl/source/objects/module.cxx idl/source/objects/object.cxx idl/source/objects/slot.cxx idl/source/objects/types.cxx idl/source/prj/command.cxx idl/source/prj/database.cxx idl/source/prj/globals.cxx idl/source/prj/svidl.cxx linguistic/inc/linguistic/misc.hxx linguistic/prj/build.lst linguistic/source/convdic.cxx linguistic/source/convdiclist.cxx linguistic/source/dicimp.cxx linguistic/source/dlistimp.cxx linguistic/source/gciterator.cxx linguistic/source/iprcache.cxx linguistic/source/lngopt.cxx linguistic/source/lngprophelp.cxx linguistic/source/lngsvcmgr.cxx linguistic/source/lngsvcmgr.hxx linguistic/source/misc2.cxx linguistic/workben/sprophelp.cxx officecfg/registry/data/org/openoffice/VCL.xcu officecfg/util/makefile.mk oovbaapi/ooo/vba/XApplicationBase.idl oovbaapi/ooo/vba/XVBAAppService.idl oovbaapi/ooo/vba/XVBADocService.idl oovbaapi/ooo/vba/excel/XApplication.idl oovbaapi/ooo/vba/excel/XRange.idl oovbaapi/ooo/vba/excel/XWorkbook.idl oovbaapi/ooo/vba/excel/XWorksheet.idl oovbaapi/ooo/vba/word/XApplication.idl oovbaapi/ooo/vba/word/XGlobals.idl oovbaapi/ooo/vba/word/XTableOfContents.idl readlicense_oo/prj/build.lst scripting/prj/build.lst scripting/prj/d.lst scripting/source/basprov/basprov.cxx scripting/source/basprov/basscript.cxx scripting/source/basprov/basscript.hxx scripting/source/dlgprov/dlgprov.cxx scripting/source/inc/util/util.hxx scripting/source/protocolhandler/scripthandler.cxx scripting/source/provider/ProviderCache.cxx scripting/source/pyprov/makefile.mk scripting/source/runtimemgr/ScriptNameResolverImpl.cxx scripting/source/runtimemgr/ScriptRuntimeManager.cxx scripting/source/runtimemgr/StorageBridge.cxx scripting/source/storage/ScriptMetadataImporter.cxx scripting/source/storage/ScriptSecurityManager.cxx scripting/source/storage/ScriptStorage.cxx scripting/source/storage/ScriptStorageManager.cxx sfx2/inc/about.hxx sfx2/inc/brokenpackageint.hxx sfx2/inc/docvor.hxx sfx2/inc/pch/precompiled_sfx2.hxx sfx2/inc/sfx2/app.hxx sfx2/inc/sfx2/basmgr.hxx sfx2/inc/sfx2/bindings.hxx sfx2/inc/sfx2/childwin.hxx sfx2/inc/sfx2/ctrlitem.hxx sfx2/inc/sfx2/dinfdlg.hxx sfx2/inc/sfx2/dispatch.hxx sfx2/inc/sfx2/docfilt.hxx sfx2/inc/sfx2/evntconf.hxx sfx2/inc/sfx2/fcontnr.hxx sfx2/inc/sfx2/frame.hxx sfx2/inc/sfx2/imagemgr.hxx sfx2/inc/sfx2/imgmgr.hxx sfx2/inc/sfx2/linksrc.hxx sfx2/inc/sfx2/macrconf.hxx sfx2/inc/sfx2/macropg.hxx sfx2/inc/sfx2/mnuitem.hxx sfx2/inc/sfx2/mnumgr.hxx sfx2/inc/sfx2/module.hxx sfx2/inc/sfx2/msg.hxx sfx2/inc/sfx2/objsh.hxx sfx2/inc/sfx2/passwd.hxx sfx2/inc/sfx2/prnmon.hxx sfx2/inc/sfx2/request.hxx sfx2/inc/sfx2/sfx.hrc sfx2/inc/sfx2/sfxbasemodel.hxx sfx2/inc/sfx2/sfxhtml.hxx sfx2/inc/sfx2/sfxresid.hxx sfx2/inc/sfx2/sfxsids.hrc sfx2/inc/sfx2/sfxuno.hxx sfx2/inc/sfx2/shell.hxx sfx2/inc/sfx2/stbitem.hxx sfx2/inc/sfx2/styfitem.hxx sfx2/inc/sfx2/tabdlg.hxx sfx2/inc/sfx2/tbxctrl.hxx sfx2/inc/sfx2/tplpitem.hxx sfx2/inc/sfx2/viewfrm.hxx sfx2/inc/sfx2/viewsh.hxx sfx2/inc/sfxbasic.hxx sfx2/inc/sorgitm.hxx sfx2/prj/build.lst sfx2/qa/complex/docinfo/makefile.mk sfx2/qa/cppunit/makefile.mk sfx2/sdi/makefile.mk sfx2/source/appl/app.cxx sfx2/source/appl/app.hrc sfx2/source/appl/app.src sfx2/source/appl/appbas.cxx sfx2/source/appl/appcfg.cxx sfx2/source/appl/appchild.cxx sfx2/source/appl/appmain.cxx sfx2/source/appl/appmisc.cxx sfx2/source/appl/appopen.cxx sfx2/source/appl/appquit.cxx sfx2/source/appl/appserv.cxx sfx2/source/appl/appuno.cxx sfx2/source/appl/childwin.cxx sfx2/source/appl/fileobj.cxx sfx2/source/appl/helpinterceptor.cxx sfx2/source/appl/imagemgr.cxx sfx2/source/appl/impldde.cxx sfx2/source/appl/impldde.hxx sfx2/source/appl/linkmgr2.cxx sfx2/source/appl/lnkbase2.cxx sfx2/source/appl/makefile.mk sfx2/source/appl/module.cxx sfx2/source/appl/newhelp.cxx sfx2/source/appl/opengrf.cxx sfx2/source/appl/sfxdll.cxx sfx2/source/appl/sfxhelp.cxx sfx2/source/appl/shutdownicon.cxx sfx2/source/appl/shutdowniconunx.cxx sfx2/source/appl/workwin.cxx sfx2/source/bastyp/fltfnc.cxx sfx2/source/bastyp/frmhtml.cxx sfx2/source/bastyp/frmhtmlw.cxx sfx2/source/bastyp/helper.cxx sfx2/source/bastyp/minarray.cxx sfx2/source/bastyp/progress.cxx sfx2/source/bastyp/sfxhtml.cxx sfx2/source/config/evntconf.cxx sfx2/source/control/bindings.cxx sfx2/source/control/ctrlitem.cxx sfx2/source/control/dispatch.cxx sfx2/source/control/macrconf.cxx sfx2/source/control/macro.cxx sfx2/source/control/makefile.mk sfx2/source/control/minfitem.cxx sfx2/source/control/msg.cxx sfx2/source/control/msgpool.cxx sfx2/source/control/objface.cxx sfx2/source/control/request.cxx sfx2/source/control/shell.cxx sfx2/source/control/sorgitm.cxx sfx2/source/dialog/about.cxx sfx2/source/dialog/basedlgs.cxx sfx2/source/dialog/dinfdlg.cxx sfx2/source/dialog/dinfedt.cxx sfx2/source/dialog/dockwin.cxx sfx2/source/dialog/filedlghelper.cxx sfx2/source/dialog/mailmodel.cxx sfx2/source/dialog/mailmodelapi.cxx sfx2/source/dialog/makefile.mk sfx2/source/dialog/mgetempl.cxx sfx2/source/dialog/passwd.cxx sfx2/source/dialog/passwd.hrc sfx2/source/dialog/printopt.cxx sfx2/source/dialog/securitypage.cxx sfx2/source/dialog/splitwin.cxx sfx2/source/dialog/styfitem.cxx sfx2/source/dialog/tabdlg.cxx sfx2/source/dialog/taskpane.cxx sfx2/source/dialog/templdlg.cxx sfx2/source/dialog/tplpitem.cxx sfx2/source/dialog/versdlg.cxx sfx2/source/doc/QuerySaveDocument.cxx sfx2/source/doc/SfxDocumentMetaData.cxx sfx2/source/doc/applet.cxx sfx2/source/doc/doc.hrc sfx2/source/doc/doc.src sfx2/source/doc/docfile.cxx sfx2/source/doc/docinf.cxx sfx2/source/doc/doctempl.cxx sfx2/source/doc/doctemplates.cxx sfx2/source/doc/docvor.cxx sfx2/source/doc/guisaveas.cxx sfx2/source/doc/makefile.mk sfx2/source/doc/objcont.cxx sfx2/source/doc/objitem.cxx sfx2/source/doc/objmisc.cxx sfx2/source/doc/objserv.cxx sfx2/source/doc/printhelper.cxx sfx2/source/doc/sfxacldetect.cxx sfx2/source/doc/sfxbasemodel.cxx sfx2/source/inc/applet.hxx sfx2/source/inc/fltoptint.hxx sfx2/source/inc/sfxlocal.hrc sfx2/source/inc/virtmenu.hxx sfx2/source/inc/workwin.hxx sfx2/source/menu/mnuitem.cxx sfx2/source/menu/objmnctl.cxx sfx2/source/menu/virtmenu.cxx sfx2/source/notify/eventsupplier.cxx sfx2/source/notify/makefile.mk sfx2/source/toolbox/imgmgr.cxx sfx2/source/toolbox/tbxitem.cxx sfx2/source/view/frame.cxx sfx2/source/view/orgmgr.cxx sfx2/source/view/printer.cxx sfx2/source/view/prnmon.cxx sfx2/source/view/viewfrm.cxx sfx2/source/view/viewprn.cxx sfx2/source/view/viewsh.cxx sfx2/util/makefile.mk sfx2/workben/custompanel/makefile.mk shell/source/backends/desktopbe/desktopbackend.cxx shell/source/backends/gconfbe/gconfbackend.cxx shell/source/backends/kde4be/kde4backend.cxx shell/source/backends/kdebe/kdebackend.cxx shell/source/win32/SysShentry.cxx shell/source/win32/shlxthandler/propsheets/propsheets.cxx shell/source/win32/simplemail/smplmailentry.cxx svx/inc/float3d.hrc svx/inc/fmhelp.hrc svx/inc/globlmn_tmpl.hrc svx/inc/helpid.hrc svx/inc/pch/precompiled_svx.hxx svx/inc/sjctrl.hxx svx/inc/srchitem.hxx svx/inc/svdibrow.hxx svx/inc/svx/SmartTagItem.hxx svx/inc/svx/algitem.hxx svx/inc/svx/camera3d.hxx svx/inc/svx/chrtitem.hxx svx/inc/svx/clipfmtitem.hxx svx/inc/svx/ctredlin.hxx svx/inc/svx/dbtoolsclient.hxx svx/inc/svx/deflt3d.hxx svx/inc/svx/dialogs.hrc svx/inc/svx/drawitem.hxx svx/inc/svx/e3ditem.hxx svx/inc/svx/extrud3d.hxx svx/inc/svx/flagsdef.hxx svx/inc/svx/float3d.hxx svx/inc/svx/frmsel.hxx svx/inc/svx/gallery.hxx svx/inc/svx/gallery1.hxx svx/inc/svx/galtheme.hxx svx/inc/svx/grfcrop.hxx svx/inc/svx/hdft.hxx svx/inc/svx/hlnkitem.hxx svx/inc/svx/hyprlink.hxx svx/inc/svx/itemwin.hxx svx/inc/svx/lathe3d.hxx svx/inc/svx/linkwarn.hxx svx/inc/svx/modctrl.hxx svx/inc/svx/msdffdef.hxx svx/inc/svx/obj3d.hxx svx/inc/svx/optgenrl.hxx svx/inc/svx/optgrid.hxx svx/inc/svx/pageitem.hxx svx/inc/svx/paraprev.hxx svx/inc/svx/postattr.hxx svx/inc/svx/rotmodit.hxx svx/inc/svx/ruler.hxx svx/inc/svx/rulritem.hxx svx/inc/svx/scene3d.hxx svx/inc/svx/sdasaitm.hxx svx/inc/svx/sdasitm.hxx svx/inc/svx/sdggaitm.hxx svx/inc/svx/sdmetitm.hxx svx/inc/svx/sdtaaitm.hxx svx/inc/svx/sdtaditm.hxx svx/inc/svx/sdtaitm.hxx svx/inc/svx/sdtakitm.hxx svx/inc/svx/sdtfchim.hxx svx/inc/svx/sdtfsitm.hxx svx/inc/svx/srchdlg.hxx svx/inc/svx/svddrag.hxx svx/inc/svx/svdetc.hxx svx/inc/svx/svdglue.hxx svx/inc/svx/svdhlpln.hxx svx/inc/svx/svdlayer.hxx svx/inc/svx/svdmark.hxx svx/inc/svx/svdmodel.hxx svx/inc/svx/svdoashp.hxx svx/inc/svx/svdobj.hxx svx/inc/svx/svdocirc.hxx svx/inc/svx/svdoedge.hxx svx/inc/svx/svdogrp.hxx svx/inc/svx/svdomeas.hxx svx/inc/svx/svdoole2.hxx svx/inc/svx/svdorect.hxx svx/inc/svx/svdotable.hxx svx/inc/svx/svdotext.hxx svx/inc/svx/svdovirt.hxx svx/inc/svx/svdpage.hxx svx/inc/svx/svdsnpv.hxx svx/inc/svx/svdtrans.hxx svx/inc/svx/svdundo.hxx svx/inc/svx/svimbase.hxx svx/inc/svx/svx3ditems.hxx svx/inc/svx/svxdlg.hxx svx/inc/svx/sxcikitm.hxx svx/inc/svx/sxekitm.hxx svx/inc/svx/sxelditm.hxx svx/inc/svx/sxenditm.hxx svx/inc/svx/sxmkitm.hxx svx/inc/svx/sxmtpitm.hxx svx/inc/svx/sxmuitm.hxx svx/inc/svx/tabarea.hxx svx/inc/svx/tabline.hxx svx/inc/svx/unoprov.hxx svx/inc/svx/viewlayoutitem.hxx svx/inc/svx/xbitmap.hxx svx/inc/svx/xbtmpit.hxx svx/inc/svx/xcolit.hxx svx/inc/svx/xfillit0.hxx svx/inc/svx/xflclit.hxx svx/inc/svx/xflftrit.hxx svx/inc/svx/xflgrit.hxx svx/inc/svx/xflhtit.hxx svx/inc/svx/xftadit.hxx svx/inc/svx/xftsfit.hxx svx/inc/svx/xftshit.hxx svx/inc/svx/xlineit0.hxx svx/inc/svx/xlinjoit.hxx svx/inc/svx/xlnclit.hxx svx/inc/svx/xlndsit.hxx svx/inc/svx/xlnedcit.hxx svx/inc/svx/xlnedit.hxx svx/inc/svx/xlnedwit.hxx svx/inc/svx/xlnstcit.hxx svx/inc/svx/xlnstit.hxx svx/inc/svx/xlnstwit.hxx svx/inc/svx/xlnwtit.hxx svx/inc/svx/xtextit0.hxx svx/inc/svx/zoomitem.hxx svx/inc/svx/zoomslideritem.hxx svx/inc/xpolyimp.hxx svx/inc/zoom_def.hxx svx/prj/d.lst svx/source/accessibility/AccessibleShape.cxx svx/source/accessibility/DescriptionGenerator.cxx svx/source/customshapes/EnhancedCustomShapeEngine.cxx svx/source/customshapes/EnhancedCustomShapeFontWork.cxx svx/source/dialog/_bmpmask.cxx svx/source/dialog/_contdlg.cxx svx/source/dialog/connctrl.cxx svx/source/dialog/contwnd.cxx svx/source/dialog/ctredlin.cxx svx/source/dialog/ctredlin.hrc svx/source/dialog/ctredlin.src svx/source/dialog/dialcontrol.cxx svx/source/dialog/dlgctrl.cxx svx/source/dialog/docrecovery.cxx svx/source/dialog/fntctrl.cxx svx/source/dialog/fontwork.cxx svx/source/dialog/frmsel.cxx svx/source/dialog/graphctl.cxx svx/source/dialog/grfflt.cxx svx/source/dialog/hdft.cxx svx/source/dialog/hyperdlg.cxx svx/source/dialog/hyprdlg.hxx svx/source/dialog/hyprlink.cxx svx/source/dialog/hyprlink.hxx svx/source/dialog/hyprlink.src svx/source/dialog/imapdlg.cxx svx/source/dialog/imapwnd.cxx svx/source/dialog/linkwarn.hrc svx/source/dialog/makefile.mk svx/source/dialog/optgrid.cxx svx/source/dialog/orienthelper.cxx svx/source/dialog/pagectrl.cxx svx/source/dialog/prtqry.cxx svx/source/dialog/rlrcitem.cxx svx/source/dialog/rubydialog.cxx svx/source/dialog/rulritem.cxx svx/source/dialog/simptabl.cxx svx/source/dialog/srchdlg.cxx svx/source/dialog/svxbmpnumvalueset.cxx svx/source/dialog/svxruler.cxx svx/source/dialog/swframeexample.cxx svx/source/engine3d/float3d.cxx svx/source/engine3d/float3d.src svx/source/engine3d/svx3ditems.cxx svx/source/fmcomp/gridctrl.cxx svx/source/fmcomp/trace.cxx svx/source/form/ParseContext.cxx svx/source/form/datanavi.cxx svx/source/form/filtnav.cxx svx/source/form/fmexch.cxx svx/source/form/fmexpl.cxx svx/source/form/fmobjfac.cxx svx/source/form/fmpage.cxx svx/source/form/fmshell.cxx svx/source/form/fmshimp.cxx svx/source/form/fmsrcimp.cxx svx/source/form/fmvwimp.cxx svx/source/form/makefile.mk svx/source/form/tabwin.cxx svx/source/form/tbxform.cxx svx/source/form/typemap.cxx svx/source/gallery2/galbrws1.cxx svx/source/gallery2/galbrws2.cxx svx/source/gallery2/galexpl.cxx svx/source/gallery2/gallery1.cxx svx/source/gallery2/galtheme.cxx svx/source/gallery2/makefile.mk svx/source/gengal/gengal.cxx svx/source/gengal/makefile.mk svx/source/inc/fmgroup.hxx svx/source/intro/about_ooo.hrc svx/source/intro/iso.src svx/source/intro/ooo.src svx/source/items/SmartTagItem.cxx svx/source/items/algitem.cxx svx/source/items/chrtitem.cxx svx/source/items/clipfmtitem.cxx svx/source/items/customshapeitem.cxx svx/source/items/drawitem.cxx svx/source/items/e3ditem.cxx svx/source/items/grfitem.cxx svx/source/items/hlnkitem.cxx svx/source/items/makefile.mk svx/source/items/pageitem.cxx svx/source/items/rotmodit.cxx svx/source/items/viewlayoutitem.cxx svx/source/items/zoomitem.cxx svx/source/items/zoomslideritem.cxx svx/source/src/app.hrc svx/source/stbctrls/makefile.mk svx/source/stbctrls/modctrl.cxx svx/source/stbctrls/xmlsecctrl.cxx svx/source/stbctrls/zoomctrl.cxx svx/source/svdraw/clonelist.cxx svx/source/svdraw/svdattr.cxx svx/source/svdraw/svdcrtv.cxx svx/source/svdraw/svdedtv1.cxx svx/source/svdraw/svdedtv2.cxx svx/source/svdraw/svdedxv.cxx svx/source/svdraw/svdetc.cxx svx/source/svdraw/svdfmtf.cxx svx/source/svdraw/svdfmtf.hxx svx/source/svdraw/svdglue.cxx svx/source/svdraw/svdhdl.cxx svx/source/svdraw/svdhlpln.cxx svx/source/svdraw/svdibrow.cxx svx/source/svdraw/svdlayer.cxx svx/source/svdraw/svdmodel.cxx svx/source/svdraw/svdoashp.cxx svx/source/svdraw/svdobj.cxx svx/source/svdraw/svdocapt.cxx svx/source/svdraw/svdocirc.cxx svx/source/svdraw/svdoedge.cxx svx/source/svdraw/svdograf.cxx svx/source/svdraw/svdogrp.cxx svx/source/svdraw/svdomeas.cxx svx/source/svdraw/svdomedia.cxx svx/source/svdraw/svdopath.cxx svx/source/svdraw/svdotext.cxx svx/source/svdraw/svdotxdr.cxx svx/source/svdraw/svdotxed.cxx svx/source/svdraw/svdotxfl.cxx svx/source/svdraw/svdotxln.cxx svx/source/svdraw/svdotxtr.cxx svx/source/svdraw/svdoutl.cxx svx/source/svdraw/svdpage.cxx svx/source/svdraw/svdpagv.cxx svx/source/svdraw/svdpntv.cxx svx/source/svdraw/svdpoev.cxx svx/source/svdraw/svdsnpv.cxx svx/source/svdraw/svdstr.src svx/source/svdraw/svdtrans.cxx svx/source/svdraw/svdundo.cxx svx/source/svdraw/svdview.cxx svx/source/svdraw/svdxcgv.cxx svx/source/table/svdotable.cxx svx/source/tbxctrls/colorwindow.hxx svx/source/tbxctrls/extrusioncontrols.cxx svx/source/tbxctrls/fillctrl.cxx svx/source/tbxctrls/grafctrl.cxx svx/source/tbxctrls/itemwin.cxx svx/source/tbxctrls/layctrl.cxx svx/source/tbxctrls/lboxctrl.cxx svx/source/tbxctrls/linectrl.cxx svx/source/tbxctrls/tbcontrl.cxx svx/source/tbxctrls/verttexttbxctrl.cxx svx/source/unodraw/unomod.cxx svx/source/unodraw/unopage.cxx svx/source/unodraw/unoprov.cxx svx/source/unodraw/unoshape.cxx svx/source/unodraw/unoshtxt.cxx svx/source/xml/xmlxtexp.cxx svx/source/xoutdev/_xpoly.cxx svx/source/xoutdev/xattr.cxx svx/source/xoutdev/xattr2.cxx svx/source/xoutdev/xattrbmp.cxx svx/source/xoutdev/xtabcolr.cxx svx/util/makefile.mk svx/workben/edittest.cxx sysui/desktop/productversion.mk ucb/prj/build.lst ucb/source/cacher/cacheserv.cxx ucb/source/core/ucb1.component ucb/source/core/ucbserv.cxx ucb/source/core/ucbstore.cxx ucb/source/core/ucbstore.hxx ucb/source/sorter/sortmain.cxx ucb/source/ucp/file/prov.cxx ucb/source/ucp/file/shell.cxx ucb/source/ucp/ftp/ftpservices.cxx ucb/source/ucp/gio/gio_provider.cxx ucb/source/ucp/gvfs/gvfs_provider.cxx ucb/source/ucp/hierarchy/hierarchyservices.cxx ucb/source/ucp/odma/odma_lib.cxx ucb/source/ucp/odma/odma_services.cxx ucb/source/ucp/package/pkgservices.cxx ucb/source/ucp/tdoc/tdoc_services.cxx ucb/source/ucp/webdav/ContentProperties.cxx ucb/source/ucp/webdav/NeonHeadRequest.cxx ucb/source/ucp/webdav/webdavcontent.cxx ucb/source/ucp/webdav/webdavservices.cxx uui/source/iahndl.cxx uui/source/iahndl.hxx uui/source/loginerr.hxx uui/source/nameclashdlg.hxx uui/source/passcrtdlg.cxx uui/source/passworddlg.cxx uui/source/passworddlg.hxx uui/source/services.cxx vbahelper/inc/vbahelper/vbahelper.hxx vbahelper/prj/build.lst vbahelper/prj/d.lst vbahelper/source/msforms/makefile.mk vbahelper/source/msforms/vbauserform.cxx vbahelper/source/vbahelper/makefile.mk vbahelper/source/vbahelper/vbaapplicationbase.cxx vbahelper/source/vbahelper/vbacommandbarcontrol.cxx vbahelper/source/vbahelper/vbadocumentbase.cxx vbahelper/source/vbahelper/vbadocumentsbase.cxx vbahelper/source/vbahelper/vbahelper.cxx vbahelper/util/makefile.mk xmlhelp/source/cxxhelp/provider/databases.cxx xmlhelp/source/cxxhelp/provider/services.cxx xmlhelp/source/treeview/tvfactory.cxx xmloff/JunitTest_xmloff_unoapi.mk xmloff/inc/functional.hxx xmloff/inc/xmloff/formlayerexport.hxx xmloff/inc/xmloff/formlayerimport.hxx xmloff/inc/xmloff/functional.hxx xmloff/inc/xmloff/shapeimport.hxx xmloff/inc/xmloff/xmlcnitm.hxx xmloff/inc/xmloff/xmlnumfi.hxx xmloff/prj/build.lst xmloff/source/chart/SchXMLChartContext.cxx xmloff/source/chart/SchXMLExport.cxx xmloff/source/chart/SchXMLImport.cxx xmloff/source/chart/SchXMLLegendContext.hxx xmloff/source/chart/SchXMLPlotAreaContext.cxx xmloff/source/core/xmluconv.cxx xmloff/source/draw/sdxmlexp.cxx xmloff/source/draw/shapeexport4.cxx xmloff/source/draw/ximp3dobject.cxx xmloff/source/draw/ximp3dscene.cxx xmloff/source/forms/formlayerexport.cxx xmloff/source/forms/formlayerimport.cxx xmloff/source/forms/handler/vcl_time_handler.hxx xmloff/source/forms/layerimport.cxx xmloff/source/forms/layerimport.hxx xmloff/source/forms/property_meta_data.hxx xmloff/source/style/PageHeaderFooterContext.cxx xmloff/source/style/PageMasterStyleMap.cxx xmloff/source/style/prstylei.cxx xmloff/source/style/xmlimppr.cxx xmloff/source/style/xmlnumfi.cxx xmloff/source/style/xmlstyle.cxx xmloff/source/table/tabledesignsimporter.cxx xmloff/source/text/XMLTextNumRuleInfo.cxx xmloff/source/text/XMLTextShapeStyleContext.cxx xmloff/source/text/txtstyle.cxx xmloff/source/transform/ChartOOoTContext.cxx xmloff/source/transform/EventOOoTContext.cxx xmloff/source/transform/TransformerBase.cxx xmloff/util/makefile.mk xmlscript/util/xcr.component
1757 lines
60 KiB
C++
Executable file
1757 lines
60 KiB
C++
Executable file
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*************************************************************************
|
|
*
|
|
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
|
|
*
|
|
* Copyright 2000, 2010 Oracle and/or its affiliates.
|
|
*
|
|
* OpenOffice.org - a multi-platform office productivity suite
|
|
*
|
|
* This file is part of OpenOffice.org.
|
|
*
|
|
* OpenOffice.org is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Lesser General Public License version 3
|
|
* only, as published by the Free Software Foundation.
|
|
*
|
|
* OpenOffice.org is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Lesser General Public License version 3 for more details
|
|
* (a copy is included in the LICENSE file that accompanied this code).
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public License
|
|
* version 3 along with OpenOffice.org. If not, see
|
|
* <http://www.openoffice.org/license.html>
|
|
* for a copy of the LGPLv3 License.
|
|
*
|
|
************************************************************************/
|
|
|
|
// MARKER(update_precomp.py): autogen include statement, do not remove
|
|
#include "precompiled_basic.hxx"
|
|
|
|
#include <math.h>
|
|
#include <tools/stream.hxx>
|
|
|
|
#include <basic/sbx.hxx>
|
|
#include "sbxconv.hxx"
|
|
#include "runtime.hxx"
|
|
|
|
TYPEINIT1(SbxValue,SbxBase)
|
|
|
|
|
|
///////////////////////////// error handling //////////////////////////////
|
|
// bring back ?? was ever in ?? currently ifdef out ?
|
|
#ifdef _USED
|
|
// STILL Reverse ENGINEERING!
|
|
|
|
// The default handling sets the error code only.
|
|
|
|
#ifndef WNT
|
|
#if defined ( UNX )
|
|
int matherr( struct exception* p )
|
|
#else
|
|
int matherr( struct _exception* p )
|
|
#endif
|
|
{
|
|
switch( p->type )
|
|
{
|
|
#if defined ( UNX )
|
|
case OVERFLOW: SbxBase::SetError( SbxERR_OVERFLOW ); break;
|
|
#else
|
|
case _OVERFLOW: SbxBase::SetError( SbxERR_OVERFLOW ); break;
|
|
#endif
|
|
default: SbxBase::SetError( SbxERR_NOTIMP ); break;
|
|
}
|
|
return sal_True;
|
|
}
|
|
#endif
|
|
|
|
#endif // _USED
|
|
|
|
///////////////////////////// constructors //////////////////////////////
|
|
|
|
SbxValue::SbxValue() : SbxBase()
|
|
{
|
|
aData.eType = SbxEMPTY;
|
|
}
|
|
|
|
SbxValue::SbxValue( SbxDataType t, void* p ) : SbxBase()
|
|
{
|
|
int n = t & 0x0FFF;
|
|
if( p )
|
|
n |= SbxBYREF;
|
|
if( n == SbxVARIANT )
|
|
n = SbxEMPTY;
|
|
else
|
|
SetFlag( SBX_FIXED );
|
|
if( p )
|
|
switch( t & 0x0FFF )
|
|
{
|
|
case SbxINTEGER: n |= SbxBYREF; aData.pInteger = (sal_Int16*) p; break;
|
|
case SbxSALUINT64: n |= SbxBYREF; aData.puInt64 = (sal_uInt64*) p; break;
|
|
case SbxSALINT64:
|
|
case SbxCURRENCY: n |= SbxBYREF; aData.pnInt64 = (sal_Int64*) p; break;
|
|
case SbxLONG: n |= SbxBYREF; aData.pLong = (sal_Int32*) p; break;
|
|
case SbxSINGLE: n |= SbxBYREF; aData.pSingle = (float*) p; break;
|
|
case SbxDATE:
|
|
case SbxDOUBLE: n |= SbxBYREF; aData.pDouble = (double*) p; break;
|
|
case SbxSTRING: n |= SbxBYREF; aData.pOUString = (::rtl::OUString*) p; break;
|
|
case SbxERROR:
|
|
case SbxUSHORT:
|
|
case SbxBOOL: n |= SbxBYREF; aData.pUShort = (sal_uInt16*) p; break;
|
|
case SbxULONG: n |= SbxBYREF; aData.pULong = (sal_uInt32*) p; break;
|
|
case SbxCHAR: n |= SbxBYREF; aData.pChar = (sal_Unicode*) p; break;
|
|
case SbxBYTE: n |= SbxBYREF; aData.pByte = (sal_uInt8*) p; break;
|
|
case SbxINT: n |= SbxBYREF; aData.pInt = (int*) p; break;
|
|
case SbxOBJECT:
|
|
aData.pObj = (SbxBase*) p;
|
|
if( p )
|
|
aData.pObj->AddRef();
|
|
break;
|
|
case SbxDECIMAL:
|
|
aData.pDecimal = (SbxDecimal*) p;
|
|
if( p )
|
|
aData.pDecimal->addRef();
|
|
break;
|
|
default:
|
|
DBG_ASSERT( !this, "Angabe eines Pointers unzulaessig" );
|
|
n = SbxNULL;
|
|
}
|
|
else
|
|
memset( &aData, 0, sizeof( SbxValues ) );
|
|
aData.eType = SbxDataType( n );
|
|
}
|
|
|
|
SbxValue::SbxValue( const SbxValue& r )
|
|
: SvRefBase( r ), SbxBase( r )
|
|
{
|
|
if( !r.CanRead() )
|
|
{
|
|
SetError( SbxERR_PROP_WRITEONLY );
|
|
if( !IsFixed() )
|
|
aData.eType = SbxNULL;
|
|
}
|
|
else
|
|
{
|
|
((SbxValue*) &r)->Broadcast( SBX_HINT_DATAWANTED );
|
|
aData = r.aData;
|
|
// Copy pointer, increment references
|
|
switch( aData.eType )
|
|
{
|
|
case SbxSTRING:
|
|
if( aData.pOUString )
|
|
aData.pOUString = new ::rtl::OUString( *aData.pOUString );
|
|
break;
|
|
case SbxOBJECT:
|
|
if( aData.pObj )
|
|
aData.pObj->AddRef();
|
|
break;
|
|
case SbxDECIMAL:
|
|
if( aData.pDecimal )
|
|
aData.pDecimal->addRef();
|
|
break;
|
|
default: break;
|
|
}
|
|
}
|
|
}
|
|
|
|
SbxValue& SbxValue::operator=( const SbxValue& r )
|
|
{
|
|
if( &r != this )
|
|
{
|
|
if( !CanWrite() )
|
|
SetError( SbxERR_PROP_READONLY );
|
|
else
|
|
{
|
|
// string -> byte array
|
|
if( IsFixed() && (aData.eType == SbxOBJECT)
|
|
&& aData.pObj && ( aData.pObj->GetType() == (SbxARRAY | SbxBYTE) )
|
|
&& (r.aData.eType == SbxSTRING) )
|
|
{
|
|
::rtl::OUString aStr = r.GetString();
|
|
SbxArray* pArr = StringToByteArray(aStr);
|
|
PutObject(pArr);
|
|
return *this;
|
|
}
|
|
// byte array -> string
|
|
if( r.IsFixed() && (r.aData.eType == SbxOBJECT)
|
|
&& r.aData.pObj && ( r.aData.pObj->GetType() == (SbxARRAY | SbxBYTE) )
|
|
&& (aData.eType == SbxSTRING) )
|
|
{
|
|
SbxBase* pObj = r.GetObject();
|
|
SbxArray* pArr = PTR_CAST(SbxArray, pObj);
|
|
if( pArr )
|
|
{
|
|
::rtl::OUString aStr = ByteArrayToString( pArr );
|
|
PutString(aStr);
|
|
return *this;
|
|
}
|
|
}
|
|
// Readout the content of the variables
|
|
SbxValues aNew;
|
|
if( IsFixed() )
|
|
// firm: then the type had to match
|
|
aNew.eType = aData.eType;
|
|
else if( r.IsFixed() )
|
|
// Source firm: take over the type
|
|
aNew.eType = SbxDataType( r.aData.eType & 0x0FFF );
|
|
else
|
|
// both variant: then it is equal
|
|
aNew.eType = SbxVARIANT;
|
|
if( r.Get( aNew ) )
|
|
Put( aNew );
|
|
}
|
|
}
|
|
return *this;
|
|
}
|
|
|
|
SbxValue::~SbxValue()
|
|
{
|
|
#ifndef C50
|
|
Broadcast( SBX_HINT_DYING );
|
|
SetFlag( SBX_WRITE );
|
|
SbxValue::Clear();
|
|
#else
|
|
// Provisional fix for the Solaris 5.0 compiler bbug
|
|
// at using virtual inheritance. Avoid virtual calls
|
|
// in the destructor. Instead of calling clear()
|
|
// de-allocate posible object references direct.
|
|
if( aData.eType == SbxOBJECT )
|
|
{
|
|
if( aData.pObj && aData.pObj != this )
|
|
{
|
|
HACK(nicht bei Parent-Prop - sonst CyclicRef)
|
|
SbxVariable *pThisVar = PTR_CAST(SbxVariable, this);
|
|
sal_Bool bParentProp = pThisVar && 5345 ==
|
|
( (sal_Int16) ( pThisVar->GetUserData() & 0xFFFF ) );
|
|
if ( !bParentProp )
|
|
aData.pObj->ReleaseRef();
|
|
}
|
|
}
|
|
else if( aData.eType == SbxDECIMAL )
|
|
{
|
|
releaseDecimalPtr( aData.pDecimal );
|
|
}
|
|
#endif
|
|
}
|
|
|
|
void SbxValue::Clear()
|
|
{
|
|
switch( aData.eType )
|
|
{
|
|
case SbxNULL:
|
|
case SbxEMPTY:
|
|
case SbxVOID:
|
|
break;
|
|
case SbxSTRING:
|
|
delete aData.pOUString; aData.pOUString = NULL;
|
|
break;
|
|
case SbxOBJECT:
|
|
if( aData.pObj )
|
|
{
|
|
if( aData.pObj != this )
|
|
{
|
|
HACK(nicht bei Parent-Prop - sonst CyclicRef)
|
|
SbxVariable *pThisVar = PTR_CAST(SbxVariable, this);
|
|
sal_Bool bParentProp = pThisVar && 5345 ==
|
|
( (sal_Int16) ( pThisVar->GetUserData() & 0xFFFF ) );
|
|
if ( !bParentProp )
|
|
aData.pObj->ReleaseRef();
|
|
}
|
|
aData.pObj = NULL;
|
|
}
|
|
break;
|
|
case SbxDECIMAL:
|
|
if( aData.eType == SbxDECIMAL )
|
|
releaseDecimalPtr( aData.pDecimal );
|
|
break;
|
|
case SbxDATAOBJECT:
|
|
aData.pData = NULL; break;
|
|
default:
|
|
{
|
|
SbxValues aEmpty;
|
|
memset( &aEmpty, 0, sizeof( SbxValues ) );
|
|
aEmpty.eType = GetType();
|
|
Put( aEmpty );
|
|
}
|
|
}
|
|
}
|
|
|
|
// Dummy
|
|
|
|
void SbxValue::Broadcast( sal_uIntPtr )
|
|
{}
|
|
|
|
//////////////////////////// Readout data //////////////////////////////
|
|
|
|
// Detect the "right" variables. If it is an object, will be addressed either
|
|
// the object itself or its default property.
|
|
// If the variable contain a variable or an object, this will be
|
|
// addressed.
|
|
|
|
SbxValue* SbxValue::TheRealValue() const
|
|
{
|
|
return TheRealValue( sal_True );
|
|
}
|
|
|
|
// #55226 ship additional information
|
|
bool handleToStringForCOMObjects( SbxObject* pObj, SbxValue* pVal ); // sbunoobj.cxx
|
|
|
|
SbxValue* SbxValue::TheRealValue( sal_Bool bObjInObjError ) const
|
|
{
|
|
SbxValue* p = (SbxValue*) this;
|
|
for( ;; )
|
|
{
|
|
SbxDataType t = SbxDataType( p->aData.eType & 0x0FFF );
|
|
if( t == SbxOBJECT )
|
|
{
|
|
// The block contains an object or a variable
|
|
SbxObject* pObj = PTR_CAST(SbxObject,p->aData.pObj);
|
|
if( pObj )
|
|
{
|
|
// Has the object a default property?
|
|
SbxVariable* pDflt = pObj->GetDfltProperty();
|
|
|
|
// If this is an object and contains itself,
|
|
// we cannot access on it
|
|
// #55226# The old condition to set an error
|
|
// is not correct, because e.g. a regular variant variable with an object
|
|
// could be affected thereof, if another value should be assigned.
|
|
// Therefore with flag.
|
|
if( bObjInObjError && !pDflt &&
|
|
((SbxValue*) pObj)->aData.eType == SbxOBJECT &&
|
|
((SbxValue*) pObj)->aData.pObj == pObj )
|
|
{
|
|
bool bSuccess = handleToStringForCOMObjects( pObj, p );
|
|
if( !bSuccess )
|
|
{
|
|
SetError( SbxERR_BAD_PROP_VALUE );
|
|
p = NULL;
|
|
}
|
|
}
|
|
else if( pDflt )
|
|
p = pDflt;
|
|
/* ALT:
|
|
else
|
|
p = pDflt ? pDflt : (SbxVariable*) pObj;
|
|
*/
|
|
break;
|
|
}
|
|
// Did we have an array?
|
|
SbxArray* pArray = PTR_CAST(SbxArray,p->aData.pObj);
|
|
if( pArray )
|
|
{
|
|
// When indicated get the parameter
|
|
SbxArray* pPar = NULL;
|
|
SbxVariable* pVar = PTR_CAST(SbxVariable,p);
|
|
if( pVar )
|
|
pPar = pVar->GetParameters();
|
|
if( pPar )
|
|
{
|
|
// Did we have a dimensioned array?
|
|
SbxDimArray* pDimArray = PTR_CAST(SbxDimArray,p->aData.pObj);
|
|
if( pDimArray )
|
|
p = pDimArray->Get( pPar );
|
|
else
|
|
p = pArray->Get( pPar->Get( 1 )->GetInteger() );
|
|
break;
|
|
}
|
|
}
|
|
// Elsewise guess a SbxValue
|
|
SbxValue* pVal = PTR_CAST(SbxValue,p->aData.pObj);
|
|
if( pVal )
|
|
p = pVal;
|
|
else
|
|
break;
|
|
}
|
|
else
|
|
break;
|
|
}
|
|
return p;
|
|
}
|
|
|
|
sal_Bool SbxValue::Get( SbxValues& rRes ) const
|
|
{
|
|
sal_Bool bRes = sal_False;
|
|
SbxError eOld = GetError();
|
|
if( eOld != SbxERR_OK )
|
|
ResetError();
|
|
if( !CanRead() )
|
|
{
|
|
SetError( SbxERR_PROP_WRITEONLY );
|
|
rRes.pObj = NULL;
|
|
}
|
|
else
|
|
{
|
|
// If there was asked for an object or a VARIANT, don't search
|
|
// the real values
|
|
SbxValue* p = (SbxValue*) this;
|
|
if( rRes.eType != SbxOBJECT && rRes.eType != SbxVARIANT )
|
|
p = TheRealValue();
|
|
if( p )
|
|
{
|
|
p->Broadcast( SBX_HINT_DATAWANTED );
|
|
switch( rRes.eType )
|
|
{
|
|
case SbxEMPTY:
|
|
case SbxVOID:
|
|
case SbxNULL: break;
|
|
case SbxVARIANT: rRes = p->aData; break;
|
|
case SbxINTEGER: rRes.nInteger = ImpGetInteger( &p->aData ); break;
|
|
case SbxLONG: rRes.nLong = ImpGetLong( &p->aData ); break;
|
|
case SbxSALINT64: rRes.nInt64 = ImpGetInt64( &p->aData ); break;
|
|
case SbxSALUINT64: rRes.uInt64 = ImpGetUInt64( &p->aData ); break;
|
|
case SbxSINGLE: rRes.nSingle = ImpGetSingle( &p->aData ); break;
|
|
case SbxDOUBLE: rRes.nDouble = ImpGetDouble( &p->aData ); break;
|
|
case SbxCURRENCY:rRes.nInt64 = ImpGetCurrency( &p->aData ); break;
|
|
case SbxDECIMAL: rRes.pDecimal = ImpGetDecimal( &p->aData ); break;
|
|
case SbxDATE: rRes.nDouble = ImpGetDate( &p->aData ); break;
|
|
case SbxBOOL:
|
|
rRes.nUShort = sal::static_int_cast< sal_uInt16 >(
|
|
ImpGetBool( &p->aData ) );
|
|
break;
|
|
case SbxCHAR: rRes.nChar = ImpGetChar( &p->aData ); break;
|
|
case SbxBYTE: rRes.nByte = ImpGetByte( &p->aData ); break;
|
|
case SbxUSHORT: rRes.nUShort = ImpGetUShort( &p->aData ); break;
|
|
case SbxULONG: rRes.nULong = ImpGetULong( &p->aData ); break;
|
|
case SbxLPSTR:
|
|
case SbxSTRING: p->aPic = ImpGetString( &p->aData );
|
|
rRes.pOUString = &p->aPic; break;
|
|
case SbxCoreSTRING: p->aPic = ImpGetCoreString( &p->aData );
|
|
rRes.pOUString = &p->aPic; break;
|
|
case SbxINT:
|
|
#if SAL_TYPES_SIZEOFINT == 2
|
|
rRes.nInt = (int) ImpGetInteger( &p->aData );
|
|
#else
|
|
rRes.nInt = (int) ImpGetLong( &p->aData );
|
|
#endif
|
|
break;
|
|
case SbxUINT:
|
|
#if SAL_TYPES_SIZEOFINT == 2
|
|
rRes.nUInt = (int) ImpGetUShort( &p->aData );
|
|
#else
|
|
rRes.nUInt = (int) ImpGetULong( &p->aData );
|
|
#endif
|
|
break;
|
|
case SbxOBJECT:
|
|
if( p->aData.eType == SbxOBJECT )
|
|
rRes.pObj = p->aData.pObj;
|
|
else
|
|
{
|
|
SetError( SbxERR_NO_OBJECT );
|
|
rRes.pObj = NULL;
|
|
}
|
|
break;
|
|
default:
|
|
if( p->aData.eType == rRes.eType )
|
|
rRes = p->aData;
|
|
else
|
|
{
|
|
SetError( SbxERR_CONVERSION );
|
|
rRes.pObj = NULL;
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// Object contained itself
|
|
SbxDataType eTemp = rRes.eType;
|
|
memset( &rRes, 0, sizeof( SbxValues ) );
|
|
rRes.eType = eTemp;
|
|
}
|
|
}
|
|
if( !IsError() )
|
|
{
|
|
bRes = sal_True;
|
|
if( eOld != SbxERR_OK )
|
|
SetError( eOld );
|
|
}
|
|
return bRes;
|
|
}
|
|
|
|
sal_Bool SbxValue::GetNoBroadcast( SbxValues& rRes )
|
|
{
|
|
sal_uInt16 nFlags_ = GetFlags();
|
|
SetFlag( SBX_NO_BROADCAST );
|
|
sal_Bool bRes = Get( rRes );
|
|
SetFlags( nFlags_ );
|
|
return bRes;
|
|
}
|
|
|
|
const XubString& SbxValue::GetString() const
|
|
{
|
|
SbxValues aRes;
|
|
aRes.eType = SbxSTRING;
|
|
if( Get( aRes ) )
|
|
((SbxValue*) this)->aToolString = *aRes.pOUString;
|
|
else
|
|
((SbxValue*) this)->aToolString.Erase();
|
|
|
|
return aToolString;
|
|
}
|
|
|
|
const XubString& SbxValue::GetCoreString() const
|
|
{
|
|
SbxValues aRes;
|
|
aRes.eType = SbxCoreSTRING;
|
|
if( Get( aRes ) )
|
|
((SbxValue*) this)->aToolString = *aRes.pOUString;
|
|
else
|
|
((SbxValue*) this)->aToolString.Erase();
|
|
|
|
return aToolString;
|
|
}
|
|
|
|
::rtl::OUString SbxValue::GetOUString() const
|
|
{
|
|
::rtl::OUString aResult;
|
|
SbxValues aRes;
|
|
aRes.eType = SbxSTRING;
|
|
if( Get( aRes ) )
|
|
aResult = *aRes.pOUString;
|
|
|
|
return aResult;
|
|
}
|
|
|
|
sal_Bool SbxValue::HasObject() const
|
|
{
|
|
ErrCode eErr = GetError();
|
|
SbxValues aRes;
|
|
aRes.eType = SbxOBJECT;
|
|
Get( aRes );
|
|
SetError( eErr );
|
|
return 0 != aRes.pObj;
|
|
}
|
|
|
|
sal_Bool SbxValue::GetBool() const
|
|
{
|
|
SbxValues aRes;
|
|
aRes.eType = SbxBOOL;
|
|
Get( aRes );
|
|
return sal_Bool( aRes.nUShort != 0 );
|
|
}
|
|
|
|
#define GET( g, e, t, m ) \
|
|
t SbxValue::g() const { SbxValues aRes(e); Get( aRes ); return aRes.m; }
|
|
|
|
GET( GetByte, SbxBYTE, sal_uInt8, nByte )
|
|
GET( GetChar, SbxCHAR, xub_Unicode, nChar )
|
|
GET( GetCurrency, SbxCURRENCY, sal_Int64, nInt64 )
|
|
GET( GetDate, SbxDATE, double, nDouble )
|
|
GET( GetData, SbxDATAOBJECT, void*, pData )
|
|
GET( GetDouble, SbxDOUBLE, double, nDouble )
|
|
GET( GetErr, SbxERROR, sal_uInt16, nUShort )
|
|
GET( GetInt, SbxINT, int, nInt )
|
|
GET( GetInteger, SbxINTEGER, sal_Int16, nInteger )
|
|
GET( GetLong, SbxLONG, sal_Int32, nLong )
|
|
GET( GetObject, SbxOBJECT, SbxBase*, pObj )
|
|
GET( GetSingle, SbxSINGLE, float, nSingle )
|
|
GET( GetULong, SbxULONG, sal_uInt32, nULong )
|
|
GET( GetUShort, SbxUSHORT, sal_uInt16, nUShort )
|
|
GET( GetInt64, SbxSALINT64, sal_Int64, nInt64 )
|
|
GET( GetUInt64, SbxSALUINT64, sal_uInt64, uInt64 )
|
|
GET( GetDecimal, SbxDECIMAL, SbxDecimal*, pDecimal )
|
|
|
|
|
|
//////////////////////////// Write data /////////////////////////////
|
|
|
|
sal_Bool SbxValue::Put( const SbxValues& rVal )
|
|
{
|
|
sal_Bool bRes = sal_False;
|
|
SbxError eOld = GetError();
|
|
if( eOld != SbxERR_OK )
|
|
ResetError();
|
|
if( !CanWrite() )
|
|
SetError( SbxERR_PROP_READONLY );
|
|
else if( rVal.eType & 0xF000 )
|
|
SetError( SbxERR_NOTIMP );
|
|
else
|
|
{
|
|
// If there was asked for an object, don't search
|
|
// the real values
|
|
SbxValue* p = this;
|
|
if( rVal.eType != SbxOBJECT )
|
|
p = TheRealValue( sal_False ); // Don't allow an error here
|
|
if( p )
|
|
{
|
|
if( !p->CanWrite() )
|
|
SetError( SbxERR_PROP_READONLY );
|
|
else if( p->IsFixed() || p->SetType( (SbxDataType) ( rVal.eType & 0x0FFF ) ) )
|
|
switch( rVal.eType & 0x0FFF )
|
|
{
|
|
case SbxEMPTY:
|
|
case SbxVOID:
|
|
case SbxNULL: break;
|
|
case SbxINTEGER: ImpPutInteger( &p->aData, rVal.nInteger ); break;
|
|
case SbxLONG: ImpPutLong( &p->aData, rVal.nLong ); break;
|
|
case SbxSALINT64: ImpPutInt64( &p->aData, rVal.nInt64 ); break;
|
|
case SbxSALUINT64: ImpPutUInt64( &p->aData, rVal.uInt64 ); break;
|
|
case SbxSINGLE: ImpPutSingle( &p->aData, rVal.nSingle ); break;
|
|
case SbxDOUBLE: ImpPutDouble( &p->aData, rVal.nDouble ); break;
|
|
case SbxCURRENCY: ImpPutCurrency( &p->aData, rVal.nInt64 ); break;
|
|
case SbxDECIMAL: ImpPutDecimal( &p->aData, rVal.pDecimal ); break;
|
|
case SbxDATE: ImpPutDate( &p->aData, rVal.nDouble ); break;
|
|
case SbxBOOL: ImpPutBool( &p->aData, rVal.nInteger ); break;
|
|
case SbxCHAR: ImpPutChar( &p->aData, rVal.nChar ); break;
|
|
case SbxBYTE: ImpPutByte( &p->aData, rVal.nByte ); break;
|
|
case SbxUSHORT: ImpPutUShort( &p->aData, rVal.nUShort ); break;
|
|
case SbxULONG: ImpPutULong( &p->aData, rVal.nULong ); break;
|
|
case SbxLPSTR:
|
|
case SbxSTRING: ImpPutString( &p->aData, rVal.pOUString ); break;
|
|
case SbxINT:
|
|
#if SAL_TYPES_SIZEOFINT == 2
|
|
ImpPutInteger( &p->aData, (sal_Int16) rVal.nInt );
|
|
#else
|
|
ImpPutLong( &p->aData, (sal_Int32) rVal.nInt );
|
|
#endif
|
|
break;
|
|
case SbxUINT:
|
|
#if SAL_TYPES_SIZEOFINT == 2
|
|
ImpPutUShort( &p->aData, (sal_uInt16) rVal.nUInt );
|
|
#else
|
|
ImpPutULong( &p->aData, (sal_uInt32) rVal.nUInt );
|
|
#endif
|
|
break;
|
|
case SbxOBJECT:
|
|
if( !p->IsFixed() || p->aData.eType == SbxOBJECT )
|
|
{
|
|
// is already inside
|
|
if( p->aData.eType == SbxOBJECT && p->aData.pObj == rVal.pObj )
|
|
break;
|
|
|
|
// Delete only the value part!
|
|
p->SbxValue::Clear();
|
|
|
|
// real allocation
|
|
p->aData.pObj = rVal.pObj;
|
|
|
|
// if necessary cont in Ref-Count
|
|
if( p->aData.pObj && p->aData.pObj != p )
|
|
{
|
|
if ( p != this )
|
|
{
|
|
OSL_FAIL( "TheRealValue" );
|
|
}
|
|
HACK(nicht bei Parent-Prop - sonst CyclicRef)
|
|
SbxVariable *pThisVar = PTR_CAST(SbxVariable, this);
|
|
sal_Bool bParentProp = pThisVar && 5345 ==
|
|
( (sal_Int16) ( pThisVar->GetUserData() & 0xFFFF ) );
|
|
if ( !bParentProp )
|
|
p->aData.pObj->AddRef();
|
|
}
|
|
}
|
|
else
|
|
SetError( SbxERR_CONVERSION );
|
|
break;
|
|
default:
|
|
if( p->aData.eType == rVal.eType )
|
|
p->aData = rVal;
|
|
else
|
|
{
|
|
SetError( SbxERR_CONVERSION );
|
|
if( !p->IsFixed() )
|
|
p->aData.eType = SbxNULL;
|
|
}
|
|
}
|
|
if( !IsError() )
|
|
{
|
|
p->SetModified( sal_True );
|
|
p->Broadcast( SBX_HINT_DATACHANGED );
|
|
if( eOld != SbxERR_OK )
|
|
SetError( eOld );
|
|
bRes = sal_True;
|
|
}
|
|
}
|
|
}
|
|
return bRes;
|
|
}
|
|
|
|
// From 1996-03-28:
|
|
// Method to execute a pretreatment of the strings at special types.
|
|
// In particular necessary for BASIC-IDE, so that
|
|
// the output in the Watch-Window can be writen back with PutStringExt,
|
|
// if Float were declared with ',' as the decimal seperator or BOOl
|
|
// explicit with "TRUE" or "FALSE".
|
|
// Implementation in ImpConvStringExt (SBXSCAN.CXX)
|
|
sal_Bool SbxValue::PutStringExt( const ::rtl::OUString& r )
|
|
{
|
|
// Copy; if it is Unicode convert it immediately
|
|
::rtl::OUString aStr( r );
|
|
|
|
// Identify the own type (not as in Put() with TheRealValue(),
|
|
// Objects are not handled anyway)
|
|
SbxDataType eTargetType = SbxDataType( aData.eType & 0x0FFF );
|
|
|
|
// tinker a Source-Value
|
|
SbxValues aRes;
|
|
aRes.eType = SbxSTRING;
|
|
|
|
// Only if really something was converted, take the copy,
|
|
// elsewise take the original (Unicode remain)
|
|
sal_Bool bRet;
|
|
if( ImpConvStringExt( aStr, eTargetType ) )
|
|
aRes.pOUString = (::rtl::OUString*)&aStr;
|
|
else
|
|
aRes.pOUString = (::rtl::OUString*)&r;
|
|
|
|
// #34939: Set a Fixed-Flag at Strings. which contain a number, and
|
|
// if this has a Num-Type, so that the type will not be changed
|
|
sal_uInt16 nFlags_ = GetFlags();
|
|
if( ( eTargetType >= SbxINTEGER && eTargetType <= SbxCURRENCY ) ||
|
|
( eTargetType >= SbxCHAR && eTargetType <= SbxUINT ) ||
|
|
eTargetType == SbxBOOL )
|
|
{
|
|
SbxValue aVal;
|
|
aVal.Put( aRes );
|
|
if( aVal.IsNumeric() )
|
|
SetFlag( SBX_FIXED );
|
|
}
|
|
|
|
Put( aRes );
|
|
bRet = sal_Bool( !IsError() );
|
|
|
|
// If it throwed an error with FIXED, set it back
|
|
// (UI-Action should not cast an error, but only fail)
|
|
if( !bRet )
|
|
ResetError();
|
|
|
|
SetFlags( nFlags_ );
|
|
return bRet;
|
|
}
|
|
|
|
sal_Bool SbxValue::PutString( const xub_Unicode* p )
|
|
{
|
|
::rtl::OUString aVal( p );
|
|
SbxValues aRes;
|
|
aRes.eType = SbxSTRING;
|
|
aRes.pOUString = &aVal;
|
|
Put( aRes );
|
|
return sal_Bool( !IsError() );
|
|
}
|
|
|
|
sal_Bool SbxValue::PutBool( sal_Bool b )
|
|
{
|
|
SbxValues aRes;
|
|
aRes.eType = SbxBOOL;
|
|
aRes.nUShort = sal::static_int_cast< sal_uInt16 >(b ? SbxTRUE : SbxFALSE);
|
|
Put( aRes );
|
|
return sal_Bool( !IsError() );
|
|
}
|
|
|
|
sal_Bool SbxValue::PutEmpty()
|
|
{
|
|
sal_Bool bRet = SetType( SbxEMPTY );
|
|
SetModified( sal_True );
|
|
return bRet;
|
|
}
|
|
|
|
sal_Bool SbxValue::PutNull()
|
|
{
|
|
sal_Bool bRet = SetType( SbxNULL );
|
|
if( bRet )
|
|
SetModified( sal_True );
|
|
return bRet;
|
|
}
|
|
|
|
|
|
// Special decimal methods
|
|
sal_Bool SbxValue::PutDecimal( com::sun::star::bridge::oleautomation::Decimal& rAutomationDec )
|
|
{
|
|
SbxValue::Clear();
|
|
aData.pDecimal = new SbxDecimal( rAutomationDec );
|
|
aData.pDecimal->addRef();
|
|
aData.eType = SbxDECIMAL;
|
|
return sal_True;
|
|
}
|
|
|
|
sal_Bool SbxValue::fillAutomationDecimal
|
|
( com::sun::star::bridge::oleautomation::Decimal& rAutomationDec )
|
|
{
|
|
SbxDecimal* pDecimal = GetDecimal();
|
|
if( pDecimal != NULL )
|
|
{
|
|
pDecimal->fillAutomationDecimal( rAutomationDec );
|
|
return sal_True;
|
|
}
|
|
return sal_False;
|
|
}
|
|
|
|
|
|
sal_Bool SbxValue::PutpChar( const xub_Unicode* p )
|
|
{
|
|
::rtl::OUString aVal( p );
|
|
SbxValues aRes;
|
|
aRes.eType = SbxLPSTR;
|
|
aRes.pOUString = &aVal;
|
|
Put( aRes );
|
|
return sal_Bool( !IsError() );
|
|
}
|
|
|
|
sal_Bool SbxValue::PutString( const ::rtl::OUString& r )
|
|
{
|
|
SbxValues aRes;
|
|
aRes.eType = SbxSTRING;
|
|
aRes.pOUString = (::rtl::OUString*) &r;
|
|
Put( aRes );
|
|
return sal_Bool( !IsError() );
|
|
}
|
|
|
|
|
|
#define PUT( p, e, t, m ) \
|
|
sal_Bool SbxValue::p( t n ) \
|
|
{ SbxValues aRes(e); aRes.m = n; Put( aRes ); return sal_Bool( !IsError() ); }
|
|
|
|
PUT( PutByte, SbxBYTE, sal_uInt8, nByte )
|
|
PUT( PutChar, SbxCHAR, sal_Unicode, nChar )
|
|
PUT( PutCurrency, SbxCURRENCY, const sal_Int64&, nInt64 )
|
|
PUT( PutDate, SbxDATE, double, nDouble )
|
|
PUT( PutData, SbxDATAOBJECT, void*, pData )
|
|
PUT( PutDouble, SbxDOUBLE, double, nDouble )
|
|
PUT( PutErr, SbxERROR, sal_uInt16, nUShort )
|
|
PUT( PutInt, SbxINT, int, nInt )
|
|
PUT( PutInteger, SbxINTEGER, sal_Int16, nInteger )
|
|
PUT( PutLong, SbxLONG, sal_Int32, nLong )
|
|
PUT( PutObject, SbxOBJECT, SbxBase*, pObj )
|
|
PUT( PutSingle, SbxSINGLE, float, nSingle )
|
|
PUT( PutULong, SbxULONG, sal_uInt32, nULong )
|
|
PUT( PutUShort, SbxUSHORT, sal_uInt16, nUShort )
|
|
PUT( PutInt64, SbxSALINT64, sal_Int64, nInt64 )
|
|
PUT( PutUInt64, SbxSALUINT64, sal_uInt64, uInt64 )
|
|
PUT( PutDecimal, SbxDECIMAL, SbxDecimal*, pDecimal )
|
|
|
|
|
|
////////////////////////// Setting of the data type ///////////////////////////
|
|
|
|
sal_Bool SbxValue::IsFixed() const
|
|
{
|
|
return ( (GetFlags() & SBX_FIXED) | (aData.eType & SbxBYREF) ) != 0;
|
|
}
|
|
|
|
// A variable is numeric, if it is EMPTY or realy numeric
|
|
// or if it contains a complete convertible String
|
|
|
|
// #41692, implement it for RTL and Basic-Core seperably
|
|
sal_Bool SbxValue::IsNumeric() const
|
|
{
|
|
return ImpIsNumeric( /*bOnlyIntntl*/sal_False );
|
|
}
|
|
|
|
sal_Bool SbxValue::IsNumericRTL() const
|
|
{
|
|
return ImpIsNumeric( /*bOnlyIntntl*/sal_True );
|
|
}
|
|
|
|
sal_Bool SbxValue::ImpIsNumeric( sal_Bool bOnlyIntntl ) const
|
|
{
|
|
|
|
if( !CanRead() )
|
|
{
|
|
SetError( SbxERR_PROP_WRITEONLY ); return sal_False;
|
|
}
|
|
// Test downcast!!!
|
|
if( this->ISA(SbxVariable) )
|
|
((SbxVariable*)this)->Broadcast( SBX_HINT_DATAWANTED );
|
|
SbxDataType t = GetType();
|
|
if( t == SbxSTRING )
|
|
{
|
|
if( aData.pOUString )
|
|
{
|
|
::rtl::OUString s( *aData.pOUString );
|
|
double n;
|
|
SbxDataType t2;
|
|
sal_uInt16 nLen = 0;
|
|
if( ImpScan( s, n, t2, &nLen, /*bAllowIntntl*/sal_False, bOnlyIntntl ) == SbxERR_OK )
|
|
return sal_Bool( nLen == s.getLength() );
|
|
}
|
|
return sal_False;
|
|
}
|
|
else
|
|
return sal_Bool( t == SbxEMPTY
|
|
|| ( t >= SbxINTEGER && t <= SbxCURRENCY )
|
|
|| ( t >= SbxCHAR && t <= SbxUINT ) );
|
|
}
|
|
|
|
SbxClassType SbxValue::GetClass() const
|
|
{
|
|
return SbxCLASS_VALUE;
|
|
}
|
|
|
|
SbxDataType SbxValue::GetType() const
|
|
{
|
|
return SbxDataType( aData.eType & 0x0FFF );
|
|
}
|
|
|
|
SbxDataType SbxValue::GetFullType() const
|
|
{
|
|
return aData.eType;
|
|
}
|
|
|
|
sal_Bool SbxValue::SetType( SbxDataType t )
|
|
{
|
|
DBG_ASSERT( !( t & 0xF000 ), "Setzen von BYREF|ARRAY verboten!" );
|
|
if( ( t == SbxEMPTY && aData.eType == SbxVOID )
|
|
|| ( aData.eType == SbxEMPTY && t == SbxVOID ) )
|
|
return sal_True;
|
|
if( ( t & 0x0FFF ) == SbxVARIANT )
|
|
{
|
|
// Trial to set the data type to Variant
|
|
ResetFlag( SBX_FIXED );
|
|
if( IsFixed() )
|
|
{
|
|
SetError( SbxERR_CONVERSION ); return sal_False;
|
|
}
|
|
t = SbxEMPTY;
|
|
}
|
|
if( ( t & 0x0FFF ) != ( aData.eType & 0x0FFF ) )
|
|
{
|
|
if( !CanWrite() || IsFixed() )
|
|
{
|
|
SetError( SbxERR_CONVERSION ); return sal_False;
|
|
}
|
|
else
|
|
{
|
|
// De-allocate potential objects
|
|
switch( aData.eType )
|
|
{
|
|
case SbxSTRING:
|
|
delete aData.pOUString;
|
|
break;
|
|
case SbxOBJECT:
|
|
if( aData.pObj && aData.pObj != this )
|
|
{
|
|
HACK(nicht bei Parent-Prop - sonst CyclicRef)
|
|
SbxVariable *pThisVar = PTR_CAST(SbxVariable, this);
|
|
sal_uInt16 nSlotId = pThisVar
|
|
? ( (sal_Int16) ( pThisVar->GetUserData() & 0xFFFF ) )
|
|
: 0;
|
|
DBG_ASSERT( nSlotId != 5345 || pThisVar->GetName() == UniString::CreateFromAscii( "Parent" ),
|
|
"SID_PARENTOBJECT heisst nicht 'Parent'" );
|
|
sal_Bool bParentProp = 5345 == nSlotId;
|
|
if ( !bParentProp )
|
|
aData.pObj->ReleaseRef();
|
|
}
|
|
break;
|
|
default: break;
|
|
}
|
|
// This works always, because the Float representations are 0 as well.
|
|
memset( &aData, 0, sizeof( SbxValues ) );
|
|
aData.eType = t;
|
|
}
|
|
}
|
|
return sal_True;
|
|
}
|
|
|
|
sal_Bool SbxValue::Convert( SbxDataType eTo )
|
|
{
|
|
eTo = SbxDataType( eTo & 0x0FFF );
|
|
if( ( aData.eType & 0x0FFF ) == eTo )
|
|
return sal_True;
|
|
if( !CanWrite() )
|
|
return sal_False;
|
|
if( eTo == SbxVARIANT )
|
|
{
|
|
// Trial to set the data type to Variant
|
|
ResetFlag( SBX_FIXED );
|
|
if( IsFixed() )
|
|
{
|
|
SetError( SbxERR_CONVERSION ); return sal_False;
|
|
}
|
|
else
|
|
return sal_True;
|
|
}
|
|
// Converting from zero doesn't work. Once zero, always zero!
|
|
if( aData.eType == SbxNULL )
|
|
{
|
|
SetError( SbxERR_CONVERSION ); return sal_False;
|
|
}
|
|
|
|
// Conversion of the data:
|
|
SbxValues aNew;
|
|
aNew.eType = eTo;
|
|
if( Get( aNew ) )
|
|
{
|
|
// The data type could be converted. It ends here with fixed elements,
|
|
// because the data had not to be taken over
|
|
if( !IsFixed() )
|
|
{
|
|
SetType( eTo );
|
|
Put( aNew );
|
|
SetModified( sal_True );
|
|
}
|
|
Broadcast( SBX_HINT_CONVERTED );
|
|
return sal_True;
|
|
}
|
|
else
|
|
return sal_False;
|
|
}
|
|
////////////////////////////////// Calculating /////////////////////////////////
|
|
|
|
sal_Bool SbxValue::Compute( SbxOperator eOp, const SbxValue& rOp )
|
|
{
|
|
bool bVBAInterop = SbiRuntime::isVBAEnabled();
|
|
|
|
SbxDataType eThisType = GetType();
|
|
SbxDataType eOpType = rOp.GetType();
|
|
SbxError eOld = GetError();
|
|
if( eOld != SbxERR_OK )
|
|
ResetError();
|
|
if( !CanWrite() )
|
|
SetError( SbxERR_PROP_READONLY );
|
|
else if( !rOp.CanRead() )
|
|
SetError( SbxERR_PROP_WRITEONLY );
|
|
// Special rule 1: If one operand is zero, the result is zero
|
|
else if( eThisType == SbxNULL || eOpType == SbxNULL )
|
|
SetType( SbxNULL );
|
|
// Special rule 2: If the operand is Empty, the result is the 2. operand
|
|
else if( eThisType == SbxEMPTY
|
|
&& !bVBAInterop
|
|
)
|
|
*this = rOp;
|
|
// 1996-2-13: Don't test already before Get upon SbxEMPTY
|
|
else
|
|
{
|
|
SbxValues aL, aR;
|
|
bool bDecimal = false;
|
|
if( bVBAInterop && ( ( eThisType == SbxSTRING && eOpType != SbxSTRING && eOpType != SbxEMPTY ) ||
|
|
( eThisType != SbxSTRING && eThisType != SbxEMPTY && eOpType == SbxSTRING ) ) &&
|
|
( eOp == SbxMUL || eOp == SbxDIV || eOp == SbxPLUS || eOp == SbxMINUS ) )
|
|
{
|
|
goto Lbl_OpIsDouble;
|
|
}
|
|
else if( eThisType == SbxSTRING || eOp == SbxCAT || ( bVBAInterop && ( eOpType == SbxSTRING ) && ( eOp == SbxPLUS ) ) )
|
|
{
|
|
if( eOp == SbxCAT || eOp == SbxPLUS )
|
|
{
|
|
// From 1999-11-5, keep OUString in mind
|
|
aL.eType = aR.eType = SbxSTRING;
|
|
rOp.Get( aR );
|
|
// From 1999-12-8, #70399: Here call GetType() again, Get() can change the type!
|
|
if( rOp.GetType() == SbxEMPTY )
|
|
goto Lbl_OpIsEmpty;
|
|
Get( aL );
|
|
|
|
// #30576: To begin with test, if the conversion worked
|
|
if( aL.pOUString != NULL && aR.pOUString != NULL )
|
|
{
|
|
*aL.pOUString += *aR.pOUString;
|
|
}
|
|
// Not even Left OK?
|
|
else if( aL.pOUString == NULL )
|
|
{
|
|
aL.pOUString = new ::rtl::OUString();
|
|
}
|
|
Put( aL );
|
|
}
|
|
else
|
|
SetError( SbxERR_CONVERSION );
|
|
}
|
|
else if( eOpType == SbxSTRING && rOp.IsFixed() )
|
|
{ // Numeric: there is no String allowed on the right side
|
|
SetError( SbxERR_CONVERSION );
|
|
// falls all the way out
|
|
}
|
|
else if( ( eOp >= SbxIDIV && eOp <= SbxNOT ) || eOp == SbxMOD )
|
|
{
|
|
if( GetType() == eOpType )
|
|
{
|
|
if( GetType() == SbxSALUINT64 || GetType() == SbxSALINT64
|
|
|| GetType() == SbxCURRENCY || GetType() == SbxULONG )
|
|
aL.eType = aR.eType = GetType();
|
|
else if ( bVBAInterop && eOpType == SbxBOOL )
|
|
aL.eType = aR.eType = SbxBOOL;
|
|
else
|
|
aL.eType = aR.eType = SbxLONG;
|
|
}
|
|
else
|
|
aL.eType = aR.eType = SbxLONG;
|
|
|
|
if( rOp.Get( aR ) ) // re-do Get after type assigns above
|
|
{
|
|
if( rOp.GetType() == SbxEMPTY )
|
|
{
|
|
if ( !bVBAInterop || ( bVBAInterop && ( eOp != SbxNOT ) ) )
|
|
goto Lbl_OpIsEmpty;
|
|
}
|
|
if( Get( aL ) ) switch( eOp )
|
|
{
|
|
case SbxIDIV:
|
|
if( aL.eType == SbxCURRENCY )
|
|
if( !aR.nInt64 ) SetError( SbxERR_ZERODIV );
|
|
else {
|
|
aL.nInt64 /= aR.nInt64;
|
|
aL.nInt64 *= CURRENCY_FACTOR;
|
|
}
|
|
else if( aL.eType == SbxSALUINT64 )
|
|
if( !aR.uInt64 ) SetError( SbxERR_ZERODIV );
|
|
else aL.uInt64 /= aR.uInt64;
|
|
else if( aL.eType == SbxSALINT64 )
|
|
if( !aR.nInt64 ) SetError( SbxERR_ZERODIV );
|
|
else aL.nInt64 /= aR.nInt64;
|
|
else if( aL.eType == SbxLONG )
|
|
if( !aR.nLong ) SetError( SbxERR_ZERODIV );
|
|
else aL.nLong /= aR.nLong;
|
|
else
|
|
if( !aR.nULong ) SetError( SbxERR_ZERODIV );
|
|
else aL.nULong /= aR.nULong;
|
|
break;
|
|
case SbxMOD:
|
|
if( aL.eType == SbxCURRENCY || aL.eType == SbxSALINT64 )
|
|
if( !aR.nInt64 ) SetError( SbxERR_ZERODIV );
|
|
else aL.nInt64 %= aR.nInt64;
|
|
else if( aL.eType == SbxSALUINT64 )
|
|
if( !aR.uInt64 ) SetError( SbxERR_ZERODIV );
|
|
else aL.uInt64 %= aR.uInt64;
|
|
else if( aL.eType == SbxLONG )
|
|
if( !aR.nLong ) SetError( SbxERR_ZERODIV );
|
|
else aL.nLong %= aR.nLong;
|
|
else
|
|
if( !aR.nULong ) SetError( SbxERR_ZERODIV );
|
|
else aL.nULong %= aR.nULong;
|
|
break;
|
|
case SbxAND:
|
|
if( aL.eType != SbxLONG && aL.eType != SbxULONG )
|
|
aL.nInt64 &= aR.nInt64;
|
|
else
|
|
aL.nLong &= aR.nLong;
|
|
break;
|
|
case SbxOR:
|
|
if( aL.eType != SbxLONG && aL.eType != SbxULONG )
|
|
aL.nInt64 |= aR.nInt64;
|
|
else
|
|
aL.nLong |= aR.nLong;
|
|
break;
|
|
case SbxXOR:
|
|
if( aL.eType != SbxLONG && aL.eType != SbxULONG )
|
|
aL.nInt64 ^= aR.nInt64;
|
|
else
|
|
aL.nLong ^= aR.nLong;
|
|
break;
|
|
case SbxEQV:
|
|
if( aL.eType != SbxLONG && aL.eType != SbxULONG )
|
|
aL.nInt64 = (aL.nInt64 & aR.nInt64) | (~aL.nInt64 & ~aR.nInt64);
|
|
else
|
|
aL.nLong = (aL.nLong & aR.nLong) | (~aL.nLong & ~aR.nLong);
|
|
break;
|
|
case SbxIMP:
|
|
if( aL.eType != SbxLONG && aL.eType != SbxULONG )
|
|
aL.nInt64 = ~aL.nInt64 | aR.nInt64;
|
|
else
|
|
aL.nLong = ~aL.nLong | aR.nLong;
|
|
break;
|
|
case SbxNOT:
|
|
if( aL.eType != SbxLONG && aL.eType != SbxULONG )
|
|
{
|
|
if ( aL.eType != SbxBOOL )
|
|
aL.nInt64 = ~aL.nInt64;
|
|
else
|
|
aL.nLong = ~aL.nLong;
|
|
}
|
|
else
|
|
aL.nLong = ~aL.nLong;
|
|
break;
|
|
default: break;
|
|
}
|
|
}
|
|
}
|
|
else if( ( GetType() == SbxDECIMAL || rOp.GetType() == SbxDECIMAL )
|
|
&& ( eOp == SbxMUL || eOp == SbxDIV || eOp == SbxPLUS || eOp == SbxMINUS || eOp == SbxNEG ) )
|
|
{
|
|
aL.eType = aR.eType = SbxDECIMAL;
|
|
bDecimal = true;
|
|
if( rOp.Get( aR ) )
|
|
{
|
|
if( rOp.GetType() == SbxEMPTY )
|
|
{
|
|
releaseDecimalPtr( aL.pDecimal );
|
|
goto Lbl_OpIsEmpty;
|
|
}
|
|
if( Get( aL ) )
|
|
{
|
|
if( aL.pDecimal && aR.pDecimal )
|
|
{
|
|
bool bOk = true;
|
|
switch( eOp )
|
|
{
|
|
case SbxMUL:
|
|
bOk = ( *(aL.pDecimal) *= *(aR.pDecimal) );
|
|
break;
|
|
case SbxDIV:
|
|
if( aR.pDecimal->isZero() )
|
|
SetError( SbxERR_ZERODIV );
|
|
else
|
|
bOk = ( *(aL.pDecimal) /= *(aR.pDecimal) );
|
|
break;
|
|
case SbxPLUS:
|
|
bOk = ( *(aL.pDecimal) += *(aR.pDecimal) );
|
|
break;
|
|
case SbxMINUS:
|
|
bOk = ( *(aL.pDecimal) -= *(aR.pDecimal) );
|
|
break;
|
|
case SbxNEG:
|
|
bOk = ( aL.pDecimal->neg() );
|
|
break;
|
|
default:
|
|
SetError( SbxERR_NOTIMP );
|
|
}
|
|
if( !bOk )
|
|
SetError( SbxERR_OVERFLOW );
|
|
}
|
|
else
|
|
{
|
|
SetError( SbxERR_CONVERSION );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
else if( GetType() == SbxCURRENCY || rOp.GetType() == SbxCURRENCY )
|
|
{
|
|
aL.eType = SbxCURRENCY;
|
|
aR.eType = SbxCURRENCY;
|
|
|
|
if( rOp.Get( aR ) )
|
|
{
|
|
if( rOp.GetType() == SbxEMPTY )
|
|
goto Lbl_OpIsEmpty;
|
|
|
|
if( Get( aL ) ) switch( eOp )
|
|
{
|
|
double dTest;
|
|
case SbxMUL:
|
|
// first overflow check: see if product will fit - test real value of product (hence 2 curr factors)
|
|
dTest = (double)aL.nInt64 * (double)aR.nInt64 / (double)CURRENCY_FACTOR_SQUARE;
|
|
if( dTest < SbxMINCURR || SbxMAXCURR < dTest)
|
|
{
|
|
aL.nInt64 = SAL_MAX_INT64;
|
|
if( dTest < SbxMINCURR ) aL.nInt64 = SAL_MIN_INT64;
|
|
SetError( SbxERR_OVERFLOW );
|
|
break;
|
|
}
|
|
// second overflow check: see if unscaled product overflows - if so use doubles
|
|
dTest = (double)aL.nInt64 * (double)aR.nInt64;
|
|
if( dTest < SAL_MIN_INT64 || SAL_MAX_INT64 < dTest)
|
|
{
|
|
aL.nInt64 = (sal_Int64)( dTest / (double)CURRENCY_FACTOR );
|
|
break;
|
|
}
|
|
// precise calc: multiply then scale back (move decimal pt)
|
|
aL.nInt64 *= aR.nInt64;
|
|
aL.nInt64 /= CURRENCY_FACTOR;
|
|
break;
|
|
|
|
case SbxDIV:
|
|
if( !aR.nInt64 )
|
|
{
|
|
SetError( SbxERR_ZERODIV );
|
|
break;
|
|
}
|
|
// first overflow check: see if quotient will fit - calc real value of quotient (curr factors cancel)
|
|
dTest = (double)aL.nInt64 / (double)aR.nInt64;
|
|
if( dTest < SbxMINCURR || SbxMAXCURR < dTest)
|
|
{
|
|
SetError( SbxERR_OVERFLOW );
|
|
break;
|
|
}
|
|
// second overflow check: see if scaled dividend overflows - if so use doubles
|
|
dTest = (double)aL.nInt64 * (double)CURRENCY_FACTOR;
|
|
if( dTest < SAL_MIN_INT64 || SAL_MAX_INT64 < dTest)
|
|
{
|
|
aL.nInt64 = (sal_Int64)(dTest / (double)aR.nInt64);
|
|
break;
|
|
}
|
|
// precise calc: scale (move decimal pt) then divide
|
|
aL.nInt64 *= CURRENCY_FACTOR;
|
|
aL.nInt64 /= aR.nInt64;
|
|
break;
|
|
|
|
case SbxPLUS:
|
|
dTest = ( (double)aL.nInt64 + (double)aR.nInt64 ) / (double)CURRENCY_FACTOR;
|
|
if( dTest < SbxMINCURR || SbxMAXCURR < dTest)
|
|
{
|
|
SetError( SbxERR_OVERFLOW );
|
|
break;
|
|
}
|
|
aL.nInt64 += aR.nInt64;
|
|
break;
|
|
|
|
case SbxMINUS:
|
|
dTest = ( (double)aL.nInt64 - (double)aR.nInt64 ) / (double)CURRENCY_FACTOR;
|
|
if( dTest < SbxMINCURR || SbxMAXCURR < dTest)
|
|
{
|
|
SetError( SbxERR_OVERFLOW );
|
|
break;
|
|
}
|
|
aL.nInt64 -= aR.nInt64;
|
|
break;
|
|
case SbxNEG:
|
|
aL.nInt64 = -aL.nInt64;
|
|
break;
|
|
default:
|
|
SetError( SbxERR_NOTIMP );
|
|
}
|
|
}
|
|
}
|
|
else
|
|
Lbl_OpIsDouble:
|
|
{ // other types and operators including Date, Double and Single
|
|
aL.eType = aR.eType = SbxDOUBLE;
|
|
if( rOp.Get( aR ) )
|
|
{
|
|
if( rOp.GetType() == SbxEMPTY )
|
|
{
|
|
if ( !bVBAInterop || ( bVBAInterop && ( eOp != SbxNEG ) ) )
|
|
goto Lbl_OpIsEmpty;
|
|
}
|
|
if( Get( aL ) )
|
|
{
|
|
switch( eOp )
|
|
{
|
|
case SbxEXP:
|
|
aL.nDouble = pow( aL.nDouble, aR.nDouble );
|
|
break;
|
|
case SbxMUL:
|
|
aL.nDouble *= aR.nDouble; break;
|
|
case SbxDIV:
|
|
if( !aR.nDouble ) SetError( SbxERR_ZERODIV );
|
|
else aL.nDouble /= aR.nDouble; break;
|
|
case SbxPLUS:
|
|
aL.nDouble += aR.nDouble; break;
|
|
// #45465 Date needs with "+" a special handling: forces date type
|
|
if( GetType() == SbxDATE || rOp.GetType() == SbxDATE )
|
|
aL.eType = SbxDATE;
|
|
case SbxMINUS:
|
|
aL.nDouble -= aR.nDouble; break;
|
|
case SbxNEG:
|
|
aL.nDouble = -aL.nDouble; break;
|
|
default:
|
|
SetError( SbxERR_NOTIMP );
|
|
}
|
|
|
|
}
|
|
}
|
|
|
|
}
|
|
if( !IsError() )
|
|
Put( aL );
|
|
if( bDecimal )
|
|
{
|
|
releaseDecimalPtr( aL.pDecimal );
|
|
releaseDecimalPtr( aR.pDecimal );
|
|
}
|
|
}
|
|
Lbl_OpIsEmpty:
|
|
|
|
sal_Bool bRes = sal_Bool( !IsError() );
|
|
if( bRes && eOld != SbxERR_OK )
|
|
SetError( eOld );
|
|
return bRes;
|
|
}
|
|
|
|
// The comparison routine deliver TRUE or FALSE.
|
|
|
|
sal_Bool SbxValue::Compare( SbxOperator eOp, const SbxValue& rOp ) const
|
|
{
|
|
bool bVBAInterop = SbiRuntime::isVBAEnabled();
|
|
|
|
sal_Bool bRes = sal_False;
|
|
SbxError eOld = GetError();
|
|
if( eOld != SbxERR_OK )
|
|
ResetError();
|
|
if( !CanRead() || !rOp.CanRead() )
|
|
SetError( SbxERR_PROP_WRITEONLY );
|
|
else if( GetType() == SbxNULL && rOp.GetType() == SbxNULL && !bVBAInterop )
|
|
{
|
|
bRes = sal_True;
|
|
}
|
|
else if( GetType() == SbxEMPTY && rOp.GetType() == SbxEMPTY )
|
|
bRes = !bVBAInterop ? sal_True : ( eOp == SbxEQ ? sal_True : sal_False );
|
|
// Special rule 1: If an operand is zero, the result is FALSE
|
|
else if( GetType() == SbxNULL || rOp.GetType() == SbxNULL )
|
|
bRes = sal_False;
|
|
// Special rule 2: If both are variant and one is numeric
|
|
// and the other is a String, num is < str
|
|
else if( !IsFixed() && !rOp.IsFixed()
|
|
&& ( rOp.GetType() == SbxSTRING && GetType() != SbxSTRING && IsNumeric() ) && !bVBAInterop
|
|
)
|
|
bRes = sal_Bool( eOp == SbxLT || eOp == SbxLE || eOp == SbxNE );
|
|
else if( !IsFixed() && !rOp.IsFixed()
|
|
&& ( GetType() == SbxSTRING && rOp.GetType() != SbxSTRING && rOp.IsNumeric() )
|
|
&& !bVBAInterop
|
|
)
|
|
bRes = sal_Bool( eOp == SbxGT || eOp == SbxGE || eOp == SbxNE );
|
|
else
|
|
{
|
|
SbxValues aL, aR;
|
|
// If one of the operands is a String,
|
|
// a String comparing take place
|
|
if( GetType() == SbxSTRING || rOp.GetType() == SbxSTRING )
|
|
{
|
|
aL.eType = aR.eType = SbxSTRING;
|
|
if( Get( aL ) && rOp.Get( aR ) ) switch( eOp )
|
|
{
|
|
case SbxEQ:
|
|
bRes = sal_Bool( *aL.pOUString == *aR.pOUString ); break;
|
|
case SbxNE:
|
|
bRes = sal_Bool( *aL.pOUString != *aR.pOUString ); break;
|
|
case SbxLT:
|
|
bRes = sal_Bool( *aL.pOUString < *aR.pOUString ); break;
|
|
case SbxGT:
|
|
bRes = sal_Bool( *aL.pOUString > *aR.pOUString ); break;
|
|
case SbxLE:
|
|
bRes = sal_Bool( *aL.pOUString <= *aR.pOUString ); break;
|
|
case SbxGE:
|
|
bRes = sal_Bool( *aL.pOUString >= *aR.pOUString ); break;
|
|
default:
|
|
SetError( SbxERR_NOTIMP );
|
|
}
|
|
}
|
|
// From 1995-12-19: If SbxSINGLE participate, then convert to SINGLE,
|
|
// elsewise it shows a numeric error
|
|
else if( GetType() == SbxSINGLE || rOp.GetType() == SbxSINGLE )
|
|
{
|
|
aL.eType = aR.eType = SbxSINGLE;
|
|
if( Get( aL ) && rOp.Get( aR ) )
|
|
switch( eOp )
|
|
{
|
|
case SbxEQ:
|
|
bRes = sal_Bool( aL.nSingle == aR.nSingle ); break;
|
|
case SbxNE:
|
|
bRes = sal_Bool( aL.nSingle != aR.nSingle ); break;
|
|
case SbxLT:
|
|
bRes = sal_Bool( aL.nSingle < aR.nSingle ); break;
|
|
case SbxGT:
|
|
bRes = sal_Bool( aL.nSingle > aR.nSingle ); break;
|
|
case SbxLE:
|
|
bRes = sal_Bool( aL.nSingle <= aR.nSingle ); break;
|
|
case SbxGE:
|
|
bRes = sal_Bool( aL.nSingle >= aR.nSingle ); break;
|
|
default:
|
|
SetError( SbxERR_NOTIMP );
|
|
}
|
|
}
|
|
else if( GetType() == SbxDECIMAL && rOp.GetType() == SbxDECIMAL )
|
|
{
|
|
aL.eType = aR.eType = SbxDECIMAL;
|
|
Get( aL );
|
|
rOp.Get( aR );
|
|
if( aL.pDecimal && aR.pDecimal )
|
|
{
|
|
SbxDecimal::CmpResult eRes = compare( *aL.pDecimal, *aR.pDecimal );
|
|
switch( eOp )
|
|
{
|
|
case SbxEQ:
|
|
bRes = sal_Bool( eRes == SbxDecimal::EQ ); break;
|
|
case SbxNE:
|
|
bRes = sal_Bool( eRes != SbxDecimal::EQ ); break;
|
|
case SbxLT:
|
|
bRes = sal_Bool( eRes == SbxDecimal::LT ); break;
|
|
case SbxGT:
|
|
bRes = sal_Bool( eRes == SbxDecimal::GT ); break;
|
|
case SbxLE:
|
|
bRes = sal_Bool( eRes != SbxDecimal::GT ); break;
|
|
case SbxGE:
|
|
bRes = sal_Bool( eRes != SbxDecimal::LT ); break;
|
|
default:
|
|
SetError( SbxERR_NOTIMP );
|
|
}
|
|
}
|
|
else
|
|
{
|
|
SetError( SbxERR_CONVERSION );
|
|
}
|
|
releaseDecimalPtr( aL.pDecimal );
|
|
releaseDecimalPtr( aR.pDecimal );
|
|
}
|
|
// Everything else comparing on a SbxDOUBLE-Basis
|
|
else
|
|
{
|
|
aL.eType = aR.eType = SbxDOUBLE;
|
|
//if( Get( aL ) && rOp.Get( aR ) )
|
|
bool bGetL = Get( aL );
|
|
bool bGetR = rOp.Get( aR );
|
|
if( bGetL && bGetR )
|
|
switch( eOp )
|
|
{
|
|
case SbxEQ:
|
|
bRes = sal_Bool( aL.nDouble == aR.nDouble ); break;
|
|
case SbxNE:
|
|
bRes = sal_Bool( aL.nDouble != aR.nDouble ); break;
|
|
case SbxLT:
|
|
bRes = sal_Bool( aL.nDouble < aR.nDouble ); break;
|
|
case SbxGT:
|
|
bRes = sal_Bool( aL.nDouble > aR.nDouble ); break;
|
|
case SbxLE:
|
|
bRes = sal_Bool( aL.nDouble <= aR.nDouble ); break;
|
|
case SbxGE:
|
|
bRes = sal_Bool( aL.nDouble >= aR.nDouble ); break;
|
|
default:
|
|
SetError( SbxERR_NOTIMP );
|
|
}
|
|
// at least one value was got
|
|
// if this is VBA then a conversion error for one
|
|
// side will yield a false result of an equality test
|
|
else if ( bGetR || bGetL )
|
|
{
|
|
if ( bVBAInterop && eOp == SbxEQ && GetError() == SbxERR_CONVERSION )
|
|
{
|
|
ResetError();
|
|
bRes = sal_False;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
if( eOld != SbxERR_OK )
|
|
SetError( eOld );
|
|
return bRes;
|
|
}
|
|
|
|
///////////////////////////// Reading/Writing ////////////////////////////
|
|
|
|
sal_Bool SbxValue::LoadData( SvStream& r, sal_uInt16 )
|
|
{
|
|
// #TODO see if these types are really dumped to any stream
|
|
// more than likely this is functionality used in the binfilter alone
|
|
SbxValue::Clear();
|
|
sal_uInt16 nType;
|
|
r >> nType;
|
|
aData.eType = SbxDataType( nType );
|
|
switch( nType )
|
|
{
|
|
case SbxBOOL:
|
|
case SbxINTEGER:
|
|
r >> aData.nInteger; break;
|
|
case SbxLONG:
|
|
r >> aData.nLong; break;
|
|
case SbxSINGLE:
|
|
{
|
|
// Floats as ASCII
|
|
XubString aVal;
|
|
r.ReadByteString( aVal, RTL_TEXTENCODING_ASCII_US );
|
|
double d;
|
|
SbxDataType t;
|
|
if( ImpScan( aVal, d, t, NULL ) != SbxERR_OK || t == SbxDOUBLE )
|
|
{
|
|
aData.nSingle = 0.0F;
|
|
return sal_False;
|
|
}
|
|
aData.nSingle = (float) d;
|
|
break;
|
|
}
|
|
case SbxDATE:
|
|
case SbxDOUBLE:
|
|
{
|
|
// Floats as ASCII
|
|
XubString aVal;
|
|
r.ReadByteString( aVal, RTL_TEXTENCODING_ASCII_US );
|
|
SbxDataType t;
|
|
if( ImpScan( aVal, aData.nDouble, t, NULL ) != SbxERR_OK )
|
|
{
|
|
aData.nDouble = 0.0;
|
|
return sal_False;
|
|
}
|
|
break;
|
|
}
|
|
case SbxSALUINT64:
|
|
case SbxSALINT64:
|
|
// Rather ugly use of the union here because we only
|
|
// have a SvStream& SvStream::operator>>(sal_uInt64&) available to us
|
|
// There is no SvStream::operator>>(sal_Int64&) due to conflict with
|
|
// SvStream::operator>>(long&) ( at least on 64 bit linux )
|
|
r >> aData.uInt64;
|
|
break;
|
|
case SbxCURRENCY:
|
|
{
|
|
sal_uInt32 tmpHi = 0;
|
|
sal_uInt32 tmpLo = 0;
|
|
r >> tmpHi >> tmpLo;
|
|
aData.nInt64 = ((sal_Int64)tmpHi << 32);
|
|
aData.nInt64 |= (sal_Int64)tmpLo;
|
|
break;
|
|
}
|
|
case SbxSTRING:
|
|
{
|
|
XubString aVal;
|
|
r.ReadByteString( aVal, RTL_TEXTENCODING_ASCII_US );
|
|
if( aVal.Len() )
|
|
aData.pOUString = new ::rtl::OUString( aVal );
|
|
else
|
|
aData.pOUString = NULL; // JSM 1995-09-22
|
|
break;
|
|
}
|
|
case SbxERROR:
|
|
case SbxUSHORT:
|
|
r >> aData.nUShort; break;
|
|
case SbxOBJECT:
|
|
{
|
|
sal_uInt8 nMode;
|
|
r >> nMode;
|
|
switch( nMode )
|
|
{
|
|
case 0:
|
|
aData.pObj = NULL;
|
|
break;
|
|
case 1:
|
|
aData.pObj = SbxBase::Load( r );
|
|
return sal_Bool( aData.pObj != NULL );
|
|
case 2:
|
|
aData.pObj = this;
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
case SbxCHAR:
|
|
{
|
|
char c;
|
|
r >> c;
|
|
aData.nChar = c;
|
|
break;
|
|
}
|
|
case SbxBYTE:
|
|
r >> aData.nByte; break;
|
|
case SbxULONG:
|
|
r >> aData.nULong; break;
|
|
case SbxINT:
|
|
{
|
|
sal_uInt8 n;
|
|
r >> n;
|
|
// Match the Int on this system?
|
|
if( n > SAL_TYPES_SIZEOFINT )
|
|
r >> aData.nLong, aData.eType = SbxLONG;
|
|
else
|
|
r >> aData.nInt;
|
|
break;
|
|
}
|
|
case SbxUINT:
|
|
{
|
|
sal_uInt8 n;
|
|
r >> n;
|
|
// Match the UInt on this system?
|
|
if( n > SAL_TYPES_SIZEOFINT )
|
|
r >> aData.nULong, aData.eType = SbxULONG;
|
|
else
|
|
r >> (sal_uInt32&)aData.nUInt;
|
|
break;
|
|
}
|
|
case SbxEMPTY:
|
|
case SbxNULL:
|
|
case SbxVOID:
|
|
break;
|
|
case SbxDATAOBJECT:
|
|
r >> aData.nLong;
|
|
break;
|
|
// #78919 For backwards compatibility
|
|
case SbxWSTRING:
|
|
case SbxWCHAR:
|
|
break;
|
|
default:
|
|
memset (&aData,0,sizeof(aData));
|
|
ResetFlag(SBX_FIXED);
|
|
aData.eType = SbxNULL;
|
|
DBG_ASSERT( !this, "Nicht unterstuetzer Datentyp geladen" );
|
|
return sal_False;
|
|
}
|
|
return sal_True;
|
|
}
|
|
|
|
sal_Bool SbxValue::StoreData( SvStream& r ) const
|
|
{
|
|
sal_uInt16 nType = sal::static_int_cast< sal_uInt16 >(aData.eType);
|
|
r << nType;
|
|
switch( nType & 0x0FFF )
|
|
{
|
|
case SbxBOOL:
|
|
case SbxINTEGER:
|
|
r << aData.nInteger; break;
|
|
case SbxLONG:
|
|
r << aData.nLong; break;
|
|
case SbxDATE:
|
|
// #49935: Save as double, elsewise an error during the read in
|
|
((SbxValue*)this)->aData.eType = (SbxDataType)( ( nType & 0xF000 ) | SbxDOUBLE );
|
|
r.WriteByteString( GetCoreString(), RTL_TEXTENCODING_ASCII_US );
|
|
((SbxValue*)this)->aData.eType = (SbxDataType)nType;
|
|
break;
|
|
case SbxSINGLE:
|
|
case SbxDOUBLE:
|
|
r.WriteByteString( GetCoreString(), RTL_TEXTENCODING_ASCII_US );
|
|
break;
|
|
case SbxSALUINT64:
|
|
case SbxSALINT64:
|
|
// see comment in SbxValue::StoreData
|
|
r << aData.uInt64;
|
|
break;
|
|
case SbxCURRENCY:
|
|
{
|
|
sal_Int32 tmpHi = ( (aData.nInt64 >> 32) & 0xFFFFFFFF );
|
|
sal_Int32 tmpLo = ( sal_Int32 )aData.nInt64;
|
|
r << tmpHi << tmpLo;
|
|
break;
|
|
}
|
|
case SbxSTRING:
|
|
if( aData.pOUString )
|
|
{
|
|
r.WriteByteString( *aData.pOUString, RTL_TEXTENCODING_ASCII_US );
|
|
}
|
|
else
|
|
{
|
|
String aEmpty;
|
|
r.WriteByteString( aEmpty, RTL_TEXTENCODING_ASCII_US );
|
|
}
|
|
break;
|
|
case SbxERROR:
|
|
case SbxUSHORT:
|
|
r << aData.nUShort; break;
|
|
case SbxOBJECT:
|
|
// to save itself as Objektptr doesn't work!
|
|
if( aData.pObj )
|
|
{
|
|
if( PTR_CAST(SbxValue,aData.pObj) != this )
|
|
{
|
|
r << (sal_uInt8) 1;
|
|
return aData.pObj->Store( r );
|
|
}
|
|
else
|
|
r << (sal_uInt8) 2;
|
|
}
|
|
else
|
|
r << (sal_uInt8) 0;
|
|
break;
|
|
case SbxCHAR:
|
|
{
|
|
char c = sal::static_int_cast< char >(aData.nChar);
|
|
r << c;
|
|
break;
|
|
}
|
|
case SbxBYTE:
|
|
r << aData.nByte; break;
|
|
case SbxULONG:
|
|
r << aData.nULong; break;
|
|
case SbxINT:
|
|
{
|
|
sal_uInt8 n = SAL_TYPES_SIZEOFINT;
|
|
r << n << (sal_Int32)aData.nInt;
|
|
break;
|
|
}
|
|
case SbxUINT:
|
|
{
|
|
sal_uInt8 n = SAL_TYPES_SIZEOFINT;
|
|
r << n << (sal_uInt32)aData.nUInt;
|
|
break;
|
|
}
|
|
case SbxEMPTY:
|
|
case SbxNULL:
|
|
case SbxVOID:
|
|
break;
|
|
case SbxDATAOBJECT:
|
|
r << aData.nLong;
|
|
break;
|
|
// #78919 For backwards compatibility
|
|
case SbxWSTRING:
|
|
case SbxWCHAR:
|
|
break;
|
|
default:
|
|
DBG_ASSERT( !this, "Speichern eines nicht unterstuetzten Datentyps" );
|
|
return sal_False;
|
|
}
|
|
return sal_True;
|
|
}
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|