dtrans/source/win32/workbench/testmarshal.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   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/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  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 .
  18  */
  19
  20 #include <rtl/ustring.hxx>
  21 #include <sal/types.h>
  22 #include <osl/diagnose.h>
  23
  24 #include <stdio.h>
  25 #if defined _MSC_VER
  26 #pragma warning(push,1)
  27 #endif
  28 #include <windows.h>
  29 #include <objbase.h>
  30 #if defined _MSC_VER
  31 #pragma warning(pop)
  32 #endif
  33
  34 #include <memory>
  35
  36 #include <process.h>
  37 #include "XTDo.hxx"
  38
  39 // my defines
  40
  41 #define WRITE_CB
  42 #define EVT_MANUAL_RESET     TRUE
  43 #define EVT_INIT_NONSIGNALED FALSE
  44 #define EVT_NONAME           ""
  45 #define WAIT_MSGLOOP
  46 #define RAW_MARSHALING
  47
  48 //  namesapces
  49
  50 using namespace ::std;
  51
  52 //  globales
  53
  54 HANDLE  g_hEvtThreadWakeup;
  55
  56 #ifdef RAW_MARSHALING
  57     HGLOBAL g_hGlob;
  58 #else
  59     IStream* g_pStm;
  60 #endif
  61
  62 // a thread in another apartment to test apartment transparency
  63
  64 unsigned int _stdcall ThreadProc(LPVOID pParam)
  65 {
  66     // setup another apartment
  67     HRESULT hr = OleInitialize( NULL );
  68
  69     WaitForSingleObject( g_hEvtThreadWakeup, INFINITE );
  70
  71     IDataObject* pIDo;
  72
  73 #ifdef RAW_MARSHALING
  74
  75     IStream* pStm = NULL;
  76     hr = CreateStreamOnHGlobal( g_hGlob, FALSE, &pStm );
  77     if ( SUCCEEDED( hr ) )
  78     {
  79         hr = CoUnmarshalInterface(
  80                 pStm,
  81                 __uuidof( IDataObject ),
  82                 (void**)&pIDo );
  83
  84         hr = pStm->Release( );
  85     }
  86
  87 #else
  88
  89     hr = CoGetInterfaceAndReleaseStream(
  90         g_pStm,
  91         __uuidof( IDataObject ),
  92         (void**)&pIDo
  93         );
  94
  95 #endif
  96
  97     IEnumFORMATETC* pIEEtc;
  98     hr = pIDo->EnumFormatEtc( DATADIR_GET, &pIEEtc );
  99
 100     hr = OleIsCurrentClipboard( pIDo );
 101
 102     hr = OleFlushClipboard( );
 103
 104     OleUninitialize( );
 105
 106     return 0;
 107 }
 108
 109 //  main
 110
 111 int SAL_CALL main( int nArgc, char* Argv[] )
 112 {
 113     HRESULT hr = OleInitialize( NULL );
 114
 115     g_hEvtThreadWakeup = CreateEvent( 0,
 116                                       EVT_MANUAL_RESET,
 117                                       EVT_INIT_NONSIGNALED,
 118                                       EVT_NONAME );
 119
 120     unsigned uThreadId;
 121     HANDLE   hThread;
 122
 123     // create a thread in another apartment
 124     hThread = (void*)_beginthreadex( NULL, 0, ThreadProc, NULL, 0, &uThreadId );
 125
 126     IDataObject* pIDo = new CXTDataObject( );
 127
 128     hr = OleSetClipboard( pIDo );
 129     hr = E_FAIL;
 130
 131     hr = OleIsCurrentClipboard( pIDo );
 132
 133     //hr = OleGetClipboard( &pIDo );
 134     if ( SUCCEEDED( hr ) )
 135     {
 136 #ifdef RAW_MARSHALING
 137
 138         IStream* pStm = NULL;
 139
 140         hr = CreateStreamOnHGlobal( 0, FALSE, &pStm );
 141         if ( SUCCEEDED( hr ) )
 142         {
 143             hr = CoMarshalInterface(
 144                 pStm,
 145                 __uuidof( IDataObject ),
 146                 pIDo,
 147                 MSHCTX_INPROC,
 148                 0,
 149                 MSHLFLAGS_NORMAL );
 150             if ( SUCCEEDED( hr ) )
 151                 hr = GetHGlobalFromStream( pStm, &g_hGlob );
 152
 153             hr = pStm->Release( );
 154         }
 155
 156 #else
 157
 158         hr = CoMarshalInterThreadInterfaceInStream(
 159                 __uuidof( IDataObject ),
 160                 pIDo,
 161                 &g_pStm );
 162
 163 #endif
 164
 165         if ( SUCCEEDED( hr ) )
 166         {
 167             // wakeup the thread and waiting util it ends
 168             SetEvent( g_hEvtThreadWakeup );
 169
 170 #ifdef WAIT_MSGLOOP
 171
 172             BOOL bContinue = TRUE;
 173
 174             while( bContinue )
 175             {
 176                 DWORD dwResult = WaitForMultipleObjects(
 177                     1,
 178                     &hThread,
 179                     TRUE,
 180                     0 );
 181
 182                 if ( WAIT_OBJECT_0 == dwResult )
 183                 {
 184                     bContinue = FALSE;
 185                 }
 186                 else
 187                 {
 188                     MSG msg;
 189                     while( PeekMessage(
 190                             &msg,
 191                             NULL,
 192                             0,
 193                             0,
 194                             PM_REMOVE ) )
 195                     {
 196                         TranslateMessage(&msg);
 197                         DispatchMessage(&msg);
 198                     }
 199                 }
 200             } // while
 201
 202 #endif
 203
 204         } // if
 205     } // if
 206
 207     OleFlushClipboard( );
 208
 209     OleUninitialize( );
 210
 211     return 0;
 212 }
 213
 214 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */