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