oleaut32: Improved ICreateTypeInfo2_SetFuncAndParamNames implementation.
[wine] / dlls / inetcomm / inetcomm_main.c
1 /*
2  * Internet Messaging APIs
3  *
4  * Copyright 2006 Robert Shearman for CodeWeavers
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #define COBJMACROS
22
23 #include <stdarg.h>
24
25 #include "windef.h"
26 #include "winbase.h"
27 #include "winnt.h"
28 #include "winuser.h"
29 #include "ole2.h"
30 #include "mimeole.h"
31
32 #include "inetcomm_private.h"
33
34 #include "wine/debug.h"
35
36 WINE_DEFAULT_DEBUG_CHANNEL(inetcomm);
37
38 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
39 {
40     static IMimeInternational *international;
41
42     TRACE("(%p, %d, %p)\n", hinstDLL, fdwReason, lpvReserved);
43
44     switch (fdwReason)
45     {
46     case DLL_WINE_PREATTACH:
47         return FALSE;
48     case DLL_PROCESS_ATTACH:
49         DisableThreadLibraryCalls(hinstDLL);
50         if (!InternetTransport_RegisterClass(hinstDLL))
51             return FALSE;
52         MimeInternational_Construct(&international);
53         break;
54     case DLL_PROCESS_DETACH:
55         IMimeInternational_Release(international);
56         InternetTransport_UnregisterClass(hinstDLL);
57         break;
58     default:
59         break;
60     }
61     return TRUE;
62 }
63
64 /******************************************************************************
65  * ClassFactory
66  */
67 typedef struct
68 {
69     const struct IClassFactoryVtbl *lpVtbl;
70     HRESULT (*create_object)(IUnknown *, void **);
71 } cf;
72
73 static inline cf *impl_from_IClassFactory( IClassFactory *iface )
74 {
75     return (cf *)((char*)iface - FIELD_OFFSET(cf, lpVtbl));
76 }
77
78 static HRESULT WINAPI cf_QueryInterface( IClassFactory *iface, REFIID riid, LPVOID *ppobj )
79 {
80     if (IsEqualGUID(riid, &IID_IUnknown) ||
81         IsEqualGUID(riid, &IID_IClassFactory))
82     {
83         IClassFactory_AddRef( iface );
84         *ppobj = iface;
85         return S_OK;
86     }
87
88     FIXME("interface %s not implemented\n", debugstr_guid(riid));
89     return E_NOINTERFACE;
90 }
91
92 static ULONG WINAPI cf_AddRef( IClassFactory *iface )
93 {
94     return 2;
95 }
96
97 static ULONG WINAPI cf_Release( IClassFactory *iface )
98 {
99     return 1;
100 }
101
102 static HRESULT WINAPI cf_CreateInstance( IClassFactory *iface, LPUNKNOWN pOuter,
103                                          REFIID riid, LPVOID *ppobj )
104 {
105     cf *This = impl_from_IClassFactory( iface );
106     HRESULT r;
107     IUnknown *punk;
108
109     TRACE("%p %s %p\n", pOuter, debugstr_guid(riid), ppobj );
110
111     *ppobj = NULL;
112
113     r = This->create_object( pOuter, (LPVOID*) &punk );
114     if (FAILED(r))
115         return r;
116
117     r = IUnknown_QueryInterface( punk, riid, ppobj );
118     IUnknown_Release( punk );
119
120     return r;
121 }
122
123 static HRESULT WINAPI cf_LockServer( IClassFactory *iface, BOOL dolock)
124 {
125     FIXME("(%p)->(%d),stub!\n",iface,dolock);
126     return S_OK;
127 }
128
129 static const struct IClassFactoryVtbl cf_vtbl =
130 {
131     cf_QueryInterface,
132     cf_AddRef,
133     cf_Release,
134     cf_CreateInstance,
135     cf_LockServer
136 };
137
138 static cf mime_body_cf      = { &cf_vtbl, MimeBody_create };
139 static cf mime_allocator_cf = { &cf_vtbl, MimeAllocator_create };
140 static cf mime_message_cf   = { &cf_vtbl, MimeMessage_create };
141 static cf mime_security_cf  = { &cf_vtbl, MimeSecurity_create };
142 static cf virtual_stream_cf = { &cf_vtbl, VirtualStream_create };
143
144 /***********************************************************************
145  *              DllGetClassObject (INETCOMM.@)
146  */
147 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID iid, LPVOID *ppv)
148 {
149     IClassFactory *cf = NULL;
150
151     TRACE("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv );
152
153     if (IsEqualCLSID(rclsid, &CLSID_ISMTPTransport))
154         return SMTPTransportCF_Create(iid, ppv);
155
156     if (IsEqualCLSID(rclsid, &CLSID_ISMTPTransport2))
157         return SMTPTransportCF_Create(iid, ppv);
158
159     if (IsEqualCLSID(rclsid, &CLSID_IIMAPTransport))
160         return IMAPTransportCF_Create(iid, ppv);
161
162     if (IsEqualCLSID(rclsid, &CLSID_IPOP3Transport))
163         return POP3TransportCF_Create(iid, ppv);
164
165     if ( IsEqualCLSID( rclsid, &CLSID_IMimeSecurity ))
166     {
167         cf = (IClassFactory*) &mime_security_cf.lpVtbl;
168     }
169     else if( IsEqualCLSID( rclsid, &CLSID_IMimeMessage ))
170     {
171         cf = (IClassFactory*) &mime_message_cf.lpVtbl;
172     }
173     else if( IsEqualCLSID( rclsid, &CLSID_IMimeBody ))
174     {
175         cf = (IClassFactory*) &mime_body_cf.lpVtbl;
176     }
177     else if( IsEqualCLSID( rclsid, &CLSID_IMimeAllocator ))
178     {
179         cf = (IClassFactory*) &mime_allocator_cf.lpVtbl;
180     }
181     else if( IsEqualCLSID( rclsid, &CLSID_IVirtualStream ))
182     {
183         cf = (IClassFactory*) &virtual_stream_cf.lpVtbl;
184     }
185
186     if ( !cf )
187     {
188         FIXME("\n\tCLSID:\t%s,\n\tIID:\t%s\n",debugstr_guid(rclsid),debugstr_guid(iid));
189         return CLASS_E_CLASSNOTAVAILABLE;
190     }
191
192     return IClassFactory_QueryInterface( cf, iid, ppv );
193 }
194
195 /***********************************************************************
196  *              DllCanUnloadNow (INETCOMM.@)
197  */
198 HRESULT WINAPI DllCanUnloadNow(void)
199 {
200     return S_FALSE;
201 }