1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
9 * This file incorporates work covered by the following license notice:
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
20 #ifndef INCLUDED_BASIC_SOURCE_INC_CODEGEN_HXX
21 #define INCLUDED_BASIC_SOURCE_INC_CODEGEN_HXX
25 #include "opcodes.hxx"
27 #include <basic/codecompletecache.hxx>
30 SbiParser
* pParser
; // for error messages, line, column etc.
33 short nLine
, nCol
; // for stmnt command
34 short nForLevel
; // #29955
35 bool bStmnt
; // true: statement-opcode is pending
38 SbiCodeGen( SbModule
&, SbiParser
*, short );
39 SbiParser
* GetParser() { return pParser
; }
40 SbModule
& GetModule() { return rMod
; }
41 sal_uInt32
Gen( SbiOpcode
);
42 sal_uInt32
Gen( SbiOpcode
, sal_uInt32
);
43 sal_uInt32
Gen( SbiOpcode
, sal_uInt32
, sal_uInt32
);
44 void Patch( sal_uInt32 o
, sal_uInt32 v
){ aCode
.Patch( o
, v
); }
45 void BackChain( sal_uInt32 off
) { aCode
.Chain( off
); }
47 void GenStmnt(); // create statement-opcode maybe
49 sal_uInt32
GetOffset() { return GetPC() + 1; }
52 // #29955 service for-loop-level
53 void IncForLevel() { nForLevel
++; }
54 void DecForLevel() { nForLevel
--; }
56 static sal_uInt32
calcNewOffSet( sal_uInt8
* pCode
, sal_uInt16 nOffset
);
57 static sal_uInt16
calcLegacyOffSet( sal_uInt8
* pCode
, sal_uInt32 nOffset
);
61 template < class T
, class S
>
62 class PCodeBuffConvertor
66 sal_uInt8
* m_pCnvtdBuf
;
69 PCodeBuffConvertor(const PCodeBuffConvertor
& ) SAL_DELETED_FUNCTION
;
70 PCodeBuffConvertor
& operator = ( const PCodeBuffConvertor
& ) SAL_DELETED_FUNCTION
;
72 PCodeBuffConvertor( sal_uInt8
* pCode
, T nSize
): m_nSize( nSize
), m_pStart( pCode
), m_pCnvtdBuf( NULL
), m_nCnvtdSize( 0 ){ convert(); }
73 S
GetSize(){ return m_nCnvtdSize
; }
75 // Caller owns the buffer returned
76 sal_uInt8
* GetBuffer() { return m_pCnvtdBuf
; }
79 // #111897 PARAM_INFO flags start at 0x00010000 to not
80 // conflict with DefaultId in SbxParamInfo::nUserData
81 #define PARAM_INFO_PARAMARRAY 0x0010000
82 #define PARAM_INFO_WITHBRACKETS 0x0020000
86 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */