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

Legend:
Removed from v.32  
changed lines
  Added in v.167

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26