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

Diff of /trunk/Src/WinPT.cpp

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

revision 24 by twoaday, Sat Oct 8 10:43:08 2005 UTC revision 168 by twoaday, Fri Jan 27 10:08:10 2006 UTC
# Line 1  Line 1 
1  /* WinPT.cpp - Windows Privacy Tray (WinPT)  /* WinPT.cpp - Windows Privacy Tray (WinPT)
2   *      Copyright (C) 2000-2005 Timo Schulz   *      Copyright (C) 2000-2006 Timo Schulz
3   *   *
4   * This file is part of WinPT.   * This file is part of WinPT.
5   *   *
6   * WinPT is free software; you can redistribute it and/or modify   * WinPT is free software; you can redistribute it and/or modify
7   * it under the terms of the GNU General Public License as published by   * it under the terms of the GNU General Public License as published by
8   * the Free Software Foundation; either version 2 of the License, or   * the Free Software Foundation; either version 2 of the License, or
9   * (at your option) any later version.   * (at your option) any later version.
10   *   *
11   * WinPT is distributed in the hope that it will be useful,   * WinPT is distributed in the hope that it will be useful,
12   * but WITHOUT ANY WARRANTY; without even the implied warranty of   * but WITHOUT ANY WARRANTY; without even the implied warranty of
13   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14   * GNU General Public License for more details.   * GNU General Public License for more details.
15   *   *
16   * You should have received a copy of the GNU General Public License   * You should have received a copy of the GNU General Public License
17   * along with WinPT; if not, write to the Free Software Foundation,   * along with WinPT; if not, write to the Free Software Foundation,
18   * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA   * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19   */   */
20  #include <windows.h>  #ifdef HAVE_CONFIG_H
21    #include <config.h>
22  #include "../resource.h"  #endif
23  #include "wptTypes.h"  
24  #include "wptW32API.h"  #include <windows.h>
25  #include "wptVersion.h"  #include <shlobj.h>
26  #include "wptErrors.h"  
27  #include "wptGPG.h"  #include "resource.h"
28  #include "wptRegistry.h"  #include "wptTypes.h"
29  #include "wptCommonCtl.h"  #include "wptW32API.h"
30  #include "wptDlgs.h"  #include "wptVersion.h"
31  #include "wptNLS.h"  #include "wptErrors.h"
32  #include "wptKeyserver.h"  #include "wptGPG.h"
33  #include "wptCard.h"  #include "wptRegistry.h"
34  #include "wptFileManager.h"  #include "wptCommonCtl.h"
35  #include "wptContext.h"  #include "wptDlgs.h"
36  #include "wptCardEdit.h"  #include "wptNLS.h"
37    #include "wptKeyserver.h"
38  HINSTANCE glob_hinst; /* global instance for the dialogs */  #include "wptCard.h"
39  HWND glob_hwnd; /* global window handle for the dialogs */  #include "wptFileManager.h"
40  HWND activ_hwnd;  #include "wptContext.h"
41  LOCK mo_file;  #include "wptCardEdit.h"
42  int scard_support = 0;  #include "wptCrypto.h"
43  int debug = 0;  
44  int mobile = 0;  
45  int gpg_read_only = 0;  HINSTANCE glob_hinst;   /* global instance for the dialogs */
46  char gpgver[3];  HWND glob_hwnd;         /* global window handle for the dialogs */
47    HWND activ_hwnd;
48  /* Internal IPC */  int scard_support = 0;
49  int start_keymanager = 0;  int debug = 0;
50    int mobile = 0;
51  static void  int gpg_read_only = 0;
52  update_keycache (HWND hwnd)  char gpgver[3];
53  {  
54      refresh_cache_s rcs = {0};  
55      rcs.kr_reload = 0;  /* Load the key cache and rebuild the signature cache. */
56      rcs.kr_update = 1;  static void
57      rcs.tr_update = 1;  update_keycache (HWND hwnd)
58      DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, hwnd,  {
59                      keycache_dlg_proc, (LPARAM)&rcs);      refresh_cache_s rcs = {0};
60  } /* update_keycache */      rcs.kr_reload = 0;
61        rcs.kr_update = 1;
62        rcs.tr_update = 1;
63  /* Set GPGME debug mode. If @val is 0, the debug mode is disabled. */      DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYCACHE, hwnd,
64  void                      keycache_dlg_proc, (LPARAM)&rcs);
65  gpg_set_debug_mode (int val)  }
66  {        
67      if (val)  
68          putenv ("GPGME_DEBUG=5:gpgme.dbg");  /* Set GPGME debug mode. If @val is 0, the debug mode is disabled. */
69      else  void
70          putenv ("GPGME_DEBUG=");  gpg_set_debug_mode (int val)
71  }  {      
72        if (val)
73  static char *          putenv ("GPGME_DEBUG=5:gpgme.dbg");
74  get_gettext_lang (void)      else
75  {              putenv ("GPGME_DEBUG=");
76      char * fname;  }
77      fname = get_reg_entry_mo ();  
78      if (!fname)  
79          return NULL;  /* Return the name of the gettext language file. */
80      return fname;  static char*
81  } /* get_gettext_lang */  get_gettext_lang (void)
82    {    
83        char *fname;
84  static void      fname = get_reg_entry_mo ();
85  load_gettext (void)      if (!fname)
86  {          return NULL;
87      char *nls = NULL;      return fname;
88      char *file = NULL;  }
89    
90      nls = get_gettext_lang ();  
91      if (nls) {  /* Initialize the gettext sub system. */
92          set_gettext_file ("winpt", nls);  static void
93          file = make_filename (nls, "winpt", "mo");  load_gettext (int prev_inst)
94          if (!file_exist_check (nls) && init_file_lock (&mo_file, file))  {  {
95              msg_box (NULL, _("Could not initizalize file lock.\n"      char *nls = NULL;
96                               "Native Language Support"),  
97                       _("WinPT Error"), MB_ERR);      nls = get_gettext_lang ();
98          }      if (nls != NULL) {
99          free_if_alloc (nls);          set_gettext_file ("winpt", nls);
100          free_if_alloc (file);          free_if_alloc (nls);
101      }      }
102  } /* load_gettext */  }
103    
104    
105  /* check if the default key from the gpg.conf file is available in the  /* Return true if the GPG environment is useable. */
106     keyring. if not, bail out because encryption won't work properly then. */  static bool
107  static int  gpg_prefs_ok (void)
108  check_default_key (gpgme_keycache_t kc)  {
109  {      char *p;
110      gpgme_key_t key;  
111      gpgme_error_t err = GPG_ERR_NO_ERROR;      p = get_reg_entry_gpg4win ("gpg.exe");
112      char * defkey;      if (!p || file_exist_check (p) != 0) {
113            free_if_alloc (p);
114      defkey = get_gnupg_default_key ();          p = get_reg_entry_gpg ("gpgProgram");
115      if (defkey)          if (!p || file_exist_check (p) != 0) {
116          err = gpgme_keycache_find_key (kc, defkey, 0, &key);              free_if_alloc (p);
117      free_if_alloc (defkey);              return false;
118      return err? -1 : 0;          }
119  } /* check_default_key */      }
120        free_if_alloc (p);
121        p = get_reg_entry_gpg4win (NULL);    
122  /* Return the WinPT program file name (with full pathname). */      if (!p || dir_exist_check (p) != 0) {
123  static const char *          free_if_alloc (p);
124  get_prog_part (const char * fname, int use_cwd)          p = get_reg_entry_gpg ("HomeDir");
125  {          if (!p || dir_exist_check (p) != 0) {
126      static char program[1024];              free_if_alloc (p);
127      char currdir[256], * cmd = NULL;              return false;
128      int j;          }
129                }
130      memset (currdir, 0, DIM (currdir));      free_if_alloc (p);
131      memset (program, 0, DIM (program));      return true;
132            }
133      if (use_cwd) {  
134          GetCurrentDirectory (DIM (currdir)-1, currdir);  
135          _snprintf (program, DIM (program)-1, "%s\\%s", currdir, fname);  
136      }  /* Load the GPG environment. On the first start, some
137      else {     checks are performed to find out in what state GPG is.
138          cmd = GetCommandLine ();     Return value: 0  everything OK.
139          if (cmd == NULL)                   >0  fatal error.
140              return NULL;                   -1 public keyring is empty or does not exist. */
141          strncpy (currdir, cmd, 255);  static int
142          j = strlen (currdir);  load_gpg_env (void)
143          while (j--) {  {
144              if (currdir[j] == '\\')      SECURITY_ATTRIBUTES sec_attr;
145                  break;                char *p;
146          }      char *pkr;
147          currdir[j] = 0;  
148          _snprintf (program, DIM (program)-1, "%s\\%s", currdir + 1, fname);      p = get_reg_entry_gpg4win ("gpg.exe");
149      }      if (!p)
150      return program;          return (1);
151  } /* get_prog_part */      if (file_exist_check (p)) {
152            free_if_alloc (p);
153            return (1);
154  static int      }
155  check_crypto_engine (void)      free_if_alloc (p);
156  {  
157      int ma=1, mi=4, pa=0; /* GPG 1.4.0 */      p = get_reg_entry_gpg ("HomeDir");
158      int rc;      if (!p || dir_exist_check (p) != 0) {
159            free_if_alloc (p);
160      rc = check_gnupg_engine (&ma, &mi, &pa);          p = multi_gnupg_path (0);
161      if (rc == -1) {      }
162          msg_box (NULL, _("Could not read GnuPG version."), _("WinPT Error"), MB_ERR);      if (p && dir_exist_check (p)) {
163          return rc;          memset (&sec_attr, 0, sizeof (sec_attr));
164      }          sec_attr.nLength = sizeof (sec_attr);
165      else if (rc) {          if (!CreateDirectory (p, &sec_attr)) {
166          log_box (_("WinPT Error"), MB_ERR,              msg_box (NULL, _("Could not create GPG home directory"),
167                   _("Sorry, you need a newer GPG version.\n"                       _("WinPT Error"), MB_ERR);
168                     "GPG version %d.%d.%d required GPG version 1.4.0"),              free_if_alloc (p);
169                     ma, mi, pa);              return (2);
170          return rc;          }
171      }      }
172      /* We enable smartcard support for GPG: 1.9.x or >= 1.4.0 */      pkr = make_filename (p, "pubring", "gpg");
173      if (ma >= 1 && mi >= 4)      free_if_alloc (p);
174          scard_support = 1;      if (!pkr)
175            return -1;
176      gpgver[0] = ma;      if (get_file_size (pkr) == 0) {
177      gpgver[1] = mi;          free_if_alloc (pkr);
178      gpgver[2] = pa;          return -1;
179      return rc;      }
180  } /* check_crypto_engine */      return 0;
181    }
182    
183  static int  
184  load_keyserver_conf (int quiet)  /* check if the default key from the gpg.conf file is available in the
185  {     keyring. if not, bail out because encryption won't work properly then. */
186      const char * t;  static int
187      int rc;  check_default_key (gpg_keycache_t kc)
188    {
189      if (reg_prefs.kserv_conf)      gpgme_key_t key;
190          t = reg_prefs.kserv_conf;      gpgme_error_t err = GPG_ERR_NO_ERROR;
191      else if (!file_exist_check (get_prog_part ("keyserver.conf", 0)))      char *defkey;
192          t = get_prog_part ("keyserver.conf", 0);  
193      else      defkey = get_gnupg_default_key ();
194          t = "keyserver.conf";      if (defkey)
195      rc = kserver_load_conf (t);          err = gpg_keycache_find_key (kc, defkey, 0, &key);
196      if (rc && !quiet)      else
197          msg_box (NULL, winpt_strerror (rc), _("Keyserver"), MB_ERR);          msg_box (NULL, _("No useable secret key found."),
198      return rc;                   _("WinPT Error"), MB_ERR);
199  }      free_if_alloc (defkey);
200        return err? -1 : 0;
201    }
202  static void  
203  enable_mobile_mode (void)  
204  {  /* Return the WinPT program file name (with full pathname). */
205      memset (&reg_prefs, 0, sizeof (reg_prefs));  static const char*
206      reg_prefs.always_trust = 0;  get_prog_part (const char * fname, int use_cwd)
207      reg_prefs.auto_backup = 0;  {
208      reg_prefs.cache_time = 0;      static char program[512];
209      reg_prefs.expert = 0;      char currdir[256];
210      reg_prefs.keylist_mode = 1;      char *cmd = NULL;
211      reg_prefs.kserv_conf = m_strdup ("keyserver.conf");      int j;
212      reg_prefs.no_zip_mmedia = 1;          
213      reg_prefs.use_tmpfiles = 1;      memset (currdir, 0, DIM (currdir));
214      reg_prefs.word_wrap = 80;      memset (program, 0, DIM (program));
215      reg_prefs.use_viewer = 0; /* XXX */          
216  }      if (use_cwd) {
217            GetCurrentDirectory (DIM (currdir)-1, currdir);
218  char* get_subkey_fingerprint (gpgme_ctx_t ctx, const char *keyid);          _snprintf (program, DIM (program)-1, "%s\\%s", currdir, fname);
219        }
220  int WINAPI      else {
221  #ifndef WINPT_IPC          cmd = GetCommandLine ();
222  WinMain (HINSTANCE hinst, HINSTANCE hprev, LPSTR cmdline, int showcmd)          if (cmd == NULL)
223  #else              return NULL;
224  win_main (HINSTANCE hinst, HINSTANCE hprev, LPSTR cmdline, int showcmd)          strncpy (currdir, cmd, sizeof (currdir)-1);
225  #endif          j = strlen (currdir);
226  {          while (j--) {
227      WNDCLASS wc = {0, winpt_main_proc, 0, 0, hinst, 0, 0, 0, 0, PGM_NAME};              if (currdir[j] == '\\')
228      HACCEL accel_tab;                  break;
229      int rc, ec, created = 0, use_cwd = 0, nfiles = 0;          }
230      int first_start = 0, start_gpgprefs = 0;          currdir[j] = 0;
231      const char * s;          _snprintf (program, DIM (program)-1, "%s\\%s", currdir + 1, fname);
232      MSG msg;      }
233      HWND hwnd = NULL;      return program;
234    }
235      glob_hinst = hinst;  
236    
237      #ifdef _DEBUG  /* Check that the underlying crypto engine fullfills the minimal
238      gpg_set_debug_mode (1);     requirements so all commands work properly. */
239      debug = 1;  static bool
240      #endif  check_crypto_engine (void)
241    {
242      s = PTD_get_version ();      int ma=0, mi=0, pa=0;
243      if (strcmp (s, "0.8.0")) {      int rc;
244          log_box (_("Privacy Tray Dynamic (PTD)"), MB_ERR,  
245                   _("Please update your PTD.dll to the newest version, "      rc = check_gnupg_engine (NEED_GPG_VERSION, &ma, &mi, &pa);
246                     "the version (%s) you use is too old."), s);      if (rc == -1) {
247          return 0;          msg_box (NULL, _("Could not read GnuPG version."),
248      }                   _("WinPT Error"), MB_ERR);
249            return false;
250      if (gpg_md_selftest ()) {      }
251          msg_box (NULL, _("Cryptographic selftest failed."),      else if (rc) {
252                   _("WinPT Error"), MB_ERR);          log_box (_("WinPT Error"), MB_ERR,
253          return 0;                   _("Sorry, you need a newer GPG version.\n"
254      }                     "GPG version %d.%d.%d required GPG version "NEED_GPG_VERSION),
255                       ma, mi, pa);
256      s = gpgme_check_version ("1.1.0");          return false;
257      if (!s || !*s) {      }
258          msg_box (NULL, _("A newer GPGME version is needed."), "WinPT Error", MB_ERR);      /* We enable smartcard support for GPG: >= 2 or >= 1.4.3 */
259          return 0;      if (ma > 1 || pa >= 3)    
260      }          scard_support = 1;
261    
262      if (cmdline && stristr (cmdline, "--mobile")) {      gpgver[0] = ma;
263          msg_box (NULL, "WARNING: mobile modus is not fully implemented yet!",      gpgver[1] = mi;
264                   "WinPT", MB_INFO);      gpgver[2] = pa;
265          mobile = 1;      return true;
266      }  }
267    
268      set_default_kserver ();  
269    /* Try to load the keyserver config file. If @quiet is 1
270      if (!mobile) {     do not show any errors. */
271          regist_inst_gnupg (1);  static int
272          regist_inst_winpt (1, &created);  load_keyserver_conf (int quiet)
273      }  {
274      else {      char *buf;
275          enable_mobile_mode ();      const char *t;
276          /* XXX: ask for GPG path */      int rc;
277          created = 1; /* Disable registry writing */  
278      }      /* Create $APPDATA\winpt if needed. */
279        buf = make_special_filename (CSIDL_APPDATA, "winpt", NULL);
280      if (!created) {      if (buf && dir_exist_check (buf) && !CreateDirectory (buf, NULL)) {
281          memset (&reg_prefs, 0, sizeof (reg_prefs));          MessageBox (NULL, _("Failed to create WinPT directory"),
282          reg_prefs.use_tmpfiles = 1; /* default */                      _("Keyserver"), MB_ERR);
283          reg_prefs.fm.progress = 0; /* XXX: fix the bug and enable it again */          free_if_alloc (buf);
284          get_reg_winpt_prefs (&reg_prefs);          return -1;
285          if (!reg_prefs.no_hotkeys)      }
286              hotkeys_modify ();      free_if_alloc (buf);
287      }  
288        /* Check for $APPDATA\winpt\keyserver.conf */
289      rc = gnupg_check_homedir ();      buf = make_special_filename (CSIDL_APPDATA, "winpt\\keyserver.conf", NULL);
290      if (rc) {  
291          log_box (_("WinPT Error"), MB_ERR,      if (!file_exist_check (get_prog_part ("keyserver.conf", 0)))
292                   _("GPG home directory is not set correctly.\n"          t = get_prog_part ("keyserver.conf", 0);
293                     "Please check the GPG registry settings:\n%s."),      else
294                   winpt_strerror (rc));          t = "keyserver.conf";
295          const char * s = get_filename_dlg (GetActiveWindow (), FILE_OPEN,      if (file_exist_check (t) == 0 && file_exist_check (buf) != 0) {
296                                             _("Select GPG Public Keyring"),          //log_box (_("Keyserver"), MB_INFO,
297                                             _("GPG Keyrings (*.gpg)\0*.gpg\0\0"),          //       _("keyserver.conf will be copied to \"%s\"\r\n"), buf);
298                                             NULL);          if (!CopyFile (t, buf, FALSE)) {
299          if (s != NULL) {              MessageBox (NULL, _("Failed to copy the keyserver.conf"),
300              size_t n;                          _("Keyserver"), MB_ERR);
301              char * p = strrchr (s, '\\');              free_if_alloc (buf);
302              if (!p)              return -1;
303                  BUG (0);          }
304              n = p - s;          t = buf;
305              if (n)      }
306              {      else
307                  char * file = new char[n+1];          t = buf;
308                  if (!file)      
309                      BUG (NULL);      rc = kserver_load_conf (t);
310                  memset (file, 0, n);      if (rc && !quiet)
311                  memcpy (file, s, n);          msg_box (NULL, winpt_strerror (rc), _("Keyserver"), MB_ERR);
312                  file[n] = '\0';              else {
313                  set_reg_entry_gpg ("HomeDir", file);          free_if_alloc (reg_prefs.kserv_conf);
314                  free_if_alloc (file);          reg_prefs.kserv_conf = m_strdup (t);
315                  gnupg_check_homedir (); /* change gpgProgram if needed */      }
316              }      free_if_alloc (buf);
317          }      return rc;
318          else {  }
319              msg_box (NULL, _("GPG home directory could not be determited."),  
320                       _("WinPT Error"), MB_ERR);  
321              goto start;  /* Check if both keyrings are empty. This indicates that
322          }     WinPT should offer to generate a key pair. */
323      }  static bool
324    check_for_empty_keyrings (bool pub_only)
325      rc = check_gnupg_prog ();  {
326      if (rc) {      char *p;
327          if (msg_box (NULL, _("Could not find the GPG binary (gpg.exe).\n"      int n = 0;
328                               "Do you want to start the GPG preferences to "  
329                               "correct  this problem?"), _("WinPT Error"),      p = get_gnupg_keyring (1, 0);
330                               MB_INFO|MB_YESNO) == IDYES)      if (file_exist_check (p) == 0 && get_file_size (p) == 0)
331              start_gpgprefs = 1;          n++;
332          else      free_if_alloc (p);
333          {      if (pub_only)
334              msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);          return n == 1? true : false;
335              return 0;      p = get_gnupg_keyring (0, 0);
336          }      if (file_exist_check (p) == 0 && get_file_size (p) == 0)
337      }          n++;
338        free_if_alloc (p);
339      rc = gnupg_access_files ();      return n==2? true : false;
340      if (!start_gpgprefs && rc)  }
341      {  
342          if (rc == WPTERR_GPG_KEYRINGS || rc == WPTERR_GPG_OPT_KEYRINGS)  
343          {  /* Enable the mobility mode. */
344              ec = msg_box (NULL,  static void
345                  _("Could not access and/or find the public and secret keyring.\n"  enable_mobile_mode (void)
346                    "If this is an accident, quit the program and fix it.\n\n"  {
347                    "Continue if you want that WinPT offers you more choices.\n"),      memset (&reg_prefs, 0, sizeof (reg_prefs));
348                    "WinPT", MB_INFO|MB_YESNO);      reg_prefs.always_trust = 0;
349              if (ec == IDYES)      reg_prefs.auto_backup = 0;
350                  first_start = 1;      reg_prefs.cache_time = 0;
351          }      reg_prefs.expert = 0;
352          if (!first_start)      reg_prefs.keylist_mode = 1;
353          {      reg_prefs.kserv_conf = m_strdup ("keyserver.conf");
354              msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);      reg_prefs.no_zip_mmedia = 1;
355              return 0;      reg_prefs.use_tmpfiles = 1;
356          }      reg_prefs.word_wrap = 80;
357      }      reg_prefs.use_viewer = 0; /* XXX */
358    }
359      if (!first_start)  
360      {  
361          rc = gpg_check_permissions (1);  /* Main entry point. */
362          if (rc && rc == 2)  int WINAPI
363              gpg_read_only = 1;  WinMain (HINSTANCE hinst, HINSTANCE hprev, LPSTR cmdline, int showcmd)
364          else if (rc)  {
365              return 0;      WNDCLASS wc = {0, winpt_main_proc, 0, 0, hinst, 0, 0, 0, 0, PGM_NAME};
366      }      HACCEL accel_tab;
367        MSG msg;
368      load_gettext ();      HWND hwnd = NULL;
369      init_gnupg_table ();      WORD ver[3], ptdver[4];
370        int rc, ec, created = 0;
371      nfiles = fm_parse_command_line (cmdline);      int first_start = 0, start_gpgprefs = 0;
372      if (nfiles > 0)      int winpt_inst_found = 0;
373          return 0;      int start_manager = 0;
374        const char *s;
375      if (cmdline && stristr (cmdline, "--wipe-freespace")) {  
376          dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_SPACE_SECDEL,      glob_hinst = hinst;
377                              GetDesktopWindow(), space_wipefrees_dlg_proc, NULL,      if (cmdline && stristr (cmdline, "--stop")) {
378                              _("Wipe Free Space"), IDS_WINPT_SPACE_SECDEL);          hwnd = FindWindow ("WinPT", "WinPT");
379          free_gnupg_table ();          if (hwnd != NULL)
380          return 0;              PostMessage (hwnd, WM_DESTROY, 0, 0);
381      }          return 0;
382        }
383      load_keyserver_conf (cmdline? 1 : 0);  
384      if (start_keymanager) {      /*
385          dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYMISC,      OSVERSIONINFO osinf;
386                              GetDesktopWindow(), keymanager_dlg_proc, NULL,      memset (&osinf, 0, sizeof (osinf));
387                              _("Key Manager"), IDS_WINPT_KEYMISC);      if (GetVersionEx (&osinf) &&
388          keycache_release ();          osinf.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS &&
389          free_gnupg_table ();          osinf.dwMinorVersion == 0) {
390          return 0;          msg_box (NULL, "WinPT propably does not work on Windows 95 without restrictions",
391      }                   "WinPT Warning", MB_INFO);
392        }
393      if (cmdline && (stristr (cmdline, "--keymanager")      */
394                  || stristr (cmdline, "--cardmanager"))) {  
395          update_keycache (GetDesktopWindow ());      #ifdef _DEBUG
396          if (stristr (cmdline, "keymanager"))      gpg_set_debug_mode (1);
397              dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYMISC,      debug = 1;
398                              GetDesktopWindow(), keymanager_dlg_proc, NULL,      #endif
399                              _("Key Manager"), IDS_WINPT_KEYMISC);    
400          else {      get_file_version ("WinPT.exe", &ver[0], &ver[1], &ver[2], &ver[3]);
401              gpg_card_t crd = smartcard_init ();      get_file_version ("PTD.dll", &ptdver[0], &ptdver[1],
402              if (crd)                                   &ptdver[2], &ptdver[3]);
403                  dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_CARD_EDIT,      /* XXX
404                                    GetDesktopWindow(), card_edit_dlg_proc,      if (ptdver[0] != ver[0] || ptdver[1] != ver[1]|| ptdver[2] != ver[2]) {
405                                    (LPARAM)crd, _("Card Manager"),          log_box (_("WinPT Error"), MB_ERR,
406                                    IDS_WINPT_CARD_EDIT);                   _("The PTD.dll file has a different version than WinPT.exe\n"
407              gpg_card_release (crd);                     "Please update the PTD.dll to version %d.%d.%d"),
408          }                     ver[0], ver[1], ver[2]);
409          keycache_release ();          return 0;
410          free_gnupg_table ();      }
411          return 0;      */
412      }  
413        if (gpg_md_selftest ()) {
414      CreateMutex (NULL, TRUE, PGM_NAME);          msg_box (NULL, _("Cryptographic selftest failed."),
415      if (GetLastError () == ERROR_ALREADY_EXISTS) {                   _("WinPT Error"), MB_ERR);
416          free_gnupg_table ();          return 0;
417          return 0;      }
418      }  
419        s = gpgme_check_version (NEED_GPGME_VERSION);
420      if (cmdline) {      if (!s || !*s) {
421          if (stristr (cmdline, "--enable-debug") || stristr (cmdline, "--debug")) {          msg_box (NULL, _("A newer GPGME version is needed; at least "NEED_GPGME_VERSION),
422              gpg_set_debug_mode (1);                   _("WinPT Error"), MB_ERR);
423              winpt_debug_msg ();          return 0;
424              debug = 1;      }
425          }  
426      }      CreateMutex (NULL, TRUE, PGM_NAME);
427        if (GetLastError () == ERROR_ALREADY_EXISTS)
428      wc.hIcon = LoadIcon (glob_hinst, MAKEINTRESOURCE (IDI_WINPT));          winpt_inst_found = 1;
429      rc = RegisterClass (&wc);  
430      if (rc == FALSE) {      if (cmdline && stristr (cmdline, "--mobile")) {
431          msg_box (NULL, _("Could not register window class"), _("WinPT Error"), MB_ERR);          msg_box (NULL, "WARNING: mobile modus is not fully implemented yet!",
432          free_gnupg_table ();                   "WinPT", MB_INFO);
433          return 0;          mobile = 1;
434      }      }
435    
436      hwnd = CreateWindow (PGM_NAME,      set_default_kserver ();
437                           PGM_NAME,      load_gettext (winpt_inst_found);
438                           0, 0, 0, 0, 0,  
439                           NULL,      if (!mobile) {
440                           NULL,          regist_inst_gnupg (1);
441                           hinst,          regist_inst_winpt (1, &created);
442                           NULL);      }
443      if (hwnd == NULL) {      else {
444          msg_box (NULL, _("Could not create window"), _("WinPT Error"), MB_ERR);          enable_mobile_mode ();
445          free_gnupg_table ();          /* XXX: ask for GPG path */
446          return 0;          created = 1; /* Disable registry writing */
447      }      }
448      glob_hwnd = hwnd;  
449      UpdateWindow (hwnd);      if (!created) {
450            memset (&reg_prefs, 0, sizeof (reg_prefs));
451      if (!first_start && !start_gpgprefs) {          reg_prefs.use_tmpfiles = 1; /* default */
452          gnupg_backup_options ();                  reg_prefs.fm.progress = 0; /* XXX: fix the bug and enable it again */
453          rc = check_crypto_engine ();          get_reg_winpt_prefs (&reg_prefs);
454          if (rc) {          if (!reg_prefs.no_hotkeys)
455              DestroyWindow (hwnd);              hotkeys_modify ();
456              free_gnupg_table ();          gnupg_load_config ();
457              return 0;      }
458          }      else { /* default settings. */
459      }          reg_prefs.keylist_mode = 1;
460            }
461      if (start_gpgprefs) {  
462          char *ring;      if (is_gpg4win_installed ())
463          size_t size = 0;          load_gpg_env (); /* XXX: check return code. */
464          DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,  
465                          gpgprefs_dlg_proc, NULL);      rc = gnupg_check_homedir ();
466          ring = get_gnupg_keyring (0, !NO_STRICT);      if (rc) {
467          if (gnupg_access_keyring (0) == -1 && get_file_size (ring) == 0)          log_box (_("WinPT Error"), MB_ERR,
468              first_start = 1; /* The keyring is empty! */                   _("GPG home directory is not set correctly.\n"
469          free_if_alloc (ring);                     "Please check the GPG registry settings:\n%s."),
470      }                   winpt_strerror (rc));
471            s = get_fileopen_dlg (GetActiveWindow (),
472      if (first_start) {                                _("Select GPG Public Keyring"),
473          struct first_start_s fs;                                "GPG Keyrings (*.gpg)\0*.gpg\0\0",
474          struct genkey_s c;                                NULL);
475          HWND h;          if (s != NULL) {
476  start:              size_t n;
477          h = GetDesktopWindow ();              char *p = strrchr (s, '\\');
478          DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, h,              if (!p)
479                              gpgprefs_dlg_proc, NULL);                  BUG (0);
480          DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_FIRST, h,              n = p - s;
481                          first_run_dlg_proc, (LPARAM)&fs);              if (n) {
482          switch (fs.choice) {                  char *file = new char[n+1];
483          case SETUP_KEYGEN:                  if (!file)
484              c.interactive = 1;                      BUG (NULL);
485              c.first_start = 1;                  memset (file, 0, n);
486              rc = DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYWIZARD,                  memcpy (file, s, n);
487                                   h, keygen_wizard_dlg_proc, (LPARAM)&c);                  file[n] = '\0';        
488              if (!rc)                  set_reg_entry_gpg ("HomeDir", file);
489                  goto start;                  free_if_alloc (file);
490              break;                  gnupg_check_homedir (); /* change gpgProgram if needed */
491                }
492          case SETUP_IMPORT:          }
493              rc = gnupg_copy_keyrings ();          else {
494              if (rc) {              msg_box (NULL, _("GPG home directory could not be determited."),
495                  msg_box (hwnd, winpt_strerror (rc), _("WinPT Error"), MB_ERR);                       _("WinPT Error"), MB_ERR);
496                  goto start;              goto start;
497              }          }
498              break;      }
499    
500          case -1:      rc = check_gnupg_prog ();
501              DestroyWindow (hwnd);      if (rc) {
502              free_gnupg_table ();          if (msg_box (NULL, _("Could not find the GPG binary (gpg.exe).\n"
503              return 0;                               "Do you want to start the GPG preferences to "
504          }                               "correct  this problem?"), _("WinPT Error"),
505          update_keycache (hwnd);                               MB_INFO|MB_YESNO) == IDYES)
506          check_crypto_engine ();              start_gpgprefs = 1;
507      }          else {
508      else {              msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
509          gpgme_keycache_t c;              return 0;
510          update_keycache (hwnd);          }
511          c = keycache_get_ctx (1);      }
512          if (!c || !gpgme_keycache_count (c)) {  
513              gnupg_display_error ();      rc = gnupg_access_files ();
514              msg_box (hwnd, _("The keycache was not initialized or is empty.\n"      if (!start_gpgprefs && rc) {
515                               "Please check your GPG config (keyrings, pathes...)"),          if (rc == WPTERR_GPG_KEYRINGS || rc == WPTERR_GPG_OPT_KEYRINGS) {
516                               _("WinPT Error"), MB_ERR);              ec = msg_box (NULL,
517              ec = msg_box (NULL, _("It seems that GPG is not set properly.\n"                  _("Could not access and/or find the public and secret keyring.\n"
518                                    "Do you want to start the GPG preferences dialog?"),                    "If this is an accident, quit the program and fix it.\n\n"
519                              "WinPT", MB_INFO|MB_YESNO);                    "Continue if you want that WinPT offers you more choices.\n"),
520              if (ec == IDYES) {                    "WinPT", MB_INFO|MB_YESNO);
521                  DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,              if (ec == IDYES)
522                                  gpgprefs_dlg_proc, NULL);                  first_start = 1;
523                  update_keycache (hwnd);          }
524              }          if (!first_start) {
525              else {              msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
526                  DestroyWindow (hwnd);              return 0;
527                  free_gnupg_table ();          }
528                  return 0;      }
529              }      if (check_for_empty_keyrings (false))
530          }          first_start = 1;
531          if (check_default_key (c)) {  
532              char * p = get_gnupg_default_key ();      if (!first_start) {
533              log_box (_("WinPT Error"), MB_ERR,          rc = gpg_check_permissions (1);
534                       _("Default key from the GPG options file could not be found.\n"          if (rc && rc == 2)
535                         "Please check your gpg.conf (options) to correct this:\n\n"              gpg_read_only = 1;
536                         "%s: public key not found."), p? p : "[null]");          else if (rc)
537              free_if_alloc (p);              return 0;
538              DestroyWindow (hwnd);      }
539              free_gnupg_table ();      
540              return 0;      init_gnupg_table ();
541          }  
542          if (count_insecure_elgkeys ())      if (fm_parse_command_line (cmdline) > 0) {
543              DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_ELGWARN, glob_hwnd,          free_gnupg_table ();
544                              elgamal_warn_dlg_proc, NULL);          return 0;
545      }      }
546    
547      accel_tab = LoadAccelerators (glob_hinst, (LPCTSTR)IDR_WINPT_ACCELERATOR);      if (cmdline && stristr (cmdline, "--wipe-freespace")) {
548      keyring_check_last_access (); /* init */          dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_SPACE_SECDEL,
549      while (GetMessage (&msg, hwnd, 0, 0)) {                              GetDesktopWindow(), space_wipefrees_dlg_proc, 0,
550          if (!TranslateAccelerator (msg.hwnd, accel_tab, &msg)) {                              _("Wipe Free Space"), IDS_WINPT_SPACE_SECDEL);
551              TranslateMessage (&msg);          free_gnupg_table ();
552              DispatchMessage (&msg);          return 0;
553          }      }
554      }  
555                load_keyserver_conf (cmdline? 1 : 0);
556      return 0;  
557  } /* WinMain */      if (cmdline && (stristr (cmdline, "--keymanager")
558                    || stristr (cmdline, "--cardmanager"))) {
559            /* If an instance of WinPT is running, just send the command
560               to open the key manager. Otherwise start a new instance.
561             */
562            HWND tray = FindWindow ("WinPT", "WinPT");
563            if (stristr (cmdline, "keymanager"))
564                start_manager = ID_WINPT_KEY;
565            else
566                start_manager = ID_WINPT_CARD;
567            if (tray != NULL) {
568                PostMessage (tray, WM_COMMAND, start_manager, 0);
569                free_gnupg_table ();
570                return 0;
571            }
572        }
573    
574        /* If we found another WinPT instance, just quit to avoid it
575           will be executed twice. */
576        if (winpt_inst_found) {
577            log_debug ("%s", "WinMain: WinPT is already running.");
578            free_gnupg_table ();
579            return 0;
580        }
581    
582        if (cmdline) {
583            if (stristr (cmdline, "--enable-debug") ||
584                stristr (cmdline, "--debug")) {
585                gpg_set_debug_mode (1);
586                winpt_debug_msg ();
587                debug = 1;
588            }
589        }
590    
591        wc.hIcon = LoadIcon (glob_hinst, MAKEINTRESOURCE (IDI_WINPT));
592        rc = RegisterClass (&wc);
593        if (rc == FALSE) {
594            msg_box (NULL, _("Could not register window class"),
595                     _("WinPT Error"), MB_ERR);
596            free_gnupg_table ();
597            return 0;
598        }
599    
600        hwnd = CreateWindow (PGM_NAME,
601                             PGM_NAME,
602                             0, 0, 0, 0, 0,
603                             NULL,
604                             NULL,
605                             hinst,
606                             NULL);
607        if (hwnd == NULL) {
608            msg_box (NULL, _("Could not create window"), _("WinPT Error"), MB_ERR);
609            free_gnupg_table ();
610            return 0;
611        }
612        glob_hwnd = hwnd;
613        UpdateWindow (hwnd);
614    
615        if (!first_start && !start_gpgprefs) {
616            gnupg_backup_options ();        
617            if (!check_crypto_engine ()) {
618                DestroyWindow (hwnd);
619                free_gnupg_table ();
620                return 0;
621            }
622        }
623        
624        if (start_gpgprefs) {
625            DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,
626                            gpgprefs_dlg_proc, 0);
627            if (check_for_empty_keyrings (true))
628                first_start = 1; /* The public keyring is empty! */
629        }
630    
631        if (first_start) {
632            struct genkey_s c;
633            int choice;
634            HWND h;
635    start:
636            h = GetDesktopWindow ();
637            if (!gpg_prefs_ok ())
638                DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, h,
639                                gpgprefs_dlg_proc, 0);
640            choice = DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_FIRST, h,
641                                     first_run_dlg_proc, 0);
642            switch (choice) {
643            case SETUP_KEYGEN:
644                c.interactive = 1;
645                c.first_start = 1;
646                rc = DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYWIZARD,
647                                     h, keygen_wizard_dlg_proc, (LPARAM)&c);
648                if (!rc)
649                    goto start;
650                break;
651    
652            case SETUP_IMPORT:
653                rc = gnupg_copy_keyrings ();
654                if (rc) {
655                    msg_box (hwnd, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
656                    goto start;
657                }
658                break;
659    
660            case 0: /* Cancel/Abort. */
661            default:
662                DestroyWindow (hwnd);
663                free_gnupg_table ();
664                return 0;
665            }
666            update_keycache (hwnd);
667            if (!check_crypto_engine ()) {
668                DestroyWindow (hwnd);
669                free_gnupg_table ();
670                return 0;
671            }
672        }
673        else {
674            gpg_keycache_t c;
675            update_keycache (hwnd);
676            c = keycache_get_ctx (1);
677            if (!c || !gpg_keycache_get_size (c)) {
678                gnupg_display_error ();
679                msg_box (hwnd, _("The keycache was not initialized or is empty.\n"
680                                 "Please check your GPG config (keyrings, pathes...)"),
681                                 _("WinPT Error"), MB_ERR);
682                ec = msg_box (NULL, _("It seems that GPG is not set properly.\n"
683                                      "Do you want to start the GPG preferences dialog?"),
684                                "WinPT", MB_INFO|MB_YESNO);
685                if (ec == IDYES) {
686                    DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,
687                                    gpgprefs_dlg_proc, 0);
688                    update_keycache (hwnd);
689                }
690                else {
691                    DestroyWindow (hwnd);
692                    free_gnupg_table ();
693                    return 0;
694                }
695            }
696            if (check_default_key (c)) {
697                char *p = get_gnupg_default_key ();
698                log_box (_("WinPT Error"), MB_ERR,
699                         _("Default key from the GPG options file could not be found.\n"
700                           "Please check your gpg.conf (options) to correct this:\n\n"
701                           "%s: public key not found."), p? p : "[null]");
702                free_if_alloc (p);
703                DestroyWindow (hwnd);
704                free_gnupg_table ();
705                return 0;
706            }
707            if (count_insecure_elgkeys ())
708                DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_ELGWARN, glob_hwnd,
709                                elgamal_warn_dlg_proc, 0);
710        }
711    
712        if (start_manager)
713            PostMessage (hwnd, WM_COMMAND, start_manager, 0);
714    
715        accel_tab = LoadAccelerators (glob_hinst, (LPCTSTR)IDR_WINPT_ACCELERATOR);
716        keyring_check_last_access (); /* init */
717        while (GetMessage (&msg, hwnd, 0, 0)) {
718            if (!TranslateAccelerator (msg.hwnd, accel_tab, &msg)) {
719                TranslateMessage (&msg);
720                DispatchMessage (&msg);
721            }
722        }
723            
724        return 0;
725    }
Legend:
Removed from v.24  
changed lines
  Added in v.168
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26