wined3d: Flush GL calls after drawing to the drawable. This fixes apps that use multi...
[wine/gsoc_dplay.git] / dlls / mapi32 / sendmail.c
blobeb954a504cb850359e39a840edb2a85b70d9f668
1 /*
2 * MAPISendMail implementation
4 * Copyright 2005 Hans Leidekker
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 #include "config.h"
22 #include "wine/port.h"
24 #include <stdio.h>
25 #include <stdarg.h>
27 #include "windef.h"
28 #include "winbase.h"
29 #include "winerror.h"
30 #include "objbase.h"
31 #include "mapi.h"
32 #include "winreg.h"
33 #include "shellapi.h"
34 #include "shlwapi.h"
35 #include "wine/debug.h"
37 WINE_DEFAULT_DEBUG_CHANNEL(mapi);
39 /**************************************************************************
40 * MAPISendMail (MAPI32.211)
42 * Send a mail.
44 * PARAMS
45 * session [I] Handle to a MAPI session.
46 * uiparam [I] Parent window handle.
47 * message [I] Pointer to a MAPIMessage structure.
48 * flags [I] Flags.
49 * reserved [I] Reserved, pass 0.
51 * RETURNS
52 * Success: SUCCESS_SUCCESS
53 * Failure: MAPI_E_FAILURE
55 * NOTES
56 * This is a temporary hack.
58 ULONG WINAPI MAPISendMail( LHANDLE session, ULONG_PTR uiparam,
59 lpMapiMessage message, FLAGS flags, ULONG reserved )
61 ULONG ret = MAPI_E_FAILURE;
62 unsigned int i, to_count = 0, cc_count = 0, bcc_count = 0;
63 unsigned int to_size = 0, cc_size = 0, bcc_size = 0, subj_size, body_size;
65 char *to = NULL, *cc = NULL, *bcc = NULL;
66 const char *address, *subject, *body;
67 static const char format[] =
68 "mailto:\"%s\"?subject=\"%s\"&cc=\"%s\"&bcc=\"%s\"&body=\"%s\"";
69 char *mailto = NULL, *escape = NULL;
70 HRESULT res;
71 DWORD size;
73 TRACE( "(0x%08lx 0x%08lx %p 0x%08lx 0x%08x)\n", session, uiparam,
74 message, flags, reserved );
76 if (!message) return MAPI_E_FAILURE;
78 for (i = 0; i < message->nRecipCount; i++)
80 if (!message->lpRecips)
82 WARN("No recipients found\n");
83 return MAPI_E_FAILURE;
86 address = message->lpRecips[i].lpszAddress;
87 if (address)
89 switch (message->lpRecips[i].ulRecipClass)
91 case MAPI_ORIG:
92 TRACE( "From: %s\n", debugstr_a(address) );
93 break;
94 case MAPI_TO:
95 TRACE( "To: %s\n", debugstr_a(address) );
96 to_size += lstrlenA( address ) + 1;
97 break;
98 case MAPI_CC:
99 TRACE( "Cc: %s\n", debugstr_a(address) );
100 cc_size += lstrlenA( address ) + 1;
101 break;
102 case MAPI_BCC:
103 TRACE( "Bcc: %s\n", debugstr_a(address) );
104 bcc_size += lstrlenA( address ) + 1;
105 break;
106 default:
107 TRACE( "Unknown recipient class: %d\n",
108 message->lpRecips[i].ulRecipClass );
111 else
112 FIXME("Name resolution and entry identifiers not supported\n");
114 if (message->nFileCount) FIXME("Ignoring attachments\n");
116 subject = message->lpszSubject ? message->lpszSubject : "";
117 body = message->lpszNoteText ? message->lpszNoteText : "";
119 TRACE( "Subject: %s\n", debugstr_a(subject) );
120 TRACE( "Body: %s\n", debugstr_a(body) );
122 subj_size = lstrlenA( subject );
123 body_size = lstrlenA( body );
125 ret = MAPI_E_INSUFFICIENT_MEMORY;
126 if (to_size)
128 to = HeapAlloc( GetProcessHeap(), 0, to_size );
129 if (!to) goto exit;
131 if (cc_size)
133 cc = HeapAlloc( GetProcessHeap(), 0, cc_size );
134 if (!cc) goto exit;
136 if (bcc_size)
138 bcc = HeapAlloc( GetProcessHeap(), 0, bcc_size );
139 if (!bcc) goto exit;
142 if (message->lpOriginator)
143 TRACE( "From: %s\n", debugstr_a(message->lpOriginator->lpszAddress) );
145 for (i = 0; i < message->nRecipCount; i++)
147 address = message->lpRecips[i].lpszAddress;
148 if (address)
150 switch (message->lpRecips[i].ulRecipClass)
152 case MAPI_TO:
153 if (to_count) lstrcatA( to, "," );
154 lstrcatA( to, address );
155 to_count++;
156 break;
157 case MAPI_CC:
158 if (cc_count) lstrcatA( cc, "," );
159 lstrcatA( cc, address );
160 cc_count++;
161 break;
162 case MAPI_BCC:
163 if (bcc_count) lstrcatA( bcc, "," );
164 lstrcatA( bcc, address );
165 bcc_count++;
166 break;
170 ret = MAPI_E_FAILURE;
171 size = sizeof(format) + to_size + cc_size + bcc_size + subj_size + body_size;
173 mailto = HeapAlloc( GetProcessHeap(), 0, size );
174 if (!mailto) goto exit;
176 sprintf( mailto, format, to ? to : "", subject, cc ? cc : "", bcc ? bcc : "", body );
178 size = 0;
179 res = UrlEscapeA( mailto, NULL, &size, URL_ESCAPE_SPACES_ONLY );
180 if (res != E_POINTER) goto exit;
182 escape = HeapAlloc( GetProcessHeap(), 0, size );
183 if (!escape) goto exit;
185 res = UrlEscapeA( mailto, escape, &size, URL_ESCAPE_SPACES_ONLY );
186 if (res != S_OK) goto exit;
188 if ((UINT_PTR)ShellExecuteA( NULL, "open", escape, NULL, NULL, 0 ) > 32)
189 ret = SUCCESS_SUCCESS;
191 exit:
192 HeapFree( GetProcessHeap(), 0, to );
193 HeapFree( GetProcessHeap(), 0, cc );
194 HeapFree( GetProcessHeap(), 0, bcc );
195 HeapFree( GetProcessHeap(), 0, mailto );
196 HeapFree( GetProcessHeap(), 0, escape );
198 return ret;