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

Diff of /trunk/Src/wptFileManager.cpp

Parent Directory | Revision Log | View Patch Patch

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


changed lines


 
Added in v.177
 Legend:



Removed from v.28
 


changed lines


 
Added in v.177
-Removed from v.28
+Added in v.177

[email protected]	ViewVC Help
Powered by ViewVC 1.1.26