1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
/* -*- 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_SOURCE_INC_CODEGEN_HXX
#define INCLUDED_BASIC_SOURCE_INC_CODEGEN_HXX
class SbiParser;
class SbModule;
#include "opcodes.hxx"
#include "buffer.hxx"
#include <basic/codecompletecache.hxx>
class SbiCodeGen {
SbiParser* pParser; // for error messages, line, column etc.
SbModule& rMod;
SbiBuffer aCode;
short nLine, nCol; // for stmnt command
short nForLevel; // #29955
bool bStmnt; // true: statement-opcode is pending
public:
SbiCodeGen( SbModule&, SbiParser*, short );
SbiParser* GetParser() { return pParser; }
SbModule& GetModule() { return rMod; }
sal_uInt32 Gen( SbiOpcode );
sal_uInt32 Gen( SbiOpcode, sal_uInt32 );
sal_uInt32 Gen( SbiOpcode, sal_uInt32, sal_uInt32 );
void Patch( sal_uInt32 o, sal_uInt32 v ){ aCode.Patch( o, v ); }
void BackChain( sal_uInt32 off ) { aCode.Chain( off ); }
void Statement();
void GenStmnt(); // create statement-opcode maybe
sal_uInt32 GetPC();
sal_uInt32 GetOffset() { return GetPC() + 1; }
void Save();
// #29955 service for-loop-level
void IncForLevel() { nForLevel++; }
void DecForLevel() { nForLevel--; }
static sal_uInt32 calcNewOffSet( sal_uInt8* pCode, sal_uInt16 nOffset );
static sal_uInt16 calcLegacyOffSet( sal_uInt8* pCode, sal_uInt32 nOffset );
};
template < class T, class S >
class PCodeBuffConvertor
{
T m_nSize;
sal_uInt8* m_pStart;
sal_uInt8* m_pCnvtdBuf;
S m_nCnvtdSize;
PCodeBuffConvertor(const PCodeBuffConvertor& ) = delete;
PCodeBuffConvertor& operator = ( const PCodeBuffConvertor& ) = delete;
public:
PCodeBuffConvertor( sal_uInt8* pCode, T nSize ): m_nSize( nSize ), m_pStart( pCode ), m_pCnvtdBuf( NULL ), m_nCnvtdSize( 0 ){ convert(); }
S GetSize(){ return m_nCnvtdSize; }
void convert();
// Caller owns the buffer returned
sal_uInt8* GetBuffer() { return m_pCnvtdBuf; }
};
// #111897 PARAM_INFO flags start at 0x00010000 to not
// conflict with DefaultId in SbxParamInfo::nUserData
#define PARAM_INFO_PARAMARRAY 0x0010000
#define PARAM_INFO_WITHBRACKETS 0x0020000
#endif
/* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
