Quellcodebibliothek Statistik Leitseite products/sources/formale Sprachen/C/LibreOffice/basic/source/inc/   (Office von Apache Version 25.8.3.2©)  Datei vom 5.10.2025 mit Größe 3 kB image not shown  

Quelle  image.hxx   Sprache: 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 <cstddef>
#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:
    std::size_t    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 );
    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( sal_uInt32 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();
    bool        ExceedsImgVersion12Limits();
};

/* vim:set shiftwidth=4 softtabstop=4 expandtab: */

Messung V0.5
C=99 H=100 G=99

¤ Dauer der Verarbeitung: 0.11 Sekunden  (vorverarbeitet)  ¤

*© Formatika GbR, Deutschland






Wurzel

Suchen

Beweissystem der NASA

Beweissystem Isabelle

NIST Cobol Testsuite

Cephes Mathematical Library

Wiener Entwicklungsmethode

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung und die Messung sind noch experimentell.