forked from amazingfate/loongoffice
3bcfb1aac1
In order to support the correct data type of numeric constants, booleans, and default values for strings, the strategy to transport the data type character to the runtime has been changed. The type character will be added after the literal and the string termination symbol in order to keep compatibility. This allows to retrieve the correct type in StepLOADNC and in StepPARAM. Any legacy written images are still possible to process, since if there is a suffix type character where the data type character was directly written after the numeric constant, it will be processed in StepLOADNC. Without this fix, an optional parameter of type Variant, would still include the suffixe type character, and will not be converted to the correct type in StepPARAM. Change-Id: I86c8192c6dc28457053fa7b23a073420e45407b2 Reviewed-on: https://gerrit.libreoffice.org/c/core/+/119945 Tested-by: Jenkins Reviewed-by: Andreas Heinisch <andreas.heinisch@yahoo.de>
101 lines
3.8 KiB
C++
101 lines
3.8 KiB
C++
/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
|
|
/*
|
|
* This file is part of the LibreOffice project.
|
|
*
|
|
* This Source Code Form is subject to the terms of the Mozilla Public
|
|
* License, v. 2.0. If a copy of the MPL was not distributed with this
|
|
* file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
*
|
|
* This file incorporates work covered by the following license notice:
|
|
*
|
|
* Licensed to the Apache Software Foundation (ASF) under one or more
|
|
* contributor license agreements. See the NOTICE file distributed
|
|
* with this work for additional information regarding copyright
|
|
* ownership. The ASF licenses this file to you under the Apache
|
|
* License, Version 2.0 (the "License"); you may not use this file
|
|
* except in compliance with the License. You may obtain a copy of
|
|
* the License at http://www.apache.org/licenses/LICENSE-2.0 .
|
|
*/
|
|
|
|
#pragma once
|
|
|
|
#include <basic/sbx.hxx>
|
|
#include <rtl/ustring.hxx>
|
|
#include "filefmt.hxx"
|
|
#include <o3tl/typed_flags_set.hxx>
|
|
#include <vector>
|
|
|
|
// This class reads in the image that's been produced by the compiler
|
|
// and manages the access to the single elements.
|
|
|
|
enum class SbiImageFlags
|
|
{
|
|
NONE = 0,
|
|
EXPLICIT = 0x0001, // OPTION EXPLICIT is active
|
|
COMPARETEXT = 0x0002, // OPTION COMPARE TEXT is active
|
|
INITCODE = 0x0004, // Init-Code does exist
|
|
CLASSMODULE = 0x0008, // OPTION ClassModule is active
|
|
};
|
|
namespace o3tl
|
|
{
|
|
template<> struct typed_flags<SbiImageFlags> : is_typed_flags<SbiImageFlags, 0xf> {};
|
|
}
|
|
|
|
class SbiImage {
|
|
friend class SbiCodeGen; // compiler classes, that the private-
|
|
|
|
SbxArrayRef rTypes; // User defined types
|
|
SbxArrayRef rEnums; // Enum types
|
|
std::vector<sal_uInt32> mvStringOffsets; // StringId-Offsets
|
|
std::unique_ptr<sal_Unicode[]> pStrings; // StringPool
|
|
std::vector<sal_uInt8> aCode; // Code-Image
|
|
std::vector<sal_uInt8> aLegacyPCode; // Code-Image
|
|
bool bError;
|
|
SbiImageFlags nFlags;
|
|
sal_uInt32 nStringSize;
|
|
sal_uInt16 nDimBase; // OPTION BASE value
|
|
rtl_TextEncoding eCharSet;
|
|
// temporary management-variable:
|
|
short nStringIdx;
|
|
sal_uInt32 nStringOff; // current Pos in the stringbuffer
|
|
// routines for the compiler:
|
|
void MakeStrings( short ); // establish StringPool
|
|
void AddString( const OUString& );
|
|
void AddCode(std::vector<sal_uInt8>&&);
|
|
void AddType(SbxObject const *);
|
|
void AddEnum(SbxObject *);
|
|
|
|
public:
|
|
OUString aName; // macro name
|
|
OUString aOUSource; // source code
|
|
OUString aComment;
|
|
bool bInit;
|
|
bool bFirstInit;
|
|
|
|
SbiImage();
|
|
~SbiImage();
|
|
void Clear();
|
|
bool Load( SvStream&, sal_uInt32& nVer );
|
|
// nVer is set to version
|
|
// of image
|
|
bool Save( SvStream&, sal_uInt32 = B_CURVERSION );
|
|
bool IsError() const { return bError; }
|
|
|
|
const sal_uInt8* GetCode() const { return aCode.data(); }
|
|
sal_uInt32 GetCodeSize() const { return aCode.size(); }
|
|
sal_uInt16 GetBase() const { return nDimBase; }
|
|
OUString GetString( short nId, SbxDataType *eType = nullptr ) const;
|
|
const SbxObject* FindType (const OUString& aTypeName) const;
|
|
|
|
const SbxArrayRef& GetEnums() const { return rEnums; }
|
|
|
|
void SetFlag( SbiImageFlags n ) { nFlags |= n; }
|
|
bool IsFlag( SbiImageFlags n ) const { return bool(nFlags & n); }
|
|
sal_uInt16 CalcLegacyOffset( sal_Int32 nOffset );
|
|
sal_uInt32 CalcNewOffset( sal_Int16 nOffset );
|
|
void ReleaseLegacyBuffer();
|
|
bool ExceedsLegacyLimits();
|
|
};
|
|
|
|
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|