/[winpt]/trunk/Src/wptFileManager.cpp

Diff of /trunk/Src/wptFileManager.cpp

Parent Directory | Revision Log | View Patch Patch

-revision 4 by twoaday,
Sun Feb  6 11:11:40 2005 UTC
+revision 167 by twoaday,
Thu Jan 26 10:17:17 2006 UTC
 Line 1
  /* wptFileManager.cpp - File Manager routines
   *      Copyright (C) 2001-2005 Timo Schulz
-  *
+  *      Copyright (C) 2005 g10 Code GmbH
-  * This file is part of WinPT.
+  *
-  *
+  * 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
+  * WinPT is free software; you can redistribute it and/or
-  * as published by the Free Software Foundation; either version 2
+  * modify it under the terms of the GNU General Public License
-  * of the License, or (at your option) any later version.
+  * 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
+  * WinPT is distributed in the hope that it will be useful,
-  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+  * but WITHOUT ANY WARRANTY; without even the implied warranty of
-  * General Public License for more details.
+  * 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,
+  * You should have received a copy of the GNU General Public License
-  * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+  * along with WinPT; if not, write to the Free Software Foundation,
-  */
+  * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
- /* TODO:
+  */
-  *    check_armor_type: we should check the whole file and not only the first line!
+ /* TODO:
-  */
+  *    check_armor_type: we should check the whole file and not only the first line!
+  */
- #include <sys/types.h>
- #include <windows.h>
+ #ifdef HAVE_CONFIG_H
- #include <commdlg.h>
+ #include <config.h>
- #include <io.h>
+ #endif
- #include "../resource.h"
+ #include <sys/types.h>
- #include "wptTypes.h"
+ #include <windows.h>
- #include "wptGPG.h"
+ #include <commdlg.h>
- #include "wptAgent.h"
+ #include <io.h>
- #include "wptCommonCtl.h"
+ #include <stdio.h>
- #include "wptContext.h"
- #include "wptErrors.h"
+ #include "resource.h"
- #include "wptKeylist.h"
+ #include "wptTypes.h"
- #include "wptFileManager.h"
+ #include "wptGPG.h"
- #include "wptNLS.h"
+ #include "wptAgent.h"
- #include "wptW32API.h"
+ #include "wptCommonCtl.h"
- #include "wptVersion.h"
+ #include "wptContext.h"
- #include "wptDlgs.h"
+ #include "wptErrors.h"
- #include "wptGPGZIP.h"
+ #include "wptKeylist.h"
- #include "wptUTF8.h"
+ #include "wptFileManager.h"
- #include "wptRegistry.h"
+ #include "wptNLS.h"
+ #include "wptW32API.h"
- #include "openpgp.h"
+ #include "wptVersion.h"
+ #include "wptDlgs.h"
- int  algo_from_list (gpgme_recipients_t rset, const char * keyid);
+ #include "wptZIP.h"
- void progress_cleanup (progress_filter_s * pfx);
+ #include "wptUTF8.h"
+ #include "wptRegistry.h"
- /*-- wptFileVerifyDlg.cpp --*/
+ #include "wptImport.h"
- int  file_verify_add_state (siglog_context_t c);
+ #include "wptCrypto.h"
- void file_verify_use_event (void);
+ #include "wptKeyManager.h"
- void file_verify_wait (void);
+ #include "openpgp.h"
- static const char * mm_files[] = {".mov", ".avi", ".mpg", ".mpeg",
+ #define op_begin()  SetCursor (LoadCursor (NULL, IDC_WAIT))
-                                   ".mp3", ".wav", ".mid", ".wma",
+ #define op_end()    SetCursor (LoadCursor (NULL, IDC_ARROW))
-                                   ".gif", ".jpg", ".png", ".jpeg", ".dib", 0};
+ void progress_cleanup (progress_filter_s *pfx);
- char *
+ BOOL CALLBACK file_secdel_confirm_dlg_proc (HWND dlg, UINT msg,
- fm_quote_file (const char * name)
+                                             WPARAM wparam, LPARAM lparam);
- {
+ char* gpg_keylist_to_pattern (gpgme_key_t *rset, int n);
-     char * p;
+ gpgme_error_t sym_passphrase_cb (void *hook, const char *hint, const char *pass_inf,
-     size_t len = strlen (name) + 8;
+                                  int prev_was_bad, int fd);
-     if (*name == '"')
+ /*-- wptFileVerifyDlg.cpp --*/
-         return m_strdup (name); /* avoid double quotes */
+ void file_verify_add_state (file_sig_ctx_t c);
-     p = new char[len + 1];
+ void file_verify_use_event (void);
-     if (!p)
+ void file_verify_wait (void);
-         BUG (0);
-     _snprintf (p, len, "\"%s\"", name);
+ static const char * mm_files[] = {".mov", ".avi", ".mpg", ".mpeg",
+                                   ".mp3", ".wav", ".mid", ".wma",
-     return p;
+                                   ".gif", ".jpg", ".png", ".jpeg", ".dib", 0};
- } /* fm_quote_file */
+ /* Check if the drive given by @fname is a floppy disc.
- int
+    Return value: -1 for success. */
- overwrite_file (const char * fname)
+ static int
- {
+ is_floppy_disc (const char *fname)
-     int id;
+ {
+     char drv[32] = {0};
-     if (file_exist_check (fname))
+     int max = sizeof (drv)-1;
-         return 1;
+     int i=0;
-     id = log_box (_("File Manager"), MB_YESNO,
-                   _("\"%s\" already exists.\n"
+     if (!strstr (fname, ":\\"))
-                     "Replace existing file?"), fname);
+         return 0;
-     return id == IDNO ? 0 : 1;
- } /* overwrite_file */
+     while (fname && *fname && *fname != '\\' && i < max)
+         drv[i++] = *fname++;
+     drv[i++] = '\\';
- static void
+     drv[i++] = '\0';
- remove_crit_file_attrs (const char * fname, int force)
+     i = GetDriveType (drv);
- {
+     if (i == DRIVE_REMOVABLE)
-     u32 f_attr;
+         return -1;
-     int id;
+     return 0;
+ }
-     if (file_exist_check (fname))
-         return; /* Does not exist */
+ /* Ask the user to overwrite file @fname.
-     f_attr = GetFileAttributes (fname);
+    Return value: 0 for cancel. */
-     if ((f_attr & FILE_ATTRIBUTE_READONLY) && force)
+ static int
-         SetFileAttributes (fname, FILE_ATTRIBUTE_NORMAL);
+ overwrite_file (const char *fname)
-     else if (f_attr & FILE_ATTRIBUTE_READONLY) {
+ {
-         id = log_box (_("File Manager"), MB_YESNO,
+     int id;
-                       _("\"%s\" has read-only attribute.\n"
-                         "Set attribute to normal?"), fname);
+     if (file_exist_check (fname))
-         if (id == IDYES)
+         return -1;
-             SetFileAttributes (fname, FILE_ATTRIBUTE_NORMAL);
+     id = log_box (_("File Manager"), MB_YESNO,
-     }
+                   _("\"%s\" already exists.\n"
- } /* remove_crit_file_attrs */
+                     "Replace existing file?"), fname);
+     return id == IDNO ? 0 : -1;
+ }
- static int inline
- is_directory (const char * fname)
- {
+ /* Removes 'critical' attributes from the file @fname.
-     return GetFileAttributes (fname) & FILE_ATTRIBUTE_DIRECTORY? 1 : 0;
+    If @force is 1, the user is not asked for permission. */
- } /* is_directory */
+ static void
+ remove_crit_file_attrs (const char *fname, int force)
+ {
- static int inline
+     u32 fattr;
- is_openpgp_ext (const char * name)
+     int id = 0;
- {
-     if (strstr (name, ".gpg") || strstr (name, ".asc")
+     if (file_exist_check (fname))
-         || strstr (name, ".sig") || strstr (name, ".pgp"))
+         return; /* Does not exist */
-         return -1;
-     return 0;
+     fattr = GetFileAttributes (fname);
- }
+     if ((fattr & FILE_ATTRIBUTE_READONLY) && force)
+         id = IDYES;
+     else if (fattr & FILE_ATTRIBUTE_READONLY)
- static int
+         id = log_box (_("File Manager"), MB_YESNO,
- is_multi_media (const char * name)
+                       _("\"%s\" has read-only attribute.\n"
- {
+                         "Set attribute to normal?"), fname);
-     const char * val;
+     if (id == IDYES) {
-     char * p;
+         if (!SetFileAttributes (fname, FILE_ATTRIBUTE_NORMAL))
-     int i;
+             msg_box (NULL, _("Could not reset file attribute to normal."),
-     int ans=0;
+                      _("File Manager"), MB_ERR);
+     }
-     i = get_reg_winpt_single (CFG_NOZIP_MMEDIA);
+ }
-     if (i == -1)
-     {
-         ans = msg_box (NULL, _("Multi-Media files are already compressed, GPG would compress\n"
+ /* Return 1 if the given path @fname is a directory, 0 otherwise. */
-                                "them anyway and this costs a lot of time.\n"
+ static int
-                                "It is possible to disable compression for these files.\n"
+ is_directory (const char *fname)
-                                "Do you want to disable it?"),
+ {
-                                _("File Manager"), MB_YESNO|MB_INFO);
+     return GetFileAttributes (fname) & FILE_ATTRIBUTE_DIRECTORY? 1 : 0;
-         set_reg_winpt_single (CFG_NOZIP_MMEDIA, ans == IDYES? 1 : 0);
+ }
-         if (ans == IDNO)
-             return 0;
-     }
+ /* Return -1 if the given name @name is a valid PGP extension. */
-     else if (i == 0)
+ static int
-         return 0;
+ is_openpgp_ext (const char *name)
+ {
-     p = strrchr (name, '.');
+     if (stristr (name, ".gpg") || stristr (name, ".asc")
-     if (!p)
+         || stristr (name, ".sig") || stristr (name, ".pgp"))
-         return 0;
+         return -1;
-     for (i=0; (val = mm_files[i]); i++)
+     return 0;
-     {
+ }
-         if (!stricmp (p, val))
-             return -1;
-     }
+ static int
-     return 0;
+ is_multi_media (const char * name)
- }
+ {
+     const char * val;
+     char * p;
- const char*
+     int i;
- file_get_extension (gpgme_ctx_t ctx, gpgme_sigmode_t sigmode)
+     int ans=0;
- {
-     int use_armor = (int)gpgme_control (ctx, GPGME_CTRL_ARMOR, -1);
+     i = get_reg_winpt_single (CFG_NOZIP_MMEDIA);
+     if (i == -1)
-     if (use_armor || sigmode == GPGME_SIG_MODE_CLEAR)
+     {
-         return ".asc";
+         ans = msg_box (NULL, _("Multi-Media files are already compressed, GPG would compress\n"
-     if (!use_armor && sigmode == GPGME_SIG_MODE_DETACH)
+                                "them anyway and this costs a lot of time.\n"
-         return ".sig";
+                                "It is possible to disable compression for these files.\n"
-     return ".gpg";
+                                "Do you want to disable it?"),
- } /* file_get_extension */
+                                _("File Manager"), MB_YESNO|MB_INFO);
+         set_reg_winpt_single (CFG_NOZIP_MMEDIA, ans == IDYES? 1 : 0);
+         if (ans == IDNO)
- int
+             return 0;
- fm_build( listview_ctrl_t *lv, HWND ctrl )
+     }
- {
+     else if (i == 0)
-     int i, rc = 0;
+         return 0;
-     listview_ctrl_t c;
-     struct listview_column_s col[] =
+     p = strrchr (name, '.');
-     {
+     if (!p)
-         {0,  80, (char *)_("Status") },
+         return 0;
-         {1, 256, (char *)_("Name") },
+     for (i=0; (val = mm_files[i]); i++) {
-         {2, 128, (char *)_("Operation") },
+         if (!stricmp (p, val))
-         {0,   0, NULL }
+             return -1;
-     };
+     }
+     return 0;
-     rc = listview_new( &c );
+ }
-     if( rc )
-         BUG( NULL );
-     c->ctrl = ctrl;
+ /* Return a GPG file extension which depends on the operation
-     for ( i = 0; col[i].width; i++ )
+    mode in @ctx and the sig mode @sigmode. */
-         listview_add_column( c, &col[i] );
+ const char*
-     listview_set_ext_style( c );
+ file_get_extension (gpgme_ctx_t ctx, gpgme_sig_mode_t sigmode)
-     if( lv )
+ {
-         *lv = c;
+     int use_armor = gpgme_get_armor (ctx);
-     return 0;
- } /* fm_build */
+     if (use_armor || sigmode == GPGME_SIG_MODE_CLEAR)
+         return ".asc";
+     if (!use_armor && sigmode == GPGME_SIG_MODE_DETACH)
- void
+         return ".sig";
- fm_delete( listview_ctrl_t lv )
+     return ".gpg";
- {
+ }
-     if( lv ) {
-         listview_release( lv );
-     }
+ /* Quote a file to avoid shell problems with spaces in the files. */
- } /* fm_delete */
+ char*
+ fm_quote_file (const char * name)
+ {
- int
+     char * p;
- fm_state_new (fm_state_t * ctx)
+     size_t len = strlen (name) + 8;
- {
-     gpgme_error_t rc;
+     if (*name == '"')
-     fm_state_s * c;
+         return m_strdup (name); /* avoid double quotes */
+     p = new char[len + 1];
-     c = new fm_state_s;
+     if (!p)
-     if (!c)
+         BUG (0);
-         BUG (0);
+     _snprintf (p, len, "\"%s\"", name);
-     memset (c, 0, sizeof * c);
-     rc = gpgme_new (&c->ctx);
+     return p;
-     if (!rc)
+ }
-         rc = gpgme_recipients_new (&c->recp);
-     if (rc)
-         BUG (0);
-     gpgme_set_comment (c->ctx, "Generated by WinPT "PGM_VERSION);
+ /* Check the armor type of the file @fname and return
-     *ctx = c;
+    a string representation of it. */
-     return 0;
+ static const char *
- } /* fm_state_new */
+ fm_check_armor_type (const char *fname, int *r_type)
+ {
+     FILE * fp;
- void
+     char header[768], * p;
- fm_state_release (fm_state_t c)
- {
+     if (r_type)
-     if (c)
+         *r_type = PGP_NONE;
-     {
+     fp = fopen (fname, "rb");
-         if (c->recp)
+     if (!fp)
-         {
+         return "UNKNOWN";
-             gpgme_recipients_release (c->recp);
+     p = fgets (header, sizeof (header) - 1, fp);
-             c->recp = NULL;
+     fclose (fp);
-         }
+     if (!p)
-         if (c->ctx)
+         return "UNKNOWN";
-         {
-             gpgme_release (c->ctx);
+     if (strncmp (header, "-----", 5))
-             c->ctx = NULL;
+         goto leave;
-         }
+     if (strstr( header, "BEGIN PGP PUBLIC KEY" )) {
-         free_if_alloc (c->opaque);
+         if (r_type) *r_type = PGP_PUBKEY;
-         free_if_alloc (c->output);
+         return "PUBKEY";
-         delete c; c = NULL;
+     }
-     }
+     else if (strstr (header, "BEGIN PGP PRIVATE KEY") ||
- } /* fm_state_release */
+              strstr (header, "BEGIN PGP SECRET KEY")) {
+         if (r_type) *r_type = PGP_SECKEY;
+         return "SECKEY";
- static int
+     }
- fm_check_for_entry( listview_ctrl_t lv, const char *file )
+     else if (strstr (header, "BEGIN PGP MESSAGE")) {
- {
+         if (r_type) *r_type = PGP_MESSAGE;
-     char name[512];
+         return "ENCRYPTED";
-     int i;
+     }
+     else if (strstr( header, "BEGIN PGP SIGNED MESSAGE")) {
-     memset (name, 0, sizeof (name));
+         if (r_type) *r_type = PGP_CLEARSIG;
-     for( i = 0; i < listview_count_items( lv, 0 ); i++ )
+         return "SIGNED-CLEAR";
-     {
+     }
-         listview_get_item_text( lv, i, 1, name, sizeof (name) - 1 );
+     else if (strstr(header, "BEGIN PGP SIGNATURE")) {
-         if( !strcmp( name, file ) )
+         if (r_type) *r_type = PGP_SIG;
-             return 1; /* found */
+         return "SIGNED-DETACH";
      }
-     return 0;
+ leave:
- } /* fm_check_for_entry */
+     return "UNKNOWN";
+ }
- static int
- fm_set_ftype (listview_ctrl_t lv, const char * name)
+ /* Extract file type from @fname. If @r_type is valid,
- {
+    it contains the PGP type on success. */
-     const char *type;
+ static const char*
-     int rc;
+ fm_get_file_type (const char *fname, int *r_type)
+ {
-     rc = fm_check_for_entry (lv, name);
+     gpg_iobuf_t inp;
-     if (rc)
+     armor_filter_context_t afx;
-         return 0;
+     PACKET *pkt;
-     type = fm_get_file_type (name);
+     const char *s = NULL;
-     if (!type || !strcmp (type, "UNKNOWN"))
+     size_t count = 0, compr = 0;
-         type = gnupg_check_file_ext (name);
+     int rc = 0;
-     rc = listview_add_item (lv, " ");
-     if (rc)
+     if (r_type)
-         return -1;
+         *r_type = PGP_NONE;
-     listview_add_sub_item (lv, 0, 0, type);
+     if (!fname) {
-     listview_add_sub_item (lv, 0, 1, name);
+         log_debug ("fm_get_file_type: !fname\r\n");
-     return 0;
+         return NULL;
- }
+     }
+     if (is_floppy_disc (fname))
- static int
+         return fm_check_armor_type (fname, r_type);
- fm_add_dir_files (listview_ctrl_t lv, char *path)
- {
+     inp = gpg_iobuf_open (fname);
-     struct _finddata_t fd;
+     if (!inp) {
-     char * p;
+         const char *err = winpt_strerror (WPTERR_FILE_OPEN);
-     long hd;
+         log_box (_("File Manager"), MB_ERR, "\"%s\": %s", fname, err);
+         return NULL;
-     strcat (path, "\\*");
+     }
-     hd = _findfirst (path, &fd);
+     gpg_iobuf_ioctl (inp, 3, 1, NULL); /* disable cache */
-     do {
+     if (gpg_iobuf_get_filelength (inp) > 32000000 /* 32MB */
-         p = new char [(strlen (path) + strlen (fd.name))+1];
+         && !is_openpgp_ext (fname)) {
-         if (!p)
+         gpg_iobuf_close (inp);
-             BUG (0);
+         return "UNKNOWN";
-         memcpy (p, path, strlen (path)-1);
+     }
-         p[strlen (path)-1] = 0;
-         strcat (p, fd.name);
+     if (gpg_use_armor_filter(inp)) {
-         if (!is_directory (p))
+         memset (&afx, 0, sizeof (afx));
-             fm_set_ftype (lv, p);
+         gpg_iobuf_push_filter (inp, gpg_armor_filter, &afx);
-         free_if_alloc (p);
+     }
+     pkt = (PACKET *)calloc (1, sizeof *pkt);
-     } while (_findnext (hd, &fd) == 0);
+     if (!pkt)
-     _findclose (hd);
+         BUG (NULL);
-     return 0;
+     gpg_init_packet (pkt);
- }
+     while (!(rc = gpg_parse_packet (inp, pkt))) {
+         switch (pkt->pkttype) {
+         case PKT_PUBKEY_ENC:
- int
+             s = "ENCRYPTED";rc = -2;
- fm_add_dropped_files (listview_ctrl_t lv, HDROP dd_files)
+             if (r_type) *r_type = PGP_MESSAGE;
- {
+             break;
-     char name[384+4];
+         case PKT_SYMKEY_ENC:
-     int nfiles, rc, i;
+         case PKT_ENCRYPTED:
+             s = "SYMKEYENC";rc = -2;
-     memset( name, 0, sizeof (name) );
+             if (r_type) *r_type = PGP_MESSAGE;
-     nfiles = DragQueryFile( dd_files, 0xFFFFFFFF, NULL, 0 );
+             break;
-     for (i = 0;  i < nfiles; i++) {
+         case PKT_SIGNATURE:
-         DragQueryFile (dd_files, i, name, sizeof (name) -1);
+         case PKT_ONEPASS_SIG:
-         if (is_directory (name))
+             s = "SIGNED";   rc = -2;
-             rc = fm_add_dir_files (lv, name);
+             if (r_type) *r_type = PGP_SIG;
-         else
+             break;
-             rc = fm_set_ftype (lv, name);
+         case PKT_PUBLIC_KEY:
-         if (rc == -1)
+             s = "PUBKEY";   rc = -2;
-             break;
+             if (r_type) *r_type = PGP_PUBKEY;
+             break;
-     }
+         case PKT_SECRET_KEY:
-     return rc;
+             s = "SECKEY";   rc = -2;
- } /* fm_add_dropped_files */
+             if (r_type) *r_type = PGP_SECKEY;
+             break;
- int
+         case PKT_COMPRESSED:
- fm_add_opened_files (listview_ctrl_t lv, HWND dlg)
+             /* If we only find 1 packet and it is compressed,
- {
+                we assume a compress one-pass signature. */
-     OPENFILENAME open;
+             if (count != 0)
-     const char *type;
+                 break;
-     char file[1024] = "";
+             s = "SIGNED";   rc = -2;
-     int rc;
+             compr = 1;
+             break;
-     memset( &open, 0, sizeof (open) );
-     open.lStructSize = sizeof (OPENFILENAME);
+         default:
-     open.hInstance = glob_hinst;
+             break;
-     open.lpstrTitle = _("File Open");
+         }
-     open.lpstrFilter = _("All Files (*.*)\0*.*");
+         count++;
-     open.hwndOwner = dlg;
+         gpg_free_packet (pkt);
-     open.lpstrFile = file;
+         gpg_init_packet (pkt);
-     open.nMaxFile = sizeof (file) - 1;
+         if (rc == -2)
-     open.Flags = 0;
+             break; /* found */
+     }
-     if (GetOpenFileName (&open)) {
+     safe_free (pkt);
-         type = fm_get_file_type (open.lpstrFile);
+     gpg_iobuf_close (inp);
-         if (!type)
+     if (!s)
-             return WPTERR_FILE_OPEN;
+         s = fm_check_armor_type (fname, r_type);
-         if (!strcmp (type, "UNKNOWN"))
+     if (!s)
-             type = gnupg_check_file_ext (open.lpstrFile);
+         s = "UNKNOWN";
-         rc = listview_add_item (lv, "");
+     if (!strcmp (s, "SIGNED") && !compr
-         if( !rc ) {
+         && strcmp (fm_check_armor_type (fname, r_type), "SIGNED-CLEAR ")) {
-             listview_add_sub_item (lv, 0, 0, type);
+         if (r_type) *r_type = PGP_SIG;
-             listview_add_sub_item (lv, 0, 1, open.lpstrFile);
+         s = "SIGNED-DETACH";
-         }
+     }
-     }
+     return s;
+ }
-     return rc;
- } /* fm_add_opened_files */
+ /* Build the File Manager list view control. */
+ int
- static const char *
+ fm_build (listview_ctrl_t *lv, HWND ctrl)
- fm_check_armor_type (const char * fname)
+ {
- {
+     int i, rc = 0;
-     FILE * fp;
+     listview_ctrl_t c;
-     char header[768], * p;
+     struct listview_column_s col[] = {
+         {0,  80, (char *)_("Status") },
-     fp = fopen (fname, "rb");
+         {1, 256, (char *)_("Name") },
-     if (!fp)
+         {2, 128, (char *)_("Operation") },
-         return "UNKNOWN";
+         {0,   0, NULL }
-     p = fgets (header, sizeof (header) - 1, fp);
+     };
-     fclose (fp);
-     if (!p)
+     rc = listview_new (&c);
-         return "UNKNOWN";
+     if (rc)
+         BUG (NULL);
-     if( strncmp( header, "-----", 5 ) )
+     c->ctrl = ctrl;
-         goto leave;
+     for (i = 0; col[i].width; i++)
-     if( strstr( header, "BEGIN PGP PUBLIC KEY" ) )
+         listview_add_column (c, &col[i]);
-         return "PUBKEY";
+     listview_set_ext_style (c);
-     else if( strstr( header, "BEGIN PGP PRIVATE KEY" ) )
+     if (lv)
-         return "SECKEY";
+         *lv = c;
-     else if( strstr( header, "BEGIN PGP SECRET KEY" ) )
+     return 0;
-         return "SECKEY";
+ }
-     else if( strstr( header, "BEGIN PGP MESSAGE" ) )
-         return "ENCRYPTED";
-     else if( strstr( header, "BEGIN PGP SIGNED MESSAGE" ) )
+ /* Release the File Manager listview control. */
-         return "SIGNED-CLEAR";
+ void
-     else if( strstr(header, "BEGIN PGP SIGNATURE" ) )
+ fm_delete (listview_ctrl_t lv)
-         return "SIGNED-DETACH";
+ {
+     if (lv) {
- leave:
+         listview_release(lv);
-     return "UNKNOWN";
+     }
- } /* fm_check_armor_type */
+ }
  int
- fm_assume_onepass_sig (const char * fname)
+ fm_state_new (fm_state_t * ctx)
  {
-     gpgme_data_t dat;
+     gpgme_error_t rc;
-     armor_filter_context_t afx;
+     fm_state_s * c;
-     gpg_iobuf_t fp;
-     PACKET * pkt = (PACKET *)calloc (1, sizeof *pkt);
+     c = new fm_state_s;
-     int check = 0;
+     if (!c)
+         BUG (0);
-     if (!fname)
+     memset (c, 0, sizeof *c);
-     {
+     rc = gpgme_new (&c->ctx);
-         gpgme_data_new_from_clipboard (&dat);
+     if (rc)
-         gpgme_data_release_and_set_file (dat, "gpgme.tmp");
+         BUG (0);
+     /* XXX rc = gpgme_recipients_new (&c->recp);*/
-         fp = gpg_iobuf_open ("gpgme.tmp");
+     /* XXX gpgme_set_comment (c->ctx, "Generated by WinPT "PGM_VERSION); */
-         if (!fp)
+     *ctx = c;
-             return 0;
+     return 0;
-         gpg_iobuf_ioctl (fp, 3, 1, NULL);
+ } /* fm_state_new */
-         if (gpg_use_armor_filter(fp))
-         {
-             memset (&afx, 0, sizeof (afx));
+ /* Release the FM state handle @c. */
-             gpg_iobuf_push_filter (fp, gpg_armor_filter, &afx);
+ void
-         }
+ fm_state_release (fm_state_t c)
-         gpg_init_packet (pkt);
+ {
-         if (!gpg_parse_packet (fp, pkt)
+     if (!c)
-             && pkt->pkttype == PKT_COMPRESSED)
+         return;
-             check = 1;
+     if (c->ctx) {
-         gpg_free_packet (pkt);
+         gpgme_release (c->ctx);
-         safe_free (pkt);
+         c->ctx = NULL;
-         gpg_iobuf_close (fp);
+     }
-         unlink ("gpgme.tmp");
+     safe_free (c->recp);
-     }
+     free_if_alloc (c->opaque);
-     /* XXX: implement it for real files */
+     free_if_alloc (c->output);
-     return check;
+     delete c; c = NULL;
  }
+ static int
- static int
+ fm_check_for_entry( listview_ctrl_t lv, const char *file )
- is_floppy_disc (const char * fname)
+ {
- {
+     char name[512];
-     char drv[32] = {0};
+     int i;
-     int i=0;
+     memset (name, 0, sizeof (name));
-     if (!strstr (fname, ":\\"))
+     for (i = 0; i < listview_count_items( lv, 0 ); i++) {
-         return 0;
+         listview_get_item_text( lv, i, 1, name, sizeof (name) - 1 );
+         if( !strcmp( name, file ) )
-     while (fname && *fname && *fname != '\\')
+             return 1; /* found */
-         drv[i++] = *fname++;
+     }
-     drv[i++] = '\\';
-     drv[i++] = '\0';
+     return 0;
-     i = GetDriveType (drv);
+ } /* fm_check_for_entry */
-     if (i == DRIVE_REMOVABLE)
-         return 1;
-     return 0;
+ static int
- }
+ fm_set_ftype (listview_ctrl_t lv, const char *name)
+ {
+     const char *type;
- const char *
+     int rc;
- fm_get_file_type (const char * fname)
- {
+     rc = fm_check_for_entry (lv, name);
-     gpg_iobuf_t inp;
+     if (rc)
-     armor_filter_context_t afx;
+         return 0;
-     PACKET * pkt = (PACKET *)calloc (1, sizeof *pkt);
+     type = fm_get_file_type (name, NULL);
-     int i = 0, rc = 0;
+     if (!type || !strcmp (type, "UNKNOWN"))
-     const char * s = NULL;
+         type = gnupg_check_file_ext (name, NULL);
+     rc = listview_add_item (lv, " ");
-     if (!fname) {
+     if (rc)
-         safe_free (pkt);
+         return -1;
-         return NULL;
+     listview_add_sub_item (lv, 0, 0, type);
-     }
+     listview_add_sub_item (lv, 0, 1, name);
+     return 0;
-     if (is_floppy_disc (fname))
+ }
-         return fm_check_armor_type (fname);
-     inp = gpg_iobuf_open (fname);
+ static int
-     if (!inp) {
+ fm_add_dir_files (listview_ctrl_t lv, char *path)
-         const char *s = winpt_strerror (WPTERR_FILE_OPEN);
+ {
-         log_box( _("File Manager"), MB_ERR, "\"%s\": %s", fname, s );
+     struct _finddata_t fd;
-         safe_free( pkt );
+     char * p;
-         return NULL;
+     long hd;
-     }
-     gpg_iobuf_ioctl (inp, 3, 1, NULL); /* disable cache */
+     strcat (path, "\\*");
-     if (gpg_iobuf_get_filelength (inp) > 32000000 /* 32MB */
+     hd = _findfirst (path, &fd);
-         && !is_openpgp_ext (fname)) {
+     do {
-         gpg_iobuf_close (inp);
+         p = new char [(strlen (path) + strlen (fd.name))+1];
-         return "UNKNOWN";
+         if (!p)
-     }
+             BUG (0);
+         memcpy (p, path, strlen (path)-1);
-     if (gpg_use_armor_filter(inp)) {
+         p[strlen (path)-1] = 0;
-         memset (&afx, 0, sizeof (afx));
+         strcat (p, fd.name);
-         gpg_iobuf_push_filter (inp, gpg_armor_filter, &afx);
+         if (!is_directory (p))
-     }
+             fm_set_ftype (lv, p);
+         free_if_alloc (p);
-     gpg_init_packet (pkt);
+     } while (_findnext (hd, &fd) == 0);
-     while (!(rc = gpg_parse_packet (inp, pkt))) {
+     _findclose (hd);
-         switch (pkt->pkttype) {
+     return 0;
-         case PKT_PUBKEY_ENC:  s = "ENCRYPTED";rc = -2; break;
+ }
-         case PKT_SYMKEY_ENC:
-         case PKT_ENCRYPTED:   s = "SYMKEYENC";rc = -2; break;
-         case PKT_SIGNATURE:
+ /* Add the drag & drop files from @dd_files to the
-         case PKT_ONEPASS_SIG: s = "SIGNED";   rc = -2; break;
+    list view control @lv. */
-         case PKT_PUBLIC_KEY:  s = "PUBKEY";   rc = -2; break;
+ int
-         case PKT_SECRET_KEY:  s = "SECKEY";   rc = -2; break;
+ fm_add_dropped_files (listview_ctrl_t lv, HDROP dd_files)
-         }
+ {
-         gpg_free_packet (pkt);
+     char name[384+4];
-         gpg_init_packet (pkt);
+     int nfiles;
-         if (rc == -2)
+     int rc = 0;
-             break; /* found */
+     int i;
-     }
-     safe_free (pkt);
+     memset (name, 0, sizeof (name));
-     gpg_iobuf_close (inp);
+     nfiles = DragQueryFile (dd_files, 0xFFFFFFFF, NULL, 0);
-     if (!s)
+     for (i = 0;  i < nfiles; i++) {
-         s = fm_check_armor_type (fname);
+         DragQueryFile (dd_files, i, name, sizeof (name) -1);
-     if (!s)
+         if (is_directory (name))
-         s = "UNKNOWN";
+             rc = fm_add_dir_files (lv, name);
-     if (!strcmp( s, "SIGNED")
+         else
-         && strcmp (fm_check_armor_type (fname), "SIGNED-CLEAR "))
+             rc = fm_set_ftype (lv, name);
-         s = "SIGNED-DETACH";
+         if (rc == -1)
-     return s;
+             break; /* XXX: fixme? */
- } /* fm_get_file_type */
+     }
+     DragFinish (dd_files);
+     return rc;
- int
+ }
- fm_get_current_pos (listview_ctrl_t lv)
- {
-     int i = 0, items;
+ /* Add a single file @name to the list view and before
+    figure out the type of it.
-     items = listview_count_items (lv, 0);
+    Return value: 0 on success. */
-     if (!items)
+ static int
-         return -1;
+ add_single_file (listview_ctrl_t lv, const char *name)
-     else if (items == 1)
+ {
-     {
+     const char *type;
-         listview_select_one (lv, 0);
+     int rc = 0;
-         return 0;
-     }
+     type = fm_get_file_type (name, NULL);
-     else if (items > 1)
+     if (!type)
-     {
+         return WPTERR_FILE_OPEN;
-         i = listview_get_curr_pos (lv);
+     if (!strcmp (type, "UNKNOWN"))
-         if (i == -1)
+         type = gnupg_check_file_ext (name, NULL);
-         {
+     rc = listview_add_item (lv, "");
-             msg_box (lv->ctrl, _("Please select a file."), _("File Manager"), MB_ERR);
+     if (!rc) {
-             return -1;
+         listview_add_sub_item (lv, 0, 0, type);
-         }
+         listview_add_sub_item (lv, 0, 1, name);
-         return i;
+     }
-     }
+     return rc;
+ }
-     return -1;
- } /* fm_get_current_pos */
+ /* Use the common Open-File-Dialog to allow the user to
+    add one ore more selected files to the listview @lv. */
- static int
+ int
- fm_check_detached_sig( listview_ctrl_t lv, int pos )
+ fm_add_opened_files (listview_ctrl_t lv, HWND dlg)
  {
-     char type[128];
+     OPENFILENAME open;
+     char file[512], name[MAX_PATH+1];
-     listview_get_item_text( lv, pos, 0, type, 127 );
+     char *path = NULL;
-     return !strcmp( type, "SIGNED-DETACH" )? 1 : 0;
+     const char *s;
- } /* fm_check_detached_sig */
+     int i, len=0, n=0;
+     int rc=0;
- int
+     memset (&open, 0, sizeof (open));
- fm_check_file_type (listview_ctrl_t lv, int pos, int fm_cmd)
+     open.lStructSize = sizeof (OPENFILENAME);
- {
+     open.hInstance = glob_hinst;
-     char status[128];
+     open.lpstrTitle = _("File Open");
-     int rc = 0;
+     open.lpstrFilter = "All Files (*.*)\0*.*\0\0";
+     open.hwndOwner = dlg;
-     listview_get_item_text (lv, pos, 0, status, sizeof (status) - 1);
+     open.lpstrFile = file;
+     open.nMaxFile = sizeof (file) - 1;
-     switch (fm_cmd) {
+     open.Flags = OFN_ALLOWMULTISELECT|OFN_EXPLORER ;
-     case FM_ENCRYPT:
-     case FM_ENCRYPT_DIR:
+     memset (file, 0, sizeof file);
-     case FM_SIGNENCRYPT:
+     if (!GetOpenFileName (&open))
-         if (strcmp (status, "ENCRYPTED")
+         return 0;
-             && strcmp (status, "SYMKEYENC"))
-             rc = 1;
+     s = file;
-         break;
+     len = sizeof (file)-1;
+     for (;;) {
-     case FM_DECRYPT:
+         if (len < 2 || (*s == '\0' && *(s+1) == '\0'))
-         if (!strcmp (status, "DATA")
+             break;
-             || !strcmp (status, "ENCRYPTED")
+         memset (name, 0, sizeof (name));
-             || !strcmp (status, "SYMKEYENC")
+         for (i=0; len > 0; len--, i++) {
-             || !strcmp (status, "ARMORED"))
+             if (*s == '\0') {
-             rc = 1;
+                 name[i] = *s++;
-         break;
+                 break;
+             }
-     case FM_SIGN:
+             name[i] = *s++;
-         if( strncmp( status, "SIGNED", 6 ) )
+         }
-             rc = 1;
+         if (n == 0)
-         break;
+             path = strdup (name);
+         else {
-     case FM_VERIFY:
+             char *p = make_filename (path, name, NULL);
-         if( !strncmp( status, "SIGNED", 6 )
+             rc = add_single_file (lv, p);
-              || !strcmp( status, "COMPRESSED" ) )
+             free (p);
-             rc = 1;
+         }
-         break;
+         n++;
+     }
-     case FM_SYMENC:
+     if (n == 1) /* single file selected. */
-         if( strcmp( status, "SYMKEYENC" ) )
+         rc = add_single_file (lv, path);
-             rc = 1;
+     if (path)
-         break;
+         free (path);
+     return rc;
-     case FM_IMPORT:
+ }
-         if( !strcmp( status, "PUBKEY" )
-             || !strcmp( status, "SECKEY" ) )
-             rc = 1;
+ int
-         break;
+ fm_assume_onepass_sig (const char * fname)
+ {
-     case FM_WIPE:
+     gpgme_data_t dat;
-     case FM_LIST:
+     armor_filter_context_t afx;
-         rc = 1;
+     gpg_iobuf_t fp;
-         break;
+     PACKET * pkt = (PACKET *)calloc (1, sizeof *pkt);
-     }
+     int check = 0;
-     return rc;
+     if (!fname) {
- } /* fm_check_file_type */
+         gpg_data_new_from_clipboard (&dat, 0);
+         gpg_data_release_and_set_file (dat, "gpgme.tmp");
- static void
+         fp = gpg_iobuf_open ("gpgme.tmp");
- fm_set_status (listview_ctrl_t lv, int pos, int fm_cmd, int success,
+         if (!fp)
-                const char * output)
+             return 0;
- {
+         gpg_iobuf_ioctl (fp, 3, 1, NULL);
-     char status[128], operat[128];
+         if (gpg_use_armor_filter(fp)) {
-     int update = 1;
+             memset (&afx, 0, sizeof (afx));
-     const char *s;
+             gpg_iobuf_push_filter (fp, gpg_armor_filter, &afx);
+         }
-     if ( fm_cmd == FM_LIST )
+         gpg_init_packet (pkt);
-         return;
+         if (!gpg_parse_packet (fp, pkt)
-     success ? s = "SUCCESS" : s = "FAILED";
+             && pkt->pkttype == PKT_COMPRESSED)
-     strcpy( operat, s );
+             check = 1;
+         gpg_free_packet (pkt);
-     switch (fm_cmd) {
+         safe_free (pkt);
-     case FM_ENCRYPT:
+         gpg_iobuf_close (fp);
-     case FM_ENCRYPT_DIR:
+         remove ("gpgme.tmp");
-     case FM_SIGNENCRYPT: strcpy( status, "ENCRYPTED" ); break;
+     }
-     case FM_DECRYPT:     strcpy( status, "UNKNOWN" );   break;
+     /* XXX: implement it for real files */
-     case FM_SIGN:        strcpy( status, "SIGNED" );    break;
+     return check;
-     case FM_VERIFY:      update = 0;                    break;
+ }
-     case FM_SYMENC:      strcpy( status, "SYMKEYENC" ); break;
-     case FM_IMPORT:      update = 0;                    break;
-     case FM_WIPE:        strcpy( status, "WIPED" );     break;
+ int
-     default:             strcpy( status, "UNKNOWN");    break;
+ fm_get_current_pos (listview_ctrl_t lv)
-     }
+ {
+     int i = 0, items;
-     if (success) {
-         if (update) {
+     items = listview_count_items (lv, 0);
-             listview_add_sub_item (lv, pos, 0, status);
+     if (!items)
-             listview_add_sub_item (lv, pos, 1, output);
+         return -1;
-         }
+     else if (items == 1)
-     }
+     {
-     listview_add_sub_item( lv, pos, 2, operat );
+         listview_select_one (lv, 0);
- } /* fm_set_status */
+         return 0;
+     }
+     else if (items > 1)
- int
+     {
- fm_clearsign_8bit (listview_ctrl_t lv, fm_state_s *ctx)
+         i = listview_get_curr_pos (lv);
- {
+         if (i == -1)
-     FILE *f;
+         {
-     byte buf[32];
+             msg_box (lv->ctrl, _("Please select a file."), _("File Manager"), MB_ERR);
-     char name[256];
+             return -1;
-     int i, n, cnt=0;
+         }
+         return i;
-     if (ctx->sigmode != GPGME_SIG_MODE_CLEAR)
+     }
-         return 0;
-     listview_get_item_text (lv, -1, 1, name, sizeof (name)-1);
+     return -1;
-     if (stristr (name, ".TXT"))
+ } /* fm_get_current_pos */
-         return 0;
-     f = fopen (name, "rb");
-     if (!f)
+ static int
-         return -1; /* should never happen */
+ fm_check_detached_sig( listview_ctrl_t lv, int pos )
-     n = fread (buf, 1, 32, f);
+ {
-     for (i = 0; i < n; i++) {
+     char type[128];
-         if (buf[i] == 0x00 || buf[i] > 170)
-             cnt++;
+     listview_get_item_text( lv, pos, 0, type, 127 );
-     }
+     return !strcmp( type, "SIGNED-DETACH" )? 1 : 0;
-     fclose (f);
+ } /* fm_check_detached_sig */
-     if (!cnt)
-         return 0;
-     n = -1;
+ int
-     i = log_box (_("File Manager"), MB_WARN|MB_YESNO,
+ fm_check_file_type (listview_ctrl_t lv, int pos, int fm_cmd)
-                  _("\"%s\" does not seems to be a text file.\n"
+ {
-                    "Do you really want to clearsign it?"), name);
+     char status[128];
-     if (i == IDYES)
+     int rc = 0;
-         n = 0;
-     return n;
+     listview_get_item_text (lv, pos, 0, status, sizeof (status) - 1);
- }
+     switch (fm_cmd) {
+     case FM_ENCRYPT:
- int
+     case FM_ENCRYPT_DIR:
- fm_parse_files (listview_ctrl_t lv, HWND dlg, int cmd)
+     case FM_SIGNENCRYPT:
- {
+         if (strcmp (status, "ENCRYPTED")
-     struct secdel_confirm_s confirm = {0};
+             && strcmp (status, "SYMKEYENC"))
-     struct progress_filter_s pfx, pfx2;
+             rc = 1;
-     fm_state_s * ctx;
+         break;
-     int fm_cmd, sig_detached = 0;
-     int rc = 0, i, n, ndel = 0;
+     case FM_DECRYPT:
-     char fname[512], status[128];
+         if (!strcmp (status, "DATA")
+             || !strcmp (status, "ENCRYPTED")
-     switch (cmd) {
+             || !strcmp (status, "SYMKEYENC")
-     case ID_FILEMISC_ENCRYPT: fm_cmd = FM_ENCRYPT; break;
+             || !strcmp (status, "ARMORED"))
-     case ID_FILEMISC_DECRYPT: fm_cmd = FM_DECRYPT; break;
+             rc = 1;
-     case ID_FILEMISC_SYMENC:  fm_cmd = FM_SYMENC;  break;
+         break;
-     case ID_FILEMISC_SIGN:    fm_cmd = FM_SIGN;    break;
-     case ID_FILEMISC_VERIFY:  fm_cmd = FM_VERIFY;  break;
+     case FM_SIGN:
-     case ID_FILEMISC_IMPORT:  fm_cmd = FM_IMPORT;  break;
+         if( strncmp( status, "SIGNED", 6 ) )
-     case ID_FILEMISC_WIPE:    fm_cmd = FM_WIPE;    break;
+             rc = 1;
-     case ID_FILEMISC_LIST:    fm_cmd = FM_LIST;    break;
+         break;
-     case ID_FILEMISC_SIGNENC: fm_cmd = FM_SIGNENCRYPT; break;
-     default: return 1; /* unknown command */
+     case FM_VERIFY:
-     }
+         if( !strncmp( status, "SIGNED", 6 )
+              || !strcmp( status, "COMPRESSED" ) )
-     if (fm_get_current_pos (lv) == -1)
+             rc = 1;
-         return WPTERR_GENERAL;
+         break;
-     rc = fm_state_new (&ctx);
-     if (rc)
+     case FM_SYMENC:
-         BUG (0);
+         if( strcmp( status, "SYMKEYENC" ) )
-     ctx->dlg = dlg;
+             rc = 1;
+         break;
-     memset (&pfx, 0, sizeof (pfx));
-     pfx.hwnd = dlg;
+     case FM_IMPORT:
-     gpgme_set_progress_cb (ctx->ctx, progress_callback, &pfx);
+         if( !strcmp( status, "PUBKEY" )
+             || !strcmp( status, "SECKEY" ) )
-     /* Commands we need before we can perform the main command */
+             rc = 1;
-     switch (fm_cmd) {
+         break;
-     case FM_ENCRYPT:
-     case FM_SIGNENCRYPT:
+     case FM_WIPE:
-         if (fm_cmd == FM_SIGNENCRYPT)
+     case FM_LIST:
-             ctx->req_signer = 1;
+         rc = 1;
-         DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_FILE_ENCRYPT, ctx->dlg,
+         break;
-                         file_encrypt_dlg_proc, (LPARAM)ctx);
+     }
-         if (ctx->cancel == 1) {
-             rc = WPTERR_GENERAL;
+     return rc;
-             goto leave;
+ } /* fm_check_file_type */
-         }
-         break;
+ /* Set the file status of the given command @fm_cmd.
-     case FM_SIGN:
+    @success is 0 on success. */
-         DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_FILE_SIGN, dlg,
+ static void
-                         file_sign_dlg_proc, (LPARAM) ctx);
+ fm_set_status (listview_ctrl_t lv, int pos, int fm_cmd,
-         if (ctx->cancel == 1 || fm_clearsign_8bit (lv, ctx)) {
+                gpgme_sig_mode_t sigmode, int success, const char *output)
-             rc = WPTERR_GENERAL;
+ {
-             goto leave;
+     char status[128], operat[128];
-         }
+     int update = 1;
-         break;
+     const char *s;
-     case FM_WIPE:
+     if (fm_cmd == FM_LIST)
-         memset (&pfx2, 0, sizeof (pfx2));
+         return;
-         secure_unlink_set_cb (progress_callback, &pfx2);
+     success ? s = "SUCCESS" : s = "FAILED";
-         break;
+     strcpy (operat, s);
-     }
+     switch (fm_cmd) {
-     for( i = 0, n = 0;  i < listview_count_items( lv, 0 ); i++ ) {
+     case FM_ENCRYPT:
-         if( !listview_get_item_state( lv, i ) )
+     case FM_ENCRYPT_DIR:
-             continue;
+     case FM_SIGNENCRYPT: strcpy (status, "ENCRYPTED"); break;
-         listview_get_item_text( lv, i, 0, status, sizeof (status) -1 );
+     case FM_DECRYPT:     strcpy (status, "UNKNOWN");   break;
-         if (!strcmp( status, "ENCRYPTED" ) && fm_cmd == FM_DECRYPT)
+     case FM_SIGN:
-             n++;
+         if (sigmode == GPGME_SIG_MODE_DETACH)
-         if (!strcmp( status, "UNKNOWN" ) && fm_cmd == FM_SIGN)
+             strcpy (status, "SIGNED-DETACH");
-             n++;
+         else if (sigmode == GPGME_SIG_MODE_CLEAR)
-         if (fm_cmd == FM_WIPE) {
+             strcpy (status, "SIGNED-CLEAR");
-             if (!confirm.rset)
+         else
-                 gpgme_recipients_new (&confirm.rset);
+             strcpy (status, "SIGNED");
-             listview_get_item_text (lv, i, 1, fname, sizeof (fname)-1);
+         break;
-             gpgme_recipients_add_name (confirm.rset, fname);
+     case FM_VERIFY:      update = 0;                    break;
-             ndel++;
+     case FM_SYMENC:      strcpy (status, "SYMKEYENC"); break;
-         }
+     case FM_IMPORT:      update = 0;                    break;
-     }
+     case FM_WIPE:        strcpy (status, "WIPED");     break;
+     default:             strcpy (status, "UNKNOWN");    break;
-     if (n > 1 && fm_cmd != FM_SYMENC)
+     }
-         ctx->cache_cb = 1;
+     if (success && update) {
-     if (fm_cmd == FM_WIPE && ndel > 0) {
+         listview_add_sub_item (lv, pos, 0, status);
-         DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_FILES_SECDEL, ctx->dlg,
+         listview_add_sub_item (lv, pos, 1, output);
-                             file_secdel_confirm_dlg_proc, (LPARAM)&confirm);
+     }
-         if (!confirm.yes)
+     listview_add_sub_item( lv, pos, 2, operat );
-             goto leave;
+ }
-     }
-     for( i = 0; i < listview_count_items( lv, 0 ); i++ ) {
+ int
-         if( !listview_get_item_state( lv, i ) )
+ fm_clearsign_8bit (listview_ctrl_t lv, fm_state_s *ctx)
-             continue;
+ {
-         listview_get_item_text( lv, i, 1, fname, sizeof (fname) - 1 );
+     FILE *f;
-         if( file_exist_check( fname ) && !is_directory( fname ) ) {
+     byte buf[32];
-             log_box( _("File Manager"), MB_ERR, _("\"%s\" does not exist"), fname );
+     char name[256];
-             continue;
+     int i, n, cnt=0;
-         }
-         if( is_directory( fname ) )
+     if (ctx->sigmode != GPGME_SIG_MODE_CLEAR)
-             fm_cmd = FM_ENCRYPT_DIR;
+         return 0;
-         if( !fm_check_file_type( lv, i, fm_cmd ) )
+     listview_get_item_text (lv, -1, 1, name, sizeof (name)-1);
-             continue;
+     if (stristr (name, ".TXT"))
-         sig_detached = fm_check_detached_sig( lv, i );
+         return 0;
-         switch( fm_cmd ) {
+     f = fopen (name, "rb");
-         case FM_LIST:        rc = fm_list( fname, dlg );       break;
+     if (!f)
-         case FM_WIPE:        rc = fm_wipe( fname );            break;
+         return -1; /* should never happen */
-         case FM_ENCRYPT:     rc = fm_encrypt( ctx, fname, 0 ); break;
+     n = fread (buf, 1, 32, f);
-         case FM_ENCRYPT_DIR: rc = fm_encrypt_directory( ctx, fname ); break;
+     for (i = 0; i < n; i++) {
-         case FM_SIGNENCRYPT: rc = fm_encrypt( ctx, fname, 1 ); break;
+         if (buf[i] == 0x00 || buf[i] > 170)
-         case FM_DECRYPT:     rc = fm_decrypt( ctx, fname );    break;
+             cnt++;
-         case FM_SIGN:        rc = fm_sign( ctx, fname );       break;
+     }
-         case FM_SYMENC:      rc = fm_sym_encrypt( ctx, fname );break;
+     fclose (f);
-         case FM_VERIFY:      rc = fm_verify( ctx, sig_detached, fname );break;
+     if (!cnt)
-         case FM_IMPORT:
+         return 0;
-             free_if_alloc (ctx->opaque);
+     n = -1;
-             ctx->opaque = m_strdup (fname);
+     i = log_box (_("File Manager"), MB_WARN|MB_YESNO,
-             if (!ctx->opaque)
+                  _("\"%s\" does not seems to be a text file.\n"
-                 BUG (0);
+                    "Do you really want to clearsign it?"), name);
-             DialogBoxParam( glob_hinst, (LPCSTR)IDD_WINPT_IMPORT, dlg,
+     if (i == IDYES)
-                            file_import_dlg_proc, (LPARAM)ctx );
+         n = 0;
-             if (ctx->cancel == 1)
+     return n;
-                 continue;
+ }
-             rc = fm_import (ctx, fname);
-             break;
+ int
-         }
+ fm_parse_files (listview_ctrl_t lv, HWND dlg, int cmd)
-         fm_set_status (lv, i, fm_cmd, !rc, ctx->output);
+ {
-         free_if_alloc (ctx->output);
+     struct secdel_confirm_s confirm = {0};
-         progress_cleanup (&pfx);
+     struct progress_filter_s pfx, pfx2;
-     }
+     fm_state_s * ctx;
-     if (fm_cmd == FM_WIPE) {
+     int fm_cmd, sig_detached = 0;
-         secure_unlink_set_cb (NULL, NULL);
+     int rc = 0, i, n, ndel = 0;
-         progress_cleanup (&pfx2);
+     char fname[512], status[128];
-     }
-     if (ctx->cache_cb) {
+     switch (cmd) {
-         memset (ctx->pass_cb.pwd, 0, sizeof (ctx->pass_cb));
+     case ID_FILEMISC_ENCRYPT: fm_cmd = FM_ENCRYPT; break;
-         ctx->cache_cb = 0; /* make sure it's only used for this session! */
+     case ID_FILEMISC_ENCRYPT_ZIP:fm_cmd = FM_ENCRYPT_ZIP; break;
-     }
+     case ID_FILEMISC_DECRYPT: fm_cmd = FM_DECRYPT; break;
+     case ID_FILEMISC_SYMENC:  fm_cmd = FM_SYMENC;  break;
-     /* remove wipe files from the list */
+     case ID_FILEMISC_SIGN:    fm_cmd = FM_SIGN;    break;
-     n = listview_count_items (lv, 0);
+     case ID_FILEMISC_VERIFY:  fm_cmd = FM_VERIFY;  break;
-     while (n--) {
+     case ID_FILEMISC_IMPORT:  fm_cmd = FM_IMPORT;  break;
-         char status[128];
+     case ID_FILEMISC_WIPE:    fm_cmd = FM_WIPE;    break;
-         listview_get_item_text (lv, n, 0, status, sizeof (status) - 1);
+     case ID_FILEMISC_LIST:    fm_cmd = FM_LIST;    break;
-         if( !strcmp (status, "WIPED"))
+     case ID_FILEMISC_SIGNENC: fm_cmd = FM_SIGNENCRYPT; break;
-             listview_del_item (lv, n);
+     default: return 1; /* unknown command */
      }
- leave:
+     if (fm_get_current_pos (lv) == -1)
-     if (!rc)
+         return WPTERR_GENERAL;
-         fm_state_release (ctx);
+     rc = fm_state_new (&ctx);
-     if (confirm.rset)
+     if (rc)
-         gpgme_recipients_release (confirm.rset);
+         BUG (0);
-     progress_cleanup (&pfx);
+     ctx->dlg = dlg;
-     return rc;
- } /* fm_parse_files */
+     // XXX: for file operations the progress dialog will be
+     //       reloaded somewhere and thus a 'dummy' dialog remains
- int
+     /* we use it here to make sure that pfx_cleanup will not use
- fm_wipe (const char * name)
+        any weird values. */
- {
+     memset (&pfx, 0, sizeof (pfx));
-     int rc;
+     ctx->prog_cb = NULL;
+     if (cmd != FM_VERIFY && cmd != FM_SIGN /*&& reg_prefs.fm.progress > 0*/) {
-     SetCursor (LoadCursor (NULL, IDC_WAIT));
+         pfx.hwnd = dlg;
-     remove_crit_file_attrs (name, 1);
+         /*gpgme_set_progress_cb (ctx->ctx, progress_callback, &pfx);*/
-     rc = secure_unlink (name, reg_prefs.wipe_mode);
+         /*ctx->prog_cb = &pfx;*/
-     SetCursor (LoadCursor (NULL, IDC_ARROW));
+     }
-     return rc;
- } /* fm_wipe */
+     /* Commands we need before we can perform the main command */
+     switch (fm_cmd) {
+     case FM_ENCRYPT_ZIP:
- int
+     case FM_ENCRYPT:
- fm_list( const char * name, HWND dlg )
+     case FM_SIGNENCRYPT:
- {
+         if (fm_cmd == FM_SIGNENCRYPT)
-     dialog_box_param( glob_hinst, (LPCTSTR)IDD_WINPT_FILE_STAT, dlg,
+             ctx->req_signer = 1;
-                       file_stat_dlg_proc, (LPARAM)name, _("File Status"),
+         DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_FILE_ENCRYPT,
-                       IDS_WINPT_FILE_STAT );
+                         ctx->dlg, file_encrypt_dlg_proc, (LPARAM)ctx);
-     return 0;
+         if (ctx->cancel == 1) {
- } /* fm_list */
+             rc = WPTERR_GENERAL;
+             goto leave;
+         }
- static int
+         break;
- ask_filename (fm_state_t c, const char * msg, char ** dst)
- {
+     case FM_SIGN:
-     const char * s;
+         DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_FILE_SIGN, dlg,
+                         file_sign_dlg_proc, (LPARAM) ctx);
-     s = get_filename_dlg (c->dlg, FILE_SAVE, msg, NULL, NULL);
+         if (ctx->cancel == 1 || fm_clearsign_8bit (lv, ctx)) {
-     if (!s)
+             rc = WPTERR_GENERAL;
-         return WPTERR_GENERAL;
+             goto leave;
+         }
-     free_if_alloc (*dst);
+         break;
-     free_if_alloc (c->output);
-     c->output = m_strdup (s);
+     case FM_WIPE:
-     if (!c->output)
+         memset (&pfx2, 0, sizeof (pfx2));
-         BUG (0);
+         secure_unlink_set_cb (progress_callback, &pfx2);
-     *dst = fm_quote_file (s);
+         break;
-     return 0;
+     }
- }
+     for( i = 0, n = 0;  i < listview_count_items( lv, 0 ); i++ ) {
+         if( !listview_get_item_state( lv, i ) )
- int
+             continue;
- fm_encrypt (fm_state_t c, const char * name, int sign)
+         listview_get_item_text( lv, i, 0, status, sizeof (status) -1 );
- {
+         if (!strcmp( status, "ENCRYPTED" ) && fm_cmd == FM_DECRYPT)
-     gpgme_error_t err;
+             n++;
-     gpgme_key_t key = NULL;
+         if (!strcmp( status, "UNKNOWN" ) && fm_cmd == FM_SIGN)
-     gpgme_ctx_t ctx = c->ctx;
+             n++;
-     char * src = NULL, * dst = NULL;
+         if (fm_cmd == FM_WIPE)
-     char * keyid = NULL, ext[5];
+             ndel++;
-     int no_compr = 0;
+     }
-     int rc = 0;
+     if (n > 1 && fm_cmd != FM_SYMENC)
-     src = fm_quote_file (name);
+         ctx->cache_cb = 1;
-     c->output = new char[strlen (name) + 5 + 1];
-     if (!c->output)
+     if (fm_cmd == FM_WIPE && ndel > 0) {
-         BUG (0);
+         memset (&confirm, 0, sizeof confirm);
-     strcpy (ext, file_get_extension (ctx, c->sigmode));
+         confirm.lv_files = lv;
-     strcpy (c->output, name );
+         DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_FILES_SECDEL, ctx->dlg,
-     strcat (c->output, ext );
+                         file_secdel_confirm_dlg_proc, (LPARAM)&confirm);
-     dst = fm_quote_file (c->output);
+         if (!confirm.yes)
+             goto leave;
-     if (!overwrite_file (c->output))
+     }
-     {
-         rc = ask_filename (c, _("Enter filename for encrypted file"), &dst);
+     if (fm_cmd == FM_ENCRYPT_ZIP)
-         if (rc)
+         fm_encrypt_into_zip (ctx, lv);
-             goto leave;
-     }
+     for (i = 0; i < listview_count_items (lv, 0); i++) {
+         if( !listview_get_item_state( lv, i ) )
-     no_compr = is_multi_media (name);
+             continue;
-     gpgme_control (ctx, GPGME_CTRL_NO_COMPR, no_compr);
+         listview_get_item_text(lv, i, 1, fname, sizeof (fname) - 1);
+         if( file_exist_check (fname) && !is_directory (fname)) {
-     if (sign) {
+             log_box (_("File Manager"), MB_ERR,
-         if (gpgme_signers_enum (ctx, 0) == NULL) {
+                      _("\"%s\" does not exist"), fname);
-             keyid = get_gnupg_default_key ();
+             continue;
-             if (!keyid) {
+         }
-                 msg_box (c->dlg, _("Could not get default secret key."),
+         if (is_directory (fname))
-                          _("Signing"), MB_ERR);
+             fm_cmd = FM_ENCRYPT_DIR;
-                 rc = WPTERR_GENERAL;
+         if (!fm_check_file_type (lv, i, fm_cmd))
-                 goto leave;
+             continue;
-             }
+         sig_detached = fm_check_detached_sig (lv, i);
-             if (get_seckey (keyid, &key))
+         switch (fm_cmd) {
-                 BUG (0);
+         case FM_LIST:        rc = fm_list( fname, dlg );       break;
-             gpgme_signers_add (ctx, key);
+         case FM_WIPE:        rc = fm_wipe( fname );            break;
-         }
+         case FM_ENCRYPT:     rc = fm_encrypt( ctx, fname, 0 ); break;
-         else {
+         case FM_ENCRYPT_DIR: rc = fm_encrypt_directory( ctx, fname ); break;
-             const char * s;
+         case FM_SIGNENCRYPT: rc = fm_encrypt( ctx, fname, 1 ); break;
-             s = (char *)gpgme_key_get_string_attr (gpgme_signers_enum (ctx, 0),
+         case FM_DECRYPT:     rc = fm_decrypt( ctx, fname );    break;
-                                                     GPGME_ATTR_KEYID, NULL, 0);
+         case FM_SIGN:        rc = fm_sign( ctx, fname );       break;
-             keyid = m_strdup (s);
+         case FM_SYMENC:      rc = fm_sym_encrypt( ctx, fname );break;
-         }
+         case FM_VERIFY:      rc = fm_verify (ctx, sig_detached, fname);break;
-         if (!c->init_cb || !c->cache_cb) {
+         case FM_IMPORT:
-             set_gpg_passphrase_cb (c->ctx, &c->pass_cb, GPG_CMD_SIGN,
+             free_if_alloc (ctx->opaque);
-                                    c->dlg, _("Signing"));
+             ctx->opaque = m_strdup (fname);
-             c->init_cb = 1;
+             if (!ctx->opaque)
-         }
+                 BUG (0);
-         err = gpgme_op_file_sign_encrypt (ctx, c->recp, src, dst);
+             DialogBoxParam( glob_hinst, (LPCSTR)IDD_WINPT_IMPORT, dlg,
-         if (!c->cache_cb)
+                            file_import_dlg_proc, (LPARAM)ctx );
-             memset (c->pass_cb.pwd, 0, sizeof (c->pass_cb.pwd));
+             if (ctx->cancel == 1)
-         if (c->pass_cb.cancel) {
+                 continue;
-             rc = WPTERR_GENERAL;
+             rc = fm_import (ctx, fname);
-             goto leave;
+             break;
          }
-         if (err) {
+         fm_set_status (lv, i, fm_cmd, ctx->sigmode, !rc, ctx->output);
-             msg_box (c->dlg, gpgme_strerror (err), _("Sign"), MB_ERR);
+         free_if_alloc (ctx->output);
-             if (err == GPGME_Bad_Passphrase)
+         progress_cleanup (&pfx);
-                 agent_del_cache (keyid);
+     }
-             rc = WPTERR_GENERAL;
-             goto leave;
+     if (fm_cmd == FM_WIPE) {
-         }
+         secure_unlink_set_cb (NULL, NULL);
-         gpgme_key_release (key);
+         progress_cleanup (&pfx2);
      }
-     else {
+     if (ctx->cache_cb) {
-         err = gpgme_op_file_encrypt (ctx, c->recp, src, dst);
+         release_gpg_passphrase_cb (&ctx->pass_cb);
-         if (err) {
+         ctx->cache_cb = 0; /* make sure it's only used for this session! */
-             msg_box (c->dlg, gpgme_strerror (err), _("Encrypt"), MB_ERR);
+     }
-             rc = WPTERR_GENERAL;
-             goto leave;
+     /* remove wipe files from the list */
-         }
+     n = listview_count_items (lv, 0);
-     }
+     while (n--) {
-     if (c->wipe)
+         listview_get_item_text (lv, n, 0, status, sizeof (status) - 1);
-         secure_unlink (name, WIPE_MODE_SIMPLE);
+         if (!strcmp (status, "WIPED"))
+             listview_del_item (lv, n);
- leave:
+     }
-     free_if_alloc (keyid);
-     free_if_alloc (dst);
+ leave:
-     free_if_alloc (src);
+     if (!rc)
-     return rc;
+         fm_state_release (ctx);
- } /* fm_encrypt */
+     progress_cleanup (&pfx);
+     return rc;
+ } /* fm_parse_files */
- int
- fm_sym_encrypt (fm_state_t c, const char * name)
- {
+ /* Wipe the given file @name with the delete mode
-     int rc = 0, cancel = 0;
+    from the configuration.
-     char * src = NULL, * dst = NULL;
+    Return value: 0 on success. */
-     char ext[5], * pass;
+ int
-     gpgme_ctx_t ctx = c->ctx;
+ fm_wipe (const char *name)
-     gpgme_error_t err;
+ {
+     int rc;
-     pass = request_passphrase2 (_("Symmetric"), &cancel);
-     if (cancel)
+     SetCursor (LoadCursor (NULL, IDC_WAIT));
-         return 0;
+     remove_crit_file_attrs (name, 1);
+     rc = secure_unlink (name, reg_prefs.wipe_mode);
-     gpgme_control (ctx, GPGME_CTRL_CIPHER, -1);
+     SetCursor (LoadCursor (NULL, IDC_ARROW));
-     src = fm_quote_file (name);
+     return rc;
-     c->output = new char[strlen (name) + 5 + 1];
+ }
-     if (!c->output)
-         BUG (0);
-     strcpy (ext, file_get_extension (ctx, c->sigmode));
+ /* Dump out the given PGP packets from file @name in a dialog. */
-     strcpy (c->output, name);
+ int
-     strcat (c->output, ext);
+ fm_list (const char *name, HWND dlg)
-     dst = fm_quote_file (c->output);
+ {
+     dialog_box_param( glob_hinst, (LPCTSTR)IDD_WINPT_FILE_STAT, dlg,
-     if (overwrite_file (c->output) == 0) {
+                       file_stat_dlg_proc, (LPARAM)name, _("File Status"),
-         rc = WPTERR_GENERAL;
+                       IDS_WINPT_FILE_STAT );
-         goto leave;
+     return 0;
-     }
+ }
-     gpgme_set_passphrase (ctx, pass);
-     err = gpgme_op_file_encrypt (ctx, NULL, src, dst);
-     if (err) {
+ static int
-         msg_box (c->dlg, gpgme_strerror (err), _("Symmetric"), MB_ERR);
+ ask_filename (fm_state_t c, const char *msg, char **dst)
-         rc = WPTERR_GENERAL;
+ {
-         goto leave;
+     const char * s;
-     }
-     if (file_exist_check (c->output)) {
+     s = get_filesave_dlg (c->dlg, msg, NULL, NULL);
-         msg_box (c->dlg, _("Encryption failed."), _("Symmetric"), MB_ERR);
+     if (!s)
-         rc = WPTERR_GENERAL;
+         return WPTERR_GENERAL;
-     }
+     if (dst != NULL)
- leave:
+         free_if_alloc (*dst);
-     free_if_alloc (src);
+     free_if_alloc (c->output);
-     free_if_alloc (dst);
+     c->output = m_strdup (s);
-     sfree_if_alloc (pass);
+     if (!c->output)
-     return rc;
+         BUG (0);
- } /* fm_sym_encrypt */
+     if (dst)
+         *dst = fm_quote_file (s);
+     return 0;
- static gpgme_error_t
+ }
- fm_list_keys( const char * name, gpgme_recipients_t *r_keys )
- {
-     return gpgme_op_list_keys( NULL, name, r_keys );
+ int
- } /* fm_list_keys */
+ fm_encrypt (fm_state_t c, const char *name, int sign)
+ {
+     gpgme_error_t err;
- int
+     gpgme_key_t key = NULL;
- fm_decrypt (fm_state_t c, const char * name)
+     gpgme_ctx_t ctx = c->ctx;
- {
+     file_data_t in=NULL, out=NULL;
-     gpgme_error_t err;
+     char *keyid = NULL, ext[5];
-     gpgme_ctx_t ctx = c->ctx;
+     /*int no_compr = 0;*/
-     gpgme_recipients_t keys = NULL;
+     int rc = 0;
-     gpgme_sig_t sig = NULL;
-     gpgme_op_flags_t flags;
+     c->output = new char[strlen (name) + 5 + 1];
-     char * src = NULL, * dst = NULL, keyid[17];
+     if (!c->output)
-     int is_signed = 0, sigok = 0;
+         BUG (0);
-     int rc = 0;
+     strcpy (ext, file_get_extension (ctx, c->sigmode));
+     strcpy (c->output, name);
-     if (!c->init_cb || !c->cache_cb) {
+     strcat (c->output, ext);
-         set_gpg_passphrase_cb (c->ctx, &c->pass_cb, GPG_CMD_DECRYPT,
-                                c->dlg, _("Decryption"));
+     if (!overwrite_file (c->output)) {
-         c->init_cb = 1;
+         rc = ask_filename (c, _("Enter filename for encrypted file"), NULL);
-     }
+         if (rc)
+             goto leave;
-     src = fm_quote_file (name);
+     }
-     c->output = m_strdup (name);
-     if (!c->output)
+     err = gpg_file_data_new (name, F_DATA_READ, &in);
-         BUG (0);
+     if (err)
-     if (is_openpgp_ext (c->output))
+         goto leave;
-         c->output[strlen (c->output)-4] = '\0';
+     remove_crit_file_attrs (c->output, 0);
-     else {
+     err = gpg_file_data_new (c->output, F_DATA_WRITE, &out);
-         const char *s = get_filename_dlg (c->dlg, FILE_SAVE, _("Choose Filename for Output"),
+     if (err)
-                                           NULL, NULL);
+         goto leave;
-         if( s ) {
-             free_if_alloc( c->output );
+     /*
-             c->output = m_strdup( s );
+     if (c->prog_cb) {
-             if( !c->output )
+         c->prog_cb->what = name;
-                 BUG( NULL );
+         gpg_file_data_set_cb (in, c->prog_cb);
-         }
+     }
-     }
+     */
-     dst = fm_quote_file( c->output );
+     /* XXX: disable compression for multi-media files.
-     err = fm_list_keys( src, &keys );
+     no_compr = is_multi_media (name);
-     if( err )
+     gpgme_control (ctx, GPGME_CTRL_NO_COMPR, no_compr);
-         goto leave;
+     */
-     c->pass_cb.enc_to = keys;
+     if (sign) {
-     if (overwrite_file (c->output) == 0) {
+         if (gpgme_signers_enum (ctx, 0) == NULL) {
-         rc = ask_filename (c, _("Please enter filename for plaintext file"), &dst);
+             keyid = get_gnupg_default_key ();
-         if (rc)
+             if (!keyid) {
-             goto leave;
+                 msg_box (c->dlg, _("Could not get default secret key."),
-     }
+                          _("Signing"), MB_ERR);
-     remove_crit_file_attrs( c->output, 0 );
+                 rc = WPTERR_GENERAL;
-     err = gpgme_op_file_decrypt( ctx, src, dst );
+                 goto leave;
-     if( !c->cache_cb )
+             }
-         memset( c->pass_cb.pwd, 0, sizeof (c->pass_cb.pwd) );
+             if (get_seckey (keyid, &key))
-     if( c->pass_cb.cancel ) {
+                 BUG (0);
-         rc = WPTERR_GENERAL;
+             gpgme_signers_add (ctx, key);
-         goto leave;
+         }
-     }
+         else {
-     gpgme_decrypt_get_status( ctx, keyid, &flags );
+             gpgme_key_t sigkey = gpgme_signers_enum (ctx, 0);
-     if( err == GPGME_No_Seckey && (flags & GPGME_OPFLAG_NOSECKEY) ) {
+             if (sigkey && sigkey->subkeys) {
-         char * p = get_key_userid( keyid+8 );
+                 keyid = m_strdup (sigkey->subkeys->keyid);
-         int pkalgo = algo_from_list( keys, keyid );
+                 if (!keyid)
-         log_box( _("Decryption"), MB_ERR,
+                     BUG (NULL);
-                  _("Encrypted with %s key, ID %s.%s\n"
+             }
-                    "Decryption failed: secret key not available."),
+         }
-                    gpgme_key_expand_attr( GPGME_ATTR_ALGO, pkalgo ),
+         if (!c->init_cb || !c->cache_cb) {
-                    keyid+8, p );
+             set_gpg_passphrase_cb (&c->pass_cb, c->ctx, GPG_CMD_SIGN,
-         rc = WPTERR_GENERAL;
+                                    c->dlg, _("Signing"));
-         free_if_alloc( p );
+             c->init_cb = 1;
-         goto leave;
+         }
-     }
+         op_begin ();
-     else if( err ) {
+         err = gpgme_op_encrypt_sign (ctx, c->recp, GPGME_ENCRYPT_ALWAYS_TRUST,
-         msg_box( c->dlg, gpgme_strerror( err ), _("Decrypt"), MB_ERR );
+                                      in->dat, out->dat);
-         rc = WPTERR_GENERAL;
+         op_end ();
-         goto leave;
+         if (!c->cache_cb)
-     }
+             release_gpg_passphrase_cb (&c->pass_cb);
-     if( file_exist_check( c->output ) ) {
+         if (c->pass_cb.cancel) {
-         msg_box( c->dlg, _("Decryption failed"), _("Decrypt"), MB_ERR );
+             rc = WPTERR_GENERAL;
-         rc = WPTERR_GENERAL;
+             goto leave;
-     }
+         }
+         if (err) {
-     gpgme_decrypt_get_sig_ctx( ctx, &sig );
+             msg_box (c->dlg, gpgme_strerror (err), _("Sign"), MB_ERR);
+             if (gpgme_err_code (err) == GPG_ERR_BAD_PASSPHRASE)
-     sigok = gpgme_sig_get_ulong_attr( sig, 0, GPGME_ATTR_VALIDITY ) == GPGME_SIG_STAT_GOOD;
+                 agent_del_cache (keyid);
-     if( sig ) {
+             rc = WPTERR_GENERAL;
-         const char *id, *s = sigok? _("Good signature") : _("BAD signature");
+             goto leave;
-         int type = sigok? MB_OK: MB_ICONWARNING|MB_OK;
+         }
-         gpgme_key_t key;
+     }
-         const char * keyid = gpgme_sig_get_string_attr( sig, GPGME_ATTR_KEYID );
+     else {
-         if( !keyid )
+         op_begin ();
-             keyid = "DEADBEEFDEADBEEF";
+         err = gpgme_op_encrypt (ctx, c->recp, GPGME_ENCRYPT_ALWAYS_TRUST,
-         if( get_pubkey( keyid+8, &key ) )
+                                 in->dat, out->dat);
-             log_box( _("Verify"), type, _("%s using keyID 0x%s"), s, keyid+8 );
+         op_end ();
-         else {
+         if (err) {
-             id = gpgme_sig_get_string_attr( sig, GPGME_ATTR_USERID );
+             msg_box (c->dlg, gpgme_strerror (err), _("Encrypt"), MB_ERR);
-             log_box( _("Verify"), type, "%s using keyID 0x%08X from %s",
+             rc = WPTERR_GENERAL;
-                                 s, keyid, id? id : _("Invalid User ID") );
+             goto leave;
          }
      }
  leave:
-     free_if_alloc( dst );
+     if (in)
-     free_if_alloc( src );
+         gpg_file_data_release (in);
-     gpgme_sig_release( sig );
+     if (out)
-     gpgme_recipients_release( keys );
+         gpg_file_data_release (out);
-     return rc;
+     free_if_alloc (keyid);
- } /* fm_decrypt */
+     if (!rc && c->wipe)
+         secure_unlink (name, WIPE_MODE_SIMPLE);
+     return rc;
- int
+ }
- fm_sign (fm_state_t c, const char * name)
- {
-     int rc = 0;
+ int
-     gpgme_ctx_t ctx = c->ctx;
+ fm_sym_encrypt (fm_state_t c, const char * name)
-     gpgme_error_t err;
+ {
-     char *src = NULL, *dst = NULL;
+     gpgme_ctx_t ctx = c->ctx;
-     char ext[5];
+     gpgme_error_t err;
+     file_data_t in=NULL, out=NULL;
-     if( !c->init_cb || !c->cache_cb ) {
+     int rc = 0, cancel = 0;
-         set_gpg_passphrase_cb( c->ctx, &c->pass_cb, GPG_CMD_SIGN, c->dlg, _("Signing") );
+     char ext[5], * pass;
-         c->init_cb = 1;
-     }
+     pass = request_passphrase2 (_("Symmetric"), 0, &cancel);
+     if (cancel)
-     src = fm_quote_file( name );
+         return 0;
-     free_if_alloc( c->output );
-     c->output = new char[strlen( name ) + 5 + 1];
+     /* XXX gpgme_control (ctx, GPGME_CTRL_CIPHER, -1);*/
-     if( !c->output )
+     c->output = new char[strlen (name) + 5 + 1];
-         BUG( NULL );
+     if (!c->output)
-     strcpy( ext, file_get_extension( ctx, c->sigmode ) );
+         BUG (0);
-     strcpy( c->output, name );
+     strcpy (ext, file_get_extension (ctx, c->sigmode));
-     strcat( c->output, ext );
+     strcpy (c->output, name);
-     dst = fm_quote_file( c->output );
+     strcat (c->output, ext);
-     if (!overwrite_file (c->output)) {
+     if (overwrite_file (c->output) == 0) {
-         rc = ask_filename (c, _("Enter filename for signed file"), &dst);
+         rc = WPTERR_GENERAL;
-         if (rc)
+         goto leave;
-             goto leave;
+     }
-     }
-     remove_crit_file_attrs( c->output, 0 );
+     gpgme_set_passphrase_cb (ctx, sym_passphrase_cb, pass);
-     err = gpgme_op_file_sign( ctx, c->sigmode, src, dst );
-     if( !c->cache_cb )
+     err = gpg_file_data_new (name, 1, &in);
-         memset( c->pass_cb.pwd, 0, sizeof (c->pass_cb.pwd) );
+     if (err)
-     if( c->pass_cb.cancel ) {
+         goto leave;
-         rc = WPTERR_GENERAL;
+     err = gpg_file_data_new (c->output, 0, &out);
-         goto leave;
+     if (err)
-     }
+         goto leave;
-     if( err ) {
-         msg_box( c->dlg, gpgme_strerror( err ), _("Sign"), MB_ERR );
+     op_begin ();
-         rc = WPTERR_GENERAL;
+     err = gpgme_op_encrypt (ctx, NULL, GPGME_ENCRYPT_ALWAYS_TRUST,
-         goto leave;
+                             in->dat, out->dat);
-     }
+     op_end ();
+     if (err) {
- leave:
+         msg_box (c->dlg, gpgme_strerror (err), _("Symmetric"), MB_ERR);
-     free_if_alloc( src );
+         rc = WPTERR_GENERAL;
-     free_if_alloc( dst );
+         goto leave;
-     return rc;
+     }
- } /* fm_sign */
+     if (file_exist_check (c->output)) {
+         msg_box (c->dlg, _("Encryption failed."), _("Symmetric"), MB_ERR);
+         rc = WPTERR_GENERAL;
- static int
+     }
- fm_add_sig_stat( siglog_context_t log )
- {
+ leave:
-     gpgme_key_t key;
+     if (in)
-     const char *uid, *keyid, * kid;
+         gpg_file_data_release (in);
-     int not_found = 0;
+     if (out)
+         gpg_file_data_release (out);
-     kid = gpgme_sig_get_string_attr( log->sig, GPGME_ATTR_KEYID );
+     sfree_if_alloc (pass);
-     if( !kid )
+     return rc;
-         kid = "DEADBEEFDEADBEEF";
+ }
-     if( strlen( kid ) == 16 )
-         keyid = kid + 8;
-     else if( strlen( kid ) == 32 )
+ /* Show the human readable verify result from @sigres. */
-         keyid = kid;
+ static void
-     else if( strlen( kid ) == 40 )
+ show_verify_result (gpgme_verify_result_t sigres)
-         keyid = kid + 24;
+ {
-     if( get_pubkey( keyid, &key ) )
+     gpgme_key_t key=NULL;
-         not_found = 1;
+     gpgme_signature_t sig=sigres->signatures;
-     log->use_uid = 0;
+     const char *s, *keyid;
-     if( !not_found ) {
+     int sigok = 0;
-         uid = gpgme_key_get_string_attr( key, GPGME_ATTR_USERID, NULL, 0 );
+     int type;
-         log->user_id = uid;
+     char buf[384];
-         log->use_uid = 1;
-     }
+     sig = sigres->signatures;
-     file_verify_add_state( log );
+     sigok = sig->summary & GPGME_SIGSUM_GREEN;
+     s = sigok? _("Good signature") : _("BAD signature");
-     return 0;
+     type = sigok? MB_OK: MB_ICONWARNING|MB_OK;
- } /* fm_add_sig_stat */
+     keyid = sig->fpr;
+     if (!keyid)
+         return;
- static int
- verify_pasted (listview_ctrl_t lv, fm_state_t ctx, const char * dat,
+     keyid = strlen (sig->fpr) == 40? sig->fpr+32 : sig->fpr + 24;
-                int i, HWND dlg)
+     get_pubkey (sig->fpr, &key);
- {
+     _snprintf (buf, sizeof (buf)-1, _("Signature made %s using %s key ID %s\n"
-     FILE * fp;
+                                     "%s from \"%s\""),
-     char stat[32];
+                 strtimestamp (sig->timestamp),
-     char file[256], * fname = NULL;
+                 get_key_pubalgo (sig->pubkey_algo),
-     int del_end=0;
+                 keyid, s, key? key->uids->uid : _("user ID not found"));
+     msg_box (NULL, buf, _("Decrypt Verify"), type);
-     listview_get_item_text (lv, i, 0, stat, sizeof (stat)-1);
+ }
-     listview_get_item_text (lv, i, 1, file, sizeof (file)-1);
-     if (strcmp (stat, "UNKNOWN"))
-         return 0;
+ /* Check the recipients if we have at least one secret key. */
-     fname = make_filename (NULL, file, "asc");
+ bool
-     if (file_exist_check (fname) != 0) {
+ secret_key_available (gpgme_recipient_t rset)
-         fp = fopen (fname, "wb");
+ {
-         if (fp == NULL) {
+     gpgme_recipient_t r;
-             log_box (_("File Manager"), MB_ERR, "could not create '%s'", fname);
+     gpgme_key_t key;
-             free_if_alloc (fname);
-             return WPTERR_GENERAL;
+     for (r=rset; r; r = r->next) {
-         }
+         if (gpgme_err_code (r->status) == GPG_ERR_NO_SECKEY)
-         fwrite (dat, 1, strlen (dat), fp);
+             continue;
-         fclose (fp);
+         else {
-         del_end = 1;
+             /* extra check to make sure the key is available right now. */
-     }
+             if (!get_seckey (r->keyid, &key))
-     fm_verify (ctx, 1, fname);
+                 return true;
-     if (del_end)
+         }
-         unlink (fname);
+     }
-     free_if_alloc (fname);
+     return false;
-     return 0;
+ }
- }
+ /* Decrypt the file @name. */
  int
- fm_verify_pasted_detsig (listview_ctrl_t lv, HWND dlg)
+ fm_decrypt (fm_state_t c, const char *name)
  {
-     fm_state_t ctx = NULL;
+     gpgme_error_t err;
-     char * dat=NULL;
+     gpgme_ctx_t ctx = c->ctx;
-     int i, fnd = 0;
+     gpgme_decrypt_result_t res;
+     gpgme_verify_result_t sigres;
-     dat = get_clip_text (NULL);
+     file_data_t in =NULL, out=NULL;
-     if (!dat || !strstr (dat, "BEGIN PGP SIGNATURE")) {
+     int rc = 0;
-         msg_box (dlg, _("Could not find detached signature in the clipboard."),
-                  _("File Manager"), MB_ERR);
+     if (!c->init_cb || !c->cache_cb) {
-         free_if_alloc (dat);
+         set_gpg_passphrase_cb (&c->pass_cb, c->ctx, GPG_CMD_DECRYPT,
-         return WPTERR_GENERAL;
+                                c->dlg, _("Decryption"));
-     }
+         c->init_cb = 1;
-     /* XXX find a way to filter out bad signatures or just ignore all in
+     }
-            this case */
-     fm_state_new (&ctx);
+     c->output = m_strdup (name);
-     if ((i=listview_get_curr_pos (lv)) != -1) {
+     if (!c->output)
-         verify_pasted (lv, ctx, dat, i, dlg);
+         BUG (0);
-         fnd = 1;
+     if (is_openpgp_ext (c->output))
-     }
+         c->output[strlen (c->output)-4] = '\0';
      else {
-         for (i=0; i < listview_count_items (lv, 0); i++) {
+         const char *s;
-             verify_pasted (lv, ctx, dat, i, dlg);
+         s = get_filesave_dlg (c->dlg, _("Choose Filename for Output"),
-             fnd = 1;
+                               NULL, NULL);
-         }
+         if (s) {
-     }
+             free_if_alloc (c->output);
-     if (!fnd)
+             c->output = m_strdup (s);
-         msg_box (dlg, _("No files to check."), _("File Manager"), MB_INFO);
+             if (!c->output)
-     free_if_alloc (dat);
+                 BUG (NULL);
-     fm_state_release (ctx);
+         }
-     return 0;
+     }
- }
+     if (overwrite_file (c->output) == 0) {
+         rc = ask_filename (c, _("Please enter filename for plaintext file"), NULL);
- int
+         if (rc)
- fm_verify( fm_state_t c, int detached, const char *name )
+             goto leave;
- {
+     }
-     gpgme_ctx_t ctx = c->ctx;
-     gpgme_error_t err;
+     err = gpg_file_data_new (name, F_DATA_READ, &in);
-     gpgme_sig_t sig;
+     if (err)
-     struct siglog_context_s log;
+         goto leave;
-     char * src = NULL;
+     remove_crit_file_attrs (c->output, 0);
-     int rc = 0;
+     err = gpg_file_data_new (c->output, F_DATA_WRITE, &out);
-     size_t i;
+     if (err)
+         goto leave;
-     if( detached ) {
-         const char *file = NULL;
+     op_begin ();
-         if( strstr( name, ".sig" ) || strstr( name, ".asc" ) ) {
+     err = gpgme_op_decrypt_verify (ctx, in->dat, out->dat);
-             char fname[512];
+     op_end ();
-             _snprintf( fname, sizeof (fname) - 1, "%s", name );
+     if (!c->cache_cb)
-             fname[strlen( fname ) - 4] = '\0';
+         release_gpg_passphrase_cb (&c->pass_cb);
-             if( file_exist_check( fname ) == 0 )
+     if (c->pass_cb.cancel) {
-                 file = fname;
+         rc = WPTERR_GENERAL;
-         }
+         goto leave;
-         if( !file )
+     }
-             file = get_filename_dlg( c->dlg, FILE_OPEN, _("Select Data File"), NULL, NULL );
-         if( file ) {
+     res = gpgme_op_decrypt_result (ctx);
-             free_if_alloc( c->output );
+     if (res && res->recipients && !secret_key_available (res->recipients)) {
-             c->output = m_strdup( file );
+         const char *keyid = res->recipients->keyid;
-         }
+         char *p = get_key_userid (keyid+8);
-         else {
+         gpgme_pubkey_algo_t pkalgo = res->recipients->pubkey_algo;
-             msg_box( c->dlg, _("Invalid file name. Exit"), _("Verify"), MB_ERR );
-             return WPTERR_GENERAL;
+         log_box( _("Decryption"), MB_ERR,
-         }
+                  _("Encrypted with %s key, ID %s.%s\n"
-         c->sigmode = GPGME_SIG_MODE_DETACH;
+                    "Decryption failed: secret key not available."),
-     }
+                    get_key_pubalgo (pkalgo), keyid+8, p);
-     else {
+         rc = WPTERR_GENERAL;
-         if( strstr( name, ".asc" ) )
+         free_if_alloc (p);
-             c->sigmode = GPGME_SIG_MODE_CLEAR;
+         goto leave;
-         else
+     }
-             c->sigmode = GPGME_SIG_MODE_NORMAL;
+     else if (err) {
-     }
+         msg_box (c->dlg, gpgme_strerror (err), _("Decrypt"), MB_ERR);
+         rc = WPTERR_GENERAL;
-     memset( &log, 0, sizeof (log) );
+         goto leave;
-     strcpy( log.file, name );
+     }
-     file_verify_create_dlg();
+     if (file_exist_check (c->output)) {
-     src = fm_quote_file( name );
+         log_box ("Decrypt", MB_ERR,
+                  _("Decryption failed.\n%s: does not exist."), c->output);
-     err = gpgme_op_file_verify( ctx, c->sigmode, &sig, src, c->output );
+         rc = WPTERR_GENERAL;
-     if( err == GPGME_Bad_Signature ) {
+     }
-         log.sig = sig;
-         fm_add_sig_stat( &log );
+     sigres = gpgme_op_verify_result (ctx);
-         rc = WPTERR_GENERAL;
+     if (sigres && sigres->signatures)
-         goto leave;
+         show_verify_result (sigres);
-     }
-     if( err ) {
+ leave:
-         msg_box( c->dlg, gpgme_strerror( err ), _("Verify"), MB_ERR );
+     if (in)
-         rc = WPTERR_GENERAL;
+         gpg_file_data_release (in);
-         goto leave;
+     if (out)
-     }
+         gpg_file_data_release (out);
-     for( i = 0; i < gpgme_sig_get_ulong_attr( sig, 0, GPGME_ATTR_LEVEL ); i++ ) {
-         gpgme_sig_t _sig;
+     return rc;
-         _sig = (gpgme_sig_t)gpgme_sig_get_ulong_attr( sig, i, GPGME_ATTR_OPAQUE );
+ }
-         log.sig = _sig;
-         fm_add_sig_stat( &log );
-     }
+ int
-     if( !c->output )
+ fm_sign (fm_state_t c, const char * name)
-         c->output = m_strdup( name ); /* for later use */
+ {
+     gpgme_ctx_t ctx = c->ctx;
- leave:
+     gpgme_error_t err;
-     free_if_alloc( src );
+     file_data_t in=NULL, out=NULL;
-     return rc;
+     char ext[5];
- } /* fm_verify */
+     int rc = 0;
+     if (!c->init_cb || !c->cache_cb) {
- int
+         set_gpg_passphrase_cb (&c->pass_cb, c->ctx,
- fm_import( fm_state_t c, const char *name )
+                                GPG_CMD_SIGN, c->dlg, _("Signing"));
- {
+         c->init_cb = 1;
-     gpgme_ctx_t ctx = c->ctx;
+     }
-     gpgme_error_t err;
-     char *src = NULL;
+     free_if_alloc (c->output);
-     int import_res[14] = {0};
+     c->output = new char[strlen (name) + 5 + 1];
-     int rc = 0;
+     if (!c->output)
+         BUG (NULL);
-     free_if_alloc( c->output );
+     strcpy (ext, file_get_extension (ctx, c->sigmode));
-     c->output = m_strdup( name );
+     strcpy (c->output, name);
-     if( !c->output )
+     strcat (c->output, ext);
-         BUG( NULL );
-     src = fm_quote_file( name );
+     if (!overwrite_file (c->output)) {
-     err = gpgme_op_file_import( ctx, NULL, src );
+         rc = ask_filename (c, _("Enter filename for signed file"), NULL);
-     if( err ) {
+         if (rc)
-         msg_box( c->dlg, gpgme_strerror( err ), _("Import"), MB_ERR );
+             goto leave;
-         rc = WPTERR_GENERAL;
+     }
-         goto leave;
-     }
+     err = gpg_file_data_new (name, F_DATA_READ, &in);
-     gpgme_get_import_status( ctx, import_res, NULL );
+     if (err)
-     print_import_status( import_res, c->implist_revcert );
+         goto leave;
-     if( import_res[GPGME_IMPSTAT_NOSELFSIG] > 0  ) {
+     remove_crit_file_attrs (c->output, 0);
-         msg_box( c->dlg, _("Key without a self signature was dectected!\n"
+     err = gpg_file_data_new (c->output, F_DATA_WRITE, &out);
-                            "(This key is NOT usable for encryption, etc)\n"
+     if (err)
-                            "\n"
+         goto leave;
-                            "Cannot import these key(s)!"), _("Import"), MB_INFO );
-     }
+     op_begin ();
+     err = gpgme_op_sign (ctx, in->dat, out->dat, c->sigmode);
- leave:
+     op_end ();
-     free_if_alloc( src );
+     if (!c->cache_cb)
-     return rc;
+         release_gpg_passphrase_cb (&c->pass_cb);
- } /* fm_import */
+     if (c->pass_cb.cancel) {
+         rc = WPTERR_GENERAL;
+         goto leave;
- int
+     }
- fm_export( fm_state_t c )
+     if (err) {
- {
+         msg_box (c->dlg, gpgme_strerror (err), _("Sign"), MB_ERR);
-     int rc = 0, id = 0;
+         rc = WPTERR_GENERAL;
-     gpgme_ctx_t ctx = c->ctx;
+         goto leave;
-     gpgme_error_t err;
+     }
-     gpgme_recipients_t rset = c->recp;
-     const char *name, *s = NULL;
+ leave:
-     char *p = NULL, *dst = NULL;
+     if (in)
-     void *recp;
+         gpg_file_data_release (in);
+     if (out)
-     if( !gpgme_recipients_count( rset ) ) {
+         gpg_file_data_release (out);
-         msg_box( c->dlg, _("No key was selected for export."), _("Export"), MB_ERR );
+     return rc;
-         rc = WPTERR_GENERAL;
+ }
-         goto leave;
-     }
+ static void
-     if( gpgme_recipients_count( rset ) == 1 ) {
+ fm_add_sig_stat (file_sig_ctx_t log)
-         err = gpgme_recipients_enum_open( rset, &recp );
+ {
-         if( err )
+     gpgme_key_t key;
-             BUG( NULL );
+     const char *kid;
-         s = gpgme_recipients_enum_read( rset, &recp );
-         gpgme_recipients_enum_close( rset, &recp );
+     kid = log->sig->fpr;
-         p = new char[strlen( s )+1+8];
+     if (!kid)
-         if( !p )
+         BUG (NULL);
-             BUG( NULL );
+     if (strlen (kid) == 40)
-         strcpy( p, s );
+         kid += 32;
-         strcat( p, ".asc" );
+     else if (strlen (kid) == 32)
-     }
+         kid += 24;
+     if (get_pubkey (kid, &key))
-     name = get_filename_dlg( c->dlg, FILE_SAVE, _("Choose Name for Key File"), NULL, p? p : NULL );
+         log->use_uid = 0;
+     else {
-     if( !name )
+         log->user_id = key->uids->uid;
-         name = "keys.gpg";
+         log->use_uid = 1;
+     }
-     dst = fm_quote_file( name );
+     file_verify_add_state (log);
-     err = gpgme_op_file_export( ctx, rset, dst );
+ }
-     if( err ) {
-         msg_box( c->dlg, gpgme_strerror( err ), _("Export"), MB_ERR );
-         rc = WPTERR_GENERAL;
+ /* Verify a detached signature from the clipboard. */
-         goto leave;
+ static int
-     }
+ verify_pasted (listview_ctrl_t lv, fm_state_t ctx,
-     log_box( _("GnuPG status"), MB_OK, _("Finished (Output: %s)"),  name );
+                const char *dat, int pos, HWND dlg)
+ {
- leave:
+     FILE *fp;
-     free_if_alloc( dst );
+     char stat[32];
-     free_if_alloc( p );
+     char file[256], *fname = NULL;
+     int del_end = 0;
-     return rc;
- } /* fm_export */
+     listview_get_item_text (lv, pos, 0, stat, sizeof (stat)-1);
+     listview_get_item_text (lv, pos, 1, file, sizeof (file)-1);
+     if (strcmp (stat, "UNKNOWN"))
- int
+         return 0;
- fm_parse_command_line (char *cmdl)
+     fname = make_filename (NULL, file, "asc");
- {
+     if (file_exist_check (fname) != 0) {
-     fm_state_t ctx;
+         fp = fopen (fname, "wb");
-     const char *s;
+         if (fp == NULL) {
-     char *p, *fn = NULL;
+             log_box (_("File Manager"), MB_ERR, "could not create '%s'", fname);
-     int count = 0, detached = 0;
+             free_if_alloc (fname);
+             return WPTERR_GENERAL;
-     if( !cmdl || !*cmdl )
+         }
-         return 0;
+         fwrite (dat, 1, strlen (dat), fp);
+         fclose (fp);
-     fm_state_new( &ctx );
+         del_end = 1;
-     ctx->dlg = GetActiveWindow( );
+     }
-     ctx->cache_cb = 1;
+     fm_verify (ctx, 1, fname);
+     if (del_end)
-     p = cmdl;
+         remove (fname);
-     if( p && *p > 32 && !memistr( p, strlen( p ), "winpt.exe" )
+     free_if_alloc (fname);
-                      && !strstr( p, "--" ) ) {
+     return 0;
-         count++;
+ }
-         if( *p == '"' ) { /* need to remove quotes */
-             fn = new char[strlen( p )];
-             if( !fn )
+ /* Figure out if the clipboard contains a detached signature. */
-                 BUG( NULL );
+ int
-             memcpy( fn, p+1, strlen( p ) - 2 );
+ fm_verify_pasted_detsig (listview_ctrl_t lv, HWND dlg)
-             fn[strlen( p ) -2] = '\0';
+ {
-         }
+     fm_state_t ctx = NULL;
-         else
+     char * dat=NULL;
-             fn = m_strdup (p);
+     int i, fnd = 0;
-         s = fm_get_file_type (fn);
-         if (!s || !strcmp (s, "UNKNOWN"))
+     dat = get_clip_text (NULL);
-             s = gnupg_check_file_ext (fn);
+     if (!dat || !strstr (dat, "BEGIN PGP SIGNATURE")) {
-         if (*s == 'U') {
+         msg_box (dlg, _("Could not find detached signature in the clipboard."),
-             log_box( _("File Manager"), MB_ERR, _("%s: no valid OpenPGP data found."), p );
+                  _("File Manager"), MB_ERR);
-             return count;
+         free_if_alloc (dat);
-         }
+         return WPTERR_GENERAL;
-         switch( *s ) {
+     }
-         case 'E': fm_decrypt( ctx, fn ); break;
+     /* XXX find a way to filter out bad signatures or just ignore all in
-         case 'P': fm_import( ctx, fn ); break;
+            this case */
-         case 'S':
+     fm_state_new (&ctx);
-             file_verify_use_event( );
+     i = listview_get_curr_pos (lv);
-             if( s[1] == 'I' ) {
+     if (i= -1) {
-                 if( strlen( s ) == 13 && s[7] == 'D' )
+         verify_pasted (lv, ctx, dat, i, dlg);
-                     detached = 1;
+         fnd = 1;
-                 fm_verify( ctx, detached, fn );
+     }
-             }
+     else {
-             file_verify_wait( );
+         for (i=0; i < listview_count_items (lv, 0); i++) {
-             break;
+             verify_pasted (lv, ctx, dat, i, dlg);
-         }
+             fnd = 1;
-     }
+         }
+     }
-     memset( &ctx->pass_cb, 0, sizeof (ctx->pass_cb) );
+     if (!fnd)
-     safe_free( fn );
+         msg_box (dlg, _("No files to check."), _("File Manager"), MB_INFO);
-     fm_state_release( ctx );
+     free_if_alloc (dat);
-     return count;
+     fm_state_release (ctx);
- } /* fm_parse_command_line */
+     return 0;
+ }
- const char *
- default_dirname( const char * name )
+ /* Extract automatically the output file name from @name.
- {
+    If @detached is 1, a detached sig is assumed. */
-     char * p = strrchr( name, '\\' );
+ static int
-     if( !p )
+ get_output_file (fm_state_t c, const char *name, int detached)
-         return NULL;
+ {
-     return p+1;
+     const char *file = NULL;
- } /* default_dirname */
+     const char *title;
+     char fname[384];
- int
+     if (detached)
- fm_encrypt_directory( fm_state_t c, const char * name )
+         title = _("Select Data File");
- {
+     else
-     PK_FILE_LIST list = NULL;
+         title = _("Selected Output File");
-     WIN32_FIND_DATA findbuf;
-     HANDLE hd;
+     if (strstr (name, ".sig")
-     const char * s;
+         || strstr (name, ".asc")
-     char * patt = NULL, * p;
+         || strstr (name, ".gpg")) {
-     int rc = 0;
+         _snprintf (fname, sizeof (fname) - 1, "%s", name);
+         fname[strlen (fname) - 4] = '\0';
-     if( !is_directory( name ) )
+         if (file_exist_check (fname) == 0 && detached)
-         return -1;
+             file = fname;
-     patt = new char[strlen( name ) + 4];
+         else if (!detached) {
-     if( !patt )
+             /* If the signature is clear or normal, make sure we do not
-         BUG( NULL );
+                overwrite the original file if it exists. */
-     strcpy( patt, name );
+             if (file_exist_check (fname) == 0 && !overwrite_file (fname)) {
-     strcat( patt, "\\*" );
+                 file = get_filesave_dlg (c->dlg, title, NULL, NULL);
-     hd = FindFirstFile( patt, &findbuf );
+                 if (!file)
-     if( !hd ) {
+                     return WPTERR_GENERAL;
-         free_if_alloc( patt );
+             }
-         return -1;
+             else
-     }
+                 file = fname;
-     if( strcmp( findbuf.cFileName, "." ) && strcmp( findbuf.cFileName, ".." ) ) {
+         }
-         p = make_filename( name, findbuf.cFileName, NULL );
+     }
-         pk_list_add( &list, p );
+     if (!file)
-         free_if_alloc( p );
+         file = get_fileopen_dlg (c->dlg, title, NULL, NULL);
-     }
+     if (file) {
-     while( FindNextFile( hd, &findbuf ) ) {
+         free_if_alloc (c->output);
-         if( strcmp( findbuf.cFileName, "." ) && strcmp( findbuf.cFileName, ".." ) ) {
+         c->output = m_strdup (file);
-             p = make_filename( name, findbuf.cFileName, NULL );
+         if (!c->output)
-             pk_list_add( &list, p );
+             BUG (NULL);
-             free_if_alloc( p );
+     }
-         }
+     else {
-     }
+         msg_box (c->dlg, _("Invalid file name. Exit"), _("Verify"), MB_ERR);
-     s = get_filename_dlg( c->dlg, FILE_SAVE, _("Choose a Name for the Archive"),
+         return WPTERR_GENERAL;
-                           NULL, default_dirname( name ) );
+     }
-     if( !s ) {
+     if (detached)
-         msg_box( c->dlg, _("Invalid archive name. Exit."), _("Encrypt Directory"), MB_ERR );
+         c->sigmode = GPGME_SIG_MODE_DETACH;
-         rc = -1;
+     else {
-         goto leave;
+         if (strstr (name, ".asc"))
-     }
+             c->sigmode = GPGME_SIG_MODE_CLEAR;
-     if( !overwrite_file( s ) ) {
+         else
-         rc = -1;
+             c->sigmode = GPGME_SIG_MODE_NORMAL;
-         goto leave;
+     }
-     }
+     return 0;
+ }
-     rc = pk_archiv_create( list, s );
-     if( rc )
-         msg_box( c->dlg, _("Could not create zip archive."), _("Encrypt Directory"), MB_ERR );
+ /* Verify the signature from the file @name. If @detached 1,
-     else {
+    it is assumed that a detached signature should be checked. */
-         fm_encrypt( c, s, 0 );
+ int
-         unlink( s );
+ fm_verify (fm_state_t c, int detached, const char *name)
-     }
+ {
- leave:
+     gpgme_ctx_t ctx = c->ctx;
-     pk_list_free( list );
+     gpgme_error_t err;
-     free_if_alloc( patt );
+     gpgme_signature_t s;
-     return rc;
+     gpgme_verify_result_t res;
- } /* fm_encrypt_directory */
+     struct file_sig_ctx_s log;
+     file_data_t in=NULL, out=NULL;
+     int rc = 0;
- static int CALLBACK
- fm_cmp_cb( LPARAM first, LPARAM second, LPARAM sortby )
+     if (strstr (name, ".sig"))
- {
+         detached = 1;
-     const char * a = 0, * b = 0;
+     if (get_output_file (c, name, detached))
-     switch( (int)sortby ) {
+         return WPTERR_GENERAL;
-     case FM_SORT_STAT:
-         break;
+     memset (&log, 0, sizeof (log));
-     case FM_SORT_NAME:
+     log.file = m_strdup (name);
-         break;
+     if (!log.file)
-     case FM_SORT_OP:
+         BUG (NULL);
-         break;
+     file_verify_create_dlg ();
-     }
-     return stricmp( a, b );
+     err = gpg_file_data_new (name, F_DATA_READ, &in);
- } /* fm_cmp_cb */
+     if (err)
+         goto leave;
+     err = gpg_file_data_new (c->output,
- int
+                              detached? F_DATA_READ : F_DATA_WRITE, &out);
- fm_sort( listview_ctrl_t lv, int sortby )
+     if (err)
- {
+         goto leave;
-     return listview_sort_items( lv, sortby, fm_cmp_cb );
- } /* fm_sort */
+     op_begin ();
+     if (c->sigmode == GPGME_SIG_MODE_DETACH)
+         err = gpgme_op_verify (ctx, in->dat, out->dat, NULL);
- void
+     else
- fm_print_md( listview_ctrl_t lv, HWND dlg, int mdalgo )
+         err = gpgme_op_verify (ctx, in->dat, in->dat, out->dat);
- {
+     op_end ();
-     struct md_file_s mdctx;
+     if (err) {
+         msg_box (c->dlg, gpgme_strerror (err), _("Verify"), MB_ERR);
-     if( listview_count_items( lv, 0 ) == 0 )
+         rc = WPTERR_GENERAL;
-         return;
+         goto leave;
-     memset( &mdctx, 0, sizeof (mdctx) );
+     }
-     mdctx.lv = lv;
-     mdctx.mdalgo = mdalgo;
+     res = gpgme_op_verify_result (ctx);
-     DialogBoxParam( glob_hinst, (LPCTSTR)IDD_WINPT_FILE_MDSUM, dlg,
+     for (s=res->signatures; s; s=s->next) {
-                     mdsum_dlg_proc, (LPARAM)&mdctx );
+         log.sig = s;
- } /* fm_print_md */
+         fm_add_sig_stat (&log);
+     }
+     if (!c->output)
- int
+         c->output = m_strdup (name); /* for later use */
- fm_send_file (listview_ctrl_t lv)
- {
+ leave:
-     char buf[128];
+     if (in)
-     int rc;
+         gpg_file_data_release (in);
+     if (out)
-     rc = listview_get_item_text (lv, -1, 1, buf, sizeof (buf)-1);
+         gpg_file_data_release (out);
-     if (rc == -1)
+     free_if_alloc (log.file);
-         return 0;
+     return rc;
-     mapi_send_ascfile (buf);
+ }
-     return 0;
- }
+ /* Import the keys from the file @name.
+    Return value: 0 on success. */
+ int
+ fm_import (fm_state_t c, const char *name)
+ {
+     gpgme_ctx_t ctx = c->ctx;
+     gpgme_error_t err;
+     gpgme_import_result_t res;
+     file_data_t keydata = NULL;
+     int rc = 0;
+     free_if_alloc (c->output);
+     c->output = m_strdup (name);
+     if (!c->output)
+         BUG (NULL);
+     err = gpg_file_data_new (name, F_DATA_READ, &keydata);
+     if (err)
+         goto leave;
+     op_begin ();
+     err = gpgme_op_import (ctx, keydata->dat);
+     op_end ();
+     if (err) {
+         msg_box (c->dlg, gpgme_strerror (err), _("Import"), MB_ERR);
+         rc = WPTERR_GENERAL;
+         goto leave;
+     }
+     res = gpgme_op_import_result (ctx);
+     print_import_status (res);
+     if (res->no_user_id > 0) {
+         msg_box (c->dlg, _("Key without a self signature was dectected!\n"
+                            "(This key is NOT usable for encryption, etc)\n"
+                            "\n"
+                            "Cannot import these key(s)!"), _("Import"), MB_INFO);
+     }
+ leave:
+     if (keydata)
+         gpg_file_data_release (keydata);
+     return rc;
+ }
+ /* Export the selected keys from the File Manager to a file. */
+ int
+ fm_export (fm_state_t c)
+ {
+     int rc = 0;
+     gpgme_ctx_t ctx = c->ctx;
+     gpgme_error_t err;
+     gpgme_key_t *rset = c->recp;
+     file_data_t keydata = NULL;
+     const char *name;
+     char *p = NULL, *patt = NULL;
+     if (!rset || !rset[0]) {
+         msg_box (c->dlg, _("No key was selected for export."), _("Export"), MB_ERR);
+         rc = WPTERR_GENERAL;
+         goto leave;
+     }
+     if (rset[1] == NULL) /* count == 1*/
+         p = km_gen_export_filename (rset[0]->subkeys->keyid+8, 0);
+     name = get_filesave_dlg (c->dlg, _("Choose Name for Key File"),
+                              NULL, p? p : NULL);
+     if (!name)
+         name = "keys.gpg";
+     patt = gpg_keylist_to_pattern (rset, c->n_recp);
+     err = gpg_file_data_new (name, F_DATA_WRITE, &keydata);
+     if (err)
+         goto leave;
+     op_begin ();
+     err = gpgme_op_export (ctx, patt, 0, keydata->dat);
+     op_end ();
+     if (err) {
+         msg_box (c->dlg, gpgme_strerror (err), _("Export"), MB_ERR);
+         rc = WPTERR_GENERAL;
+         goto leave;
+     }
+     log_box (_("GnuPG status"), MB_OK, _("Finished (Output: %s)"),  name);
+ leave:
+     if (keydata)
+         gpg_file_data_release (keydata);
+     if (patt)
+         free (patt);
+     free_if_alloc (p);
+     return rc;
+ }
+ /* Parse the command line and process the given file. */
+ int
+ fm_parse_command_line (char *cmdl)
+ {
+     fm_state_t ctx;
+     const char *s;
+     char *p, *fn = NULL;
+     int count = 0, detached = 0;
+     int type;
+     if (!cmdl || !*cmdl)
+         return 0;
+     fm_state_new (&ctx);
+     ctx->dlg = GetActiveWindow ();
+     ctx->cache_cb = 1;
+     p = cmdl;
+     if (p && *p > 32 && !stristr (p, "winpt.exe")
+                      && !strstr (p, "--" )) {
+         count++;
+         if (*p == '"') { /* need to remove quotes */
+             fn = new char[strlen (p)];
+             if (!fn)
+                 BUG (NULL);
+             memcpy (fn, p+1, strlen (p) - 2);
+             fn[strlen (p) -2] = '\0';
+         }
+         else
+             fn = m_strdup (p);
+         s = fm_get_file_type (fn, &type);
+         if (!s || !strcmp (s, "UNKNOWN"))
+             s = gnupg_check_file_ext (fn, &type);
+         if (type == PGP_NONE) {
+             log_box (_("File Manager"), MB_ERR,
+                      _("%s: no valid OpenPGP data found."), p);
+             free_if_alloc (fn);
+             return count;
+         }
+         switch (type) {
+         case PGP_MESSAGE:
+             fm_decrypt (ctx, fn);
+             break;
+         case PGP_PUBKEY:
+         case PGP_SECKEY:
+             fm_import (ctx, fn);
+             break;
+         case PGP_SIG:
+         case PGP_CLEARSIG:
+             file_verify_use_event ();
+             if (type == PGP_SIG)
+                 detached = 1;
+             fm_verify (ctx, detached, fn);
+             file_verify_wait ();
+             break;
+         default:
+             break;
+         }
+     }
+     wipememory (&ctx->pass_cb, sizeof (ctx->pass_cb));
+     free_if_alloc (fn);
+     fm_state_release (ctx);
+     return count;
+ }
+ /* Extract the last folder name from @name. */
+ const char*
+ default_dirname (const char *name)
+ {
+     char *p = strrchr (name, '\\');
+     if (!p)
+         return NULL;
+     return p+1;
+ }
+ /* Store all selected files from @lv in a zip archive
+    and encrypt the zip archive then.
+    Return value: 0 on success. */
+ int
+ fm_encrypt_into_zip (fm_state_t ctx, listview_ctrl_t lv)
+ {
+     PK_FILE_LIST list=NULL;
+     const char *outfile;
+     char *out_enc;
+     int nitems = listview_count_items (lv, 0);
+     int i, idx = -1;
+     int rc;
+     if (!nitems) {
+         msg_box (NULL, _("Encrypting into a ZIP archive makes sense with multiple files"),
+                  _("File Manager"), MB_ERR);
+         return WPTERR_GENERAL;
+     }
+     outfile = get_filesave_dlg (ctx->dlg, _("Choose File Name for Output"),
+                                 NULL, "Encrypted_Files.zip");
+     if (!outfile)
+         return WPTERR_GENERAL;
+     for (i=0; i < nitems; i++) {
+         char name[300];
+         if (!listview_get_item_state (lv, i))
+             continue;
+         if (idx == -1)
+             idx = i;
+         listview_get_item_text (lv, i, 1, name, sizeof (name)-1);
+         pk_list_add (&list, name);
+     }
+     pk_archiv_create (list, outfile);
+     pk_list_free (list);
+     rc = fm_encrypt (ctx, outfile, 0);
+     DeleteFile (outfile);
+     if (rc)
+         return rc;
+     out_enc = make_filename (NULL, outfile, "gpg");
+     fm_set_status (lv, idx, FM_ENCRYPT, (gpgme_sig_mode_t)0, 1, out_enc);
+     free_if_alloc (out_enc);
+     for (i=0; i < nitems; i++) {
+         if (i != idx && listview_get_item_state (lv, i))
+             listview_del_item (lv, i);
+     }
+     return 0;
+ }
+ int
+ fm_encrypt_directory (fm_state_t c, const char *name)
+ {
+     PK_FILE_LIST list = NULL;
+     WIN32_FIND_DATA findbuf;
+     HANDLE hd;
+     const char * s;
+     char * patt = NULL, * p;
+     int rc = 0;
+     if (!is_directory (name))
+         return -1;
+     patt = new char[strlen (name) + 4];
+     if (!patt)
+         BUG (NULL);
+     strcpy (patt, name);
+     strcat (patt, "\\*");
+     hd = FindFirstFile (patt, &findbuf);
+     if (!hd) {
+         free_if_alloc (patt);
+         return WPTERR_GENERAL;
+     }
+     if( strcmp( findbuf.cFileName, "." ) && strcmp( findbuf.cFileName, ".." ) ) {
+         p = make_filename( name, findbuf.cFileName, NULL );
+         pk_list_add( &list, p );
+         free_if_alloc( p );
+     }
+     while( FindNextFile( hd, &findbuf ) ) {
+         if( strcmp( findbuf.cFileName, "." ) && strcmp( findbuf.cFileName, ".." ) ) {
+             p = make_filename( name, findbuf.cFileName, NULL );
+             pk_list_add( &list, p );
+             free_if_alloc( p );
+         }
+     }
+     s = get_filesave_dlg (c->dlg, _("Choose a Name for the Archive"),
+                           NULL, default_dirname (name));
+     if( !s ) {
+         msg_box( c->dlg, _("Invalid archive name. Exit."), _("Encrypt Directory"), MB_ERR );
+         rc = -1;
+         goto leave;
+     }
+     rc = pk_archiv_create( list, s );
+     if( rc )
+         msg_box( c->dlg, _("Could not create zip archive."), _("Encrypt Directory"), MB_ERR );
+     else {
+         fm_encrypt( c, s, 0 );
+         remove( s );
+     }
+ leave:
+     FindClose (hd);
+     pk_list_free( list );
+     free_if_alloc( patt );
+     return rc;
+ }
+ static int CALLBACK
+ fm_cmp_cb (LPARAM first, LPARAM second, LPARAM sortby)
+ {
+     const char *a = 0;
+     const char *b = 0;
+     switch( (int)sortby ) {
+     case FM_SORT_STAT:
+         break;
+     case FM_SORT_NAME:
+         break;
+     case FM_SORT_OP:
+         break;
+     }
+     return stricmp (a, b);
+ }
+ /* Sort the list items from @lv with the mode given by @sortby. */
+ int
+ fm_sort (listview_ctrl_t lv, int sortby)
+ {
+     return listview_sort_items( lv, sortby, fm_cmp_cb );
+ }
+ /* Start the 'print md' dialog. Pass over the listview control
+    @lv and the digest algo @mdalgo. */
+ void
+ fm_print_md (listview_ctrl_t lv, HWND dlg, int mdalgo)
+ {
+     struct md_file_s mdctx;
+     if (listview_count_items (lv, 0) == 0)
+         return;
+     memset (&mdctx, 0, sizeof (mdctx));
+     mdctx.lv = lv;
+     mdctx.mdalgo = mdalgo;
+     DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_FILE_MDSUM, dlg,
+                     mdsum_dlg_proc, (LPARAM)&mdctx);
+ }
+ /* Send the selected file in @lv via MAPI to a mail recipient. */
+ int
+ fm_send_file (listview_ctrl_t lv)
+ {
+     char buf[128];
+     int rc;
+     rc = listview_get_item_text (lv, -1, 1, buf, sizeof (buf)-1);
+     if (rc != -1)
+         mapi_send_ascfile (buf);
+     return 0;
+ }

 Legend:



Removed from v.4
 


changed lines


 
Added in v.167
 Legend:



Removed from v.4
 


changed lines


 
Added in v.167
-Removed from v.4
+Added in v.167

[email protected]	ViewVC Help
Powered by ViewVC 1.1.26