Adding upstream version 1:7.0.4.upstream/1%7.0.4upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 213 insertions, 0 deletions

diff --git a/include/basic/sbx.hxx b/include/basic/sbx.hxx
new file mode 100644
index 000000000..0390d421c
--- /dev/null
+++ b/include/basic/sbx.hxx
@@ -0,0 +1,213 @@
+/* -*- 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 .
+ */
+
+#ifndef INCLUDED_BASIC_SBX_HXX
+#define INCLUDED_BASIC_SBX_HXX
+
+#include <config_options.h>
+#include <tools/ref.hxx>
+#include <svl/hint.hxx>
+
+#include <basic/sbxdef.hxx>
+#include <basic/sbxobj.hxx>
+#include <basic/basicdllapi.h>
+
+#include <vector>
+#include <memory>
+
+class SvStream;
+
+class SfxBroadcaster;
+
+// Parameter information
+struct SbxParamInfo
+{
+    const OUString aName;          // Name of the parameter
+    SbxDataType    eType;          // Data type
+    SbxFlagBits    nFlags;         // Flag-Bits
+    sal_uInt32     nUserData;      // IDs etc.
+    SbxParamInfo( const OUString& s, SbxDataType t, SbxFlagBits n )
+        : aName( s ), eType( t ), nFlags( n ), nUserData( 0 ) {}
+};
+
+typedef std::vector<std::unique_ptr<SbxParamInfo>> SbxParams;
+
+class UNLESS_MERGELIBS(BASIC_DLLPUBLIC) SbxInfo : public SvRefBase
+{
+    friend class SbxVariable;
+    friend class SbMethod;
+
+    OUString        aComment;
+    OUString        aHelpFile;
+    sal_uInt32      nHelpId;
+    SbxParams       m_Params;
+
+    SbxInfo(SbxInfo const&) = delete;
+    void operator=(SbxInfo const&) = delete;
+
+protected:
+    void LoadData( SvStream&, sal_uInt16 );
+    void StoreData( SvStream& ) const;
+    virtual ~SbxInfo() override;
+public:
+    SbxInfo();
+    SbxInfo( const OUString&, sal_uInt32 );
+
+    void                AddParam( const OUString&, SbxDataType, SbxFlagBits=SbxFlagBits::Read );
+    const SbxParamInfo* GetParam( sal_uInt16 n ) const; // index starts with 1!
+    const OUString&     GetComment() const              { return aComment; }
+    const OUString&     GetHelpFile() const             { return aHelpFile; }
+    sal_uInt32          GetHelpId() const               { return nHelpId;   }
+
+    void                SetComment( const OUString& r )   { aComment = r; }
+};
+
+class BASIC_DLLPUBLIC SbxHint final : public SfxHint
+{
+    SbxVariable* pVar;
+public:
+    SbxHint( SfxHintId n, SbxVariable* v ) : SfxHint( n ), pVar( v ) {}
+    SbxVariable* GetVar() const { return pVar; }
+};
+
+// SbxArray is an unidimensional, dynamic Array
+// The variables convert from SbxVariablen. Put()/Insert() into the
+// declared datatype, if they are not SbxVARIANT.
+
+struct SbxVarEntry;
+
+class BASIC_DLLPUBLIC SbxArray : public SbxBase
+{
+// #100883 Method to set method directly to parameter array
+    friend class SbMethod;
+    friend class SbClassModuleObject;
+    friend SbxObject* cloneTypeObjectImpl( const SbxObject& rTypeObj );
+    BASIC_DLLPRIVATE void PutDirect( SbxVariable* pVar, sal_uInt32 nIdx );
+
+    std::vector<SbxVarEntry> mVarEntries;          // The variables
+    SbxDataType eType;            // Data type of the array
+
+protected:
+    virtual ~SbxArray() override;
+    virtual bool LoadData( SvStream&, sal_uInt16 ) override;
+    virtual bool StoreData( SvStream& ) const override;
+
+public:
+    SBX_DECL_PERSIST_NODATA(SBXID_ARRAY,1);
+    SbxArray( SbxDataType=SbxVARIANT );
+    SbxArray( const SbxArray& ) = delete;
+    SbxArray& operator=( const SbxArray& );
+    virtual void Clear() override;
+    sal_uInt32           Count32() const;
+    virtual SbxDataType  GetType() const override;
+    SbxVariableRef&      GetRef32( sal_uInt32 );
+    SbxVariable*         Get32( sal_uInt32 );
+    void                 Put32( SbxVariable*, sal_uInt32 );
+    void                 Insert32( SbxVariable*, sal_uInt32 );
+    void                 Remove( sal_uInt32 );
+    void                 Remove( SbxVariable const * );
+    void                 Merge( SbxArray* );
+    OUString             GetAlias32( sal_uInt32 );
+    void                 PutAlias32( const OUString&, sal_uInt32 );
+    SbxVariable* Find( const OUString&, SbxClassType );
+};
+
+// SbxDimArray is an array that can dimensioned using BASIC conventions.
+struct SbxDim {                 // an array-dimension:
+    sal_Int32 nLbound, nUbound; // Limitations
+    sal_Int32 nSize;            // Number of elements
+};
+
+class BASIC_DLLPUBLIC SbxDimArray final : public SbxArray
+{
+    std::vector<SbxDim> m_vDimensions;     // Dimension table
+    BASIC_DLLPRIVATE void AddDimImpl32( sal_Int32, sal_Int32, bool bAllowSize0 );
+    bool mbHasFixedSize;
+
+    sal_uInt32  Offset32( const sal_Int32* );
+    sal_uInt32  Offset32( SbxArray* );
+    virtual bool LoadData( SvStream&, sal_uInt16 ) override;
+    virtual bool StoreData( SvStream& ) const override;
+    virtual ~SbxDimArray() override;
+public:
+    SBX_DECL_PERSIST_NODATA(SBXID_DIMARRAY,1);
+    SbxDimArray( SbxDataType=SbxVARIANT );
+    SbxDimArray( const SbxDimArray& ) = delete;
+    SbxDimArray& operator=( const SbxDimArray& );
+    virtual void Clear() override;
+    SbxVariable* Get( SbxArray* );
+
+    using SbxArray::GetRef32;
+    using SbxArray::Get32;
+    SbxVariable* Get32( const sal_Int32* );
+    using SbxArray::Put32;
+    void Put32( SbxVariable*, const sal_Int32* );
+    sal_Int32 GetDims32() const { return m_vDimensions.size(); }
+    void   AddDim32( sal_Int32, sal_Int32 );
+    void   unoAddDim32( sal_Int32, sal_Int32 );
+    bool   GetDim32( sal_Int32, sal_Int32&, sal_Int32& ) const;
+    bool hasFixedSize() const { return mbHasFixedSize; };
+    void setHasFixedSize( bool bHasFixedSize ) {mbHasFixedSize = bHasFixedSize; };
+};
+
+class SbxCollection : public SbxObject
+{
+    void Initialize();
+protected:
+    virtual ~SbxCollection() override;
+    virtual bool LoadData( SvStream&, sal_uInt16 ) override;
+    virtual void Notify( SfxBroadcaster& rBC, const SfxHint& rHint ) override;
+    // Overridable methods (why not pure virtual?):
+    virtual void CollAdd( SbxArray* pPar );
+    void CollItem( SbxArray* pPar );
+    virtual void CollRemove( SbxArray* pPar );
+
+public:
+    SBX_DECL_PERSIST_NODATA(SBXID_COLLECTION,1);
+    SbxCollection();
+    SbxCollection( const SbxCollection& );
+    SbxCollection& operator=( const SbxCollection& );
+    virtual SbxVariable* Find( const OUString&, SbxClassType ) override;
+    virtual void Clear() override;
+};
+
+class SbxStdCollection final : public SbxCollection
+{
+    OUString aElemClass;
+    bool bAddRemoveOk;
+    virtual ~SbxStdCollection() override;
+    virtual bool LoadData( SvStream&, sal_uInt16 ) override;
+    virtual bool StoreData( SvStream& ) const override;
+    virtual void CollAdd( SbxArray* pPar ) override;
+    virtual void CollRemove( SbxArray* pPar ) override;
+public:
+    SBX_DECL_PERSIST_NODATA(SBXID_FIXCOLLECTION,1);
+    SbxStdCollection();
+    SbxStdCollection( const SbxStdCollection& );
+    SbxStdCollection& operator=( const SbxStdCollection& );
+    virtual void Insert( SbxVariable* ) override;
+};
+
+typedef tools::SvRef<SbxArray> SbxArrayRef;
+typedef tools::SvRef<SbxInfo> SbxInfoRef;
+typedef tools::SvRef<SbxDimArray> SbxDimArrayRef;
+
+#endif
+
+/* vim:set shiftwidth=4 softtabstop=4 expandtab: */