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

Diff of /trunk/Src/WinPT.cpp

Parent Directory | Revision Log | View Patch Patch

-revision 14 by twoaday,
Wed May  4 07:59:42 2005 UTC
+revision 167 by twoaday,
Thu Jan 26 10:17:17 2006 UTC
 Line 1
  /* WinPT.cpp - Windows Privacy Tray (WinPT)
-  *      Copyright (C) 2000-2005 Timo Schulz
+  *      Copyright (C) 2000-2006 Timo Schulz
   *
   * This file is part of WinPT.
   *
   * WinPT is free software; you can redistribute it and/or modify
   * it under the terms of the GNU General Public License as published by
   * the Free Software Foundation; either version 2 of the License, or
   * (at your option) any later version.
   *
   * WinPT is distributed in the hope that it will be useful,
   * but WITHOUT ANY WARRANTY; without even the implied warranty of
   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   * GNU General Public License for more details.
   *
   * You should have received a copy of the GNU General Public License
   * along with WinPT; if not, write to the Free Software Foundation,
   * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
   */
- #include <windows.h>
+ #ifdef HAVE_CONFIG_H
+ #include <config.h>
- #include "../resource.h"
+ #endif
- #include "wptTypes.h"
- #include "wptW32API.h"
+ #include <windows.h>
- #include "wptVersion.h"
+ #include <shlobj.h>
- #include "wptErrors.h"
- #include "wptGPG.h"
+ #include "resource.h"
- #include "wptRegistry.h"
+ #include "wptTypes.h"
- #include "wptCommonCtl.h"
+ #include "wptW32API.h"
- #include "wptDlgs.h"
+ #include "wptVersion.h"
- #include "wptNLS.h"
+ #include "wptErrors.h"
- #include "wptKeyserver.h"
+ #include "wptGPG.h"
- #include "wptCard.h"
+ #include "wptRegistry.h"
- #include "wptFileManager.h"
+ #include "wptCommonCtl.h"
- #include "wptContext.h"
+ #include "wptDlgs.h"
+ #include "wptNLS.h"
- HINSTANCE glob_hinst; /* global instance for the dialogs */
+ #include "wptKeyserver.h"
- HWND glob_hwnd; /* global window handle for the dialogs */
+ #include "wptCard.h"
- HWND activ_hwnd;
+ #include "wptFileManager.h"
- LOCK mo_file;
+ #include "wptContext.h"
- int scard_support = 0;
+ #include "wptCardEdit.h"
- int debug = 0;
+ #include "wptCrypto.h"
- int mobile = 0;
- int gpg_read_only = 0;
- char gpgver[3];
+ HINSTANCE glob_hinst;   /* global instance for the dialogs */
+ HWND glob_hwnd;         /* global window handle for the dialogs */
- /* Internal IPC */
+ HWND activ_hwnd;
- int start_keymanager = 0;
+ int scard_support = 0;
+ int debug = 0;
- static void
+ int mobile = 0;
- update_keycache (HWND hwnd)
+ int gpg_read_only = 0;
- {
+ char gpgver[3];
-     refresh_cache_s rcs = {0};
-     rcs.kr_reload = 0;
-     rcs.kr_update = 1;
+ /* Load the key cache and rebuild the signature cache. */
-     rcs.tr_update = 1;
+ static void
-     DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, hwnd,
+ update_keycache (HWND hwnd)
-                     keycache_dlg_proc, (LPARAM)&rcs);
+ {
- } /* update_keycache */
+     refresh_cache_s rcs = {0};
+     rcs.kr_reload = 0;
+     rcs.kr_update = 1;
- static char *
+     rcs.tr_update = 1;
- get_gettext_lang (void)
+     DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, hwnd,
- {
+                     keycache_dlg_proc, (LPARAM)&rcs);
-     char * fname;
+ }
-     fname = get_reg_entry_mo ();
-     if (!fname)
-         return NULL;
+ /* Set GPGME debug mode. If @val is 0, the debug mode is disabled. */
-     return fname;
+ void
- } /* get_gettext_lang */
+ gpg_set_debug_mode (int val)
+ {
+     if (val)
- static void
+         putenv ("GPGME_DEBUG=5:gpgme.dbg");
- load_gettext (void)
+     else
- {
+         putenv ("GPGME_DEBUG=");
-     char * nls = NULL;
+ }
-     char * file = NULL;
-     nls = get_gettext_lang ();
+ /* Return the name of the gettext language file. */
-     if (nls) {
+ static char*
-         set_gettext_file ("winpt", nls);
+ get_gettext_lang (void)
-         file = make_filename (nls, "winpt", "mo");
+ {
-         if (!file_exist_check (nls) && init_file_lock (&mo_file, file))  {
+     char *fname;
-             msg_box (NULL, _("Could not initizalize file lock.\n"
+     fname = get_reg_entry_mo ();
-                              "Native Language Support"),
+     if (!fname)
-                      _("WinPT Error"), MB_ERR);
+         return NULL;
-         }
+     return fname;
-         free_if_alloc (nls);
+ }
-         free_if_alloc (file);
-     }
- } /* load_gettext */
+ /* Initialize the gettext sub system. */
+ static void
+ load_gettext (int prev_inst)
- /* check if the default key from the gpg.conf file is available in the
+ {
-    keyring. if not, bail out because encryption won't work properly then. */
+     char *nls = NULL;
- static int
- check_default_key (gpgme_keycache_t kc)
+     nls = get_gettext_lang ();
- {
+     if (nls != NULL) {
-     gpgme_key_t key;
+         set_gettext_file ("winpt", nls);
-     gpgme_error_t err = GPGME_No_Error;
+         free_if_alloc (nls);
-     char * defkey;
+     }
+ }
-     defkey = get_gnupg_default_key ();
-     if (defkey)
-         err = gpgme_keycache_find_key (kc, defkey, 0, &key);
+ /* Return true if the GPG environment is useable. */
-     free_if_alloc (defkey);
+ static bool
-     return err? -1 : 0;
+ gpg_prefs_ok (void)
- } /* check_default_key */
+ {
+     char *p;
- /* Return the WinPT program file name (with full pathname). */
+     p = get_reg_entry_gpg4win ("gpg.exe");
- static const char *
+     if (!p || file_exist_check (p) != 0) {
- get_prog_part (const char * fname, int use_cwd)
+         free_if_alloc (p);
- {
+         p = get_reg_entry_gpg ("gpgProgram");
-     static char program[1024];
+         if (!p || file_exist_check (p) != 0) {
-     char currdir[256], * cmd = NULL;
+             free_if_alloc (p);
-     int j;
+             return false;
+         }
-     memset (currdir, 0, DIM (currdir));
+     }
-     memset (program, 0, DIM (program));
+     free_if_alloc (p);
+     p = get_reg_entry_gpg4win (NULL);
-     if (use_cwd) {
+     if (!p || dir_exist_check (p) != 0) {
-         GetCurrentDirectory (DIM (currdir)-1, currdir);
+         free_if_alloc (p);
-         _snprintf (program, DIM (program)-1, "%s\\%s", currdir, fname);
+         p = get_reg_entry_gpg ("HomeDir");
-     }
+         if (!p || dir_exist_check (p) != 0) {
-     else {
+             free_if_alloc (p);
-         cmd = GetCommandLine ();
+             return false;
-         if (cmd == NULL)
+         }
-             return NULL;
+     }
-         strncpy (currdir, cmd, 255);
+     free_if_alloc (p);
-         j = strlen (currdir);
+     return true;
-         while (j--) {
+ }
-             if (currdir[j] == '\\')
-                 break;
-         }
-         currdir[j] = 0;
+ /* Load the GPG environment. On the first start, some
-         _snprintf (program, DIM (program)-1, "%s\\%s", currdir + 1, fname);
+    checks are performed to find out in what state GPG is.
-     }
+    Return value: 0  everything OK.
-     return program;
+                  >0  fatal error.
- } /* get_prog_part */
+                  -1 public keyring is empty or does not exist. */
+ static int
+ load_gpg_env (void)
- static int
+ {
- check_crypto_engine (void)
+     SECURITY_ATTRIBUTES sec_attr;
- {
+     char *p;
-     int ma=1, mi=2, pa=4; /* GPG 1.2.4 */
+     char *pkr;
-     int rc;
+     p = get_reg_entry_gpg4win ("gpg.exe");
-     rc = check_gnupg_engine (&ma, &mi, &pa);
+     if (!p)
-     if (rc == -1) {
+         return (1);
-         msg_box (NULL, _("Could not read GnuPG version."), _("WinPT Error"), MB_ERR);
+     if (file_exist_check (p)) {
-         return rc;
+         free_if_alloc (p);
-     }
+         return (1);
-     else if (rc) {
+     }
-         log_box (_("WinPT Error"), MB_ERR,
+     free_if_alloc (p);
-                  _("Sorry, you need a newer GPG version.\n"
-                    "GPG version %d.%d.%d requred GPG version 1.2.4"),
+     p = get_reg_entry_gpg ("HomeDir");
-                    ma, mi, pa);
+     if (!p || dir_exist_check (p) != 0) {
-         return rc;
+         free_if_alloc (p);
-     }
+         p = multi_gnupg_path (0);
-     /* We enable smartcard support for GPG: 1.9.x or >= 1.4.0 */
+     }
-     if (ma >= 1 && mi >= 4)
+     if (p && dir_exist_check (p)) {
-         scard_support = 1;
+         memset (&sec_attr, 0, sizeof (sec_attr));
+         sec_attr.nLength = sizeof (sec_attr);
-     gpgver[0] = ma;
+         if (!CreateDirectory (p, &sec_attr)) {
-     gpgver[1] = mi;
+             msg_box (NULL, _("Could not create GPG home directory"),
-     gpgver[2] = pa;
+                      _("WinPT Error"), MB_ERR);
-     return rc;
+             free_if_alloc (p);
- } /* check_crypto_engine */
+             return (2);
+         }
+     }
- static int
+     pkr = make_filename (p, "pubring", "gpg");
- load_keyserver_conf (int quiet)
+     free_if_alloc (p);
- {
+     if (!pkr)
-     const char * t;
+         return -1;
-     int rc;
+     if (get_file_size (pkr) == 0) {
+         free_if_alloc (pkr);
-     if (reg_prefs.kserv_conf)
+         return -1;
-         t = reg_prefs.kserv_conf;
+     }
-     else if (!file_exist_check (get_prog_part ("keyserver.conf", 0)))
+     return 0;
-         t = get_prog_part ("keyserver.conf", 0);
+ }
-     else
-         t = "keyserver.conf";
-     rc = kserver_load_conf (t);
+ /* check if the default key from the gpg.conf file is available in the
-     if (rc && !quiet)
+    keyring. if not, bail out because encryption won't work properly then. */
-         msg_box (NULL, winpt_strerror (rc), _("Keyserver"), MB_ERR);
+ static int
-     return rc;
+ check_default_key (gpg_keycache_t kc)
- }
+ {
+     gpgme_key_t key;
+     gpgme_error_t err = GPG_ERR_NO_ERROR;
- static void
+     char *defkey;
- enable_mobile_mode (void)
- {
+     defkey = get_gnupg_default_key ();
-     memset (&reg_prefs, 0, sizeof (reg_prefs));
+     if (defkey)
-     reg_prefs.always_trust = 0;
+         err = gpg_keycache_find_key (kc, defkey, 0, &key);
-     reg_prefs.auto_backup = 0;
+     else
-     reg_prefs.cache_time = 0;
+         msg_box (NULL, _("No useable secret key found."),
-     reg_prefs.expert = 0;
+                  _("WinPT Error"), MB_ERR);
-     reg_prefs.keylist_mode = 1;
+     free_if_alloc (defkey);
-     reg_prefs.kserv_conf = m_strdup ("keyserver.conf");
+     return err? -1 : 0;
-     reg_prefs.no_zip_mmedia = 1;
+ }
-     reg_prefs.use_tmpfiles = 1;
-     reg_prefs.word_wrap = 80;
-     reg_prefs.use_viewer = 0; /* XXX */
+ /* Return the WinPT program file name (with full pathname). */
- }
+ static const char*
+ get_prog_part (const char * fname, int use_cwd)
- char* get_subkey_fingerprint (gpgme_ctx_t ctx, const char *keyid);
+ {
+     static char program[512];
- int WINAPI
+     char currdir[256];
- #ifndef WINPT_IPC
+     char *cmd = NULL;
- WinMain (HINSTANCE hinst, HINSTANCE hprev, LPSTR cmdline, int showcmd)
+     int j;
- #else
- win_main (HINSTANCE hinst, HINSTANCE hprev, LPSTR cmdline, int showcmd)
+     memset (currdir, 0, DIM (currdir));
- #endif
+     memset (program, 0, DIM (program));
- {
-     WNDCLASS wc = {0, winpt_main_proc, 0, 0, hinst, 0, 0, 0, 0, PGM_NAME};
+     if (use_cwd) {
-     HACCEL accel_tab;
+         GetCurrentDirectory (DIM (currdir)-1, currdir);
-     int rc, ec, created = 0, use_cwd = 0, nfiles = 0;
+         _snprintf (program, DIM (program)-1, "%s\\%s", currdir, fname);
-     int first_start = 0, start_gpgprefs = 0;
+     }
-     const char * s;
+     else {
-     MSG msg;
+         cmd = GetCommandLine ();
-     HWND hwnd;
+         if (cmd == NULL)
+             return NULL;
-     glob_hinst = hinst;
+         strncpy (currdir, cmd, sizeof (currdir)-1);
+         j = strlen (currdir);
-     gpgme_lib_init ();
+         while (j--) {
-     #ifdef _DEBUG
+             if (currdir[j] == '\\')
-     gpgme_set_debug_mode (1);
+                 break;
-     #endif
+         }
-     gpgme_set_pgm_string ("WinPT "PGM_VERSION);
+         currdir[j] = 0;
+         _snprintf (program, DIM (program)-1, "%s\\%s", currdir + 1, fname);
-     s = PTD_get_version ();
+     }
-     if (strcmp (s, "0.8.0")) {
+     return program;
-         log_box (_("Privacy Tray Dynamic (PTD)"), MB_ERR,
+ }
-                  _("Please update your PTD.dll to the newest version, "
-                    "the version (%s) you use is too old."), s);
-         return 0;
+ /* Check that the underlying crypto engine fullfills the minimal
-     }
+    requirements so all commands work properly. */
+ static bool
-     if (gpg_md_selftest ()) {
+ check_crypto_engine (void)
-         msg_box (NULL, _("Cryptographic selftest failed."),
+ {
-                  _("WinPT Error"), MB_ERR);
+     int ma=0, mi=0, pa=0;
-         return 0;
+     int rc;
-     }
+     rc = check_gnupg_engine (NEED_GPG_VERSION, &ma, &mi, &pa);
-     if (cmdline && stristr (cmdline, "--mobile"))
+     if (rc == -1) {
-         mobile = 1;
+         msg_box (NULL, _("Could not read GnuPG version."),
+                  _("WinPT Error"), MB_ERR);
-     set_default_kserver ();
+         return false;
+     }
-     if (!mobile) {
+     else if (rc) {
-         regist_inst_gnupg (1);
+         log_box (_("WinPT Error"), MB_ERR,
-         regist_inst_winpt (1, &created);
+                  _("Sorry, you need a newer GPG version.\n"
-     }
+                    "GPG version %d.%d.%d required GPG version "NEED_GPG_VERSION),
-     else {
+                    ma, mi, pa);
-         enable_mobile_mode ();
+         return false;
-         /* XXX: ask for GPG path */
+     }
-         created = 1; /* Disable registry writing */
+     /* We enable smartcard support for GPG: >= 2 or >= 1.4.3 */
-     }
+     if (ma > 1 || pa >= 3)
+         scard_support = 1;
-     if (!created) {
-         memset (&reg_prefs, 0, sizeof (reg_prefs));
+     gpgver[0] = ma;
-         reg_prefs.use_tmpfiles = 1; /* default */
+     gpgver[1] = mi;
-         reg_prefs.fm.progress = 0; /* XXX: fix the bug and enable it again */
+     gpgver[2] = pa;
-         get_reg_winpt_prefs (&reg_prefs);
+     return true;
-         if (!reg_prefs.no_hotkeys)
+ }
-             hotkeys_modify ();
-     }
+ /* Try to load the keyserver config file. If @quiet is 1
-     rc = gnupg_check_homedir ();
+    do not show any errors. */
-     if (rc) {
+ static int
-         log_box (_("WinPT Error"), MB_ERR,
+ load_keyserver_conf (int quiet)
-                  _("GPG home directory is not set correctly.\n"
+ {
-                    "Please check the GPG registry settings:\n%s."),
+     char *buf;
-                  winpt_strerror (rc));
+     const char *t;
-         const char * s = get_filename_dlg (GetActiveWindow (), FILE_OPEN,
+     int rc;
-                                            _("Select GPG Public Keyring"),
-                                            _("GPG Keyrings (*.gpg)\0*.gpg\0\0"),
+     /* Create $APPDATA\winpt if needed. */
-                                            NULL);
+     buf = make_special_filename (CSIDL_APPDATA, "winpt", NULL);
-         if (s && !file_exist_check (s))
+     if (buf && dir_exist_check (buf) && !CreateDirectory (buf, NULL)) {
-         {
+         MessageBox (NULL, _("Failed to create WinPT directory"),
-             size_t n;
+                     _("Keyserver"), MB_ERR);
-             char * p = strrchr (s, '\\');
+         free_if_alloc (buf);
-             if (!p)
+         return -1;
-                 BUG (0);
+     }
-             n = p - s;
+     free_if_alloc (buf);
-             if (n)
-             {
+     /* Check for $APPDATA\winpt\keyserver.conf */
-                 char * file = new char[n+1];
+     buf = make_special_filename (CSIDL_APPDATA, "winpt\\keyserver.conf", NULL);
-                 if (!file)
-                     BUG (NULL);
+     if (!file_exist_check (get_prog_part ("keyserver.conf", 0)))
-                 memset (file, 0, n);
+         t = get_prog_part ("keyserver.conf", 0);
-                 memcpy (file, s, n);
+     else
-                 file[n] = '\0';
+         t = "keyserver.conf";
-                 set_reg_entry_gpg ("HomeDir", file);
+     if (file_exist_check (t) == 0 && file_exist_check (buf) != 0) {
-                 free_if_alloc (file);
+         //log_box (_("Keyserver"), MB_INFO,
-                 gnupg_check_homedir (); /* change gpgProgram if needed */
+         //       _("keyserver.conf will be copied to \"%s\"\r\n"), buf);
-             }
+         if (!CopyFile (t, buf, FALSE)) {
-         }
+             MessageBox (NULL, _("Failed to copy the keyserver.conf"),
-         else {
+                         _("Keyserver"), MB_ERR);
-             msg_box (NULL, _("GPG home directory could not be determited."),
+             free_if_alloc (buf);
-                      _("WinPT Error"), MB_ERR);
+             return -1;
-             goto start;
+         }
-         }
+         t = buf;
      }
+     else
-     rc = check_gnupg_prog ();
+         t = buf;
-     if (rc) {
-         if (msg_box (NULL, _("Could not find the GPG binary (gpg.exe).\n"
+     rc = kserver_load_conf (t);
-                              "Do you want to start the GPG preferences to "
+     if (rc && !quiet)
-                              "correct  this problem?"), _("WinPT Error"),
+         msg_box (NULL, winpt_strerror (rc), _("Keyserver"), MB_ERR);
-                              MB_INFO|MB_YESNO) == IDYES)
+     else {
-             start_gpgprefs = 1;
+         free_if_alloc (reg_prefs.kserv_conf);
-         else
+         reg_prefs.kserv_conf = m_strdup (t);
-         {
+     }
-             msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
+     free_if_alloc (buf);
-             return 0;
+     return rc;
-         }
+ }
-     }
-     rc = gnupg_access_files ();
+ /* Check if both keyrings are empty. This indicates that
-     if (!start_gpgprefs && rc)
+    WinPT should offer to generate a key pair. */
-     {
+ static bool
-         if (rc == WPTERR_GPG_KEYRINGS || rc == WPTERR_GPG_OPT_KEYRINGS)
+ check_for_empty_keyrings (bool pub_only)
-         {
+ {
-             ec = msg_box (NULL,
+     char *p;
-                 _("Could not access and/or find the public and secret keyring.\n"
+     int n = 0;
-                   "If this is an accident, quit the program and fix it.\n\n"
-                   "Continue if you want that WinPT offers you more choices.\n"),
+     p = get_gnupg_keyring (1, 0);
-                   "WinPT", MB_INFO|MB_YESNO);
+     if (file_exist_check (p) == 0 && get_file_size (p) == 0)
-             if (ec == IDYES)
+         n++;
-                 first_start = 1;
+     free_if_alloc (p);
-         }
+     if (pub_only)
-         if (!first_start)
+         return n == 1? true : false;
-         {
+     p = get_gnupg_keyring (0, 0);
-             msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
+     if (file_exist_check (p) == 0 && get_file_size (p) == 0)
-             return 0;
+         n++;
-         }
+     free_if_alloc (p);
-     }
+     return n==2? true : false;
+ }
-     if (!first_start)
-     {
-         rc = gpg_check_permissions (1);
+ /* Enable the mobility mode. */
-         if (rc && rc == 2)
+ static void
-             gpg_read_only = 1;
+ enable_mobile_mode (void)
-         else if (rc)
+ {
-             return 0;
+     memset (&reg_prefs, 0, sizeof (reg_prefs));
-     }
+     reg_prefs.always_trust = 0;
+     reg_prefs.auto_backup = 0;
-     load_gettext ();
+     reg_prefs.cache_time = 0;
-     init_gnupg_table ();
+     reg_prefs.expert = 0;
+     reg_prefs.keylist_mode = 1;
-     nfiles = fm_parse_command_line (cmdline);
+     reg_prefs.kserv_conf = m_strdup ("keyserver.conf");
-     if (nfiles > 0)
+     reg_prefs.no_zip_mmedia = 1;
-         return 0;
+     reg_prefs.use_tmpfiles = 1;
+     reg_prefs.word_wrap = 80;
-     if (cmdline && stristr (cmdline, "--wipe-freespace")) {
+     reg_prefs.use_viewer = 0; /* XXX */
-         dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_SPACE_SECDEL,
+ }
-                             GetDesktopWindow(), space_wipefrees_dlg_proc, NULL,
-                             _("Wipe Free Space"), IDS_WINPT_SPACE_SECDEL);
-         free_gnupg_table ();
+ /* Main entry point. */
-         return 0;
+ int WINAPI
-     }
+ WinMain (HINSTANCE hinst, HINSTANCE hprev, LPSTR cmdline, int showcmd)
+ {
-     load_keyserver_conf (cmdline? 1 : 0);
+     WNDCLASS wc = {0, winpt_main_proc, 0, 0, hinst, 0, 0, 0, 0, PGM_NAME};
-     if (start_keymanager) {
+     HACCEL accel_tab;
-         dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYMISC,
+     MSG msg;
-                             GetDesktopWindow(), keymanager_dlg_proc, NULL,
+     HWND hwnd = NULL;
-                             _("Key Manager"), IDS_WINPT_KEYMISC);
+     WORD ver[3], ptdver[4];
-         keycache_release ();
+     int rc, ec, created = 0;
-         free_gnupg_table ();
+     int first_start = 0, start_gpgprefs = 0;
-         return 0;
+     int winpt_inst_found = 0;
-     }
+     int start_manager = 0;
+     const char *s;
-     if (cmdline && (stristr (cmdline, "--keymanager")
-                 || stristr (cmdline, "--cardmanager"))) {
+     glob_hinst = hinst;
-         update_keycache (GetDesktopWindow ());
+     if (cmdline && stristr (cmdline, "--stop")) {
-         if (stristr (cmdline, "keymanager"))
+         hwnd = FindWindow ("WinPT", "WinPT");
-             dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYMISC,
+         if (hwnd != NULL)
-                             GetDesktopWindow(), keymanager_dlg_proc, NULL,
+             PostMessage (hwnd, WM_DESTROY, 0, 0);
-                             _("Key Manager"), IDS_WINPT_KEYMISC);
+         return 0;
-         else {
+     }
-             gpgme_card_t crd = smartcard_init ();
-             if (crd)
+     /*
-                 dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_CARD_EDIT,
+     OSVERSIONINFO osinf;
-                                   GetDesktopWindow(), card_edit_dlg_proc,
+     memset (&osinf, 0, sizeof (osinf));
-                                   (LPARAM)crd, _("Card Manager"),
+     if (GetVersionEx (&osinf) &&
-                                   IDS_WINPT_CARD_EDIT);
+         osinf.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS &&
-             gpgme_card_release (crd);
+         osinf.dwMinorVersion == 0) {
-         }
+         msg_box (NULL, "WinPT propably does not work on Windows 95 without restrictions",
-         keycache_release ();
+                  "WinPT Warning", MB_INFO);
-         free_gnupg_table ();
+     }
-         return 0;
+     */
-     }
+     #ifdef _DEBUG
-     CreateMutex (NULL, TRUE, PGM_NAME);
+     gpg_set_debug_mode (1);
-     if (GetLastError () == ERROR_ALREADY_EXISTS) {
+     debug = 1;
-         free_gnupg_table ();
+     #endif
-         return 0;
-     }
+     get_file_version ("WinPT.exe", &ver[0], &ver[1], &ver[2], &ver[3]);
+     get_file_version ("PTD.dll", &ptdver[0], &ptdver[1],
-     if (cmdline) {
+                                  &ptdver[2], &ptdver[3]);
-         if (stristr (cmdline, "--enable-debug") || stristr (cmdline, "--debug")) {
+     /* XXX
-             gpgme_set_debug_mode (1);
+     if (ptdver[0] != ver[0] || ptdver[1] != ver[1]|| ptdver[2] != ver[2]) {
-             winpt_debug_msg ();
+         log_box (_("WinPT Error"), MB_ERR,
-             debug = 1;
+                  _("The PTD.dll file has a different version than WinPT.exe\n"
-         }
+                    "Please update the PTD.dll to version %d.%d.%d"),
-     }
+                    ver[0], ver[1], ver[2]);
+         return 0;
-     wc.hIcon = LoadIcon (glob_hinst, MAKEINTRESOURCE (IDI_WINPT));
+     }
-     rc = RegisterClass (&wc);
+     */
-     if (rc == FALSE) {
-         msg_box (NULL, _("Could not register window class"), _("WinPT Error"), MB_ERR);
+     if (gpg_md_selftest ()) {
-         free_gnupg_table ();
+         msg_box (NULL, _("Cryptographic selftest failed."),
-         return 0;
+                  _("WinPT Error"), MB_ERR);
-     }
+         return 0;
+     }
-     hwnd = CreateWindow (PGM_NAME,
-                          PGM_NAME,
+     s = gpgme_check_version (NEED_GPGME_VERSION);
-, 0, 0, 0, 0,
+     if (!s || !*s) {
-                          NULL,
+         msg_box (NULL, _("A newer GPGME version is needed; at least "NEED_GPGME_VERSION),
-                          NULL,
+                  _("WinPT Error"), MB_ERR);
-                          hinst,
+         return 0;
-                          NULL);
+     }
-     if (hwnd == NULL) {
-         msg_box (NULL, _("Could not create window"), _("WinPT Error"), MB_ERR);
+     CreateMutex (NULL, TRUE, PGM_NAME);
-         free_gnupg_table ();
+     if (GetLastError () == ERROR_ALREADY_EXISTS)
-         return 0;
+         winpt_inst_found = 1;
-     }
-     glob_hwnd = hwnd;
+     if (cmdline && stristr (cmdline, "--mobile")) {
-     UpdateWindow (hwnd);
+         msg_box (NULL, "WARNING: mobile modus is not fully implemented yet!",
+                  "WinPT", MB_INFO);
-     if (!first_start && !start_gpgprefs) {
+         mobile = 1;
-         gnupg_backup_options (1);
+     }
-         gnupg_backup_options (0);
+     set_default_kserver ();
-         rc = check_crypto_engine ();
+     load_gettext (winpt_inst_found);
-         if (rc) {
-             DestroyWindow (hwnd);
+     if (!mobile) {
-             free_gnupg_table ();
+         regist_inst_gnupg (1);
-             return 0;
+         regist_inst_winpt (1, &created);
-         }
+     }
-     }
+     else {
+         enable_mobile_mode ();
-     if (start_gpgprefs)
+         /* XXX: ask for GPG path */
-     {
+         created = 1; /* Disable registry writing */
-         char *ring;
+     }
-         size_t size = 0;
-         DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,
+     if (!created) {
-                         gpgprefs_dlg_proc, NULL);
+         memset (&reg_prefs, 0, sizeof (reg_prefs));
-         ring = get_gnupg_keyring (0, !NO_STRICT);
+         reg_prefs.use_tmpfiles = 1; /* default */
-         if (gnupg_access_keyring (0) == -1 && get_file_size (ring) == 0)
+         reg_prefs.fm.progress = 0; /* XXX: fix the bug and enable it again */
-             first_start = 1; /* The keyring is empty! */
+         get_reg_winpt_prefs (&reg_prefs);
-         free_if_alloc (ring);
+         if (!reg_prefs.no_hotkeys)
-     }
+             hotkeys_modify ();
+         gnupg_load_config ();
-     if (first_start) {
+     }
-         struct key_wizard_s c, dummy;
- start:
+     if (is_gpg4win_installed ())
-         DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_FIRST, hwnd,
+         load_gpg_env (); /* XXX: check return code. */
-                         first_run_dlg_proc, (LPARAM)&dummy);
-         switch (dummy.interactive)
+     rc = gnupg_check_homedir ();
-         {
+     if (rc) {
-         case SETUP_KEYGEN:
+         log_box (_("WinPT Error"), MB_ERR,
-             c.interactive = 1;
+                  _("GPG home directory is not set correctly.\n"
-             rc = DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYWIZARD,
+                    "Please check the GPG registry settings:\n%s."),
-                                  hwnd, keygen_wizard_dlg_proc, (LPARAM)&c);
+                  winpt_strerror (rc));
-             if (!rc)
+         s = get_fileopen_dlg (GetActiveWindow (),
-                 goto start;
+                               _("Select GPG Public Keyring"),
-             break;
+                               "GPG Keyrings (*.gpg)\0*.gpg\0\0",
+                               NULL);
-         case SETUP_IMPORT:
+         if (s != NULL) {
-             rc = gnupg_copy_keyrings ();
+             size_t n;
-             if (rc) {
+             char *p = strrchr (s, '\\');
-                 msg_box (hwnd, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
+             if (!p)
-                 goto start;
+                 BUG (0);
-             }
+             n = p - s;
-             break;
+             if (n) {
+                 char *file = new char[n+1];
-         case SETUP_EXISTING:
+                 if (!file)
-             DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,
+                     BUG (NULL);
-                             gpgprefs_dlg_proc, NULL);
+                 memset (file, 0, n);
-             break;
+                 memcpy (file, s, n);
+                 file[n] = '\0';
-         case -1:
+                 set_reg_entry_gpg ("HomeDir", file);
-             DestroyWindow (hwnd);
+                 free_if_alloc (file);
-             free_gnupg_table ();
+                 gnupg_check_homedir (); /* change gpgProgram if needed */
-             return 0;
+             }
          }
-         update_keycache (hwnd);
+         else {
-         check_crypto_engine ();
+             msg_box (NULL, _("GPG home directory could not be determited."),
-     }
+                      _("WinPT Error"), MB_ERR);
-     else {
+             goto start;
-         gpgme_keycache_t c;
+         }
-         update_keycache (hwnd);
+     }
-         c = keycache_get_ctx (1);
-         if (!c || !gpgme_keycache_count (c)) {
+     rc = check_gnupg_prog ();
-             gnupg_display_error ();
+     if (rc) {
-             msg_box (hwnd, _("The keycache was not initialized or is empty.\n"
+         if (msg_box (NULL, _("Could not find the GPG binary (gpg.exe).\n"
-                              "Please check your GPG config (keyrings, pathes...)"),
+                              "Do you want to start the GPG preferences to "
-                              _("WinPT Error"), MB_ERR);
+                              "correct  this problem?"), _("WinPT Error"),
-             ec = msg_box (NULL, _("It seems that GPG is not set properly.\n"
+                              MB_INFO|MB_YESNO) == IDYES)
-                                   "Do you want to start the GPG preferences dialog?"),
+             start_gpgprefs = 1;
-                             "WinPT", MB_INFO|MB_YESNO);
+         else {
-             if (ec == IDYES) {
+             msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
-                 DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,
+             return 0;
-                                 gpgprefs_dlg_proc, NULL);
+         }
-                 update_keycache (hwnd);
+     }
-             }
-             else {
+     rc = gnupg_access_files ();
-                 DestroyWindow (hwnd);
+     if (!start_gpgprefs && rc) {
-                 free_gnupg_table ();
+         if (rc == WPTERR_GPG_KEYRINGS || rc == WPTERR_GPG_OPT_KEYRINGS) {
-                 return 0;
+             ec = msg_box (NULL,
-             }
+                 _("Could not access and/or find the public and secret keyring.\n"
-         }
+                   "If this is an accident, quit the program and fix it.\n\n"
-         if (check_default_key (c)) {
+                   "Continue if you want that WinPT offers you more choices.\n"),
-             char * p = get_gnupg_default_key ();
+                   "WinPT", MB_INFO|MB_YESNO);
-             log_box (_("WinPT Error"), MB_ERR,
+             if (ec == IDYES)
-                      _("Default key from the GPG options file could not be found.\n"
+                 first_start = 1;
-                        "Please check your gpg.conf (options) to correct this:\n\n"
+         }
-                        "%s: public key not found."), p? p : "[null]");
+         if (!first_start) {
-             free_if_alloc (p);
+             msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
-             DestroyWindow (hwnd);
+             return 0;
-             free_gnupg_table ();
+         }
-             return 0;
+     }
-         }
+     if (check_for_empty_keyrings (false))
-         if (count_insecure_elgkeys ())
+         first_start = 1;
-             DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_ELGWARN, glob_hwnd,
-                             elgamal_warn_dlg_proc, NULL);
+     if (!first_start) {
-     }
+         rc = gpg_check_permissions (1);
+         if (rc && rc == 2)
-     accel_tab = LoadAccelerators (glob_hinst, (LPCTSTR)IDR_WINPT_ACCELERATOR);
+             gpg_read_only = 1;
-     keyring_check_last_access (); /* init */
+         else if (rc)
-     while (GetMessage (&msg, hwnd, 0, 0)) {
+             return 0;
-         if (!TranslateAccelerator (msg.hwnd, accel_tab, &msg)) {
+     }
-             TranslateMessage (&msg);
-             DispatchMessage (&msg);
+     init_gnupg_table ();
-         }
-     }
+     if (fm_parse_command_line (cmdline) > 0) {
+         free_gnupg_table ();
-     return 0;
+         return 0;
- } /* WinMain */
+     }
+     if (cmdline && stristr (cmdline, "--wipe-freespace")) {
+         dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_SPACE_SECDEL,
+                             GetDesktopWindow(), space_wipefrees_dlg_proc, 0,
+                             _("Wipe Free Space"), IDS_WINPT_SPACE_SECDEL);
+         free_gnupg_table ();
+         return 0;
+     }
+     load_keyserver_conf (cmdline? 1 : 0);
+     if (cmdline && (stristr (cmdline, "--keymanager")
+                 || stristr (cmdline, "--cardmanager"))) {
+         /* If an instance of WinPT is running, just send the command
+            to open the key manager. Otherwise start a new instance.
+          */
+         HWND tray = FindWindow ("WinPT", "WinPT");
+         if (stristr (cmdline, "keymanager"))
+             start_manager = ID_WINPT_KEY;
+         else
+             start_manager = ID_WINPT_CARD;
+         if (tray != NULL) {
+             PostMessage (tray, WM_COMMAND, start_manager, 0);
+             free_gnupg_table ();
+             return 0;
+         }
+     }
+     /* If we found another WinPT instance, just quit to avoid it
+        will be executed twice. */
+     if (winpt_inst_found) {
+         log_debug ("%s", "WinMain: WinPT is already running.");
+         free_gnupg_table ();
+         return 0;
+     }
+     if (cmdline) {
+         if (stristr (cmdline, "--enable-debug") ||
+             stristr (cmdline, "--debug")) {
+             gpg_set_debug_mode (1);
+             winpt_debug_msg ();
+             debug = 1;
+         }
+     }
+     wc.hIcon = LoadIcon (glob_hinst, MAKEINTRESOURCE (IDI_WINPT));
+     rc = RegisterClass (&wc);
+     if (rc == FALSE) {
+         msg_box (NULL, _("Could not register window class"),
+                  _("WinPT Error"), MB_ERR);
+         free_gnupg_table ();
+         return 0;
+     }
+     hwnd = CreateWindow (PGM_NAME,
+                          PGM_NAME,
+, 0, 0, 0, 0,
+                          NULL,
+                          NULL,
+                          hinst,
+                          NULL);
+     if (hwnd == NULL) {
+         msg_box (NULL, _("Could not create window"), _("WinPT Error"), MB_ERR);
+         free_gnupg_table ();
+         return 0;
+     }
+     glob_hwnd = hwnd;
+     UpdateWindow (hwnd);
+     if (!first_start && !start_gpgprefs) {
+         gnupg_backup_options ();
+         if (!check_crypto_engine ()) {
+             DestroyWindow (hwnd);
+             free_gnupg_table ();
+             return 0;
+         }
+     }
+     if (start_gpgprefs) {
+         DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,
+                         gpgprefs_dlg_proc, 0);
+         if (check_for_empty_keyrings (true))
+             first_start = 1; /* The public keyring is empty! */
+     }
+     if (first_start) {
+         struct genkey_s c;
+         int choice;
+         HWND h;
+ start:
+         h = GetDesktopWindow ();
+         if (!gpg_prefs_ok ())
+             DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, h,
+                             gpgprefs_dlg_proc, 0);
+         choice = DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_FIRST, h,
+                                  first_run_dlg_proc, 0);
+         switch (choice) {
+         case SETUP_KEYGEN:
+             c.interactive = 1;
+             c.first_start = 1;
+             rc = DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYWIZARD,
+                                  h, keygen_wizard_dlg_proc, (LPARAM)&c);
+             if (!rc)
+                 goto start;
+             break;
+         case SETUP_IMPORT:
+             rc = gnupg_copy_keyrings ();
+             if (rc) {
+                 msg_box (hwnd, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
+                 goto start;
+             }
+             break;
+         case 0: /* Cancel/Abort. */
+         default:
+             DestroyWindow (hwnd);
+             free_gnupg_table ();
+             return 0;
+         }
+         update_keycache (hwnd);
+         if (!check_crypto_engine ()) {
+             DestroyWindow (hwnd);
+             free_gnupg_table ();
+             return 0;
+         }
+     }
+     else {
+         gpg_keycache_t c;
+         update_keycache (hwnd);
+         c = keycache_get_ctx (1);
+         if (!c || !gpg_keycache_get_size (c)) {
+             gnupg_display_error ();
+             msg_box (hwnd, _("The keycache was not initialized or is empty.\n"
+                              "Please check your GPG config (keyrings, pathes...)"),
+                              _("WinPT Error"), MB_ERR);
+             ec = msg_box (NULL, _("It seems that GPG is not set properly.\n"
+                                   "Do you want to start the GPG preferences dialog?"),
+                             "WinPT", MB_INFO|MB_YESNO);
+             if (ec == IDYES) {
+                 DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,
+                                 gpgprefs_dlg_proc, 0);
+                 update_keycache (hwnd);
+             }
+             else {
+                 DestroyWindow (hwnd);
+                 free_gnupg_table ();
+                 return 0;
+             }
+         }
+         if (check_default_key (c)) {
+             char *p = get_gnupg_default_key ();
+             log_box (_("WinPT Error"), MB_ERR,
+                      _("Default key from the GPG options file could not be found.\n"
+                        "Please check your gpg.conf (options) to correct this:\n\n"
+                        "%s: public key not found."), p? p : "[null]");
+             free_if_alloc (p);
+             DestroyWindow (hwnd);
+             free_gnupg_table ();
+             return 0;
+         }
+         if (count_insecure_elgkeys ())
+             DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_ELGWARN, glob_hwnd,
+                             elgamal_warn_dlg_proc, 0);
+     }
+     if (start_manager)
+         PostMessage (hwnd, WM_COMMAND, start_manager, 0);
+     accel_tab = LoadAccelerators (glob_hinst, (LPCTSTR)IDR_WINPT_ACCELERATOR);
+     keyring_check_last_access (); /* init */
+     while (GetMessage (&msg, hwnd, 0, 0)) {
+         if (!TranslateAccelerator (msg.hwnd, accel_tab, &msg)) {
+             TranslateMessage (&msg);
+             DispatchMessage (&msg);
+         }
+     }
+     return 0;
+ }

 Legend:



Removed from v.14
 


changed lines


 
Added in v.167
 Legend:



Removed from v.14
 


changed lines


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

[email protected]	ViewVC Help
Powered by ViewVC 1.1.26