2 * MAPISendMail implementation
4 * Copyright 2005 Hans Leidekker
5 * Copyright 2009 Owen Rudge for CodeWeavers
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.
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.
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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23 #include "wine/port.h"
37 #include "wine/debug.h"
39 WINE_DEFAULT_DEBUG_CHANNEL(winemapi
);
41 /**************************************************************************
44 * Send a message using a native mail client.
47 * session [I] Handle to a MAPI session.
48 * uiparam [I] Parent window handle.
49 * message [I] Pointer to a MAPIMessage structure.
51 * reserved [I] Reserved, pass 0.
54 * Success: SUCCESS_SUCCESS
55 * Failure: MAPI_E_FAILURE
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 static const char smtp
[] = "smtp:";
70 char *mailto
= NULL
, *escape
= NULL
;
71 char empty_string
[] = "";
75 TRACE("(0x%08lx 0x%08lx %p 0x%08x 0x%08x)\n", session
, uiparam
,
76 message
, flags
, reserved
);
79 return MAPI_E_FAILURE
;
81 for (i
= 0; i
< message
->nRecipCount
; i
++)
83 if (!message
->lpRecips
)
85 WARN("No recipients found\n");
86 return MAPI_E_FAILURE
;
89 address
= message
->lpRecips
[i
].lpszAddress
;
90 if (!strncasecmp(address
, smtp
, sizeof(smtp
) - 1))
91 address
+= sizeof(smtp
) - 1;
95 switch (message
->lpRecips
[i
].ulRecipClass
)
98 TRACE("From: %s\n", debugstr_a(address
));
102 TRACE("To: %s\n", debugstr_a(address
));
103 to_size
+= lstrlenA(address
) + 1;
107 TRACE("Cc: %s\n", debugstr_a(address
));
108 cc_size
+= lstrlenA(address
) + 1;
112 TRACE("Bcc: %s\n", debugstr_a(address
));
113 bcc_size
+= lstrlenA(address
) + 1;
117 TRACE("Unknown recipient class: %d\n",
118 message
->lpRecips
[i
].ulRecipClass
);
122 FIXME("Name resolution and entry identifiers not supported\n");
125 if (message
->nFileCount
)
126 FIXME("Ignoring attachments\n");
128 subject
= message
->lpszSubject
? message
->lpszSubject
: "";
129 body
= message
->lpszNoteText
? message
->lpszNoteText
: "";
131 TRACE("Subject: %s\n", debugstr_a(subject
));
132 TRACE("Body: %s\n", debugstr_a(body
));
134 subj_size
= lstrlenA(subject
);
135 body_size
= lstrlenA(body
);
137 ret
= MAPI_E_INSUFFICIENT_MEMORY
;
141 to
= HeapAlloc(GetProcessHeap(), 0, to_size
);
151 cc
= HeapAlloc(GetProcessHeap(), 0, cc_size
);
161 bcc
= HeapAlloc(GetProcessHeap(), 0, bcc_size
);
169 if (message
->lpOriginator
)
170 TRACE("From: %s\n", debugstr_a(message
->lpOriginator
->lpszAddress
));
172 for (i
= 0; i
< message
->nRecipCount
; i
++)
174 address
= message
->lpRecips
[i
].lpszAddress
;
175 if (!strncasecmp(address
, smtp
, sizeof(smtp
) - 1))
176 address
+= sizeof(smtp
) - 1;
180 switch (message
->lpRecips
[i
].ulRecipClass
)
186 lstrcatA(to
, address
);
194 lstrcatA(cc
, address
);
202 lstrcatA(bcc
, address
);
208 ret
= MAPI_E_FAILURE
;
209 size
= sizeof(format
) + to_size
+ cc_size
+ bcc_size
+ subj_size
+ body_size
;
211 mailto
= HeapAlloc(GetProcessHeap(), 0, size
);
216 sprintf(mailto
, format
, to
? to
: "", subject
, cc
? cc
: "", bcc
? bcc
: "", body
);
219 res
= UrlEscapeA(mailto
, empty_string
, &size
, URL_ESCAPE_SPACES_ONLY
);
221 if (res
!= E_POINTER
)
224 escape
= HeapAlloc(GetProcessHeap(), 0, size
);
229 res
= UrlEscapeA(mailto
, escape
, &size
, URL_ESCAPE_SPACES_ONLY
);
234 TRACE("Executing winebrowser.exe with parameters '%s'\n", debugstr_a(escape
));
236 if ((UINT_PTR
) ShellExecuteA(NULL
, "open", "winebrowser.exe", escape
, NULL
, 0) > 32)
237 ret
= SUCCESS_SUCCESS
;
240 HeapFree(GetProcessHeap(), 0, to
);
241 HeapFree(GetProcessHeap(), 0, cc
);
242 HeapFree(GetProcessHeap(), 0, bcc
);
243 HeapFree(GetProcessHeap(), 0, mailto
);
244 HeapFree(GetProcessHeap(), 0, escape
);
249 ULONG WINAPI
MAPISendDocuments(ULONG_PTR uiparam
, LPSTR delim
, LPSTR paths
,
250 LPSTR filenames
, ULONG reserved
)
252 return MAPI_E_NOT_SUPPORTED
;