src/msw/ole/oleutils.cpp

   1 ///////////////////////////////////////////////////////////////////////////////
   2 // Name:        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 #include  "wx/setup.h"
  28 #include  "wx/log.h"
  29
  30 #if wxUSE_OLE
  31
  32 #ifndef __CYGWIN10__
  33
  34 #include "wx/msw/private.h"
  35
  36 #ifdef __WXWINCE__
  37     #include <winreg.h>
  38     #include <ole2.h>
  39
  40     #define GUID_DEFINED
  41     #define UUID_DEFINED
  42 #endif
  43
  44 // OLE
  45 #ifndef __WXWINCE__
  46 #include  "wx/msw/ole/uuid.h"
  47 #endif
  48
  49 #include  "wx/msw/ole/oleutils.h"
  50
  51 #if defined(__VISUALC__) && (__VISUALC__ > 1000)
  52     #include  <docobj.h>
  53 #endif
  54
  55 // ============================================================================
  56 // Implementation
  57 // ============================================================================
  58
  59 // return true if the iid is in the array
  60 bool IsIidFromList(REFIID riid, const IID *aIids[], size_t nCount)
  61 {
  62   for ( size_t i = 0; i < nCount; i++ ) {
  63     if ( riid == *aIids[i] )
  64       return true;
  65   }
  66
  67   return false;
  68 }
  69
  70 BSTR wxConvertStringToOle(const wxString& str)
  71 {
  72 /*
  73     unsigned int len = strlen((const char*) str);
  74     unsigned short* s = new unsigned short[len*2+2];
  75     unsigned int i;
  76     memset(s, 0, len*2+2);
  77     for (i=0; i < len; i++)
  78         s[i*2] = str[i];
  79 */
  80     wxBasicString bstr(str.mb_str());
  81     return bstr.Get();
  82 }
  83
  84 wxString wxConvertStringFromOle(BSTR bStr)
  85 {
  86 #if wxUSE_UNICODE
  87     wxString str(bStr);
  88 #else
  89     int len = SysStringLen(bStr) + 1;
  90     char    *buf = new char[len];
  91     (void)wcstombs( buf, bStr, len);
  92     wxString str(buf);
  93     delete[] buf;
  94 #endif
  95     return str;
  96 }
  97
  98 // ----------------------------------------------------------------------------
  99 // wxBasicString
 100 // ----------------------------------------------------------------------------
 101
 102 // ctor takes an ANSI string and transforms it to Unicode
 103 wxBasicString::wxBasicString(const char *sz)
 104 {
 105     Init(sz);
 106 }
 107
 108 // ctor takes an ANSI or Unicode string and transforms it to Unicode
 109 wxBasicString::wxBasicString(const wxString& str)
 110 {
 111 #if wxUSE_UNICODE
 112     m_wzBuf = new OLECHAR[str.Length() + 1];
 113     memcpy(m_wzBuf, str.c_str(), str.Length()*2);
 114     m_wzBuf[str.Length()] = L'\0';
 115 #else
 116     Init(str.c_str());
 117 #endif
 118 }
 119
 120 // Takes an ANSI string and transforms it to Unicode
 121 void wxBasicString::Init(const char *sz)
 122 {
 123     // get the size of required buffer
 124     UINT lenAnsi = strlen(sz);
 125 #ifdef __MWERKS__
 126     UINT lenWide = lenAnsi * 2 ;
 127 #else
 128     UINT lenWide = mbstowcs(NULL, sz, lenAnsi);
 129 #endif
 130
 131     if ( lenWide > 0 ) {
 132         m_wzBuf = new OLECHAR[lenWide + 1];
 133         mbstowcs(m_wzBuf, sz, lenAnsi);
 134         m_wzBuf[lenWide] = L'\0';
 135     }
 136     else {
 137         m_wzBuf = NULL;
 138     }
 139 }
 140
 141 // dtor frees memory
 142 wxBasicString::~wxBasicString()
 143 {
 144   delete [] m_wzBuf;
 145 }
 146
 147 #if wxUSE_DATAOBJ
 148
 149 // ----------------------------------------------------------------------------
 150 // Debug support
 151 // ----------------------------------------------------------------------------
 152
 153 #if defined(__WXDEBUG__) && ( ( defined(__VISUALC__) && (__VISUALC__ > 1000) ) || defined(__MWERKS__) )
 154 static wxString GetIidName(REFIID riid)
 155 {
 156   // an association between symbolic name and numeric value of an IID
 157   struct KNOWN_IID {
 158     const IID  *pIid;
 159     const wxChar *szName;
 160   };
 161
 162   // construct the table containing all known interfaces
 163   #define ADD_KNOWN_IID(name) { &IID_I##name, _T(#name) }
 164
 165   static const KNOWN_IID aKnownIids[] = {
 166     ADD_KNOWN_IID(AdviseSink),
 167     ADD_KNOWN_IID(AdviseSink2),
 168     ADD_KNOWN_IID(BindCtx),
 169     ADD_KNOWN_IID(ClassFactory),
 170 #if ( !defined( __VISUALC__) || (__VISUALC__!=1010) ) && !defined(__MWERKS__)
 171     ADD_KNOWN_IID(ContinueCallback),
 172     ADD_KNOWN_IID(EnumOleDocumentViews),
 173     ADD_KNOWN_IID(OleCommandTarget),
 174     ADD_KNOWN_IID(OleDocument),
 175     ADD_KNOWN_IID(OleDocumentSite),
 176     ADD_KNOWN_IID(OleDocumentView),
 177     ADD_KNOWN_IID(Print),
 178 #endif
 179     ADD_KNOWN_IID(DataAdviseHolder),
 180     ADD_KNOWN_IID(DataObject),
 181     ADD_KNOWN_IID(Debug),
 182     ADD_KNOWN_IID(DebugStream),
 183     ADD_KNOWN_IID(DfReserved1),
 184     ADD_KNOWN_IID(DfReserved2),
 185     ADD_KNOWN_IID(DfReserved3),
 186     ADD_KNOWN_IID(Dispatch),
 187     ADD_KNOWN_IID(DropSource),
 188     ADD_KNOWN_IID(DropTarget),
 189     ADD_KNOWN_IID(EnumCallback),
 190     ADD_KNOWN_IID(EnumFORMATETC),
 191     ADD_KNOWN_IID(EnumGeneric),
 192     ADD_KNOWN_IID(EnumHolder),
 193     ADD_KNOWN_IID(EnumMoniker),
 194     ADD_KNOWN_IID(EnumOLEVERB),
 195     ADD_KNOWN_IID(EnumSTATDATA),
 196     ADD_KNOWN_IID(EnumSTATSTG),
 197     ADD_KNOWN_IID(EnumString),
 198     ADD_KNOWN_IID(EnumUnknown),
 199     ADD_KNOWN_IID(EnumVARIANT),
 200     ADD_KNOWN_IID(ExternalConnection),
 201     ADD_KNOWN_IID(InternalMoniker),
 202     ADD_KNOWN_IID(LockBytes),
 203     ADD_KNOWN_IID(Malloc),
 204     ADD_KNOWN_IID(Marshal),
 205     ADD_KNOWN_IID(MessageFilter),
 206     ADD_KNOWN_IID(Moniker),
 207     ADD_KNOWN_IID(OleAdviseHolder),
 208     ADD_KNOWN_IID(OleCache),
 209     ADD_KNOWN_IID(OleCache2),
 210     ADD_KNOWN_IID(OleCacheControl),
 211     ADD_KNOWN_IID(OleClientSite),
 212     ADD_KNOWN_IID(OleContainer),
 213     ADD_KNOWN_IID(OleInPlaceActiveObject),
 214     ADD_KNOWN_IID(OleInPlaceFrame),
 215     ADD_KNOWN_IID(OleInPlaceObject),
 216     ADD_KNOWN_IID(OleInPlaceSite),
 217     ADD_KNOWN_IID(OleInPlaceUIWindow),
 218     ADD_KNOWN_IID(OleItemContainer),
 219     ADD_KNOWN_IID(OleLink),
 220     ADD_KNOWN_IID(OleManager),
 221     ADD_KNOWN_IID(OleObject),
 222     ADD_KNOWN_IID(OlePresObj),
 223     ADD_KNOWN_IID(OleWindow),
 224     ADD_KNOWN_IID(PSFactory),
 225     ADD_KNOWN_IID(ParseDisplayName),
 226     ADD_KNOWN_IID(Persist),
 227     ADD_KNOWN_IID(PersistFile),
 228     ADD_KNOWN_IID(PersistStorage),
 229     ADD_KNOWN_IID(PersistStream),
 230     ADD_KNOWN_IID(ProxyManager),
 231     ADD_KNOWN_IID(RootStorage),
 232     ADD_KNOWN_IID(RpcChannel),
 233     ADD_KNOWN_IID(RpcProxy),
 234     ADD_KNOWN_IID(RpcStub),
 235     ADD_KNOWN_IID(RunnableObject),
 236     ADD_KNOWN_IID(RunningObjectTable),
 237     ADD_KNOWN_IID(StdMarshalInfo),
 238     ADD_KNOWN_IID(Storage),
 239     ADD_KNOWN_IID(Stream),
 240     ADD_KNOWN_IID(StubManager),
 241     ADD_KNOWN_IID(Unknown),
 242     ADD_KNOWN_IID(ViewObject),
 243     ADD_KNOWN_IID(ViewObject2),
 244   };
 245
 246   // don't clobber preprocessor name space
 247   #undef ADD_KNOWN_IID
 248
 249   // try to find the interface in the table
 250   for ( size_t ui = 0; ui < WXSIZEOF(aKnownIids); ui++ ) {
 251     if ( riid == *aKnownIids[ui].pIid ) {
 252       return aKnownIids[ui].szName;
 253     }
 254   }
 255
 256 #ifndef __WXWINCE__
 257   // unknown IID, just transform to string
 258   Uuid uuid(riid);
 259   return wxString((const wxChar *)uuid);
 260 #else
 261   return wxEmptyString;
 262 #endif
 263 }
 264
 265 void wxLogQueryInterface(const wxChar *szInterface, REFIID riid)
 266 {
 267   wxLogTrace(wxTRACE_OleCalls, wxT("%s::QueryInterface (iid = %s)"),
 268              szInterface, GetIidName(riid).c_str());
 269 }
 270
 271 void wxLogAddRef(const wxChar *szInterface, ULONG cRef)
 272 {
 273   wxLogTrace(wxTRACE_OleCalls, wxT("After %s::AddRef: m_cRef = %d"), szInterface, cRef + 1);
 274 }
 275
 276 void wxLogRelease(const wxChar *szInterface, ULONG cRef)
 277 {
 278   wxLogTrace(wxTRACE_OleCalls, wxT("After %s::Release: m_cRef = %d"), szInterface, cRef - 1);
 279 }
 280
 281 #elif defined(__WXDEBUG__) && defined(__VISUALC__) && (__VISUALC__ <= 1000)
 282
 283 // For VC++ 4
 284 void wxLogQueryInterface(const char *szInterface, REFIID riid)
 285 {
 286   wxLogTrace("%s::QueryInterface", szInterface);
 287 }
 288
 289 void wxLogAddRef(const char *szInterface, ULONG cRef)
 290 {
 291   wxLogTrace("After %s::AddRef: m_cRef = %d", szInterface, cRef + 1);
 292 }
 293
 294 void wxLogRelease(const char *szInterface, ULONG cRef)
 295 {
 296   wxLogTrace("After %s::Release: m_cRef = %d", szInterface, cRef - 1);
 297 }
 298
 299 #endif  // __WXDEBUG__
 300
 301 #endif
 302   // wxUSE_DRAG_AND_DROP
 303
 304 #endif
 305   // __CYGWIN10__
 306
 307 #endif
 308   // wxUSE_OLE
 309