dtrans/source/win32/workbench/testmarshal.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: testmarshal.cxx,v $
  10  * $Revision: 1.8 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_dtrans.hxx"
  33
  34
  35 //_________________________________________________________________________________________________________________________
  36 //      interface includes
  37 //_________________________________________________________________________________________________________________________
  38
  39 //_________________________________________________________________________________________________________________________
  40 //      other includes
  41 //_________________________________________________________________________________________________________________________
  42 #include <rtl/ustring.hxx>
  43 #include <sal/types.h>
  44 #include <osl/diagnose.h>
  45
  46 #include <stdio.h>
  47 #if defined _MSC_VER
  48 #pragma warning(push,1)
  49 #endif
  50 #include <windows.h>
  51 #include <objbase.h>
  52 #if defined _MSC_VER
  53 #pragma warning(pop)
  54 #endif
  55
  56 #include <memory>
  57
  58 #include <process.h>
  59 #include "XTDo.hxx"
  60
  61 //-------------------------------------------------------------
  62 // my defines
  63 //-------------------------------------------------------------
  64
  65 #define WRITE_CB
  66 #define EVT_MANUAL_RESET     TRUE
  67 #define EVT_INIT_NONSIGNALED FALSE
  68 #define EVT_NONAME           ""
  69 #define WAIT_MSGLOOP
  70 #define RAW_MARSHALING
  71
  72 //------------------------------------------------------------
  73 //      namesapces
  74 //------------------------------------------------------------
  75
  76 using namespace ::rtl;
  77 using namespace ::std;
  78
  79 //------------------------------------------------------------
  80 //      globales
  81 //------------------------------------------------------------
  82
  83 HANDLE  g_hEvtThreadWakeup;
  84
  85 #ifdef RAW_MARSHALING
  86     HGLOBAL g_hGlob;
  87 #else
  88     IStream* g_pStm;
  89 #endif
  90
  91 //################################################################
  92 // a thread in another apartment to test apartment transparency
  93
  94 unsigned int _stdcall ThreadProc(LPVOID pParam)
  95 {
  96     // setup another apartment
  97     HRESULT hr = OleInitialize( NULL );
  98
  99     WaitForSingleObject( g_hEvtThreadWakeup, INFINITE );
 100
 101     IDataObject* pIDo;
 102
 103 #ifdef RAW_MARSHALING
 104
 105     IStream* pStm = NULL;
 106     hr = CreateStreamOnHGlobal( g_hGlob, FALSE, &pStm );
 107     if ( SUCCEEDED( hr ) )
 108     {
 109         hr = CoUnmarshalInterface(
 110                 pStm,
 111                 __uuidof( IDataObject ),
 112                 (void**)&pIDo );
 113
 114         hr = pStm->Release( );
 115     }
 116
 117 #else
 118
 119     hr = CoGetInterfaceAndReleaseStream(
 120         g_pStm,
 121         __uuidof( IDataObject ),
 122         (void**)&pIDo
 123         );
 124
 125 #endif
 126
 127     IEnumFORMATETC* pIEEtc;
 128     hr = pIDo->EnumFormatEtc( DATADIR_GET, &pIEEtc );
 129
 130     hr = OleIsCurrentClipboard( pIDo );
 131
 132     hr = OleFlushClipboard( );
 133
 134     OleUninitialize( );
 135
 136     return 0;
 137 }
 138
 139 //################################################################
 140
 141 //----------------------------------------------------------------
 142 //      main
 143 //----------------------------------------------------------------
 144
 145 int SAL_CALL main( int nArgc, char* Argv[] )
 146 {
 147     HRESULT hr = OleInitialize( NULL );
 148
 149     g_hEvtThreadWakeup = CreateEvent( 0,
 150                                       EVT_MANUAL_RESET,
 151                                       EVT_INIT_NONSIGNALED,
 152                                       EVT_NONAME );
 153
 154     unsigned uThreadId;
 155     HANDLE   hThread;
 156
 157     // create a thread in another apartment
 158     hThread = (void*)_beginthreadex( NULL, 0, ThreadProc, NULL, 0, &uThreadId );
 159
 160     IDataObject* pIDo = new CXTDataObject( );
 161
 162     hr = OleSetClipboard( pIDo );
 163     hr = E_FAIL;
 164
 165     hr = OleIsCurrentClipboard( pIDo );
 166
 167     //hr = OleGetClipboard( &pIDo );
 168     if ( SUCCEEDED( hr ) )
 169     {
 170 #ifdef RAW_MARSHALING
 171
 172         IStream* pStm = NULL;
 173
 174         hr = CreateStreamOnHGlobal( 0, FALSE, &pStm );
 175         if ( SUCCEEDED( hr ) )
 176         {
 177             hr = CoMarshalInterface(
 178                 pStm,
 179                 __uuidof( IDataObject ),
 180                 pIDo,
 181                 MSHCTX_INPROC,
 182                 0,
 183                 MSHLFLAGS_NORMAL );
 184             if ( SUCCEEDED( hr ) )
 185                 hr = GetHGlobalFromStream( pStm, &g_hGlob );
 186
 187             hr = pStm->Release( );
 188         }
 189
 190 #else
 191
 192         hr = CoMarshalInterThreadInterfaceInStream(
 193                 __uuidof( IDataObject ),
 194                 pIDo,
 195                 &g_pStm );
 196
 197 #endif
 198
 199         if ( SUCCEEDED( hr ) )
 200         {
 201             // wakeup the thread and waiting util it ends
 202             SetEvent( g_hEvtThreadWakeup );
 203
 204 #ifdef WAIT_MSGLOOP
 205
 206             BOOL bContinue = TRUE;
 207
 208             while( bContinue )
 209             {
 210                 DWORD dwResult = WaitForMultipleObjects(
 211                     1,
 212                     &hThread,
 213                     TRUE,
 214                     0 );
 215
 216                 if ( WAIT_OBJECT_0 == dwResult )
 217                 {
 218                     bContinue = FALSE;
 219                 }
 220                 else
 221                 {
 222                     MSG msg;
 223                     while( PeekMessage(
 224                             &msg,
 225                             NULL,
 226                             0,
 227                             0,
 228                             PM_REMOVE ) )
 229                     {
 230                         TranslateMessage(&msg);
 231                         DispatchMessage(&msg);
 232                     }
 233                 }
 234             } // while
 235
 236 #endif
 237
 238         } // if
 239     } // if
 240
 241     OleFlushClipboard( );
 242
 243     OleUninitialize( );
 244
 245     return 0;
 246 }