summaryrefslogtreecommitdiff
path: root/basic/inc/basic/sbstar.hxx
diff options
context:
space:
mode:
Diffstat (limited to 'basic/inc/basic/sbstar.hxx')
-rw-r--r--basic/inc/basic/sbstar.hxx214
1 files changed, 0 insertions, 214 deletions
diff --git a/basic/inc/basic/sbstar.hxx b/basic/inc/basic/sbstar.hxx
deleted file mode 100644
index 03ad7f5882..0000000000
--- a/basic/inc/basic/sbstar.hxx
+++ /dev/null
@@ -1,214 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * This file is part of OpenOffice.org.
- *
- * OpenOffice.org is free software: you can redistribute it and/or modify
- * it under the terms of the GNU Lesser General Public License version 3
- * only, as published by the Free Software Foundation.
- *
- * OpenOffice.org is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU Lesser General Public License version 3 for more details
- * (a copy is included in the LICENSE file that accompanied this code).
- *
- * You should have received a copy of the GNU Lesser General Public License
- * version 3 along with OpenOffice.org. If not, see
- * <http://www.openoffice.org/license.html>
- * for a copy of the LGPLv3 License.
- *
- ************************************************************************/
-
-#ifndef _SB_SBSTAR_HXX
-#define _SB_SBSTAR_HXX
-
-#include <basic/sbx.hxx>
-#include <basic/sbxobj.hxx>
-#include <rtl/ustring.hxx>
-#include <osl/mutex.hxx>
-
-#include <basic/sbdef.hxx>
-#include <basic/sberrors.hxx>
-#include <com/sun/star/script/ModuleInfo.hpp>
-#include <com/sun/star/frame/XModel.hpp>
-#include "basicdllapi.h"
-
-class SbModule; // completed module
-class SbiInstance; // runtime instance
-class SbiRuntime; // currently running procedure
-class SbiImage; // compiled image
-class BasicLibInfo; // info block for basic manager
-class SbTextPortions;
-class SbMethod;
-class BasicManager;
-class DocBasicItem;
-
-class StarBASICImpl;
-
-class BASIC_DLLPUBLIC StarBASIC : public SbxObject
-{
- friend class SbiScanner;
- friend class SbiExpression; // Access to RTL
- friend class SbiInstance;
- friend class SbiRuntime;
- friend class DocBasicItem;
-
- StarBASICImpl* mpStarBASICImpl;
-
- SbxArrayRef pModules; // List of all modules
- SbxObjectRef pRtl; // Runtime Library
- SbxArrayRef xUnoListeners; // Listener handled by CreateUnoListener
-
- // Handler-Support:
- Link aErrorHdl; // Error handler
- Link aBreakHdl; // Breakpoint handler
- sal_Bool bNoRtl; // if sal_True: do not search RTL
- sal_Bool bBreak; // if sal_True: Break, otherwise Step
- sal_Bool bDocBasic;
- sal_Bool bVBAEnabled;
- BasicLibInfo* pLibInfo; // Info block for basic manager
- SbLanguageMode eLanguageMode; // LanguageMode of the basic object
- sal_Bool bQuit;
-
- SbxObjectRef pVBAGlobals;
- BASIC_DLLPRIVATE SbxObject* getVBAGlobals( );
-
- BASIC_DLLPRIVATE void implClearDependingVarsOnDelete( StarBASIC* pDeletedBasic );
-
-protected:
- sal_Bool CError( SbError, const String&, xub_StrLen, xub_StrLen, xub_StrLen );
-private:
- BASIC_DLLPRIVATE sal_Bool RTError( SbError, xub_StrLen, xub_StrLen, xub_StrLen );
- BASIC_DLLPRIVATE sal_Bool RTError( SbError, const String& rMsg, xub_StrLen, xub_StrLen, xub_StrLen );
- BASIC_DLLPRIVATE sal_uInt16 BreakPoint( xub_StrLen nLine, xub_StrLen nCol1, xub_StrLen nCol2 );
- BASIC_DLLPRIVATE sal_uInt16 StepPoint( xub_StrLen nLine, xub_StrLen nCol1, xub_StrLen nCol2 );
- virtual sal_Bool LoadData( SvStream&, sal_uInt16 );
- virtual sal_Bool StoreData( SvStream& ) const;
-
-protected:
-
- virtual sal_Bool ErrorHdl();
- virtual sal_uInt16 BreakHdl();
- virtual ~StarBASIC();
-
-public:
-
- SBX_DECL_PERSIST_NODATA(SBXCR_SBX,SBXID_BASIC,1);
- TYPEINFO();
-
- StarBASIC( StarBASIC* pParent = NULL, sal_Bool bIsDocBasic = sal_False );
-
- // #51727 SetModified overridden so that the Modfied-State is
- // not delivered to Parent.
- virtual void SetModified( sal_Bool );
-
- void* operator new( size_t );
- void operator delete( void* );
-
- virtual void Insert( SbxVariable* );
- using SbxObject::Remove;
- virtual void Remove( SbxVariable* );
- virtual void Clear();
-
- BasicLibInfo* GetLibInfo() { return pLibInfo; }
- void SetLibInfo( BasicLibInfo* p ) { pLibInfo = p; }
-
- // Compiler-Interface
- SbModule* MakeModule( const String& rName, const String& rSrc );
- SbModule* MakeModule32( const String& rName, const ::rtl::OUString& rSrc );
- SbModule* MakeModule32( const String& rName, const com::sun::star::script::ModuleInfo& mInfo, const ::rtl::OUString& rSrc );
- sal_Bool Compile( SbModule* );
- sal_Bool Disassemble( SbModule*, String& rText );
- static void Stop();
- static void Error( SbError );
- static void Error( SbError, const String& rMsg );
- static void FatalError( SbError );
- static void FatalError( SbError, const String& rMsg );
- static sal_Bool IsRunning();
- static SbError GetErrBasic();
- // #66536 make additional message accessible by RTL function Error
- static String GetErrorMsg();
- static xub_StrLen GetErl();
- // Highlighting
- void Highlight( const String& rSrc, SbTextPortions& rList );
-
- virtual SbxVariable* Find( const String&, SbxClassType );
- virtual sal_Bool Call( const String&, SbxArray* = NULL );
-
- SbxArray* GetModules() { return pModules; }
- SbxObject* GetRtl() { return pRtl; }
- SbModule* FindModule( const String& );
- // Run init code of all modules (including the inserted Doc-Basics)
- void InitAllModules( StarBASIC* pBasicNotToInit = NULL );
- void DeInitAllModules( void );
- void ClearAllModuleVars( void );
-
- // #43011 For TestTool; deletes global vars
- void ClearGlobalVars( void );
-
- // Calls for error and break handler
- static sal_uInt16 GetLine();
- static sal_uInt16 GetCol1();
- static sal_uInt16 GetCol2();
- static void SetErrorData( SbError nCode, sal_uInt16 nLine,
- sal_uInt16 nCol1, sal_uInt16 nCol2 );
-
- // Specific to error handler
- static void MakeErrorText( SbError, const String& aMsg );
- static const String& GetErrorText();
- static SbError GetErrorCode();
- static sal_Bool IsCompilerError();
- static sal_uInt16 GetVBErrorCode( SbError nError );
- static SbError GetSfxFromVBError( sal_uInt16 nError );
- // Local settings
- void SetLanguageMode( SbLanguageMode eLangMode )
- { eLanguageMode = eLangMode; }
-
- // Specific for break handler
- sal_Bool IsBreak() const { return bBreak; }
-
- static Link GetGlobalErrorHdl();
- static void SetGlobalErrorHdl( const Link& rNewHdl );
- Link GetErrorHdl() const { return aErrorHdl; }
- void SetErrorHdl( const Link& r ) { aErrorHdl = r; }
-
- static void SetGlobalBreakHdl( const Link& rNewHdl );
- Link GetBreakHdl() const { return aBreakHdl; }
- void SetBreakHdl( const Link& r ) { aBreakHdl = r; }
-
- SbxArrayRef getUnoListeners( void );
-
- static SbxBase* FindSBXInCurrentScope( const String& rName );
- static SbMethod* GetActiveMethod( sal_uInt16 nLevel = 0 );
- static SbModule* GetActiveModule();
- void SetVBAEnabled( sal_Bool bEnabled );
- sal_Bool isVBAEnabled();
-
- SbxObjectRef getRTL( void ) { return pRtl; }
- sal_Bool IsDocBasic() { return bDocBasic; }
- SbxVariable* VBAFind( const String& rName, SbxClassType t );
- bool GetUNOConstant( const sal_Char* _pAsciiName, ::com::sun::star::uno::Any& aOut );
- void QuitAndExitApplication();
- sal_Bool IsQuitApplication() { return bQuit; };
-
- static ::com::sun::star::uno::Reference< ::com::sun::star::frame::XModel >
- GetModelFromBasic( SbxObject* pBasic );
-};
-
-#ifndef __SB_SBSTARBASICREF_HXX
-#define __SB_SBSTARBASICREF_HXX
-
-SV_DECL_IMPL_REF(StarBASIC)
-
-#endif
-
-#endif
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */