/************************************************************** * * 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 * * Unless required by applicable law or agreed to in writing, * software distributed under the License is distributed on an * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY * KIND, either express or implied. See the License for the * specific language governing permissions and limitations * under the License. * *************************************************************/ #ifndef _SBXDEF_HXX #define _SBXDEF_HXX #ifndef __RSC #ifndef _SOLAR_H #include #endif #include "tools/errcode.hxx" #ifndef _SBX_CLASS_TYPE #define _SBX_CLASS_TYPE enum SbxClassType { // SBX-class-IDs (order is important!) SbxCLASS_DONTCARE = 1, // don't care (search, not 0 due to StarBASIC) SbxCLASS_ARRAY, // Array of SbxVariables SbxCLASS_VALUE, // simple value SbxCLASS_VARIABLE, // Variable (from here there is Broadcaster) SbxCLASS_METHOD, // Method (Function or Sub) SbxCLASS_PROPERTY, // Property SbxCLASS_OBJECT // Object }; #endif #ifndef _SBX_DATA_TYPE #define _SBX_DATA_TYPE enum SbxDataType { SbxEMPTY = 0, // * Uninitialized SbxNULL = 1, // * Contains no valid data SbxINTEGER = 2, // * Integer (sal_Int16) SbxLONG = 3, // * Long integer (sal_Int32) SbxSINGLE = 4, // * Single-precision floating point number (float) SbxDOUBLE = 5, // * Double-precision floating point number (double) SbxCURRENCY = 6, // Currency (sal_Int64) SbxDATE = 7, // * Date (double) SbxSTRING = 8, // * String (StarView) SbxOBJECT = 9, // * SbxBase object pointer SbxERROR = 10, // * Error (sal_uInt16) SbxBOOL = 11, // * Boolean (0 or -1) SbxVARIANT = 12, // * Anzeige fuer varianten Datentyp SbxDATAOBJECT = 13, // * Common data object w/o ref count SbxCHAR = 16, // * signed char SbxBYTE = 17, // * unsigned char SbxUSHORT = 18, // * unsigned short (sal_uInt16) SbxULONG = 19, // * unsigned long (sal_uInt32) SbxLONG64 = 20, // signed 64-bit int SbxULONG64 = 21, // unsigned 64-bit int SbxINT = 22, // * signed machine-dependent int SbxUINT = 23, // * unsigned machine-dependent int SbxVOID = 24, // * no value (= SbxEMPTY) SbxHRESULT = 25, // HRESULT SbxPOINTER = 26, // generic pointer SbxDIMARRAY = 27, // dimensioned array SbxCARRAY = 28, // C style array SbxUSERDEF = 29, // user defined SbxLPSTR = 30, // * null terminated string SbxLPWSTR = 31, // wide null terminated string SbxCoreSTRING = 32, // AB 10.4.97, fuer GetCoreString(), nur zum Konvertieren SbxWSTRING = 33, // AB 4.10.2000 Reimplemented for backwards compatibility (#78919) SbxWCHAR = 34, // AB 4.10.2000 Reimplemented for backwards compatibility (#78919) SbxSALINT64 = 35, // for UNO hyper SbxSALUINT64 = 36, // for UNO unsigned hyper SbxDECIMAL = 37, // for UNO/automation Decimal SbxVECTOR = 0x1000, // simple counted array SbxARRAY = 0x2000, // array SbxBYREF = 0x4000, // access by reference SbxSV1 = 128, // first defined data type for StarView SbxMEMORYSTREAM, // SvMemoryStream SbxSTORAGE, // SvStorage SbxUSER1 = 256, // first user defined data type SbxUSERn = 2047 // last user defined data type }; const sal_uInt32 SBX_TYPE_WITH_EVENTS_FLAG = 0x10000; const sal_uInt32 SBX_TYPE_DIM_AS_NEW_FLAG = 0x20000; const sal_uInt32 SBX_FIXED_LEN_STRING_FLAG = 0x10000; // same value as above as no conflict possible const sal_uInt32 SBX_TYPE_VAR_TO_DIM_FLAG = 0x40000; #endif #ifndef _SBX_OPERATOR #define _SBX_OPERATOR enum SbxOperator { // Arithmetical: SbxEXP, // this ^ var SbxMUL, // this * var SbxDIV, // this / var SbxMOD, // this MOD var SbxPLUS, // this + var SbxMINUS, // this - var SbxNEG, // -this (var is ignored) SbxIDIV, // this / var (both operands max. sal_Int32!) // Boolean operators (max sal_Int32!): SbxAND, // this & var SbxOR, // this | var SbxXOR, // this ^ var SbxEQV, // ~this ^ var SbxIMP, // ~this | var SbxNOT, // ~this (var is ignored) // String-concat: SbxCAT, // this & var // Comparisons: SbxEQ, // this = var SbxNE, // this <> var SbxLT, // this < var SbxGT, // this > var SbxLE, // this <= var SbxGE // this >= var }; #endif #ifndef _SBX_NAME_TYPE #define _SBX_NAME_TYPE enum SbxNameType { // Type of the questioned name of a variable SbxNAME_NONE, // plain name SbxNAME_SHORT, // Name(A,B) SbxNAME_SHORT_TYPES, // Name%(A%,B$) SbxNAME_LONG_TYPES // Name(A As Integer, B As String) As Integer }; #endif // AB: 20.3.96: New error messages typedef sal_uIntPtr SbxError; // Preserve old type #endif // von #ifndef __RSC // New error codes per define #define ERRCODE_SBX_OK ERRCODE_NONE // processed #define ERRCODE_SBX_SYNTAX (1UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_COMPILER) // Syntaxerror in parser (where else could syntax errors happen? ;-) #define ERRCODE_SBX_NOTIMP (2UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_NOTSUPPORTED) // not possible #define ERRCODE_SBX_OVERFLOW (3UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_SBX) // overflow #define ERRCODE_SBX_BOUNDS (4UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_SBX) // Invalid array index #define ERRCODE_SBX_ZERODIV (5UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_SBX) // Division by zero #define ERRCODE_SBX_CONVERSION (6UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_SBX) // wrong data type #define ERRCODE_SBX_BAD_PARAMETER (7UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // invalid Parameter #define ERRCODE_SBX_PROC_UNDEFINED (8UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // BASIC-Sub or Function undefined #define ERRCODE_SBX_ERROR (9UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_UNKNOWN) // other object-related error #define ERRCODE_SBX_NO_OBJECT (10UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // Object variable unassigned #define ERRCODE_SBX_CANNOT_LOAD (11UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_CREATE) // Object cannot be loaded or initialized #define ERRCODE_SBX_BAD_INDEX (12UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_SBX) // Invalid object index #define ERRCODE_SBX_NO_ACTIVE_OBJECT (13UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_ACCESS) // Object ist not activated #define ERRCODE_SBX_BAD_PROP_VALUE (14UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // Bad property value #define ERRCODE_SBX_PROP_READONLY (15UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_READ) // Property is read only #define ERRCODE_SBX_PROP_WRITEONLY (16UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_WRITE) // Property is write only #define ERRCODE_SBX_INVALID_OBJECT (17UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_ACCESS) // Invalid object reference #define ERRCODE_SBX_NO_METHOD (18UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // Property oder Methode unbekannt #define ERRCODE_SBX_INVALID_USAGE_OBJECT (19UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_ACCESS) // Invalid object usage #define ERRCODE_SBX_NO_OLE (20UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_ACCESS) // No OLE-Object #define ERRCODE_SBX_BAD_METHOD (21UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // Method not supported #define ERRCODE_SBX_OLE_ERROR (22UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // OLE Automation Error #define ERRCODE_SBX_BAD_ACTION (23UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_NOTSUPPORTED) // Action not supported #define ERRCODE_SBX_NO_NAMED_ARGS (24UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // No named arguments #define ERRCODE_SBX_BAD_LOCALE (25UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_NOTSUPPORTED) // Locale settings not supported #define ERRCODE_SBX_NAMED_NOT_FOUND (26UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // Unknown named argument #define ERRCODE_SBX_NOT_OPTIONAL (27UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // Argument not optional #define ERRCODE_SBX_WRONG_ARGS (28UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_SBX) // Invalid number of arguments #define ERRCODE_SBX_NOT_A_COLL (29UL | ERRCODE_AREA_SBX | \ ERRCODE_CLASS_RUNTIME) // Object contains no elements #define LAST_SBX_ERROR_ID 29UL // Less important for resources #ifndef __RSC // Map old codes to new ones #define SbxERR_OK ERRCODE_SBX_OK #define SbxERR_SYNTAX ERRCODE_SBX_SYNTAX #define SbxERR_NOTIMP ERRCODE_SBX_NOTIMP #define SbxERR_OVERFLOW ERRCODE_SBX_OVERFLOW #define SbxERR_BOUNDS ERRCODE_SBX_BOUNDS #define SbxERR_ZERODIV ERRCODE_SBX_ZERODIV #define SbxERR_CONVERSION ERRCODE_SBX_CONVERSION #define SbxERR_BAD_PARAMETER ERRCODE_SBX_BAD_PARAMETER #define SbxERR_PROC_UNDEFINED ERRCODE_SBX_PROC_UNDEFINED #define SbxERR_ERROR ERRCODE_SBX_ERROR #define SbxERR_NO_OBJECT ERRCODE_SBX_NO_OBJECT #define SbxERR_CANNOT_LOAD ERRCODE_SBX_CANNOT_LOAD #define SbxERR_BAD_INDEX ERRCODE_SBX_BAD_INDEX #define SbxERR_NO_ACTIVE_OBJECT ERRCODE_SBX_NO_ACTIVE_OBJECT #define SbxERR_BAD_PROP_VALUE ERRCODE_SBX_BAD_PROP_VALUE #define SbxERR_PROP_READONLY ERRCODE_SBX_PROP_READONLY #define SbxERR_PROP_WRITEONLY ERRCODE_SBX_PROP_WRITEONLY #define SbxERR_INVALID_OBJECT ERRCODE_SBX_INVALID_OBJECT #define SbxERR_NO_METHOD ERRCODE_SBX_NO_METHOD #define SbxERR_INVALID_USAGE_OBJECT ERRCODE_SBX_INVALID_USAGE_OBJECT #define SbxERR_NO_OLE ERRCODE_SBX_NO_OLE #define SbxERR_BAD_METHOD ERRCODE_SBX_BAD_METHOD #define SbxERR_OLE_ERROR ERRCODE_SBX_OLE_ERROR #define SbxERR_BAD_ACTION ERRCODE_SBX_BAD_ACTION #define SbxERR_NO_NAMED_ARGS ERRCODE_SBX_NO_NAMED_ARGS #define SbxERR_BAD_LOCALE ERRCODE_SBX_BAD_LOCALE #define SbxERR_NAMED_NOT_FOUND ERRCODE_SBX_NAMED_NOT_FOUND #define SbxERR_NOT_OPTIONAL ERRCODE_SBX_NOT_OPTIONAL #define SbxERR_WRONG_ARGS ERRCODE_SBX_WRONG_ARGS #define SbxERR_NOT_A_COLL ERRCODE_SBX_NOT_A_COLL /* Old codes with VB error codes enum SbxError { // Ergebnis einer Rechenoperation/Konversion SbxERR_OK = 0, // durchgefuehrt SbxERR_SYNTAX = 2, // Syntaxfehler im Parser SbxERR_NOTIMP = 5, // nicht moeglich SbxERR_OVERFLOW = 6, // Ueberlauf SbxERR_BOUNDS = 9, // Array-Index ungueltig SbxERR_ZERODIV = 11, // Division durch Null SbxERR_CONVERSION = 13, // falscher Datentyp SbxERR_BAD_PARAMETER = 14, // ungltiger Parameter SbxERR_PROC_UNDEFINED = 35, // BASIC-Sub oder Function undefiniert SbxERR_ERROR = 51, // andere Fehler // Objektbezogene Fehler SbxERR_NO_OBJECT = 91, // Objektvariable nicht belegt SbxERR_CANNOT_LOAD = 323, // Objekt kann nicht geladen/eingerichtet werden SbxERR_BAD_INDEX = 341, // Invalid object index SbxERR_NO_ACTIVE_OBJECT=366,// Objekt ist nicht aktiviert SbxERR_BAD_PROP_VALUE = 380,// Bad property value SbxERR_PROP_READONLY = 382, // Property is read only SbxERR_PROP_WRITEONLY = 394,// Property is write only SbxERR_INVALID_OBJECT = 420,// Invalid object reference SbxERR_NO_METHOD = 423, // Property oder Methode unbekannt SbxERR_INVALID_USAGE_OBJECT=425,// Falsche Verwendung eines Objekts SbxERR_NO_OLE = 430, // Kein OLE-Objekt SbxERR_BAD_METHOD = 438, // Methode nicht untersttzt SbxERR_OLE_ERROR = 440, // OLE Automation-Fehler SbxERR_BAD_ACTION = 445, // Aktion nicht untersttzt SbxERR_NO_NAMED_ARGS = 446, // Keine benannten Argumente SbxERR_BAD_LOCALE = 447, // Laenderspezifische Einstellungen nicht untersttzt SbxERR_NAMED_NOT_FOUND = 448,// Unbekanntes benanntes Argument SbxERR_NOT_OPTIONAL = 449, // Argument nicht optional SbxERR_WRONG_ARGS = 450, // Falsche Zahl von Argumenten SbxERR_NOT_A_COLL = 451 // Objekt enth„lt keine Elemente }; */ // Flag-Bits: #define SBX_READ 0x0001 // Read permission #define SBX_WRITE 0x0002 // Write permission #define SBX_READWRITE 0x0003 // Read/Write permission #define SBX_DONTSTORE 0x0004 // Don't store object #define SBX_MODIFIED 0x0008 // Object was changed #define SBX_FIXED 0x0010 // Fixed data type (SbxVariable) #define SBX_CONST 0x0020 // Definition of const value #define SBX_OPTIONAL 0x0040 // Parameter is optional #define SBX_HIDDEN 0x0080 // Element is invisible #define SBX_INVISIBLE 0x0100 // Element is not found by Find() #define SBX_EXTSEARCH 0x0200 // Object is searched completely #define SBX_EXTFOUND 0x0400 // Variable was found through extended search #define SBX_GBLSEARCH 0x0800 // Global search via Parents #define SBX_RESERVED 0x1000 // reserved #define SBX_PRIVATE 0x1000 // #110004, #112015, cannot conflict with SBX_RESERVED #define SBX_NO_BROADCAST 0x2000 // No broadcast on Get/Put #define SBX_REFERENCE 0x4000 // Parameter is Reference (DLL-call) #define SBX_NO_MODIFY 0x8000 // SetModified is suppressed #define SBX_WITH_EVENTS 0x0080 // Same value as unused SBX_HIDDEN #define SBX_DIM_AS_NEW 0x0800 // Same value as SBX_GBLSEARCH, cannot conflict as one // is used for objects, the other for variables only #define SBX_VAR_TO_DIM 0x2000 // Same value as SBX_NO_BROADCAST, cannot conflict as // used for variables without broadcaster only // Broadcaster-IDs: #define SBX_HINT_DYING SFX_HINT_DYING #define SBX_HINT_DATAWANTED SFX_HINT_USER00 #define SBX_HINT_DATACHANGED SFX_HINT_DATACHANGED #define SBX_HINT_CONVERTED SFX_HINT_USER01 #define SBX_HINT_INFOWANTED SFX_HINT_USER02 #define SBX_HINT_OBJECTCHANGED SFX_HINT_USER03 // List of all creators for Load/Store #define SBXCR_SBX 0x20584253 // SBX(blank) // List of predefined SBX-IDs. New SBX-IDs must be precisely defined so that // they are unique within the Stream and appropriate Factory. #define SBXID_VALUE 0x4E4E // NN: SbxValue #define SBXID_VARIABLE 0x4156 // VA: SbxVariable #define SBXID_ARRAY 0x5241 // AR: SbxArray #define SBXID_DIMARRAY 0x4944 // DI: SbxDimArray #define SBXID_OBJECT 0x424F // OB: SbxObject #define SBXID_COLLECTION 0x4F43 // CO: SbxCollection #define SBXID_FIXCOLLECTION 0x4346 // FC: SbxStdCollection #define SBXID_METHOD 0x454D // ME: SbxMethod #define SBXID_PROPERTY 0x5250 // PR: SbxProperty // StarBASIC restricts the base data type to different intervals. // These intervals are fixed due to portability and independent // of the implementation. Only type double is greedy and takes // what it gets. #define SbxMAXCHAR ((sal_Unicode)65535) #define SbxMINCHAR (0) #define SbxMAXBYTE ( 255) #define SbxMAXINT ( 32767) #define SbxMININT (-32768) #define SbxMAXUINT ((sal_uInt16) 65535) #define SbxMAXLNG ( 2147483647) #define SbxMINLNG ((sal_Int32)(-2147483647-1)) #define SbxMAXULNG ((sal_uInt32) 0xffffffff) #define SbxMAXSALINT64 SAL_MAX_INT64 #define SbxMINSALINT64 SAL_MIN_INT64 #define SbxMAXSALUINT64 SAL_MAX_UINT64 #define SbxMAXSNG ( 3.402823e+38) #define SbxMINSNG (-3.402823e+38) #define SbxMAXSNG2 ( 1.175494351e-38) #define SbxMINSNG2 (-1.175494351e-38) #define SbxMAXCURR ( 922337203685477.5807) #define SbxMINCURR (-922337203685477.5808) #define CURRENCY_FACTOR 10000 #define SbxMAXCURRLNG (SbxMAXLNG/CURRENCY_FACTOR) #define SbxMINCURRLNG (SbxMINLNG/CURRENCY_FACTOR) // Max valid offset index of a Sbx-Array (due to 64K limit) #define SBX_MAXINDEX 0x3FF0 #define SBX_MAXINDEX32 SbxMAXLNG // The numeric values of sal_True and FALSE enum SbxBOOL { SbxFALSE = 0, SbxTRUE = -1 }; #endif // __RSC #endif