replace obsolete "master" branch with README that points at new repoHEADmaster-deletedmaster

1 files changed, 0 insertions, 1153 deletions

diff --git a/extensions/source/activex/main/SOActiveX.cpp b/extensions/source/activex/main/SOActiveX.cpp
deleted file mode 100644
index 3468337a0..000000000
--- a/extensions/source/activex/main/SOActiveX.cpp
+++ /dev/null
@@ -1,1153 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-// SOActiveX.cpp : Implementation of CSOActiveX
-
-#pragma warning (disable:4505)
-    // permanently suppress "unreferenced local function has been removed" warning
-
-#pragma warning (push,1)
-#pragma warning (disable:4265)
-
-#include "stdafx2.h"
-#include "so_activex.h"
-#include "SOActiveX.h"
-#include "SOComWindowPeer.h"
-#include "SODispatchInterceptor.h"
-#include "SOActionsApproval.h"
-
-#pragma warning (pop)
-
-#define STAROFFICE_WINDOWCLASS "SOParentWindow"
-
-
-/////////////////////////////////////////////////////////////////////////////
-
-void OutputError_Impl( HWND hw, HRESULT ErrorCode )
-{
-    void* sMessage;
-    FormatMessageA(
-        FORMAT_MESSAGE_ALLOCATE_BUFFER |
-        FORMAT_MESSAGE_FROM_SYSTEM,
-        NULL,
-        ErrorCode,
-        MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), // Default language
-        (LPTSTR) &sMessage,
-        0,
-        NULL
-    );
-    ::MessageBoxA( hw, (LPCTSTR)sMessage, NULL, MB_OK | MB_ICONINFORMATION );
-    LocalFree( sMessage );
-}
-
-HRESULT ExecuteFunc( IDispatch* idispUnoObject,
-                     OLECHAR* sFuncName,
-                     CComVariant* params,
-                     unsigned int count,
-                     CComVariant* pResult )
-{
-    if( !idispUnoObject )
-        return E_FAIL;
-
-    DISPID id;
-    HRESULT hr = idispUnoObject->GetIDsOfNames( IID_NULL, &sFuncName, 1, LOCALE_USER_DEFAULT, &id);
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    DISPPARAMS dispparams= { params, 0, count, 0};
-
-    // DEBUG
-    EXCEPINFO myInfo;
-    hr = idispUnoObject->Invoke( id, IID_NULL,LOCALE_USER_DEFAULT, DISPATCH_METHOD,
-                    &dispparams, pResult, &myInfo, 0);
-
-    // for debugging purposes
-    // USES_CONVERSION;
-    // if ( !SUCCEEDED( hr ) )
-    //	::MessageBox( NULL, OLE2A( myInfo.bstrDescription ), OLE2A( myInfo.bstrSource ), MB_OK | MB_ICONINFORMATION );
-
-    return hr;
-}
-
-HRESULT GetIDispByFunc( IDispatch* idispUnoObject,
-                          OLECHAR* sFuncName,
-                          CComVariant* params,
-                          unsigned int count,
-                          CComPtr<IDispatch>& pdispResult )
-{
-    if( !idispUnoObject )
-        return E_FAIL;
-
-    CComVariant result;
-    HRESULT hr = ExecuteFunc( idispUnoObject, sFuncName, params, count, &result );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    if( result.vt != VT_DISPATCH || result.pdispVal == NULL )
-        return E_FAIL;
-
-    pdispResult = CComPtr<IDispatch>( result.pdispVal );
-
-    return S_OK;
-}
-
-HRESULT PutPropertiesToIDisp( IDispatch* pdispObject,
-                              OLECHAR** sMemberNames,
-                              CComVariant* pVariant,
-                              unsigned int count )
-{
-    for( unsigned int ind = 0; ind < count; ind++ )
-    {
-        DISPID id;
-        HRESULT hr = pdispObject->GetIDsOfNames( IID_NULL, &sMemberNames[ind], 1, LOCALE_USER_DEFAULT, &id );
-        if( !SUCCEEDED( hr ) ) return hr;
-
-        hr = CComDispatchDriver::PutProperty( pdispObject, id, &pVariant[ind] );
-        if( !SUCCEEDED( hr ) ) return hr;
-    }
-
-    return S_OK;
-}
-
-HRESULT GetPropertiesFromIDisp( IDispatch* pdispObject,
-                                OLECHAR** sMemberNames,
-                                CComVariant* pVariant,
-                                unsigned int count )
-{
-    for( unsigned int ind = 0; ind < count; ind++ )
-    {
-        DISPID id;
-        HRESULT hr = pdispObject->GetIDsOfNames( IID_NULL, &sMemberNames[ind], 1, LOCALE_USER_DEFAULT, &id );
-        if( !SUCCEEDED( hr ) ) return hr;
-
-        hr = CComDispatchDriver::GetProperty( pdispObject, id, &pVariant[ind] );
-        if( !SUCCEEDED( hr ) ) return hr;
-    }
-
-    return S_OK;
-}
-/////////////////////////////////////////////////////////////////////////////
-// CSOActiveX
-
-CSOActiveX::CSOActiveX()
-: mCookie(0)
-, mCurFileUrl( L"private:factory/swriter" )
-, mbLoad( FALSE )
-, mParentWin( NULL )
-, mOffWin( NULL )
-, mbViewOnly( TRUE )
-, mpDispatchInterceptor( NULL )
-, mnVersion( SO_NOT_DETECTED )
-, mbReadyForActivation( FALSE )
-, mbDrawLocked( FALSE )
-{
-    CLSID clsFactory = {0x82154420,0x0FBF,0x11d4,{0x83, 0x13,0x00,0x50,0x04,0x52,0x6A,0xB4}};
-    HRESULT hr = CoCreateInstance( clsFactory, NULL, CLSCTX_ALL, __uuidof(IDispatch), (void**)&mpDispFactory);
-    if( !SUCCEEDED( hr ) )
-        OutputError_Impl( NULL, hr );
-
-    mPWinClass.style			= CS_HREDRAW|CS_VREDRAW;
-    mPWinClass.lpfnWndProc		= ::DefWindowProc;
-    mPWinClass.cbClsExtra		= 0;
-    mPWinClass.cbWndExtra		= 0;
-    mPWinClass.hInstance		= (HINSTANCE) GetModuleHandle(NULL); //myInstance;
-    mPWinClass.hIcon			= NULL;
-    mPWinClass.hCursor			= NULL;
-    mPWinClass.hbrBackground	= (HBRUSH) COLOR_BACKGROUND;
-    mPWinClass.lpszMenuName	    = NULL;
-    mPWinClass.lpszClassName	= STAROFFICE_WINDOWCLASS;
-
-    RegisterClass(&mPWinClass);
-}
-
-CSOActiveX::~CSOActiveX()
-{
-    Cleanup();
-
-}
-
-HRESULT CSOActiveX::Cleanup()
-{
-    CComVariant dummyResult;
-
-    if( mpDispatchInterceptor )
-    {
-        if( mpDispFrame )
-        {
-            // remove dispatch interceptor
-            CComQIPtr< IDispatch, &IID_IDispatch > pIDispDispInter( mpDispatchInterceptor );
-                CComVariant aVariant( pIDispDispInter );
-            ExecuteFunc( mpDispFrame,
-                         L"releaseDispatchProviderInterceptor",
-                         &aVariant,
-                         1,
-                         &dummyResult );
-        }
-
-        mpDispatchInterceptor->ClearParent();
-        mpDispatchInterceptor->Release();
-        mpDispatchInterceptor = NULL;
-    }
-
-    mpDispTempFile = CComPtr< IDispatch >();
-    mbReadyForActivation = FALSE;
-
-    if( mpInstanceLocker )
-    {
-        ExecuteFunc( mpInstanceLocker, L"dispose", NULL, 0, &dummyResult );
-        mpInstanceLocker = CComPtr< IDispatch >();
-    }
-
-    if( mpDispFrame )
-    {
-        BOOL bCloserActivated = FALSE;
-
-        CComPtr<IDispatch> pDispDocumentCloser;
-        CComVariant aDocCloser( L"com.sun.star.embed.DocumentCloser" );
-        HRESULT hr = GetIDispByFunc( mpDispFactory,
-                                     L"createInstance",
-                                     &aDocCloser,
-                                     1,
-                                     pDispDocumentCloser );
-        if ( SUCCEEDED( hr ) && pDispDocumentCloser )
-        {
-            SAFEARRAY FAR* pInitFrame = SafeArrayCreateVector( VT_VARIANT, 0, 1 );
-            long nInitInd = 0;
-            CComVariant pFrameVariant( mpDispFrame );
-            SafeArrayPutElement( pInitFrame, &nInitInd, &pFrameVariant );
-            CComVariant aVarInitFrame;
-            aVarInitFrame.vt = VT_ARRAY | VT_VARIANT; aVarInitFrame.parray = pInitFrame;
-            hr = ExecuteFunc( pDispDocumentCloser, L"initialize", &aVarInitFrame, 1, &dummyResult );
-            if( SUCCEEDED( hr ) )
-            {
-                // the following call will let the closing happen
-                hr = ExecuteFunc( pDispDocumentCloser, L"dispose", NULL, 0, &dummyResult );
-                bCloserActivated = SUCCEEDED( hr );
-            }
-        }
-
-        if ( !bCloserActivated )
-        {
-            CComVariant aPropVar;
-            aPropVar.vt = VT_BOOL; aPropVar.boolVal = VARIANT_TRUE;
-            if ( !SUCCEEDED( ExecuteFunc( mpDispFrame, L"close", &aPropVar, 1, &dummyResult ) ) )
-                ExecuteFunc( mpDispFrame, L"dispose", NULL, 0, &dummyResult );
-        }
-
-        mpDispFrame = CComPtr< IDispatch >();
-    }
-
-    if( ::IsWindow( mOffWin ) )
-        ::DestroyWindow( mOffWin );
-
-    TerminateOffice();
-
-    return S_OK;
-}
-
-HRESULT CSOActiveX::TerminateOffice()
-{
-    // create desktop
-    CComPtr<IDispatch> pdispDesktop;
-    CComVariant aDesktopServiceName( L"com.sun.star.frame.Desktop" );
-
-    HRESULT hr = GetIDispByFunc( mpDispFactory, L"createInstance", &aDesktopServiceName, 1, pdispDesktop );
-    if( !pdispDesktop || !SUCCEEDED( hr ) ) return hr;
-
-    // create tree of frames
-    CComPtr<IDispatch> pdispChildren;
-    hr = GetIDispByFunc( pdispDesktop, L"getFrames", NULL, 0, pdispChildren );
-    if( !pdispChildren || !SUCCEEDED( hr ) ) return hr;
-
-    CComVariant aFrames;
-    CComVariant nFlag( 4 );
-    hr = ExecuteFunc( pdispChildren, L"queryFrames", &nFlag, 1, &aFrames );
-    if ( SUCCEEDED( hr ) )
-    {
-        if ( ( aFrames.vt == ( VT_ARRAY | VT_DISPATCH ) || aFrames.vt == ( VT_ARRAY | VT_VARIANT ) ) 
-          && ( !aFrames.parray || aFrames.parray->cDims == 1 && aFrames.parray->rgsabound[0].cElements == 0 ) )
-        {
-            // there is no frames open
-            // TODO: check whether the frames are hidden if they are open?
-            CComVariant dummyResult;
-            hr = ExecuteFunc( pdispDesktop, L"terminate", NULL, 0, &dummyResult );
-        }
-    }
-    
-    return hr;
-}
-
-STDMETHODIMP CSOActiveX::InitNew ()
-{
-    mnVersion = GetVersionConnected();
-    mbLoad = TRUE;
-    return S_OK;
-}
-
-STDMETHODIMP CSOActiveX::Load ( LPSTREAM /*pStm*/ )
-{
-    mnVersion = GetVersionConnected();
-    mbLoad = TRUE;
-
-    // may be later?
-    // for now just ignore
-
-    return S_OK;
-}
-
-STDMETHODIMP CSOActiveX::Load( LPPROPERTYBAG pPropBag, LPERRORLOG /*pErrorLog*/ )
-{
-    mnVersion = GetVersionConnected();
-
-    IPropertyBag2* pPropBag2;
-    HRESULT hr = pPropBag->QueryInterface( IID_IPropertyBag2, (void**)&pPropBag2 );
-    //ATLASSERT( hr >= 0 );
-
-    if( !SUCCEEDED( hr ) )
-        return hr;
-
-    unsigned long aNum;
-    hr = pPropBag2->CountProperties( &aNum );
-    //ATLASSERT( hr >= 0 );
-    if( !SUCCEEDED( hr ) )
-        return hr;
-
-    PROPBAG2* aPropNames = new PROPBAG2[aNum];
-    unsigned long aReaded;
-
-    hr = pPropBag2->GetPropertyInfo( 0,
-                                     aNum,
-                                     aPropNames,
-                                     &aReaded );
-    //ATLASSERT( hr >= 0 );
-    if( !SUCCEEDED( hr ) )
-    {
-        delete[] aPropNames;
-        return hr;
-    }
-
-    CComVariant* aVal = new CComVariant[aNum];
-    HRESULT*     hvs = new HRESULT[aNum];
-    hr = pPropBag2->Read( aNum,
-                          aPropNames,
-                          NULL,
-                          aVal,
-                          hvs );
-    //ATLASSERT( hr >= 0 );
-    if( !SUCCEEDED( hr ) )
-    {
-        delete[] hvs;
-        delete[] aVal;
-        delete[] aPropNames;
-        return hr;
-    }
-
-    USES_CONVERSION;
-    for( unsigned long ind = 0; ind < aNum; ind++ )
-    {
-        // all information from the 'object' tag is in strings
-        if( aVal[ind].vt == VT_BSTR && !strcmp( OLE2T( aPropNames[ind].pstrName ), "src" ) )
-        {
-            mCurFileUrl = wcsdup( aVal[ind].bstrVal );
-        }
-        else if( aVal[ind].vt == VT_BSTR
-                && !strcmp( OLE2T( aPropNames[ind].pstrName ), "readonly" ) )
-        {
-            if( !strcmp( OLE2T( aVal[ind].bstrVal ), "true" ) )
-            {
-                // the default value
-                mbViewOnly = TRUE;
-            }
-            else
-            {
-                mbViewOnly = FALSE;
-            }
-        }
-    }
-
-    delete[] hvs;
-    delete[] aVal;
-    delete[] aPropNames;
-
-    if( !mpDispFactory )
-        return hr;
-
-    mbReadyForActivation = FALSE;
-    hr = CBindStatusCallback<CSOActiveX>::Download( this, &CSOActiveX::CallbackCreateXInputStream, mCurFileUrl, m_spClientSite, FALSE );
-    if ( hr == MK_S_ASYNCHRONOUS )
-        hr = S_OK;
-    
-    if ( !SUCCEEDED( hr ) )
-    {
-        // trigger initialization without stream
-        mbLoad = TRUE;
-
-        Invalidate();
-        UpdateWindow();
-    }
-
-    return hr;
-}
-
-HRESULT CSOActiveX::GetUnoStruct( OLECHAR* sStructName, CComPtr<IDispatch>& pdispResult )
-{
-    CComVariant aComStruct( sStructName );
-    return GetIDispByFunc( mpDispFactory, L"Bridge_GetStruct", &aComStruct, 1, pdispResult );
-}
-
-HRESULT CSOActiveX::GetUrlStruct( OLECHAR* sUrl, CComPtr<IDispatch>& pdispUrl )
-{
-    HRESULT hr = GetUnoStruct( L"com.sun.star.util.URL", pdispUrl );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    OLECHAR* sURLMemberName = L"Complete";
-    DISPID nURLID;
-    hr = pdispUrl->GetIDsOfNames( IID_NULL, &sURLMemberName, 1, LOCALE_USER_DEFAULT, &nURLID );
-    if( !SUCCEEDED( hr ) ) return hr;
-    CComVariant aComUrl( sUrl );
-    hr = CComDispatchDriver::PutProperty( pdispUrl, nURLID, &aComUrl );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    CComPtr<IDispatch> pdispTransformer;
-    CComVariant aServiceName( L"com.sun.star.util.URLTransformer" );
-    hr = GetIDispByFunc( mpDispFactory,
-                         L"createInstance",
-                         &aServiceName,
-                         1,
-                         pdispTransformer );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    CComVariant dummyResult;
-    CComVariant aParam[2];
-    aParam[1].ppdispVal = &pdispUrl;
-    aParam[1].vt = VT_DISPATCH | VT_BYREF;
-    aParam[0] = CComVariant( L"file:///" );
-
-    hr = ExecuteFunc( pdispTransformer, L"parseSmart", aParam, 2, &dummyResult );
-    if( !SUCCEEDED( hr ) || dummyResult.vt != VT_BOOL || !dummyResult.boolVal ) return hr;
-
-    return S_OK;
-}
-
-HRESULT CSOActiveX::SetLayoutManagerProps()
-{
-    if ( !mpDispFrame )
-        return E_FAIL;
-
-    CComVariant pVarLayoutMgr;
-    OLECHAR* sLMPropName = L"LayoutManager";
-    HRESULT hr = GetPropertiesFromIDisp( mpDispFrame, &sLMPropName, &pVarLayoutMgr, 1 );
-    if( pVarLayoutMgr.vt != VT_DISPATCH || pVarLayoutMgr.pdispVal == NULL )
-        return E_FAIL;
-
-      CComPtr<IDispatch> pdispLM( pVarLayoutMgr.pdispVal );
-
-
-    if( !SUCCEEDED( hr ) || !pdispLM )
-        return E_FAIL;
-
-    OLECHAR* sATName = L"AutomaticToolbars";
-    CComVariant pATProp;
-    pATProp.vt = VT_BOOL; pATProp.boolVal = VARIANT_FALSE ;
-    hr = PutPropertiesToIDisp( pdispLM, &sATName, &pATProp, 1 );
-
-    return hr;
-}
-
-HRESULT CSOActiveX::CreateFrameOldWay( HWND hwnd, int width, int height )
-{
-    if( !mpDispFactory )
-        return E_FAIL;
-
-    // create window handle holder
-    CComPtr< CComObject< SOComWindowPeer > > pPeerToSend = new CComObject<SOComWindowPeer>();
-    pPeerToSend->SetHWNDInternally( hwnd );
-    CComQIPtr< IDispatch, &IID_IDispatch > pIDispToSend( pPeerToSend );
-
-    // create rectangle structure
-    CComPtr<IDispatch> pdispRectangle;
-    HRESULT hr = GetUnoStruct( L"com.sun.star.awt.Rectangle", pdispRectangle );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    OLECHAR* sRectMemberNames[4] = { L"X",
-                                      L"Y",
-                                      L"Width",
-                                      L"Height" };
-    CComVariant pRectVariant[4];
-    pRectVariant[0] = pRectVariant[1] = pRectVariant[2] = pRectVariant[3] = CComVariant( 0 );
-
-    hr = PutPropertiesToIDisp( pdispRectangle, sRectMemberNames, pRectVariant, 4 );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // create WindowDescriptor structure
-    CComPtr<IDispatch> pdispWinDescr;
-    hr = GetUnoStruct( L"com.sun.star.awt.WindowDescriptor", pdispWinDescr );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // fill in descriptor with info
-    OLECHAR* sDescriptorMemberNames[6] = { L"Type",
-                                 L"WindowServiceName",
-                                 L"ParentIndex",
-                                 L"Parent",
-                                 L"Bounds",
-                                 L"WindowAttributes" };
-    CComVariant pDescriptorVar[6];
-    pDescriptorVar[0] = CComVariant( 0 );
-    pDescriptorVar[1] = CComVariant( L"workwindow" );
-    pDescriptorVar[2] = CComVariant( 1 );
-    pDescriptorVar[3] = CComVariant( pIDispToSend );
-    pDescriptorVar[4] = CComVariant( pdispRectangle );
-    pDescriptorVar[5] = CComVariant( 33 );
-    hr = PutPropertiesToIDisp( pdispWinDescr, sDescriptorMemberNames, pDescriptorVar, 6 );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // create XToolkit instance
-    CComPtr<IDispatch> pdispToolkit;
-    CComVariant aServiceName( L"com.sun.star.awt.Toolkit" );
-    hr = GetIDispByFunc( mpDispFactory, L"createInstance", &aServiceName, 1, pdispToolkit );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // create window with toolkit
-    CComVariant aWinDescr( pdispWinDescr );
-    hr = GetIDispByFunc( pdispToolkit, L"createWindow", &aWinDescr, 1, mpDispWin );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // create frame
-    aServiceName = CComVariant( L"com.sun.star.frame.Task" );
-    hr = GetIDispByFunc( mpDispFactory, L"createInstance", &aServiceName, 1, mpDispFrame );
-    if( !SUCCEEDED( hr ) || !mpDispFrame )
-    {
-        // the interface com.sun.star.frame.Task is removed in 6.1
-        // but the interface com.sun.star.frame.Frame has some bugs in 6.0
-        aServiceName = CComVariant( L"com.sun.star.frame.Frame" );
-        hr = GetIDispByFunc( mpDispFactory, L"createInstance", &aServiceName, 1, mpDispFrame );
-        if( !SUCCEEDED( hr ) ) return hr;
-    }
-
-    // initialize frame
-    CComVariant dummyResult;
-    CComVariant aDispWin( mpDispWin );
-    hr = ExecuteFunc( mpDispFrame, L"initialize", &aDispWin, 1, &dummyResult );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // set some properties to the layout manager, ignore errors for now
-    SetLayoutManagerProps();
-
-    // create desktop
-    CComPtr<IDispatch> pdispDesktop;
-    aServiceName = CComVariant( L"com.sun.star.frame.Desktop" );
-    hr = GetIDispByFunc( mpDispFactory, L"createInstance", &aServiceName, 1, pdispDesktop );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // create tree of frames
-    CComPtr<IDispatch> pdispChildren;
-    hr = GetIDispByFunc( pdispDesktop, L"getFrames", NULL, 0, pdispChildren );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // insert new frame into desctop hierarchy
-    CComVariant aDispFrame( mpDispFrame );
-    hr = ExecuteFunc( pdispChildren, L"append", &aDispFrame, 1, &dummyResult );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // initialize window
-    CComVariant aTransparent( (long)0xFFFFFFFF );
-    hr = ExecuteFunc( mpDispWin, L"setBackground", &aTransparent, 1, &dummyResult );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    CComVariant aTrue( TRUE );
-    hr = ExecuteFunc( mpDispWin, L"setVisible", &aTrue, 1, &dummyResult );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    CComVariant aPosArgs[5];
-    aPosArgs[4] = CComVariant( 0 );
-    aPosArgs[3] = CComVariant( 0 );
-    aPosArgs[2] = CComVariant( width );
-    aPosArgs[1] = CComVariant( height );
-    aPosArgs[0] = CComVariant( 12 );
-    hr = ExecuteFunc( mpDispWin, L"setPosSize", aPosArgs, 5, &dummyResult );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    // create frame locker if there is such service
-    aServiceName = CComVariant( L"com.sun.star.embed.InstanceLocker" );
-    hr = GetIDispByFunc( mpDispFactory, L"createInstance", &aServiceName, 1, mpInstanceLocker );
-    if( SUCCEEDED( hr ) && mpInstanceLocker )
-    {
-        SAFEARRAY FAR* pInitVals = SafeArrayCreateVector( VT_VARIANT, 0, 3 );
-
-        // the first sequence element
-        long nInitInd = 0;
-        CComVariant pFrameVariant( mpDispFrame );
-        SafeArrayPutElement( pInitVals, &nInitInd, &pFrameVariant );
-        
-        // the second sequence element
-        nInitInd = 1;
-        CComVariant pStrArr( 1L );
-        SafeArrayPutElement( pInitVals, &nInitInd, &pStrArr );
-
-        // the third sequence element
-        nInitInd = 2;
-        CComPtr<IDispatch> pdispValueObj;
-        hr = GetIDispByFunc( mpDispFactory, L"Bridge_GetValueObject", NULL, 0, pdispValueObj );
-        if( !SUCCEEDED( hr ) || !pdispValueObj ) return hr;
-
-        CComVariant aValueArgs[2];
-        aValueArgs[1] = CComVariant( L"com.sun.star.embed.XActionsApproval" );
-        CComPtr< CComObject< SOActionsApproval > > pApproval( new CComObject<SOActionsApproval>() );
-        aValueArgs[0] = CComVariant ( pApproval );
-
-        hr = ExecuteFunc( pdispValueObj, L"Set", aValueArgs, 2, &dummyResult );
-        if( !SUCCEEDED( hr ) ) return hr;
-
-        CComVariant aValueObj( pdispValueObj );
-        SafeArrayPutElement( pInitVals, &nInitInd, &aValueObj );
-
-        // execute initialize()
-        CComVariant aVarInitVals;
-        aVarInitVals.vt = VT_ARRAY | VT_VARIANT; aVarInitVals.parray = pInitVals;
-        hr = ExecuteFunc( mpInstanceLocker, L"initialize", &aVarInitVals, 1, &dummyResult );
-        if( !SUCCEEDED( hr ) ) return hr;
-    }
-
-    return S_OK;
-}
-
-HRESULT CSOActiveX::CallLoadComponentFromURL1PBool( OLECHAR* sUrl, OLECHAR* sArgName, BOOL sArgVal )
-{
-    SAFEARRAY FAR* pPropVals = SafeArrayCreateVector( VT_DISPATCH, 0, 1 );
-    long ix = 0;
-    CComPtr<IDispatch> pdispPropVal;
-    HRESULT hr = GetUnoStruct( L"com.sun.star.beans.PropertyValue", pdispPropVal );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    OLECHAR* 	sPropMemberNames[2] = { L"Name", L"Value" };
-    CComVariant pPropVar[2];
-    pPropVar[0] = CComVariant( sArgName );
-    pPropVar[1].vt = VT_BOOL; pPropVar[1].boolVal = sArgVal ? VARIANT_TRUE : VARIANT_FALSE ;
-    hr = PutPropertiesToIDisp( pdispPropVal, sPropMemberNames, pPropVar, 2 );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    SafeArrayPutElement( pPropVals, &ix, pdispPropVal );
-
-    CComVariant aDispArgs[4];
-    aDispArgs[3] = CComVariant( sUrl );
-    aDispArgs[2] = CComVariant( L"_self" );
-    aDispArgs[1] = CComVariant( 0 );
-    // aDispArgs[0] = CComVariant( pPropVals ); such constructor is not defined ??!
-    aDispArgs[0].vt = VT_ARRAY | VT_DISPATCH; aDispArgs[0].parray = pPropVals;
-
-    CComVariant dummyResult;
-    hr = ExecuteFunc( mpDispFrame, L"loadComponentFromURL", aDispArgs, 4, &dummyResult );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    return S_OK;
-}
-
-HRESULT CSOActiveX::CallDispatchMethod( OLECHAR* sUrl,
-                                        CComVariant* aArgNames,
-                                        CComVariant* aArgVals,
-                                        unsigned int count )
-{
-    CComPtr<IDispatch> pdispURL;
-    HRESULT hr = GetUrlStruct( sUrl, pdispURL );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    CComPtr<IDispatch> pdispXDispatch;
-    CComVariant aArgs[3];
-    aArgs[2] = CComVariant( pdispURL );
-    aArgs[1] = CComVariant( L"" );
-    aArgs[0] = CComVariant( (int)0 );
-    hr = GetIDispByFunc( mpDispFrame,
-                         L"queryDispatch",
-                         aArgs,
-                         3,
-                         pdispXDispatch );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    SAFEARRAY FAR* pPropVals = SafeArrayCreateVector( VT_DISPATCH, 0, count );
-    for( long ix = 0; ix < (long)count; ix ++ )
-    {
-        CComPtr<IDispatch> pdispPropVal;
-        hr = GetUnoStruct( L"com.sun.star.beans.PropertyValue", pdispPropVal );
-        if( !SUCCEEDED( hr ) ) return hr;
-
-        OLECHAR* 	sPropMemberNames[2] = { L"Name", L"Value" };
-        CComVariant pPropVar[2];
-        pPropVar[0] = aArgNames[ix];
-        pPropVar[1] = aArgVals[ix];
-        hr = PutPropertiesToIDisp( pdispPropVal, sPropMemberNames, pPropVar, 2 );
-        if( !SUCCEEDED( hr ) ) return hr;
-
-        SafeArrayPutElement( pPropVals, &ix, pdispPropVal );
-    }
-
-    CComVariant aDispArgs[2];
-    aDispArgs[1] = CComVariant( pdispURL );
-    // aDispArgs[0] = CComVariant( pPropVals ); such constructor is not defined ??!
-    aDispArgs[0].vt = VT_ARRAY | VT_DISPATCH; aDispArgs[0].parray = pPropVals;
-
-    CComVariant dummyResult;
-    hr = ExecuteFunc( pdispXDispatch, L"dispatch", aDispArgs, 2, &dummyResult );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    return S_OK;
-}
-
-void CSOActiveX::CallbackCreateXInputStream( CBindStatusCallback<CSOActiveX>* /*pbsc*/, BYTE* pBytes, DWORD dwSize )
-{
-    if ( mbReadyForActivation )
-        return;
-
-    BOOL bSuccess = FALSE;
-    BOOL bFinishDownload = FALSE;
-    if ( !pBytes )
-    {
-        // means the download is finished, dwSize contains hresult
-        bFinishDownload = TRUE;
-        if ( SUCCEEDED( dwSize ) )
-            bSuccess = TRUE;
-    }
-    else
-    {
-        HRESULT hr = S_OK;
-
-        if ( !mpDispTempFile )
-        {
-            CComVariant aServiceName( L"com.sun.star.io.TempFile" );
-            hr = GetIDispByFunc( mpDispFactory,
-                                 L"createInstance",
-                                 &aServiceName,
-                                 1,
-                                 mpDispTempFile );
-        }
-
-        if( SUCCEEDED( hr ) && mpDispTempFile )
-        {
-            SAFEARRAY FAR* pDataArray = SafeArrayCreateVector( VT_I1, 0, dwSize );
-    
-            if ( pDataArray )
-            {
-                hr = SafeArrayLock( pDataArray );
-                if ( SUCCEEDED( hr ) )
-                {
-                    for( DWORD ix = 0; ix < dwSize; ix++ )
-                        ((BYTE*)(pDataArray->pvData))[ix] = pBytes[ix];
-                    hr = SafeArrayUnlock( pDataArray );
-                    if ( SUCCEEDED( hr ) )
-                    {
-                        CComVariant aArgs[1];
-                        aArgs[0].vt = VT_ARRAY | VT_I1; aArgs[0].parray = pDataArray;
-                        CComVariant dummyResult;
-                        hr = ExecuteFunc( mpDispTempFile, L"writeBytes", aArgs, 1, &dummyResult );
-                        if( SUCCEEDED( hr ) )
-                            bSuccess = TRUE;
-                    }
-                }
-            }
-        }
-    }
-
-    if ( !bSuccess )
-    {
-        // the download failed, let StarOffice download
-        bFinishDownload = TRUE;
-        mpDispTempFile = CComPtr< IDispatch >();
-    }
-
-    if ( bFinishDownload )
-    {
-        // trigger the loading now
-        mbLoad = TRUE;
-        mbReadyForActivation = TRUE;
-
-        Invalidate();
-        UpdateWindow();
-    }
-}
-
-HRESULT CSOActiveX::LoadURLToFrame( )
-{
-    CComVariant aArgNames[4] = { L"ReadOnly", L"ViewOnly", L"AsTemplate", L"InputStream" };
-    CComVariant aArgVals[4];
-    unsigned int nCount = 3; // the 4-th argument is used only if the stream can be retrieved
-
-    aArgVals[0].vt = VT_BOOL; aArgVals[0].boolVal = mbViewOnly ? VARIANT_TRUE : VARIANT_FALSE;
-    aArgVals[1].vt = VT_BOOL; aArgVals[1].boolVal = mbViewOnly ? VARIANT_TRUE : VARIANT_FALSE;
-    aArgVals[2].vt = VT_BOOL; aArgVals[2].boolVal = VARIANT_FALSE;
-
-    if ( mpDispTempFile )
-    {
-        aArgVals[3] = CComVariant( mpDispTempFile );
-        nCount = 4;
-    }
-
-    HRESULT hr = CallDispatchMethod( mCurFileUrl, aArgNames, aArgVals, nCount );
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    CComVariant aBarName( L"MenuBarVisible" );
-    CComVariant aBarVis;
-    aBarVis.vt = VT_BOOL; aBarVis.boolVal = VARIANT_FALSE;
-    hr = CallDispatchMethod( L"slot:6661", &aBarName, &aBarVis, 1 );
-    // does not work for some documents, but it is no error
-    // if( !SUCCEEDED( hr ) ) return hr;
-
-    // try to get the model and set the presetation specific property, the setting will fail for other document formats
-    CComPtr<IDispatch> pdispController;
-    hr = GetIDispByFunc( mpDispFrame, L"getController", NULL, 0, pdispController );
-    if ( SUCCEEDED( hr ) && pdispController )
-    {
-        CComPtr<IDispatch> pdispModel;
-        hr = GetIDispByFunc( pdispController, L"getModel", NULL, 0, pdispModel );
-        if ( SUCCEEDED( hr ) && pdispModel )
-        {
-            CComPtr<IDispatch> pdispPres;
-            hr = GetIDispByFunc( pdispModel, L"getPresentation", NULL, 0, pdispPres );
-            if ( SUCCEEDED( hr ) && pdispPres )
-            {
-                // this is a presentation
-                // let the slide show be shown in the document window
-                OLECHAR* pPropName = L"IsFullScreen";
-                CComVariant pPresProp;
-                pPresProp.vt = VT_BOOL; pPresProp.boolVal = VARIANT_FALSE ;
-                hr = PutPropertiesToIDisp( pdispPres, &pPropName, &pPresProp, 1 );
-
-                // start the slide show
-                if ( SUCCEEDED( hr ) )
-                {
-                    CComVariant dummyResult;
-                    ExecuteFunc( pdispPres, L"Start", NULL, 0, &dummyResult );
-                }
-            }
-        }
-    }
-
-    // create dispatch interceptor
-    mpDispatchInterceptor = new CComObject< SODispatchInterceptor >();
-    mpDispatchInterceptor->AddRef();
-    mpDispatchInterceptor->SetParent( this );
-    CComQIPtr< IDispatch, &IID_IDispatch > pIDispDispInter( mpDispatchInterceptor );
-
-    // register dispatch interceptor in the frame
-        CComVariant aDispVariant( pIDispDispInter );
-    CComVariant dummyResult;
-    hr = ExecuteFunc( mpDispFrame,
-                      L"registerDispatchProviderInterceptor",
-                                          &aDispVariant,
-                      1,
-                      &dummyResult );
-
-    if( !SUCCEEDED( hr ) ) return hr;
-
-    return S_OK;
-}
-
-SOVersion CSOActiveX::GetVersionConnected()
-{
-    SOVersion bResult = SO_NOT_DETECTED;
-    if( mpDispFactory )
-    {
-        // create ConfigurationProvider instance
-        CComPtr<IDispatch> pdispConfProv;
-        CComVariant aServiceName( L"com.sun.star.configuration.ConfigurationProvider" );
-        HRESULT hr = GetIDispByFunc( mpDispFactory,
-                             L"createInstance",
-                             &aServiceName,
-                             1,
-                             pdispConfProv );
-
-        if( SUCCEEDED( hr ) && pdispConfProv )
-        {
-            CComPtr<IDispatch> pdispConfAccess;
-
-            SAFEARRAY* pInitParams = SafeArrayCreateVector( VT_VARIANT, 0, 1 );
-
-            if( pInitParams )
-            {
-                long ix = 0;
-                CComVariant aConfPath( L"org.openoffice.Setup" );
-                SafeArrayPutElement( pInitParams, &ix, &aConfPath );
-
-                CComVariant aArgs[2];
-                aArgs[1] = CComVariant( L"com.sun.star.configuration.ConfigurationAccess" );
-                aArgs[0].vt = VT_ARRAY | VT_VARIANT; aArgs[0].parray = pInitParams;
-
-                hr = GetIDispByFunc( pdispConfProv,
-                                     L"createInstanceWithArguments",
-                                    aArgs,
-                                     2,
-                                     pdispConfAccess );
-
-                if( SUCCEEDED( hr ) && pdispConfAccess )
-                {
-                    CComVariant aOfficeName;
-
-                    CComVariant aProductName( L"Product/ooName" );
-                    hr = ExecuteFunc( pdispConfAccess,
-                                        L"getByHierarchicalName",
-                                        &aProductName,
-                                        1,
-                                        &aOfficeName );
-
-                    if( SUCCEEDED( hr ) && aOfficeName.vt == VT_BSTR )
-                    {
-                        CComVariant aOfficeVersion;
-
-                        CComVariant aProductVersion( L"Product/ooSetupVersion" );
-                        hr = ExecuteFunc( pdispConfAccess,
-                                            L"getByHierarchicalName",
-                                            &aProductVersion,
-                                            1,
-                                            &aOfficeVersion );
-
-                        if( SUCCEEDED( hr ) && aOfficeVersion.vt == VT_BSTR )
-                        {
-                            USES_CONVERSION;
-                            if( !strcmp( OLE2T( aOfficeName.bstrVal ), "StarOffice" ) )
-                            {
-                                if( !strncmp( OLE2T( aOfficeVersion.bstrVal ), "6.1", 3 ) )
-                                    bResult = SO_61;
-                                else if( !strncmp( OLE2T( aOfficeVersion.bstrVal ), "6.0", 3 ) )
-                                    bResult = SO_60;
-                                else if( !strncmp( OLE2T( aOfficeVersion.bstrVal ), "5.2", 3 ) )
-                                    bResult = SO_52;
-                                else
-                                    bResult = SO_UNKNOWN;
-                            }
-                            else // OpenOffice
-                            {
-                                if( !strncmp( OLE2T( aOfficeVersion.bstrVal ), "1.1", 3 ) )
-                                    bResult = OO_11;
-                                else if( !strncmp( OLE2T( aOfficeVersion.bstrVal ), "1.0", 3 ) )
-                                    bResult = OO_10;
-                                else
-                                    bResult = OO_UNKNOWN;
-                            }
-                        }
-                    }
-                }
-            }
-        }
-    }
-
-    return bResult;
-}
-
-class LockingGuard
-{
-    BOOL& mbLocked;
-public:
-    LockingGuard( BOOL& bLocked )
-    : mbLocked( bLocked )
-    {
-        mbLocked = TRUE;
-    }
-
-    ~LockingGuard()
-    {
-        mbLocked = FALSE;
-    }
-};
-
-HRESULT CSOActiveX::OnDrawAdvanced( ATL_DRAWINFO& di )
-{
-    // This method is called only in main thread, no need to lock it
-
-    // Get read of reentrance problems
-    if ( mbDrawLocked )
-        return S_OK;
-    LockingGuard aGuard( mbDrawLocked );
-    
-    if( m_spInPlaceSite && mCurFileUrl && mbReadyForActivation )
-    {
-        HWND hwnd;
-        HRESULT hr = m_spInPlaceSite->GetWindow( &hwnd );
-        if( !SUCCEEDED( hr ) ) return hr;
-
-        if( mParentWin != hwnd || !mOffWin )
-        {
-            if( mpDispFrame )
-            {
-                CComVariant dummyResult;
-                CComVariant aPropVar;
-                aPropVar.vt = VT_BOOL; aPropVar.boolVal = VARIANT_FALSE;
-                HRESULT hr = ExecuteFunc( mpDispFrame, L"close", &aPropVar, 1, &dummyResult );
-                (void)hr;
-                mpDispFrame = CComPtr<IDispatch>();
-            }
-
-            mParentWin = hwnd;
-            mOffWin = CreateWindow(
-                                STAROFFICE_WINDOWCLASS,
-                                "OfficeContainer",
-                                WS_CHILD | WS_CLIPCHILDREN | WS_BORDER,
-                                di.prcBounds->left,
-                                di.prcBounds->top,
-                                di.prcBounds->right - di.prcBounds->left,
-                                di.prcBounds->bottom - di.prcBounds->top,
-                                mParentWin,
-                                NULL,
-                                NULL,
-                                NULL );
-
-            ::ShowWindow( mOffWin, SW_SHOW );
-        }
-        else
-        {
-            RECT aRect;
-            ::GetWindowRect( mOffWin, &aRect );
-
-            if( aRect.left !=  di.prcBounds->left || aRect.top != di.prcBounds->top
-             || aRect.right != di.prcBounds->right || aRect.bottom != di.prcBounds->bottom )
-            {
-                // on this state the office window should exist already
-                ::SetWindowPos( mOffWin,
-                              HWND_TOP,
-                              di.prcBounds->left,
-                              di.prcBounds->top,
-                              di.prcBounds->right - di.prcBounds->left,
-                              di.prcBounds->bottom - di.prcBounds->top,
-                              SWP_NOZORDER );
-
-                CComVariant aPosArgs[5];
-                aPosArgs[4] = CComVariant( 0 );
-                aPosArgs[3] = CComVariant( 0 );
-                aPosArgs[2] = CComVariant( int(di.prcBounds->right - di.prcBounds->left) );
-                aPosArgs[1] = CComVariant( int(di.prcBounds->bottom - di.prcBounds->top) );
-                aPosArgs[0] = CComVariant( 12 );
-                CComVariant dummyResult;
-                hr = ExecuteFunc( mpDispWin, L"setPosSize", aPosArgs, 5, &dummyResult );
-                if( !SUCCEEDED( hr ) ) return hr;
-            }
-        }
-
-        if( !mnVersion )
-        {
-            OutputError_Impl( mOffWin, CS_E_INVALID_VERSION );
-            return E_FAIL;
-        }
-
-        if( ! mpDispFrame )
-        {
-            hr = CreateFrameOldWay( mOffWin,
-                            di.prcBounds->right - di.prcBounds->left,
-                            di.prcBounds->bottom - di.prcBounds->top );
-
-            if( !SUCCEEDED( hr ) )
-            {
-                // if the frame can not be opened do not try any more
-                mbReadyForActivation = FALSE;
-                OutputError_Impl( mOffWin, STG_E_ABNORMALAPIEXIT );
-                return hr;
-            }
-        }
-
-        if( mbLoad )
-        {
-            hr = LoadURLToFrame();
-            mbLoad = FALSE;
-
-            if( !SUCCEEDED( hr ) )
-            {
-                // if the document can not be opened do not try any more
-                mbReadyForActivation = FALSE;
-
-                OutputError_Impl( mOffWin, STG_E_ABNORMALAPIEXIT );
-
-                return hr;
-            }
-        }
-    }
-    else
-    {
-        // activate the fallback
-        CComControl<CSOActiveX>::OnDrawAdvanced( di );
-    }
-
-    return S_OK;
-}
-
-HRESULT CSOActiveX::OnDraw( ATL_DRAWINFO& di )
-{
-    // fallback that is activated by the parent class
-    if ( di.hdcDraw )
-        FillRect( di.hdcDraw, (RECT*)di.prcBounds, (HBRUSH)COLOR_BACKGROUND );
-
-    return S_OK;
-}
-
-STDMETHODIMP CSOActiveX::SetClientSite( IOleClientSite* aClientSite )
-{
-    HRESULT hr = IOleObjectImpl<CSOActiveX>::SetClientSite( aClientSite );
-
-    if( !aClientSite )
-    {
-        //ATLASSERT( mWebBrowser2 );
-        if( mWebBrowser2 )
-            AtlUnadvise( mWebBrowser2, DIID_DWebBrowserEvents2, mCookie );
-        return hr;
-    }
-
-    CComPtr<IOleContainer> aContainer;
-    m_spClientSite->GetContainer( &aContainer );
-//	ATLASSERT( aContainer );
-
-    if( SUCCEEDED( hr )  && aContainer )
-    {
-        CComQIPtr<IServiceProvider, &IID_IServiceProvider> aServiceProvider( aContainer );
-        //ATLASSERT( aServiceProvider );
-
-        if( aServiceProvider )
-        {
-            aServiceProvider->QueryService( SID_SInternetExplorer,
-                                            IID_IWebBrowser,
-                                            (void**)&mWebBrowser2 );
-//			ATLASSERT( mWebBrowser2 );
-            if( mWebBrowser2 )
-                AtlAdvise( mWebBrowser2, GetUnknown(), DIID_DWebBrowserEvents2, &mCookie );
-        }
-    }
-
-    return hr;
-}
-
-STDMETHODIMP CSOActiveX::Invoke(DISPID dispidMember,
-                                REFIID riid,
-                                LCID lcid,
-                                WORD wFlags,
-                                DISPPARAMS* pDispParams,
-                                VARIANT* pvarResult,
-                                EXCEPINFO* pExcepInfo,
-                                UINT* puArgErr)
-{
-    if (riid != IID_NULL)
-        return DISP_E_UNKNOWNINTERFACE;
-
-    if (!pDispParams)
-        return DISP_E_PARAMNOTOPTIONAL;
-
-    if ( dispidMember == DISPID_ONQUIT )
-        Cleanup();
-
-    IDispatchImpl<ISOActiveX, &IID_ISOActiveX,
-                  &LIBID_SO_ACTIVEXLib>::Invoke(
-             dispidMember, riid, lcid, wFlags, pDispParams,
-             pvarResult, pExcepInfo, puArgErr);
-
-    return S_OK;
-}
-
-HRESULT CSOActiveX::GetURL( const OLECHAR* url,
-                              const OLECHAR* target )
-{
-    CComVariant aEmpty1, aEmpty2, aEmpty3;
-    CComVariant aUrl( url );
-    CComVariant aTarget;
-    if ( target )
-        aTarget = CComVariant( target );
-
-    return mWebBrowser2->Navigate2( &aUrl,
-                                  &aEmpty1,
-                                  &aTarget,
-                                  &aEmpty2,
-                                  &aEmpty3 );
-}
-
-
-// ---------------------------------------------------------------------------
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */