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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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 "msxml2.h"
  30
  31 #include "wine/debug.h"
  32
  33 #include "msxml_private.h"
  34
  35 WINE_DEFAULT_DEBUG_CHANNEL(msxml);
  36
  37 typedef HRESULT (*fnCreateInstance)(IUnknown *pUnkOuter, LPVOID *ppObj);
  38
  39 /******************************************************************************
  40  * MSXML ClassFactory
  41  */
  42 typedef struct _xmlcf
  43 {
  44     const struct IClassFactoryVtbl *lpVtbl;
  45     fnCreateInstance pfnCreateInstance;
  46 } xmlcf;
  47
  48 static inline xmlcf *impl_from_IClassFactory( IClassFactory *iface )
  49 {
  50     return (xmlcf *)((char*)iface - FIELD_OFFSET(xmlcf, lpVtbl));
  51 }
  52
  53 static HRESULT WINAPI xmlcf_QueryInterface(
  54     IClassFactory *iface,
  55     REFIID riid,
  56     LPVOID *ppobj )
  57 {
  58     if (IsEqualGUID(riid, &IID_IUnknown) ||
  59         IsEqualGUID(riid, &IID_IClassFactory))
  60     {
  61         IClassFactory_AddRef( iface );
  62         *ppobj = iface;
  63         return S_OK;
  64     }
  65
  66     return E_NOINTERFACE;
  67 }
  68
  69 static ULONG WINAPI xmlcf_AddRef(
  70     IClassFactory *iface )
  71 {
  72     return 2;
  73 }
  74
  75 static ULONG WINAPI xmlcf_Release(
  76     IClassFactory *iface )
  77 {
  78     return 1;
  79 }
  80
  81 static HRESULT WINAPI xmlcf_CreateInstance(
  82     IClassFactory *iface,
  83     LPUNKNOWN pOuter,
  84     REFIID riid,
  85     LPVOID *ppobj )
  86 {
  87     xmlcf *This = impl_from_IClassFactory( iface );
  88     HRESULT r;
  89     IUnknown *punk;
  90
  91     TRACE("%p %s %p\n", pOuter, debugstr_guid(riid), ppobj );
  92
  93     *ppobj = NULL;
  94
  95     if (pOuter)
  96         return CLASS_E_NOAGGREGATION;
  97
  98     r = This->pfnCreateInstance( pOuter, (LPVOID*) &punk );
  99     if (FAILED(r))
 100         return r;
 101
 102     r = IUnknown_QueryInterface( punk, riid, ppobj );
 103     if (FAILED(r))
 104         return r;
 105     IUnknown_Release( punk );
 106     return r;
 107 }
 108
 109 static HRESULT WINAPI xmlcf_LockServer(
 110     IClassFactory *iface,
 111     BOOL dolock)
 112 {
 113     FIXME("(%p)->(%d),stub!\n",iface,dolock);
 114     return S_OK;
 115 }
 116
 117 const struct IClassFactoryVtbl xmlcf_vtbl =
 118 {
 119     xmlcf_QueryInterface,
 120     xmlcf_AddRef,
 121     xmlcf_Release,
 122     xmlcf_CreateInstance,
 123     xmlcf_LockServer
 124 };
 125
 126 static xmlcf domdoccf = { &xmlcf_vtbl, DOMDocument_create };
 127
 128 /******************************************************************
 129  *              DllGetClassObject (MSXML3.@)
 130  */
 131 HRESULT WINAPI DllGetClassObject( REFCLSID rclsid, REFIID iid, LPVOID *ppv )
 132 {
 133     IClassFactory *cf = NULL;
 134
 135     TRACE("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv );
 136
 137     if( IsEqualGUID( rclsid, &CLSID_DOMDocument ) )
 138         cf = (IClassFactory*) &domdoccf.lpVtbl;
 139
 140     if ( !cf )
 141         return CLASS_E_CLASSNOTAVAILABLE;
 142
 143     return IClassFactory_QueryInterface( cf, iid, ppv );
 144 }