xref: /AOO41X/main/basic/source/inc/codegen.hxx (revision cdf0e10c4e3984b49a9502b011690b615761d4a3)
1*cdf0e10cSrcweir /*************************************************************************
2*cdf0e10cSrcweir  *
3*cdf0e10cSrcweir  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4*cdf0e10cSrcweir  *
5*cdf0e10cSrcweir  * Copyright 2000, 2010 Oracle and/or its affiliates.
6*cdf0e10cSrcweir  *
7*cdf0e10cSrcweir  * OpenOffice.org - a multi-platform office productivity suite
8*cdf0e10cSrcweir  *
9*cdf0e10cSrcweir  * This file is part of OpenOffice.org.
10*cdf0e10cSrcweir  *
11*cdf0e10cSrcweir  * OpenOffice.org is free software: you can redistribute it and/or modify
12*cdf0e10cSrcweir  * it under the terms of the GNU Lesser General Public License version 3
13*cdf0e10cSrcweir  * only, as published by the Free Software Foundation.
14*cdf0e10cSrcweir  *
15*cdf0e10cSrcweir  * OpenOffice.org is distributed in the hope that it will be useful,
16*cdf0e10cSrcweir  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17*cdf0e10cSrcweir  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18*cdf0e10cSrcweir  * GNU Lesser General Public License version 3 for more details
19*cdf0e10cSrcweir  * (a copy is included in the LICENSE file that accompanied this code).
20*cdf0e10cSrcweir  *
21*cdf0e10cSrcweir  * You should have received a copy of the GNU Lesser General Public License
22*cdf0e10cSrcweir  * version 3 along with OpenOffice.org.  If not, see
23*cdf0e10cSrcweir  * <http://www.openoffice.org/license.html>
24*cdf0e10cSrcweir  * for a copy of the LGPLv3 License.
25*cdf0e10cSrcweir  *
26*cdf0e10cSrcweir  ************************************************************************/
27*cdf0e10cSrcweir 
28*cdf0e10cSrcweir #ifndef _CODEGEN_HXX
29*cdf0e10cSrcweir #define _CODEGEN_HXX
30*cdf0e10cSrcweir 
31*cdf0e10cSrcweir class SbiImage;
32*cdf0e10cSrcweir class SbiParser;
33*cdf0e10cSrcweir class SbModule;
34*cdf0e10cSrcweir #include "opcodes.hxx"
35*cdf0e10cSrcweir #include "buffer.hxx"
36*cdf0e10cSrcweir 
37*cdf0e10cSrcweir class SbiCodeGen { 				// Code-Erzeugung:
38*cdf0e10cSrcweir 	SbiParser* pParser;			// fuer Fehlermeldungen, Line, Column etc.
39*cdf0e10cSrcweir 	SbModule& rMod;				// aktuelles Modul
40*cdf0e10cSrcweir 	SbiBuffer aCode;	  			// Code-Puffer
41*cdf0e10cSrcweir 	short  nLine, nCol;			// Zeile, Spalte fuer Stmnt-Befehl
42*cdf0e10cSrcweir 	short  nForLevel;			// #29955 for-Schleifen-Ebene
43*cdf0e10cSrcweir 	sal_Bool bStmnt;				// sal_True: Statement-Opcode liegt an
44*cdf0e10cSrcweir public:
45*cdf0e10cSrcweir 	SbiCodeGen( SbModule&, SbiParser*, short );
46*cdf0e10cSrcweir 	SbiParser* GetParser() { return pParser; }
47*cdf0e10cSrcweir 	SbModule& GetModule() { return rMod; }
48*cdf0e10cSrcweir 	sal_uInt32 Gen( SbiOpcode );
49*cdf0e10cSrcweir 	sal_uInt32 Gen( SbiOpcode, sal_uInt32 );
50*cdf0e10cSrcweir 	sal_uInt32 Gen( SbiOpcode, sal_uInt32, sal_uInt32 );
51*cdf0e10cSrcweir 	void Patch( sal_uInt32 o, sal_uInt32 v ){ aCode.Patch( o, v ); }
52*cdf0e10cSrcweir 	void BackChain( sal_uInt32 off )	{ aCode.Chain( off );  }
53*cdf0e10cSrcweir 	void Statement();
54*cdf0e10cSrcweir 	void GenStmnt();			// evtl. Statement-Opcode erzeugen
55*cdf0e10cSrcweir 	sal_uInt32 GetPC();
56*cdf0e10cSrcweir 	sal_uInt32 GetOffset()				{ return GetPC() + 1; }
57*cdf0e10cSrcweir 	void Save();
58*cdf0e10cSrcweir 
59*cdf0e10cSrcweir 	// #29955 for-Schleifen-Ebene pflegen
60*cdf0e10cSrcweir 	void IncForLevel( void ) { nForLevel++; }
61*cdf0e10cSrcweir 	void DecForLevel( void ) { nForLevel--; }
62*cdf0e10cSrcweir 
63*cdf0e10cSrcweir 	static sal_uInt32 calcNewOffSet( sal_uInt8* pCode, sal_uInt16 nOffset );
64*cdf0e10cSrcweir 	static sal_uInt16 calcLegacyOffSet( sal_uInt8* pCode, sal_uInt32 nOffset );
65*cdf0e10cSrcweir 
66*cdf0e10cSrcweir };
67*cdf0e10cSrcweir 
68*cdf0e10cSrcweir template < class T, class S >
69*cdf0e10cSrcweir class PCodeBuffConvertor
70*cdf0e10cSrcweir {
71*cdf0e10cSrcweir 	T m_nSize; //
72*cdf0e10cSrcweir 	sal_uInt8* m_pStart;
73*cdf0e10cSrcweir 	sal_uInt8* m_pCnvtdBuf;
74*cdf0e10cSrcweir 	S m_nCnvtdSize; //
75*cdf0e10cSrcweir 
76*cdf0e10cSrcweir 	//  Disable usual copying symantics and bodgy default ctor
77*cdf0e10cSrcweir 	PCodeBuffConvertor();
78*cdf0e10cSrcweir 	PCodeBuffConvertor(const PCodeBuffConvertor& );
79*cdf0e10cSrcweir 	PCodeBuffConvertor& operator = ( const PCodeBuffConvertor& );
80*cdf0e10cSrcweir public:
81*cdf0e10cSrcweir 	PCodeBuffConvertor( sal_uInt8* pCode, T nSize ): m_nSize( nSize ),  m_pStart( pCode ), m_pCnvtdBuf( NULL ), m_nCnvtdSize( 0 ){ convert(); }
82*cdf0e10cSrcweir 	S GetSize(){ return m_nCnvtdSize; }
83*cdf0e10cSrcweir 	void convert();
84*cdf0e10cSrcweir 	// Caller owns the buffer returned
85*cdf0e10cSrcweir 	sal_uInt8* GetBuffer() { return m_pCnvtdBuf; }
86*cdf0e10cSrcweir };
87*cdf0e10cSrcweir 
88*cdf0e10cSrcweir // #111897 PARAM_INFO flags start at 0x00010000 to not
89*cdf0e10cSrcweir // conflict with DefaultId in SbxParamInfo::nUserData
90*cdf0e10cSrcweir #define PARAM_INFO_PARAMARRAY		0x0010000
91*cdf0e10cSrcweir #define PARAM_INFO_WITHBRACKETS		0x0020000
92*cdf0e10cSrcweir 
93*cdf0e10cSrcweir #endif
94