inetcomm: Implement IMimeMessage_GetMessageSource.
[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     TRACE("(%p, %d, %p)\n", hinstDLL, fdwReason, lpvReserved);
41
42     switch (fdwReason)
43     {
44     case DLL_WINE_PREATTACH:
45         return FALSE;
46     case DLL_PROCESS_ATTACH:
47         DisableThreadLibraryCalls(hinstDLL);
48         if (!InternetTransport_RegisterClass(hinstDLL))
49             return FALSE;
50         break;
51     case DLL_PROCESS_DETACH:
52         InternetTransport_UnregisterClass(hinstDLL);
53         break;
54     default:
55         break;
56     }
57     return TRUE;
58 }
59
60 /******************************************************************************
61  * ClassFactory
62  */
63 typedef struct
64 {
65     const struct IClassFactoryVtbl *lpVtbl;
66     HRESULT (*create_object)(IUnknown *, void **);
67 } cf;
68
69 static inline cf *impl_from_IClassFactory( IClassFactory *iface )
70 {
71     return (cf *)((char*)iface - FIELD_OFFSET(cf, lpVtbl));
72 }
73
74 static HRESULT WINAPI cf_QueryInterface( IClassFactory *iface, REFIID riid, LPVOID *ppobj )
75 {
76     if (IsEqualGUID(riid, &IID_IUnknown) ||
77         IsEqualGUID(riid, &IID_IClassFactory))
78     {
79         IClassFactory_AddRef( iface );
80         *ppobj = iface;
81         return S_OK;
82     }
83
84     FIXME("interface %s not implemented\n", debugstr_guid(riid));
85     return E_NOINTERFACE;
86 }
87
88 static ULONG WINAPI cf_AddRef( IClassFactory *iface )
89 {
90     return 2;
91 }
92
93 static ULONG WINAPI cf_Release( IClassFactory *iface )
94 {
95     return 1;
96 }
97
98 static HRESULT WINAPI cf_CreateInstance( IClassFactory *iface, LPUNKNOWN pOuter,
99                                          REFIID riid, LPVOID *ppobj )
100 {
101     cf *This = impl_from_IClassFactory( iface );
102     HRESULT r;
103     IUnknown *punk;
104
105     TRACE("%p %s %p\n", pOuter, debugstr_guid(riid), ppobj );
106
107     *ppobj = NULL;
108
109     r = This->create_object( pOuter, (LPVOID*) &punk );
110     if (FAILED(r))
111         return r;
112
113     r = IUnknown_QueryInterface( punk, riid, ppobj );
114     IUnknown_Release( punk );
115
116     return r;
117 }
118
119 static HRESULT WINAPI cf_LockServer( IClassFactory *iface, BOOL dolock)
120 {
121     FIXME("(%p)->(%d),stub!\n",iface,dolock);
122     return S_OK;
123 }
124
125 static const struct IClassFactoryVtbl cf_vtbl =
126 {
127     cf_QueryInterface,
128     cf_AddRef,
129     cf_Release,
130     cf_CreateInstance,
131     cf_LockServer
132 };
133
134 static cf mime_body_cf      = { &cf_vtbl, MimeBody_create };
135 static cf mime_allocator_cf = { &cf_vtbl, MimeAllocator_create };
136
137 /***********************************************************************
138  *              DllGetClassObject (INETCOMM.@)
139  */
140 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID iid, LPVOID *ppv)
141 {
142     IClassFactory *cf = NULL;
143
144     TRACE("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv );
145
146     if( IsEqualCLSID( rclsid, &CLSID_IMimeBody ))
147     {
148         cf = (IClassFactory*) &mime_body_cf.lpVtbl;
149     }
150     else if( IsEqualCLSID( rclsid, &CLSID_IMimeAllocator ))
151     {
152         cf = (IClassFactory*) &mime_allocator_cf.lpVtbl;
153     }
154
155     if ( !cf )
156     {
157         FIXME("\n\tCLSID:\t%s,\n\tIID:\t%s\n",debugstr_guid(rclsid),debugstr_guid(iid));
158         return CLASS_E_CLASSNOTAVAILABLE;
159     }
160
161     return IClassFactory_QueryInterface( cf, iid, ppv );
162 }
163
164 /***********************************************************************
165  *              DllCanUnloadNow (INETCOMM.@)
166  */
167 HRESULT WINAPI DllCanUnloadNow(void)
168 {
169     FIXME("\n");
170     return S_FALSE;
171 }