src/msw/ole/oleutils.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        src/msw/ole/oleutils.cpp
   3 // Purpose:     implementation of OLE helper functions
   4 // Author:      Vadim Zeitlin
   5 // Modified by:
   6 // Created:     19.02.98
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1998 Vadim Zeitlin <zeitlin@dptmaths.ens-cachan.fr>
   9 // Licence:     wxWindows licence
  10 ///////////////////////////////////////////////////////////////////////////////
  11
  12 // ============================================================================
  13 // Declarations
  14 // ============================================================================
  15
  16 // ----------------------------------------------------------------------------
  17 // headers
  18 // ----------------------------------------------------------------------------
  19
  20 // For compilers that support precompilation, includes "wx.h".
  21 #include "wx/wxprec.h"
  22
  23 #if defined(__BORLANDC__)
  24     #pragma hdrstop
  25 #endif
  26
  27 #if wxUSE_OLE
  28
  29 #ifndef WX_PRECOMP
  30     #include "wx/log.h"
  31 #endif
  32
  33 #ifndef __CYGWIN10__
  34
  35 #include "wx/msw/private.h"
  36
  37 #ifdef __WXWINCE__
  38     #include <winreg.h>
  39     #include <ole2.h>
  40
  41     #define GUID_DEFINED
  42     #define UUID_DEFINED
  43 #endif
  44
  45 // OLE
  46 #ifndef __WXWINCE__
  47 #include  "wx/msw/ole/uuid.h"
  48 #endif
  49
  50 #include  "wx/msw/ole/oleutils.h"
  51
  52 #if defined(__VISUALC__) && (__VISUALC__ > 1000)
  53     #include  <docobj.h>
  54 #endif
  55
  56 // ============================================================================
  57 // Implementation
  58 // ============================================================================
  59
  60 // return true if the iid is in the array
  61 bool IsIidFromList(REFIID riid, const IID *aIids[], size_t nCount)
  62 {
  63   for ( size_t i = 0; i < nCount; i++ ) {
  64     if ( riid == *aIids[i] )
  65       return true;
  66   }
  67
  68   return false;
  69 }
  70
  71 WXDLLEXPORT BSTR wxConvertStringToOle(const wxString& str)
  72 {
  73     return wxBasicString(str).Get();
  74 }
  75
  76 WXDLLEXPORT wxString wxConvertStringFromOle(BSTR bStr)
  77 {
  78     // NULL BSTR is equivalent to an empty string (this is the convention used
  79     // by VB and hence we must follow it)
  80     if ( !bStr )
  81         return wxString();
  82
  83     const int len = SysStringLen(bStr);
  84
  85 #if wxUSE_UNICODE
  86     wxString str(bStr, len);
  87 #else
  88     wxString str;
  89     if ( !::WideCharToMultiByte(CP_ACP, 0 /* no flags */,
  90                                 bStr, len /* not necessary NUL-terminated */,
  91                                 wxStringBuffer(str, len + 1), len + 1,
  92                                 NULL, NULL /* no default char */) )
  93     {
  94         str.clear();
  95     }
  96 #endif
  97
  98     return str;
  99 }
 100
 101 // ----------------------------------------------------------------------------
 102 // wxBasicString
 103 // ----------------------------------------------------------------------------
 104
 105 wxBasicString::wxBasicString(const wxString& str)
 106 {
 107     m_bstrBuf = SysAllocString(str.wc_str(*wxConvCurrent));
 108 }
 109
 110 wxBasicString::wxBasicString(const wxBasicString& src)
 111 {
 112     m_bstrBuf = src.Get();
 113 }
 114
 115 wxBasicString& wxBasicString::operator=(const wxBasicString& src)
 116 {
 117     SysReAllocString(&m_bstrBuf, src);
 118     return *this;
 119 }
 120
 121 wxBasicString::~wxBasicString()
 122 {
 123     SysFreeString(m_bstrBuf);
 124 }
 125
 126 #if wxUSE_DATAOBJ
 127
 128 // ----------------------------------------------------------------------------
 129 // Debug support
 130 // ----------------------------------------------------------------------------
 131
 132 #if defined(__WXDEBUG__) && ( ( defined(__VISUALC__) && (__VISUALC__ > 1000) ) || defined(__MWERKS__) )
 133 static wxString GetIidName(REFIID riid)
 134 {
 135   // an association between symbolic name and numeric value of an IID
 136   struct KNOWN_IID {
 137     const IID  *pIid;
 138     const wxChar *szName;
 139   };
 140
 141   // construct the table containing all known interfaces
 142   #define ADD_KNOWN_IID(name) { &IID_I##name, _T(#name) }
 143
 144   static const KNOWN_IID aKnownIids[] = {
 145     ADD_KNOWN_IID(AdviseSink),
 146     ADD_KNOWN_IID(AdviseSink2),
 147     ADD_KNOWN_IID(BindCtx),
 148     ADD_KNOWN_IID(ClassFactory),
 149 #if ( !defined( __VISUALC__) || (__VISUALC__!=1010) ) && !defined(__MWERKS__)
 150     ADD_KNOWN_IID(ContinueCallback),
 151     ADD_KNOWN_IID(EnumOleDocumentViews),
 152     ADD_KNOWN_IID(OleCommandTarget),
 153     ADD_KNOWN_IID(OleDocument),
 154     ADD_KNOWN_IID(OleDocumentSite),
 155     ADD_KNOWN_IID(OleDocumentView),
 156     ADD_KNOWN_IID(Print),
 157 #endif
 158     ADD_KNOWN_IID(DataAdviseHolder),
 159     ADD_KNOWN_IID(DataObject),
 160     ADD_KNOWN_IID(Debug),
 161     ADD_KNOWN_IID(DebugStream),
 162     ADD_KNOWN_IID(DfReserved1),
 163     ADD_KNOWN_IID(DfReserved2),
 164     ADD_KNOWN_IID(DfReserved3),
 165     ADD_KNOWN_IID(Dispatch),
 166     ADD_KNOWN_IID(DropSource),
 167     ADD_KNOWN_IID(DropTarget),
 168     ADD_KNOWN_IID(EnumCallback),
 169     ADD_KNOWN_IID(EnumFORMATETC),
 170     ADD_KNOWN_IID(EnumGeneric),
 171     ADD_KNOWN_IID(EnumHolder),
 172     ADD_KNOWN_IID(EnumMoniker),
 173     ADD_KNOWN_IID(EnumOLEVERB),
 174     ADD_KNOWN_IID(EnumSTATDATA),
 175     ADD_KNOWN_IID(EnumSTATSTG),
 176     ADD_KNOWN_IID(EnumString),
 177     ADD_KNOWN_IID(EnumUnknown),
 178     ADD_KNOWN_IID(EnumVARIANT),
 179     ADD_KNOWN_IID(ExternalConnection),
 180     ADD_KNOWN_IID(InternalMoniker),
 181     ADD_KNOWN_IID(LockBytes),
 182     ADD_KNOWN_IID(Malloc),
 183     ADD_KNOWN_IID(Marshal),
 184     ADD_KNOWN_IID(MessageFilter),
 185     ADD_KNOWN_IID(Moniker),
 186     ADD_KNOWN_IID(OleAdviseHolder),
 187     ADD_KNOWN_IID(OleCache),
 188     ADD_KNOWN_IID(OleCache2),
 189     ADD_KNOWN_IID(OleCacheControl),
 190     ADD_KNOWN_IID(OleClientSite),
 191     ADD_KNOWN_IID(OleContainer),
 192     ADD_KNOWN_IID(OleInPlaceActiveObject),
 193     ADD_KNOWN_IID(OleInPlaceFrame),
 194     ADD_KNOWN_IID(OleInPlaceObject),
 195     ADD_KNOWN_IID(OleInPlaceSite),
 196     ADD_KNOWN_IID(OleInPlaceUIWindow),
 197     ADD_KNOWN_IID(OleItemContainer),
 198     ADD_KNOWN_IID(OleLink),
 199     ADD_KNOWN_IID(OleManager),
 200     ADD_KNOWN_IID(OleObject),
 201     ADD_KNOWN_IID(OlePresObj),
 202     ADD_KNOWN_IID(OleWindow),
 203     ADD_KNOWN_IID(PSFactory),
 204     ADD_KNOWN_IID(ParseDisplayName),
 205     ADD_KNOWN_IID(Persist),
 206     ADD_KNOWN_IID(PersistFile),
 207     ADD_KNOWN_IID(PersistStorage),
 208     ADD_KNOWN_IID(PersistStream),
 209     ADD_KNOWN_IID(ProxyManager),
 210     ADD_KNOWN_IID(RootStorage),
 211     ADD_KNOWN_IID(RpcChannel),
 212     ADD_KNOWN_IID(RpcProxy),
 213     ADD_KNOWN_IID(RpcStub),
 214     ADD_KNOWN_IID(RunnableObject),
 215     ADD_KNOWN_IID(RunningObjectTable),
 216     ADD_KNOWN_IID(StdMarshalInfo),
 217     ADD_KNOWN_IID(Storage),
 218     ADD_KNOWN_IID(Stream),
 219     ADD_KNOWN_IID(StubManager),
 220     ADD_KNOWN_IID(Unknown),
 221     ADD_KNOWN_IID(ViewObject),
 222     ADD_KNOWN_IID(ViewObject2),
 223   };
 224
 225   // don't clobber preprocessor name space
 226   #undef ADD_KNOWN_IID
 227
 228   // try to find the interface in the table
 229   for ( size_t ui = 0; ui < WXSIZEOF(aKnownIids); ui++ ) {
 230     if ( riid == *aKnownIids[ui].pIid ) {
 231       return aKnownIids[ui].szName;
 232     }
 233   }
 234
 235 #ifndef __WXWINCE__
 236   // unknown IID, just transform to string
 237   Uuid uuid(riid);
 238   return wxString((const wxChar *)uuid);
 239 #else
 240   return wxEmptyString;
 241 #endif
 242 }
 243
 244 void wxLogQueryInterface(const wxChar *szInterface, REFIID riid)
 245 {
 246   wxLogTrace(wxTRACE_OleCalls, wxT("%s::QueryInterface (iid = %s)"),
 247              szInterface, GetIidName(riid).c_str());
 248 }
 249
 250 void wxLogAddRef(const wxChar *szInterface, ULONG cRef)
 251 {
 252   wxLogTrace(wxTRACE_OleCalls, wxT("After %s::AddRef: m_cRef = %d"), szInterface, cRef + 1);
 253 }
 254
 255 void wxLogRelease(const wxChar *szInterface, ULONG cRef)
 256 {
 257   wxLogTrace(wxTRACE_OleCalls, wxT("After %s::Release: m_cRef = %d"), szInterface, cRef - 1);
 258 }
 259
 260 #elif defined(__WXDEBUG__) && defined(__VISUALC__) && (__VISUALC__ <= 1000)
 261
 262 // For VC++ 4
 263 void wxLogQueryInterface(const char *szInterface, REFIID riid)
 264 {
 265   wxLogTrace("%s::QueryInterface", szInterface);
 266 }
 267
 268 void wxLogAddRef(const char *szInterface, ULONG cRef)
 269 {
 270   wxLogTrace("After %s::AddRef: m_cRef = %d", szInterface, cRef + 1);
 271 }
 272
 273 void wxLogRelease(const char *szInterface, ULONG cRef)
 274 {
 275   wxLogTrace("After %s::Release: m_cRef = %d", szInterface, cRef - 1);
 276 }
 277
 278 #endif  // __WXDEBUG__
 279
 280 #endif
 281   // wxUSE_DRAG_AND_DROP
 282
 283 #endif
 284   // __CYGWIN10__
 285
 286 #endif
 287   // wxUSE_OLE