git.oblomov.eu Git - wine/blob - dlls/msxml3/factory.c

   1 /*
   2  *    MSXML Class Factory
   3  *
   4  * Copyright 2002 Lionel Ulmer
   5  * Copyright 2005 Mike McCormack
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  20  */
  21
  22 #define COBJMACROS
  23
  24 #include <stdarg.h>
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "winuser.h"
  28 #include "ole2.h"
  29 #include "msxml.h"
  30 #include "xmldom.h"
  31 #include "msxml2.h"
  32
  33 /* undef the #define in msxml2 so that we can access the v.2 version
  34    independent CLSID as well as the v.3 one. */
  35 #undef CLSID_DOMDocument
  36
  37 #include "wine/debug.h"
  38
  39 #include "msxml_private.h"
  40
  41 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
  42
  43 typedef HRESULT (*fnCreateInstance)(IUnknown *pUnkOuter, LPVOID *ppObj);
  44
  45 /******************************************************************************
  46  * MSXML ClassFactory
  47  */
  48 typedef struct _xmlcf
  49 {
  50     const struct IClassFactoryVtbl *lpVtbl;
  51     fnCreateInstance pfnCreateInstance;
  52 } xmlcf;
  53
  54 static inline xmlcf *impl_from_IClassFactory( IClassFactory *iface )
  55 {
  56     return (xmlcf *)((char*)iface - FIELD_OFFSET(xmlcf, lpVtbl));
  57 }
  58
  59 static HRESULT WINAPI xmlcf_QueryInterface(
  60     IClassFactory *iface,
  61     REFIID riid,
  62     LPVOID *ppobj )
  63 {
  64     if (IsEqualGUID(riid, &IID_IUnknown) ||
  65         IsEqualGUID(riid, &IID_IClassFactory))
  66     {
  67         IClassFactory_AddRef( iface );
  68         *ppobj = iface;
  69         return S_OK;
  70     }
  71
  72     FIXME("interface %s not implemented\n", debugstr_guid(riid));
  73     return E_NOINTERFACE;
  74 }
  75
  76 static ULONG WINAPI xmlcf_AddRef(
  77     IClassFactory *iface )
  78 {
  79     return 2;
  80 }
  81
  82 static ULONG WINAPI xmlcf_Release(
  83     IClassFactory *iface )
  84 {
  85     return 1;
  86 }
  87
  88 static HRESULT WINAPI xmlcf_CreateInstance(
  89     IClassFactory *iface,
  90     LPUNKNOWN pOuter,
  91     REFIID riid,
  92     LPVOID *ppobj )
  93 {
  94     xmlcf *This = impl_from_IClassFactory( iface );
  95     HRESULT r;
  96     IUnknown *punk;
  97
  98     TRACE("%p %s %p\n", pOuter, debugstr_guid(riid), ppobj );
  99
 100     *ppobj = NULL;
 101
 102     if (pOuter)
 103         return CLASS_E_NOAGGREGATION;
 104
 105     r = This->pfnCreateInstance( pOuter, (LPVOID*) &punk );
 106     if (FAILED(r))
 107         return r;
 108
 109     r = IUnknown_QueryInterface( punk, riid, ppobj );
 110     if (FAILED(r))
 111         return r;
 112     IUnknown_Release( punk );
 113     return r;
 114 }
 115
 116 static HRESULT WINAPI xmlcf_LockServer(
 117     IClassFactory *iface,
 118     BOOL dolock)
 119 {
 120     FIXME("(%p)->(%d),stub!\n",iface,dolock);
 121     return S_OK;
 122 }
 123
 124 static const struct IClassFactoryVtbl xmlcf_vtbl =
 125 {
 126     xmlcf_QueryInterface,
 127     xmlcf_AddRef,
 128     xmlcf_Release,
 129     xmlcf_CreateInstance,
 130     xmlcf_LockServer
 131 };
 132
 133 static xmlcf domdoccf = { &xmlcf_vtbl, DOMDocument_create };
 134
 135 /******************************************************************
 136  *              DllGetClassObject (MSXML3.@)
 137  */
 138 HRESULT WINAPI DllGetClassObject( REFCLSID rclsid, REFIID iid, LPVOID *ppv )
 139 {
 140     IClassFactory *cf = NULL;
 141
 142     TRACE("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv );
 143
 144     if( IsEqualGUID( rclsid, &CLSID_DOMDocument ) ||   /* Version indep. v 2.x */
 145         IsEqualGUID( rclsid, &CLSID_DOMDocument2 ) ||  /* Version indep. v 3.0 */
 146         IsEqualGUID( rclsid, &CLSID_DOMDocument30 ) )  /* Version dep.   v 3.0 */
 147         cf = (IClassFactory*) &domdoccf.lpVtbl;
 148
 149     if ( !cf )
 150         return CLASS_E_CLASSNOTAVAILABLE;
 151
 152     return IClassFactory_QueryInterface( cf, iid, ppv );
 153 }