/[winpt]/trunk/Src/wptMAPI.cpp
ViewVC logotype

Diff of /trunk/Src/wptMAPI.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 23 by twoaday, Fri Sep 30 10:10:16 2005 UTC revision 77 by twoaday, Mon Nov 14 15:01:01 2005 UTC
# Line 1  Line 1 
 /* wptMAPI.cpp  
  *      Copyright (C) 2003, 2004 Timo Schulz  
  *  
  * This file is part of WinPT.  
  *  
  * WinPT is free software; you can redistribute it and/or modify  
  * it under the terms of the GNU General Public License as published by  
  * the Free Software Foundation; either version 2 of the License, or  
  * (at your option) any later version.  
  *  
  * WinPT is distributed in the hope that it will be useful,  
  * but WITHOUT ANY WARRANTY; without even the implied warranty of  
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the  
  * GNU General Public License for more details.  
  *  
  * You should have received a copy of the GNU General Public License  
  * along with WinPT; if not, write to the Free Software Foundation,  
  * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA  
  */  
 #if 0 /* low:priority XXX port the code */  
 #include <windows.h>  
 #include <stdio.h>  
 #include <mapi.h>  
   
 extern HINSTANCE glob_hinst;  
   
 #include "../resource.h"  
 #include "wptTypes.h"  
 #include "wptErrors.h"  
 #include "wptW32API.h"  
 #include "wptGPG.h"  
   
   
 static LPMAPILOGON          mapi_logon = NULL;  
 static LPMAPILOGOFF         mapi_logoff = NULL;      
 static LPMAPISENDDOCUMENTS  mapi_send_documents = NULL;  
 static LPMAPISENDMAIL       mapi_send_mail = NULL;  
 static HINSTANCE            hlib = NULL;  
 static int                  init = 0;  
   
 #define load_one_fnc(cast, hlib, name) (cast)GetProcAddress ((hlib), name)  
   
   
 int  
 mapi_init (void)  
 {  
     if (init)  
         return 0;  
   
     hlib = LoadLibrary ("MAPI32.DLL");  
     if (!hlib)  
         return -1;  
   
     mapi_logon = load_one_fnc (LPMAPILOGON, hlib, "MAPILogon");  
     mapi_logoff = load_one_fnc (LPMAPILOGOFF, hlib, "MAPILogoff");  
     mapi_send_documents = load_one_fnc (LPMAPISENDDOCUMENTS, hlib, "MAPISendDocuments");  
     mapi_send_mail = load_one_fnc (LPMAPISENDMAIL, hlib, "MAPISendMail");  
     if (!mapi_logon || !mapi_logoff || !mapi_send_documents || !mapi_send_mail)  
         return -1;  
     init = 1;  
   
     return 0;  
 } /* mapi_init */  
   
   
 void  
 mapi_deinit (void)  
 {  
     if (hlib) {  
         FreeLibrary (hlib);  
         hlib = NULL;  
         init = 0;  
     }  
 } /* mapi_deinit */  
   
   
 int  
 mapi_send_ascfile (char *ascfile)  
 {  
     LHANDLE hd;  
     int rc;  
   
     if (!init)  
         return 0;  
   
     rc = mapi_logon (0, NULL, NULL, MAPI_LOGON_UI, 0, &hd);  
     if (rc != SUCCESS_SUCCESS) {  
         MessageBox (NULL, _("MAPI Login failed."), "MAPI", MB_ICONWARNING|MB_OK);  
         goto fail;  
     }  
     rc = mapi_send_documents (0, ";", ascfile, NULL, 0);  
     if (rc == MAPI_E_USER_ABORT)  
         rc = SUCCESS_SUCCESS;  
     if (rc != SUCCESS_SUCCESS)  
         MessageBox (NULL, _("Could not sent mail."), "MAPI", MB_ICONERROR|MB_OK);  
   
 fail:  
     mapi_logoff (hd, 0, 0, 0);  
     return rc;  
 }  
   
   
 int  
 mapi_send_pubkey (const char *keyid, char *keyfile)  
 {  
     LHANDLE hd;  
     const char * fmt;  
     char * keyinf = NULL;  
     int rc;  
   
     if (!init)  
         return 0;  
   
     fmt = _("GPG Public Key of %s");  
     keyinf = new char[strlen (fmt) + strlen (keyid) + 2];  
     if (!keyinf)  
         BUG (0);  
     sprintf (keyinf, fmt, keyid);  
     rc = mapi_logon (0, NULL, NULL, MAPI_LOGON_UI, 0, &hd);  
     if (rc != SUCCESS_SUCCESS) {  
         MessageBox (NULL, _("MAPI Login failed."), "MAPI", MB_ICONWARNING|MB_OK);  
         goto fail;  
     }  
     rc = mapi_send_documents (0, ";", keyfile, keyinf, 0);  
     if (rc == MAPI_E_USER_ABORT)  
         rc = SUCCESS_SUCCESS;  
     if (rc != SUCCESS_SUCCESS)  
         MessageBox (NULL, _("Could not sent mail."), "MAPI", MB_ICONERROR|MB_OK);  
   
 fail:  
     mapi_logoff (hd, 0, 0, 0);  
     free_if_alloc (keyinf);  
     return rc;  
 } /* mapi_send_pubkey */  
   
   
 static void  
 free_mapi_msg (MapiMessage * msg)  
 {  
     if (!msg)  
         return;  
     safe_free (msg->lpszSubject);  
     safe_free (msg->lpszNoteText);  
     safe_free (msg);  
 } /* free_mapi_msg */  
   
   
 static void  
 free_recip_tab (MapiRecipDesc *recip, size_t n)  
 {  
     size_t i;  
   
     if (!recip)  
         return;  
     if (!n)  
         return;  
     for (i=0; i < n; i++)  
         safe_free (recip[i].lpszName);  
     safe_free (recip);  
 } /* free_recip_tab */  
   
   
 static void  
 free_files_tab (MapiFileDesc * files, size_t n)  
 {  
     size_t i;  
   
     if (!files)  
         return;  
     if (!n)  
         return;  
     for (i=0; i < n; i++) {  
         safe_free (files[i].lpszFileName);  
         safe_free (files[i].lpszPathName);  
     }  
     safe_free (files);  
 } /* free_files_tab */  
   
   
   
 static gpgme_recipients_t  
 conv_recipients (gpgme_recipients_t rset)  
 {  
     gpgme_recipients_t r;  
     gpgme_error_t rc;  
     void * ctx=NULL;  
     const char * s;  
   
     /* we need to convert the recipients to email addresses so  
        GPG can handle them. */  
     rc = gpgme_recipients_new (&r);  
     if (rc)  
         return NULL;  
     gpgme_recipients_enum_open (rset, &ctx);  
   
     while ((s=gpgme_recipients_enum_read (rset, &ctx))) {  
         char * p, * q, * buf;  
         if (!(p = strchr (s, '<')) || !(q = strchr (s, '>')))  
             continue;  
         buf = (char * )calloc (1, (q-s)-(p-s)+2);  
         if (!buf)  
             BUG (0);  
         strncpy (buf, s+(p-s)+1, (q-s)-(p-s)-1);  
         gpgme_recipients_add_name (r, buf);  
         safe_free (buf);  
     }  
     return r;  
 } /* conv_recipients */  
   
   
 static char *  
 secure_attachment (gpgme_recipients_t rset, const char *fname)  
 {  
     char tmpdir[512+32], * p;  
     gpgme_recipients_t addrs;  
     gpgme_ctx_t ctx;  
     gpgme_error_t rc;  
   
     if (strlen (fname) > 200)  
         BUG (0);  
     GetTempPath (sizeof tmpdir-200, tmpdir);  
     p = strrchr (fname, '\\');  
     if (!p)  
         strcat (tmpdir, fname);  
     else  
         strcat (tmpdir, fname+(p-fname)+1);  
     strcat (tmpdir, ".asc");  
   
     rc = gpgme_new (&ctx);  
     if (rc)  
         return NULL;  
     gpgme_set_armor (ctx, 1);  
     addrs = conv_recipients (rset);  
     if (!addrs) {  
         msg_box (NULL, _("No valid mail addresses found."), _("Secure Attachment"), MB_ERR);  
         gpgme_release (NULL);  
         return NULL;  
     }  
     rc = gpgme_op_file_encrypt (ctx, addrs, fname, tmpdir);  
     if (rc)  
         log_box (_("Secure Attachment"), MB_ERR, _("Could not encrypt '%s'"), fname);  
     gpgme_recipients_release (addrs);  
     gpgme_release (ctx);  
     return strdup (tmpdir);  
 } /* secure_attachment */  
   
   
 static char *  
 secure_message (gpgme_recipients_t rset, const char * data)  
 {  
     gpgme_recipients_t addrs;  
     gpgme_error_t rc;  
     gpgme_data_t in, out;  
     gpgme_ctx_t ctx;  
     char * p;  
     size_t n=0;  
   
     rc = gpgme_new (&ctx);  
     if (rc)  
         return NULL;  
     gpgme_set_armor (ctx, 1);  
   
     addrs = conv_recipients (rset);  
     rc = gpgme_data_new_from_mem (&in, data, strlen (data), 1);  
     if (rc) {  
         gpgme_release (ctx);  
         return NULL;  
     }  
     gpgme_data_new (&out);  
     rc = gpgme_op_encrypt (ctx, addrs, GPGME_ENCRYPT_ALWAYS_TRUST, in, out);  
     if (rc)  
         log_box (_("Secure Message"), MB_ERR, "Could not encrypt the data");  
   
     p = gpgme_data_release_and_get_mem (&n);  
     p[n] = 0;  
   
     gpgme_data_release (in);  
     gpgme_release (ctx);  
     gpgme_recipients_release (addrs);  
   
     return p;  
 } /* secure_message */  
   
   
 int  
 mapi_send_message (gpgme_recipients_t rset, const char * msgtxt,  
                    const char * subject, const char **files, size_t nfiles)  
 {  
     LHANDLE hd;  
     MapiMessage * msg;  
     MapiRecipDesc * recip;  
     MapiFileDesc * attch;  
     char * p;  
     const char * s;  
     void * ctx=NULL;  
     size_t n, i=0;  
     int rc;  
   
     if (!init)  
         return 0;  
   
     rc = mapi_logon (0, NULL, NULL, MAPI_LOGON_UI, 0, &hd);  
     if (rc != SUCCESS_SUCCESS) {  
         MessageBox (NULL, "MAPI Login failed.", "MAPI", MB_ICONWARNING|MB_OK);  
         return rc;  
     }  
   
     msg = (MapiMessage *)calloc (1, sizeof * msg);  
     if (!msg)  
         BUG (0);  
     p = msg->lpszSubject = strdup (subject);  
     if (!p)  
         BUG (0);  
     p = msg->lpszNoteText = secure_message (rset, msgtxt);  
     if (!p)  
         BUG (0);  
     n = msg->nRecipCount = gpgme_recipients_count (rset);  
     recip = (MapiRecipDesc *)calloc (n+1, sizeof * recip);  
     if (!recip)  
         BUG (0);  
       
     gpgme_recipients_enum_open (rset, &ctx);  
     while ((s = gpgme_recipients_enum_read (rset, &ctx))) {  
         if (!i)  
             recip[i].ulRecipClass = MAPI_TO;  
         else  
             recip[i].ulRecipClass = MAPI_CC;      
         p = recip[i].lpszName = strdup (s);  
         if (!p)  
             BUG (0);  
         i++;  
     }  
     msg->lpRecips = recip;  
   
     if (nfiles) {  
         msg->nFileCount = nfiles;  
         attch = (MapiFileDesc *)calloc (nfiles+1, sizeof * attch);  
         if (!attch)  
             BUG (0);  
         for (i=0; i < nfiles; i++) {  
             char * p = secure_attachment (rset, *files);  
             if (!p)  
                 continue;  
             attch[i].lpszFileName = strdup (*files);          
             attch[i].lpszPathName = strdup (p);  
             files++;  
             safe_free (p);  
         }  
         msg->lpFiles = attch;  
     }  
   
     rc = mapi_send_mail (hd, 0, msg, 0, 0);  
     if (rc == MAPI_E_USER_ABORT)  
         rc = SUCCESS_SUCCESS;  
     if (rc != SUCCESS_SUCCESS)  
         MessageBox (NULL, _("Could not sent mail."), "MAPI", MB_ERR);  
   
     free_recip_tab (recip, n);  
     free_files_tab (attch, nfiles);  
     free_mapi_msg (msg);  
     mapi_logoff (hd, 0, 0, 0);  
   
     return 0;  
 } /* mapi_send_message */  
   
   
 static int  
 add_recipient (gpgme_recipients_t * r_rset, const char * addr)  
 {  
     gpgme_keycache_t pub = keycache_get_ctx (1);  
     gpgme_key_t key;  
     gpgme_error_t rc;  
     const char * s;  
   
     if (!*r_rset)  
         gpgme_recipients_new (&(*r_rset));  
     rc = gpgme_keycache_find_key (pub, addr, 0, &key);  
     if (rc) {  
         log_box (_("Add Recipient"), MB_ERR, _("Could not find key for '%s'"), addr);  
         return -1;  
     }  
     s = key->uids->uid;  
     if (s)  
         gpgme_recipients_add_name (*r_rset, s);  
     return 0;  
 } /* add_recipient */  
   
   
 static int  
 add_all_recipients (HWND dlg, int itemid, gpgme_recipients_t * r_rset)  
 {      
     char buf[1024], * p;  
     int n=0;  
   
     n = GetDlgItemText (dlg, itemid, buf, sizeof buf-10);  
     if (!n)  
         return -1;  
     p = strtok (buf, ";,");  
     while (p != NULL) {  
         add_recipient (&*r_rset, p);  
         p = strtok (NULL, ";,");  
     }  
     return 0;  
 } /* add_all_recipients */  
   
   
 BOOL CALLBACK  
 winpt_mail_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)  
 {  
     static gpgme_recipients_t rset=NULL;  
     char subject[128];  
     char * msgbuf;  
     int n;  
   
     switch (msg) {  
     case WM_INITDIALOG:  
         center_window (dlg, NULL);  
         SetForegroundWindow (dlg);  
         break;  
   
     case WM_COMMAND:  
         switch (LOWORD (wparam)) {  
         case IDOK:  
             add_all_recipients (dlg, IDC_PMAIL_TO, &rset);  
             add_all_recipients (dlg, IDC_PMAIL_CC, &rset);  
             if (!gpgme_recipients_count (rset)) {  
                 msg_box (dlg, _("Please enter a recipient."), _("Mail"), MB_ERR);  
                 return FALSE;  
             }  
             n=GetDlgItemText (dlg, IDC_PMAIL_SUBJECT, subject, sizeof subject-1);  
             if (!n)  
                 strcpy (subject, "");  
             n = SendDlgItemMessage (dlg, IDC_PMAIL_MSG, WM_GETTEXTLENGTH, 0, 0);  
             if (!n) {  
                 msg_box (dlg, _("Please enter a message."), _("Mail"), MB_ERR);  
                 return FALSE;  
             }  
             msgbuf = (char * )calloc (1, n+2);  
             if (!msgbuf)  
                 BUG (0);  
             GetDlgItemText (dlg, IDC_PMAIL_MSG, msgbuf, n+1);  
             mapi_send_message (rset, msgbuf, subject, NULL, 0);  
             safe_free (msgbuf);  
             EndDialog (dlg, TRUE);  
             break;  
   
         case IDCANCEL:  
             EndDialog (dlg, FALSE);  
             break;  
         }  
         break;  
     }  
   
     return FALSE;  
 } /* winpt_mail_proc */  
 #endif  
1    /* wptMAPI.cpp
2     *      Copyright (C) 2003, 2004, 2005 Timo Schulz
3     *
4     * This file is part of WinPT.
5     *
6     * WinPT is free software; you can redistribute it and/or modify
7     * it under the terms of the GNU General Public License as published by
8     * the Free Software Foundation; either version 2 of the License, or
9     * (at your option) any later version.
10     *
11     * WinPT 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
14     * GNU General Public License for more details.
15     *
16     * You should have received a copy of the GNU General Public License
17     * along with WinPT; if not, write to the Free Software Foundation,
18     * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19     */
20    #ifdef HAVE_CONFIG_H
21    #include <config.h>
22    #endif
23    
24    #include <windows.h>
25    #include <stdio.h>
26    #include <mapi.h>
27    
28    extern HINSTANCE glob_hinst;
29    
30    #include "resource.h"
31    #include "wptTypes.h"
32    #include "wptErrors.h"
33    #include "wptW32API.h"
34    #include "wptGPG.h"
35    
36    
37    static LPMAPILOGON          mapi_logon = NULL;
38    static LPMAPILOGOFF         mapi_logoff = NULL;    
39    static LPMAPISENDDOCUMENTS  mapi_send_documents = NULL;
40    static LPMAPISENDMAIL       mapi_send_mail = NULL;
41    static HINSTANCE            hlib = NULL;
42    static int                  init = 0;
43    
44    #define load_one_fnc(cast, hlib, name) (cast)GetProcAddress ((hlib), name)
45    
46    
47    /* Load MAPI library and set function pointers.
48       Return value: 0 on success. */
49    int
50    mapi_init (void)
51    {
52        if (init)
53            return 0;
54    
55        hlib = LoadLibrary ("MAPI32.DLL");
56        if (!hlib)
57            return -1;
58    
59        mapi_logon = load_one_fnc (LPMAPILOGON, hlib, "MAPILogon");
60        mapi_logoff = load_one_fnc (LPMAPILOGOFF, hlib, "MAPILogoff");
61        mapi_send_documents = load_one_fnc (LPMAPISENDDOCUMENTS, hlib, "MAPISendDocuments");
62        mapi_send_mail = load_one_fnc (LPMAPISENDMAIL, hlib, "MAPISendMail");
63        if (!mapi_logon || !mapi_logoff || !mapi_send_documents || !mapi_send_mail)
64            return -1;
65        init = 1;
66    
67        return 0;
68    }
69    
70    
71    /* Free library and cleanup. */
72    void
73    mapi_deinit (void)
74    {
75        if (hlib) {
76            FreeLibrary (hlib);
77            hlib = NULL;
78            init = 0;
79        }
80    }
81    
82    
83    /* Send the file given in @ascfile via the MAPI mechanism. */
84    int
85    mapi_send_ascfile (char *ascfile)
86    {
87        LHANDLE hd;
88        int rc;
89    
90        if (!init)
91            return 0;
92    
93        rc = mapi_logon (0, NULL, NULL, MAPI_LOGON_UI, 0, &hd);
94        if (rc != SUCCESS_SUCCESS) {
95            MessageBox (NULL, _("MAPI Login failed."), "MAPI", MB_ICONWARNING|MB_OK);
96            goto fail;
97        }
98        rc = mapi_send_documents (0, ";", ascfile, NULL, 0);
99        if (rc == MAPI_E_USER_ABORT)
100            rc = SUCCESS_SUCCESS;
101        if (rc != SUCCESS_SUCCESS)
102            MessageBox (NULL, _("Could not sent mail."), "MAPI", MB_ICONERROR|MB_OK);
103    
104    fail:
105        mapi_logoff (hd, 0, 0, 0);
106        return rc;
107    }
108    
109    
110    /* Send a public key stored in @keyfile with the keyid @keyid
111       via the MAPI mechanism to a mail recipient.
112       Return value: SUCCESS_SUCCESS on succes. */
113    int
114    mapi_send_pubkey (const char *keyid, char *keyfile)
115    {
116        LHANDLE hd;
117        const char * fmt;
118        char * keyinf = NULL;
119        int rc;
120    
121        if (!init)
122            return 0;
123    
124        fmt = _("GPG Public Key of %s");
125        keyinf = new char[strlen (fmt) + strlen (keyid) + 2];
126        if (!keyinf)
127            BUG (0);
128        sprintf (keyinf, fmt, keyid);
129        rc = mapi_logon (0, NULL, NULL, MAPI_LOGON_UI, 0, &hd);
130        if (rc != SUCCESS_SUCCESS) {
131            MessageBox (NULL, _("MAPI Login failed."), "MAPI", MB_ICONWARNING|MB_OK);
132            goto fail;
133        }
134        rc = mapi_send_documents (0, ";", keyfile, keyinf, 0);
135        if (rc == MAPI_E_USER_ABORT)
136            rc = SUCCESS_SUCCESS;
137        if (rc != SUCCESS_SUCCESS)
138            MessageBox (NULL, _("Could not sent mail."), "MAPI", MB_ICONERROR|MB_OK);
139    
140    fail:
141        mapi_logoff (hd, 0, 0, 0);
142        free_if_alloc (keyinf);
143        return rc;
144    }
145    
146    
147    #if 0 /* low:priority XXX port the code */
148    static void
149    free_mapi_msg (MapiMessage * msg)
150    {
151        if (!msg)
152            return;
153        safe_free (msg->lpszSubject);
154        safe_free (msg->lpszNoteText);
155        safe_free (msg);
156    } /* free_mapi_msg */
157    
158    
159    static void
160    free_recip_tab (MapiRecipDesc *recip, size_t n)
161    {
162        size_t i;
163    
164        if (!recip)
165            return;
166        if (!n)
167            return;
168        for (i=0; i < n; i++)
169            safe_free (recip[i].lpszName);
170        safe_free (recip);
171    } /* free_recip_tab */
172    
173    
174    static void
175    free_files_tab (MapiFileDesc * files, size_t n)
176    {
177        size_t i;
178    
179        if (!files)
180            return;
181        if (!n)
182            return;
183        for (i=0; i < n; i++) {
184            safe_free (files[i].lpszFileName);
185            safe_free (files[i].lpszPathName);
186        }
187        safe_free (files);
188    } /* free_files_tab */
189    
190    
191    
192    static gpgme_recipients_t
193    conv_recipients (gpgme_recipients_t rset)
194    {
195        gpgme_recipients_t r;
196        gpgme_error_t rc;
197        void * ctx=NULL;
198        const char * s;
199    
200        /* we need to convert the recipients to email addresses so
201           GPG can handle them. */
202        rc = gpgme_recipients_new (&r);
203        if (rc)
204            return NULL;
205        gpgme_recipients_enum_open (rset, &ctx);
206    
207        while ((s=gpgme_recipients_enum_read (rset, &ctx))) {
208            char * p, * q, * buf;
209            if (!(p = strchr (s, '<')) || !(q = strchr (s, '>')))
210                continue;
211            buf = (char * )calloc (1, (q-s)-(p-s)+2);
212            if (!buf)
213                BUG (0);
214            strncpy (buf, s+(p-s)+1, (q-s)-(p-s)-1);
215            gpgme_recipients_add_name (r, buf);
216            safe_free (buf);
217        }
218        return r;
219    } /* conv_recipients */
220    
221    
222    static char *
223    secure_attachment (gpgme_recipients_t rset, const char *fname)
224    {
225        char tmpdir[512+32], * p;
226        gpgme_recipients_t addrs;
227        gpgme_ctx_t ctx;
228        gpgme_error_t rc;
229    
230        if (strlen (fname) > 200)
231            BUG (0);
232        GetTempPath (sizeof tmpdir-200, tmpdir);
233        p = strrchr (fname, '\\');
234        if (!p)
235            strcat (tmpdir, fname);
236        else
237            strcat (tmpdir, fname+(p-fname)+1);
238        strcat (tmpdir, ".asc");
239    
240        rc = gpgme_new (&ctx);
241        if (rc)
242            return NULL;
243        gpgme_set_armor (ctx, 1);
244        addrs = conv_recipients (rset);
245        if (!addrs) {
246            msg_box (NULL, _("No valid mail addresses found."), _("Secure Attachment"), MB_ERR);
247            gpgme_release (NULL);
248            return NULL;
249        }
250        rc = gpgme_op_file_encrypt (ctx, addrs, fname, tmpdir);
251        if (rc)
252            log_box (_("Secure Attachment"), MB_ERR, _("Could not encrypt '%s'"), fname);
253        gpgme_recipients_release (addrs);
254        gpgme_release (ctx);
255        return strdup (tmpdir);
256    } /* secure_attachment */
257    
258    
259    static gpgme_error_t
260    secure_message (gpgme_recipients_t rset, const char *data,
261                    char *enc_msg, size_t *r_enclen)
262    {
263        gpgme_recipients_t addrs;
264        gpgme_error_t rc;
265        gpgme_data_t in, out;
266        gpgme_ctx_t ctx;
267        char * p;
268        size_t n=0;
269    
270        rc = gpgme_new (&ctx);
271        if (rc)
272            return NULL;
273        gpgme_set_armor (ctx, 1);
274    
275        addrs = conv_recipients (rset);
276        rc = gpgme_data_new_from_mem (&in, data, strlen (data), 1);
277        if (rc) {
278            gpgme_release (ctx);
279            return rc;
280        }
281        gpgme_data_new (&out);
282        rc = gpgme_op_encrypt (ctx, addrs, GPGME_ENCRYPT_ALWAYS_TRUST, in, out);
283        if (rc)
284            log_box (_("Secure Message"), MB_ERR, "Could not encrypt the data");
285    
286        *r_enc_msg = gpgme_data_release_and_get_mem (&n);
287        *r_enclen = n;
288    
289        gpgme_data_release (in);
290        gpgme_release (ctx);
291        gpgme_recipients_release (addrs);
292    
293        return rc;
294    } /* secure_message */
295    
296    
297    int
298    mapi_send_message (gpgme_recipients_t rset, const char * msgtxt,
299                       const char * subject, const char **files, size_t nfiles)
300    {
301        LHANDLE hd;
302        MapiMessage * msg;
303        MapiRecipDesc * recip;
304        MapiFileDesc * attch;
305        char * p;
306        const char * s;
307        void * ctx=NULL;
308        size_t n, i=0, encmsg_len=0;
309        int rc;
310    
311        if (!init)
312            return 0;
313    
314        rc = mapi_logon (0, NULL, NULL, MAPI_LOGON_UI, 0, &hd);
315        if (rc != SUCCESS_SUCCESS) {
316            MessageBox (NULL, "MAPI Login failed.", "MAPI", MB_ICONWARNING|MB_OK);
317            return rc;
318        }
319    
320        msg = (MapiMessage *)calloc (1, sizeof * msg);
321        if (!msg)
322            BUG (0);
323        p = msg->lpszSubject = strdup (subject);
324        if (!p)
325            BUG (0);
326        p = msg->lpszNoteText = secure_message (rset, msgtxt, &p, &encmsg_len);
327        if (!p)
328            BUG (0);
329        n = msg->nRecipCount = gpgme_recipients_count (rset);
330        recip = (MapiRecipDesc *)calloc (n+1, sizeof * recip);
331        if (!recip)
332            BUG (0);
333        
334        gpgme_recipients_enum_open (rset, &ctx);
335        while ((s = gpgme_recipients_enum_read (rset, &ctx))) {
336            if (!i)
337                recip[i].ulRecipClass = MAPI_TO;
338            else
339                recip[i].ulRecipClass = MAPI_CC;    
340            p = recip[i].lpszName = strdup (s);
341            if (!p)
342                BUG (0);
343            i++;
344        }
345        msg->lpRecips = recip;
346    
347        if (nfiles) {
348            msg->nFileCount = nfiles;
349            attch = (MapiFileDesc *)calloc (nfiles+1, sizeof * attch);
350            if (!attch)
351                BUG (0);
352            for (i=0; i < nfiles; i++) {
353                char * p = secure_attachment (rset, *files);
354                if (!p)
355                    continue;
356                attch[i].lpszFileName = strdup (*files);        
357                attch[i].lpszPathName = strdup (p);
358                files++;
359                safe_free (p);
360            }
361            msg->lpFiles = attch;
362        }
363    
364        rc = mapi_send_mail (hd, 0, msg, 0, 0);
365        if (rc == MAPI_E_USER_ABORT)
366            rc = SUCCESS_SUCCESS;
367        if (rc != SUCCESS_SUCCESS)
368            MessageBox (NULL, _("Could not sent mail."), "MAPI", MB_ERR);
369    
370        free_recip_tab (recip, n);
371        free_files_tab (attch, nfiles);
372        free_mapi_msg (msg);
373        gpgme_free (p);
374        mapi_logoff (hd, 0, 0, 0);
375    
376        return 0;
377    } /* mapi_send_message */
378    
379    
380    static int
381    add_recipient (gpgme_recipients_t * r_rset, const char * addr)
382    {
383        gpg_keycache_t pub = keycache_get_ctx (1);
384        gpgme_key_t key;
385        gpgme_error_t rc;
386        const char * s;
387    
388        if (!*r_rset)
389            gpgme_recipients_new (&(*r_rset));
390        rc = gpgme_keycache_find_key (pub, addr, 0, &key);
391        if (rc) {
392            log_box (_("Add Recipient"), MB_ERR, _("Could not find key for '%s'"), addr);
393            return -1;
394        }
395        s = key->uids->uid;
396        if (s)
397            gpgme_recipients_add_name (*r_rset, s);
398        return 0;
399    } /* add_recipient */
400    
401    
402    static int
403    add_all_recipients (HWND dlg, int itemid, gpgme_recipients_t * r_rset)
404    {    
405        char buf[1024], * p;
406        int n=0;
407    
408        n = GetDlgItemText (dlg, itemid, buf, sizeof buf-10);
409        if (!n)
410            return -1;
411        p = strtok (buf, ";,");
412        while (p != NULL) {
413            add_recipient (&*r_rset, p);
414            p = strtok (NULL, ";,");
415        }
416        return 0;
417    } /* add_all_recipients */
418    
419    
420    BOOL CALLBACK
421    winpt_mail_proc (HWND dlg, UINT msg, WPARAM wparam, LPARAM lparam)
422    {
423        static gpgme_recipients_t rset=NULL;
424        char subject[128];
425        char * msgbuf;
426        int n;
427    
428        switch (msg) {
429        case WM_INITDIALOG:
430            center_window (dlg, NULL);
431            SetForegroundWindow (dlg);
432            break;
433    
434        case WM_COMMAND:
435            switch (LOWORD (wparam)) {
436            case IDOK:
437                add_all_recipients (dlg, IDC_PMAIL_TO, &rset);
438                add_all_recipients (dlg, IDC_PMAIL_CC, &rset);
439                if (!gpgme_recipients_count (rset)) {
440                    msg_box (dlg, _("Please enter a recipient."), _("Mail"), MB_ERR);
441                    return FALSE;
442                }
443                n=GetDlgItemText (dlg, IDC_PMAIL_SUBJECT, subject, sizeof subject-1);
444                if (!n)
445                    strcpy (subject, "");
446                n = SendDlgItemMessage (dlg, IDC_PMAIL_MSG, WM_GETTEXTLENGTH, 0, 0);
447                if (!n) {
448                    msg_box (dlg, _("Please enter a message."), _("Mail"), MB_ERR);
449                    return FALSE;
450                }
451                msgbuf = (char * )calloc (1, n+2);
452                if (!msgbuf)
453                    BUG (0);
454                GetDlgItemText (dlg, IDC_PMAIL_MSG, msgbuf, n+1);
455                mapi_send_message (rset, msgbuf, subject, NULL, 0);
456                safe_free (msgbuf);
457                EndDialog (dlg, TRUE);
458                break;
459    
460            case IDCANCEL:
461                EndDialog (dlg, FALSE);
462                break;
463            }
464            break;
465        }
466    
467        return FALSE;
468    } /* winpt_mail_proc */
469    #endif
Legend:
Removed from v.23  
changed lines
  Added in v.77
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26