hal: Add appropriate stdcall decorations to assembly functions.
[wine.git] / dlls / inetcomm / inetcomm_main.c
blob22f19197488e3cd1f5f9e13d7e4f113d7682a613
1 /*
2 * Internet Messaging APIs
4 * Copyright 2006 Robert Shearman for CodeWeavers
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.
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.
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
21 #define COBJMACROS
23 #include <stdarg.h>
25 #include "windef.h"
26 #include "winbase.h"
27 #include "winnt.h"
28 #include "winuser.h"
29 #include "ole2.h"
30 #include "mimeole.h"
32 #include "inetcomm_private.h"
34 #include "wine/debug.h"
36 WINE_DEFAULT_DEBUG_CHANNEL(inetcomm);
38 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
40 static IMimeInternational *international;
42 TRACE("(%p, %d, %p)\n", hinstDLL, fdwReason, lpvReserved);
44 switch (fdwReason)
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;
61 return TRUE;
64 /******************************************************************************
65 * ClassFactory
67 typedef struct
69 const struct IClassFactoryVtbl *lpVtbl;
70 HRESULT (*create_object)(IUnknown *, void **);
71 } cf;
73 static inline cf *impl_from_IClassFactory( IClassFactory *iface )
75 return (cf *)((char*)iface - FIELD_OFFSET(cf, lpVtbl));
78 static HRESULT WINAPI cf_QueryInterface( IClassFactory *iface, REFIID riid, LPVOID *ppobj )
80 if (IsEqualGUID(riid, &IID_IUnknown) ||
81 IsEqualGUID(riid, &IID_IClassFactory))
83 IClassFactory_AddRef( iface );
84 *ppobj = iface;
85 return S_OK;
88 FIXME("interface %s not implemented\n", debugstr_guid(riid));
89 return E_NOINTERFACE;
92 static ULONG WINAPI cf_AddRef( IClassFactory *iface )
94 return 2;
97 static ULONG WINAPI cf_Release( IClassFactory *iface )
99 return 1;
102 static HRESULT WINAPI cf_CreateInstance( IClassFactory *iface, LPUNKNOWN pOuter,
103 REFIID riid, LPVOID *ppobj )
105 cf *This = impl_from_IClassFactory( iface );
106 HRESULT r;
107 IUnknown *punk;
109 TRACE("%p %s %p\n", pOuter, debugstr_guid(riid), ppobj );
111 *ppobj = NULL;
113 r = This->create_object( pOuter, (LPVOID*) &punk );
114 if (FAILED(r))
115 return r;
117 r = IUnknown_QueryInterface( punk, riid, ppobj );
118 IUnknown_Release( punk );
120 return r;
123 static HRESULT WINAPI cf_LockServer( IClassFactory *iface, BOOL dolock)
125 FIXME("(%p)->(%d),stub!\n",iface,dolock);
126 return S_OK;
129 static const struct IClassFactoryVtbl cf_vtbl =
131 cf_QueryInterface,
132 cf_AddRef,
133 cf_Release,
134 cf_CreateInstance,
135 cf_LockServer
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 };
144 /***********************************************************************
145 * DllGetClassObject (INETCOMM.@)
147 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID iid, LPVOID *ppv)
149 IClassFactory *cf = NULL;
151 TRACE("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv );
153 if (IsEqualCLSID(rclsid, &CLSID_ISMTPTransport))
154 return SMTPTransportCF_Create(iid, ppv);
156 if (IsEqualCLSID(rclsid, &CLSID_ISMTPTransport2))
157 return SMTPTransportCF_Create(iid, ppv);
159 if (IsEqualCLSID(rclsid, &CLSID_IIMAPTransport))
160 return IMAPTransportCF_Create(iid, ppv);
162 if (IsEqualCLSID(rclsid, &CLSID_IPOP3Transport))
163 return POP3TransportCF_Create(iid, ppv);
165 if ( IsEqualCLSID( rclsid, &CLSID_IMimeSecurity ))
167 cf = (IClassFactory*) &mime_security_cf.lpVtbl;
169 else if( IsEqualCLSID( rclsid, &CLSID_IMimeMessage ))
171 cf = (IClassFactory*) &mime_message_cf.lpVtbl;
173 else if( IsEqualCLSID( rclsid, &CLSID_IMimeBody ))
175 cf = (IClassFactory*) &mime_body_cf.lpVtbl;
177 else if( IsEqualCLSID( rclsid, &CLSID_IMimeAllocator ))
179 cf = (IClassFactory*) &mime_allocator_cf.lpVtbl;
181 else if( IsEqualCLSID( rclsid, &CLSID_IVirtualStream ))
183 cf = (IClassFactory*) &virtual_stream_cf.lpVtbl;
186 if ( !cf )
188 FIXME("\n\tCLSID:\t%s,\n\tIID:\t%s\n",debugstr_guid(rclsid),debugstr_guid(iid));
189 return CLASS_E_CLASSNOTAVAILABLE;
192 return IClassFactory_QueryInterface( cf, iid, ppv );
195 /***********************************************************************
196 * DllCanUnloadNow (INETCOMM.@)
198 HRESULT WINAPI DllCanUnloadNow(void)
200 FIXME("\n");
201 return S_FALSE;