/[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 34 by twoaday, Wed Oct 26 11:20:09 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    #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 (int prev_inst)  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              if (!prev_inst)  
104                  msg_box (NULL, _("Could not initizalize file lock.\n"  
105                                   "Native Language Support"),  /* Return true if the GPG environment is useable. */
106                           _("WinPT Error"), MB_ERR);  static bool
107          }  gpg_prefs_ok (void)
108          free_if_alloc (nls);  {
109          free_if_alloc (file);      char *p;
110      }  
111  }      p = get_reg_entry_gpg4win ("gpg.exe");
112        if (!p || file_exist_check (p) != 0) {
113            free_if_alloc (p);
114  /* check if the default key from the gpg.conf file is available in the          p = get_reg_entry_gpg ("gpgProgram");
115     keyring. if not, bail out because encryption won't work properly then. */          if (!p || file_exist_check (p) != 0) {
116  static int              free_if_alloc (p);
117  check_default_key (gpg_keycache_t kc)              return false;
118  {          }
119      gpgme_key_t key;      }
120      gpgme_error_t err = GPG_ERR_NO_ERROR;      free_if_alloc (p);
121      char * defkey;      p = get_reg_entry_gpg4win (NULL);    
122        if (!p || dir_exist_check (p) != 0) {
123      defkey = get_gnupg_default_key ();          free_if_alloc (p);
124      if (defkey)          p = get_reg_entry_gpg ("HomeDir");
125          err = gpg_keycache_find_key (kc, defkey, 0, &key);          if (!p || dir_exist_check (p) != 0) {
126      free_if_alloc (defkey);              free_if_alloc (p);
127      return err? -1 : 0;              return false;
128  }          }
129        }
130        free_if_alloc (p);
131  /* Return the WinPT program file name (with full pathname). */      return true;
132  static const char *  }
133  get_prog_part (const char * fname, int use_cwd)  
134  {  
135      static char program[512];  
136      char currdir[256];  /* Load the GPG environment. On the first start, some
137      char *cmd = NULL;     checks are performed to find out in what state GPG is.
138      int j;     Return value: 0  everything OK.
139                             >0  fatal error.
140      memset (currdir, 0, DIM (currdir));                   -1 public keyring is empty or does not exist. */
141      memset (program, 0, DIM (program));  static int
142            load_gpg_env (void)
143      if (use_cwd) {  {
144          GetCurrentDirectory (DIM (currdir)-1, currdir);      SECURITY_ATTRIBUTES sec_attr;
145          _snprintf (program, DIM (program)-1, "%s\\%s", currdir, fname);      char *p;
146      }      char *pkr;
147      else {  
148          cmd = GetCommandLine ();      p = get_reg_entry_gpg4win ("gpg.exe");
149          if (cmd == NULL)      if (!p)
150              return NULL;          return (1);
151          strncpy (currdir, cmd, sizeof (currdir)-1);      if (file_exist_check (p)) {
152          j = strlen (currdir);          free_if_alloc (p);
153          while (j--) {          return (1);
154              if (currdir[j] == '\\')      }
155                  break;      free_if_alloc (p);
156          }  
157          currdir[j] = 0;      p = get_reg_entry_gpg ("HomeDir");
158          _snprintf (program, DIM (program)-1, "%s\\%s", currdir + 1, fname);      if (!p || dir_exist_check (p) != 0) {
159      }          free_if_alloc (p);
160      return program;          p = multi_gnupg_path (0);
161  }      }
162        if (p && dir_exist_check (p)) {
163            memset (&sec_attr, 0, sizeof (sec_attr));
164  /* Check that the underlying crypto engine fullfills the minimal          sec_attr.nLength = sizeof (sec_attr);
165     requirements so all commands work properly. */          if (!CreateDirectory (p, &sec_attr)) {
166  static int              msg_box (NULL, _("Could not create GPG home directory"),
167  check_crypto_engine (void)                       _("WinPT Error"), MB_ERR);
168  {              free_if_alloc (p);
169      int ma=1, mi=4, pa=3; /* GPG 1.4.3 */              return (2);
170      int rc;          }
171        }
172      rc = check_gnupg_engine (&ma, &mi, &pa);      pkr = make_filename (p, "pubring", "gpg");
173      if (rc == -1) {      free_if_alloc (p);
174          msg_box (NULL, _("Could not read GnuPG version."),      if (!pkr)
175                   _("WinPT Error"), MB_ERR);          return -1;
176          return rc;      if (get_file_size (pkr) == 0) {
177      }          free_if_alloc (pkr);
178      else if (rc) {          return -1;
179          log_box (_("WinPT Error"), MB_ERR,      }
180                   _("Sorry, you need a newer GPG version.\n"      return 0;
181                     "GPG version %d.%d.%d required GPG version "MIN_GPG_VER),  }
182                     ma, mi, pa);  
183          return rc;  
184      }  /* check if the default key from the gpg.conf file is available in the
185      /* We enable smartcard support for GPG: 1.9 or >= 1.4 */     keyring. if not, bail out because encryption won't work properly then. */
186      if (ma >= 1 && mi >= 4)  static int
187          scard_support = 1;  check_default_key (gpg_keycache_t kc)
188    {
189      gpgver[0] = ma;      gpgme_key_t key;
190      gpgver[1] = mi;      gpgme_error_t err = GPG_ERR_NO_ERROR;
191      gpgver[2] = pa;      char *defkey;
192      return rc;  
193  }      defkey = get_gnupg_default_key ();
194        if (defkey)
195            err = gpg_keycache_find_key (kc, defkey, 0, &key);
196  /* Try to load the keyserver config file. If @quiet is 1      else
197     do not show any errors. */          msg_box (NULL, _("No useable secret key found."),
198  static int                   _("WinPT Error"), MB_ERR);
199  load_keyserver_conf (int quiet)      free_if_alloc (defkey);
200  {      return err? -1 : 0;
201      const char * t;  }
202      int rc;  
203    
204      if (reg_prefs.kserv_conf)  /* Return the WinPT program file name (with full pathname). */
205          t = reg_prefs.kserv_conf;  static const char*
206      else if (!file_exist_check (get_prog_part ("keyserver.conf", 0)))  get_prog_part (const char * fname, int use_cwd)
207          t = get_prog_part ("keyserver.conf", 0);  {
208      else      static char program[512];
209          t = "keyserver.conf";      char currdir[256];
210      rc = kserver_load_conf (t);      char *cmd = NULL;
211      if (rc && !quiet)      int j;
212          msg_box (NULL, winpt_strerror (rc), _("Keyserver"), MB_ERR);          
213      return rc;      memset (currdir, 0, DIM (currdir));
214  }      memset (program, 0, DIM (program));
215            
216        if (use_cwd) {
217  /* Enable the mobility mode. */          GetCurrentDirectory (DIM (currdir)-1, currdir);
218  static void          _snprintf (program, DIM (program)-1, "%s\\%s", currdir, fname);
219  enable_mobile_mode (void)      }
220  {      else {
221      memset (&reg_prefs, 0, sizeof (reg_prefs));          cmd = GetCommandLine ();
222      reg_prefs.always_trust = 0;          if (cmd == NULL)
223      reg_prefs.auto_backup = 0;              return NULL;
224      reg_prefs.cache_time = 0;          strncpy (currdir, cmd, sizeof (currdir)-1);
225      reg_prefs.expert = 0;          j = strlen (currdir);
226      reg_prefs.keylist_mode = 1;          while (j--) {
227      reg_prefs.kserv_conf = m_strdup ("keyserver.conf");              if (currdir[j] == '\\')
228      reg_prefs.no_zip_mmedia = 1;                  break;
229      reg_prefs.use_tmpfiles = 1;          }
230      reg_prefs.word_wrap = 80;          currdir[j] = 0;
231      reg_prefs.use_viewer = 0; /* XXX */          _snprintf (program, DIM (program)-1, "%s\\%s", currdir + 1, fname);
232  }      }
233        return program;
234  char* multi_gnupg_path (void);  }
235    
236  /* Main entry point. */  
237  int WINAPI  /* Check that the underlying crypto engine fullfills the minimal
238  WinMain (HINSTANCE hinst, HINSTANCE hprev, LPSTR cmdline, int showcmd)     requirements so all commands work properly. */
239  {  static bool
240      WNDCLASS wc = {0, winpt_main_proc, 0, 0, hinst, 0, 0, 0, 0, PGM_NAME};  check_crypto_engine (void)
241      HACCEL accel_tab;  {
242      int rc, ec, created = 0, use_cwd = 0, nfiles = 0;      int ma=0, mi=0, pa=0;
243      int first_start = 0, start_gpgprefs = 0;      int rc;
244      int winpt_inst_found = 0;  
245      const char *s;      rc = check_gnupg_engine (NEED_GPG_VERSION, &ma, &mi, &pa);
246      MSG msg;      if (rc == -1) {
247      HWND hwnd = NULL;          msg_box (NULL, _("Could not read GnuPG version."),
248                     _("WinPT Error"), MB_ERR);
249      glob_hinst = hinst;          return false;
250        }
251      #ifdef _DEBUG      else if (rc) {
252      gpg_set_debug_mode (1);          log_box (_("WinPT Error"), MB_ERR,
253      debug = 1;                   _("Sorry, you need a newer GPG version.\n"
254      #endif                     "GPG version %d.%d.%d required GPG version "NEED_GPG_VERSION),
255                       ma, mi, pa);
256      s = PTD_get_version ();          return false;
257      if (strcmp (s, MIN_PTD_VER)) {      }
258          log_box (_("Privacy Tray Dynamic (PTD)"), MB_ERR,      /* We enable smartcard support for GPG: >= 2 or >= 1.4.3 */
259                   _("Please update your PTD.dll to the newest version, "      if (ma > 1 || pa >= 3)    
260                     "the version (%s) you use is too old."), s);          scard_support = 1;
261          return 0;  
262      }      gpgver[0] = ma;
263        gpgver[1] = mi;
264      if (gpg_md_selftest ()) {      gpgver[2] = pa;
265          msg_box (NULL, _("Cryptographic selftest failed."),      return true;
266                   _("WinPT Error"), MB_ERR);  }
267          return 0;  
268      }  
269    /* Try to load the keyserver config file. If @quiet is 1
270      s = gpgme_check_version (MIN_GPGME_VER);     do not show any errors. */
271      if (!s || !*s) {  static int
272          msg_box (NULL, _("A newer GPGME version is needed; at least "MIN_GPGME_VER),  load_keyserver_conf (int quiet)
273                   _("WinPT Error"), MB_ERR);  {
274          return 0;      char *buf;
275      }      const char *t;
276        int rc;
277      CreateMutex (NULL, TRUE, PGM_NAME);  
278      if (GetLastError () == ERROR_ALREADY_EXISTS)      /* Create $APPDATA\winpt if needed. */
279          winpt_inst_found = 1;      buf = make_special_filename (CSIDL_APPDATA, "winpt", NULL);
280        if (buf && dir_exist_check (buf) && !CreateDirectory (buf, NULL)) {
281      if (cmdline && stristr (cmdline, "--mobile")) {          MessageBox (NULL, _("Failed to create WinPT directory"),
282          msg_box (NULL, "WARNING: mobile modus is not fully implemented yet!",                      _("Keyserver"), MB_ERR);
283                   "WinPT", MB_INFO);          free_if_alloc (buf);
284          mobile = 1;          return -1;
285      }      }
286        free_if_alloc (buf);
287      set_default_kserver ();  
288        /* Check for $APPDATA\winpt\keyserver.conf */
289      if (!mobile) {      buf = make_special_filename (CSIDL_APPDATA, "winpt\\keyserver.conf", NULL);
290          regist_inst_gnupg (1);  
291          regist_inst_winpt (1, &created);      if (!file_exist_check (get_prog_part ("keyserver.conf", 0)))
292      }          t = get_prog_part ("keyserver.conf", 0);
293      else {      else
294          enable_mobile_mode ();          t = "keyserver.conf";
295          /* XXX: ask for GPG path */      if (file_exist_check (t) == 0 && file_exist_check (buf) != 0) {
296          created = 1; /* Disable registry writing */          //log_box (_("Keyserver"), MB_INFO,
297      }          //       _("keyserver.conf will be copied to \"%s\"\r\n"), buf);
298            if (!CopyFile (t, buf, FALSE)) {
299      if (!created) {              MessageBox (NULL, _("Failed to copy the keyserver.conf"),
300          memset (&reg_prefs, 0, sizeof (reg_prefs));                          _("Keyserver"), MB_ERR);
301          reg_prefs.use_tmpfiles = 1; /* default */              free_if_alloc (buf);
302          reg_prefs.fm.progress = 0; /* XXX: fix the bug and enable it again */              return -1;
303          get_reg_winpt_prefs (&reg_prefs);          }
304          if (!reg_prefs.no_hotkeys)          t = buf;
305              hotkeys_modify ();      }
306      }      else
307            t = buf;
308      rc = gnupg_check_homedir ();      
309      if (rc) {      rc = kserver_load_conf (t);
310          log_box (_("WinPT Error"), MB_ERR,      if (rc && !quiet)
311                   _("GPG home directory is not set correctly.\n"          msg_box (NULL, winpt_strerror (rc), _("Keyserver"), MB_ERR);
312                     "Please check the GPG registry settings:\n%s."),      else {
313                   winpt_strerror (rc));          free_if_alloc (reg_prefs.kserv_conf);
314          const char * s = get_fileopen_dlg (GetActiveWindow (),          reg_prefs.kserv_conf = m_strdup (t);
315                                             _("Select GPG Public Keyring"),      }
316                                             _("GPG Keyrings (*.gpg)\0*.gpg\0\0"),      free_if_alloc (buf);
317                                             NULL);      return rc;
318          if (s != NULL) {  }
319              size_t n;  
320              char * p = strrchr (s, '\\');  
321              if (!p)  /* Check if both keyrings are empty. This indicates that
322                  BUG (0);     WinPT should offer to generate a key pair. */
323              n = p - s;  static bool
324              if (n) {  check_for_empty_keyrings (bool pub_only)
325                  char * file = new char[n+1];  {
326                  if (!file)      char *p;
327                      BUG (NULL);      int n = 0;
328                  memset (file, 0, n);  
329                  memcpy (file, s, n);      p = get_gnupg_keyring (1, 0);
330                  file[n] = '\0';              if (file_exist_check (p) == 0 && get_file_size (p) == 0)
331                  set_reg_entry_gpg ("HomeDir", file);          n++;
332                  free_if_alloc (file);      free_if_alloc (p);
333                  gnupg_check_homedir (); /* change gpgProgram if needed */      if (pub_only)
334              }          return n == 1? true : false;
335          }      p = get_gnupg_keyring (0, 0);
336          else {      if (file_exist_check (p) == 0 && get_file_size (p) == 0)
337              msg_box (NULL, _("GPG home directory could not be determited."),          n++;
338                       _("WinPT Error"), MB_ERR);      free_if_alloc (p);
339              goto start;      return n==2? true : false;
340          }  }
341      }  
342    
343      rc = check_gnupg_prog ();  /* Enable the mobility mode. */
344      if (rc) {  static void
345          if (msg_box (NULL, _("Could not find the GPG binary (gpg.exe).\n"  enable_mobile_mode (void)
346                               "Do you want to start the GPG preferences to "  {
347                               "correct  this problem?"), _("WinPT Error"),      memset (&reg_prefs, 0, sizeof (reg_prefs));
348                               MB_INFO|MB_YESNO) == IDYES)      reg_prefs.always_trust = 0;
349              start_gpgprefs = 1;      reg_prefs.auto_backup = 0;
350          else      reg_prefs.cache_time = 0;
351          {      reg_prefs.expert = 0;
352              msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);      reg_prefs.keylist_mode = 1;
353              return 0;      reg_prefs.kserv_conf = m_strdup ("keyserver.conf");
354          }      reg_prefs.no_zip_mmedia = 1;
355      }      reg_prefs.use_tmpfiles = 1;
356        reg_prefs.word_wrap = 80;
357      rc = gnupg_access_files ();      reg_prefs.use_viewer = 0; /* XXX */
358      if (!start_gpgprefs && rc) {  }
359          if (rc == WPTERR_GPG_KEYRINGS || rc == WPTERR_GPG_OPT_KEYRINGS) {  
360              ec = msg_box (NULL,  
361                  _("Could not access and/or find the public and secret keyring.\n"  /* Main entry point. */
362                    "If this is an accident, quit the program and fix it.\n\n"  int WINAPI
363                    "Continue if you want that WinPT offers you more choices.\n"),  WinMain (HINSTANCE hinst, HINSTANCE hprev, LPSTR cmdline, int showcmd)
364                    "WinPT", MB_INFO|MB_YESNO);  {
365              if (ec == IDYES)      WNDCLASS wc = {0, winpt_main_proc, 0, 0, hinst, 0, 0, 0, 0, PGM_NAME};
366                  first_start = 1;      HACCEL accel_tab;
367          }      MSG msg;
368          if (!first_start) {      HWND hwnd = NULL;
369              msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);      WORD ver[3], ptdver[4];
370              return 0;      int rc, ec, created = 0;
371          }      int first_start = 0, start_gpgprefs = 0;
372      }      int winpt_inst_found = 0;
373        int start_manager = 0;
374      if (!first_start) {      const char *s;
375          rc = gpg_check_permissions (1);  
376          if (rc && rc == 2)      glob_hinst = hinst;
377              gpg_read_only = 1;      if (cmdline && stristr (cmdline, "--stop")) {
378          else if (rc)          hwnd = FindWindow ("WinPT", "WinPT");
379              return 0;          if (hwnd != NULL)
380      }              PostMessage (hwnd, WM_DESTROY, 0, 0);
381            return 0;
382      load_gettext (winpt_inst_found);      }
383      init_gnupg_table ();  
384        /*
385      nfiles = fm_parse_command_line (cmdline);      OSVERSIONINFO osinf;
386      if (nfiles > 0) {      memset (&osinf, 0, sizeof (osinf));
387          free_gnupg_table ();      if (GetVersionEx (&osinf) &&
388          return 0;          osinf.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS &&
389      }          osinf.dwMinorVersion == 0) {
390            msg_box (NULL, "WinPT propably does not work on Windows 95 without restrictions",
391      if (cmdline && stristr (cmdline, "--wipe-freespace")) {                   "WinPT Warning", MB_INFO);
392          dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_SPACE_SECDEL,      }
393                              GetDesktopWindow(), space_wipefrees_dlg_proc, NULL,      */
394                              _("Wipe Free Space"), IDS_WINPT_SPACE_SECDEL);  
395          free_gnupg_table ();      #ifdef _DEBUG
396          return 0;      gpg_set_debug_mode (1);
397      }      debug = 1;
398        #endif
399      load_keyserver_conf (cmdline? 1 : 0);  
400        get_file_version ("WinPT.exe", &ver[0], &ver[1], &ver[2], &ver[3]);
401      if (cmdline && (stristr (cmdline, "--keymanager")      get_file_version ("PTD.dll", &ptdver[0], &ptdver[1],
402                  || stristr (cmdline, "--cardmanager"))) {                                   &ptdver[2], &ptdver[3]);
403          update_keycache (GetDesktopWindow ());      /* XXX
404          if (stristr (cmdline, "keymanager"))      if (ptdver[0] != ver[0] || ptdver[1] != ver[1]|| ptdver[2] != ver[2]) {
405              dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_KEYMISC,          log_box (_("WinPT Error"), MB_ERR,
406                              GetDesktopWindow(), keymanager_dlg_proc, NULL,                   _("The PTD.dll file has a different version than WinPT.exe\n"
407                              _("Key Manager"), IDS_WINPT_KEYMISC);                       "Please update the PTD.dll to version %d.%d.%d"),
408          else {                     ver[0], ver[1], ver[2]);
409              gpg_card_t crd = gpg_card_load ();          return 0;
410              if (crd)      }
411                  dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_CARD_EDIT,      */
412                                    GetDesktopWindow(), card_edit_dlg_proc,  
413                                    (LPARAM)crd, _("Card Manager"),      if (gpg_md_selftest ()) {
414                                    IDS_WINPT_CARD_EDIT);          msg_box (NULL, _("Cryptographic selftest failed."),
415              gpg_card_release (crd);                   _("WinPT Error"), MB_ERR);
416          }          return 0;
417          keycache_release (0);      }
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 we found another WinPT instance, just quit to avoid it                   _("WinPT Error"), MB_ERR);
423         will be executed twice. */          return 0;
424      if (winpt_inst_found) {      }
425          log_debug ("%s", "WinMain: WinPT is already running.");  
426          free_gnupg_table ();      CreateMutex (NULL, TRUE, PGM_NAME);
427          return 0;      if (GetLastError () == ERROR_ALREADY_EXISTS)
428      }          winpt_inst_found = 1;
429    
430      if (cmdline) {      if (cmdline && stristr (cmdline, "--mobile")) {
431          if (stristr (cmdline, "--enable-debug") || stristr (cmdline, "--debug")) {          msg_box (NULL, "WARNING: mobile modus is not fully implemented yet!",
432              gpg_set_debug_mode (1);                   "WinPT", MB_INFO);
433              winpt_debug_msg ();          mobile = 1;
434              debug = 1;      }
435          }  
436      }      set_default_kserver ();
437        load_gettext (winpt_inst_found);
438      wc.hIcon = LoadIcon (glob_hinst, MAKEINTRESOURCE (IDI_WINPT));  
439      rc = RegisterClass (&wc);      if (!mobile) {
440      if (rc == FALSE) {          regist_inst_gnupg (1);
441          msg_box (NULL, _("Could not register window class"),          regist_inst_winpt (1, &created);
442                   _("WinPT Error"), MB_ERR);      }
443          free_gnupg_table ();      else {
444          return 0;          enable_mobile_mode ();
445      }          /* XXX: ask for GPG path */
446            created = 1; /* Disable registry writing */
447      hwnd = CreateWindow (PGM_NAME,      }
448                           PGM_NAME,  
449                           0, 0, 0, 0, 0,      if (!created) {
450                           NULL,          memset (&reg_prefs, 0, sizeof (reg_prefs));
451                           NULL,          reg_prefs.use_tmpfiles = 1; /* default */
452                           hinst,          reg_prefs.fm.progress = 0; /* XXX: fix the bug and enable it again */
453                           NULL);          get_reg_winpt_prefs (&reg_prefs);
454      if (hwnd == NULL) {          if (!reg_prefs.no_hotkeys)
455          msg_box (NULL, _("Could not create window"), _("WinPT Error"), MB_ERR);              hotkeys_modify ();
456          free_gnupg_table ();          gnupg_load_config ();
457          return 0;      }
458      }      else { /* default settings. */
459      glob_hwnd = hwnd;          reg_prefs.keylist_mode = 1;
460      UpdateWindow (hwnd);      }
461    
462      if (!first_start && !start_gpgprefs) {      if (is_gpg4win_installed ())
463          gnupg_backup_options ();                  load_gpg_env (); /* XXX: check return code. */
464          rc = check_crypto_engine ();  
465          if (rc) {      rc = gnupg_check_homedir ();
466              DestroyWindow (hwnd);      if (rc) {
467              free_gnupg_table ();          log_box (_("WinPT Error"), MB_ERR,
468              return 0;                   _("GPG home directory is not set correctly.\n"
469          }                     "Please check the GPG registry settings:\n%s."),
470      }                   winpt_strerror (rc));
471                s = get_fileopen_dlg (GetActiveWindow (),
472      if (start_gpgprefs) {                                _("Select GPG Public Keyring"),
473          char *ring;                                "GPG Keyrings (*.gpg)\0*.gpg\0\0",
474          size_t size = 0;                                NULL);
475          DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,          if (s != NULL) {
476                          gpgprefs_dlg_proc, NULL);              size_t n;
477          ring = get_gnupg_keyring (0, !NO_STRICT);              char *p = strrchr (s, '\\');
478          if (gnupg_access_keyring (0) == -1 && get_file_size (ring) == 0)              if (!p)
479              first_start = 1; /* The keyring is empty! */                  BUG (0);
480          free_if_alloc (ring);              n = p - s;
481      }              if (n) {
482                    char *file = new char[n+1];
483      if (first_start) {                  if (!file)
484          struct first_start_s fs;                      BUG (NULL);
485          struct genkey_s c;                  memset (file, 0, n);
486          HWND h;                  memcpy (file, s, n);
487  start:                  file[n] = '\0';        
488          h = GetDesktopWindow ();                  set_reg_entry_gpg ("HomeDir", file);
489          DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, h,                  free_if_alloc (file);
490                              gpgprefs_dlg_proc, NULL);                  gnupg_check_homedir (); /* change gpgProgram if needed */
491          DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_FIRST, h,              }
492                          first_run_dlg_proc, (LPARAM)&fs);          }
493          switch (fs.choice) {          else {
494          case SETUP_KEYGEN:              msg_box (NULL, _("GPG home directory could not be determited."),
495              c.interactive = 1;                       _("WinPT Error"), MB_ERR);
496              c.first_start = 1;              goto start;
497              rc = DialogBoxParam (glob_hinst, (LPCSTR)IDD_WINPT_KEYWIZARD,          }
498                                   h, keygen_wizard_dlg_proc, (LPARAM)&c);      }
499              if (!rc)  
500                  goto start;      rc = check_gnupg_prog ();
501              break;      if (rc) {
502            if (msg_box (NULL, _("Could not find the GPG binary (gpg.exe).\n"
503          case SETUP_IMPORT:                               "Do you want to start the GPG preferences to "
504              rc = gnupg_copy_keyrings ();                               "correct  this problem?"), _("WinPT Error"),
505              if (rc) {                               MB_INFO|MB_YESNO) == IDYES)
506                  msg_box (hwnd, winpt_strerror (rc), _("WinPT Error"), MB_ERR);              start_gpgprefs = 1;
507                  goto start;          else {
508              }              msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
509              break;              return 0;
510            }
511          case -1:      }
512              DestroyWindow (hwnd);  
513              free_gnupg_table ();      rc = gnupg_access_files ();
514              return 0;      if (!start_gpgprefs && rc) {
515          }          if (rc == WPTERR_GPG_KEYRINGS || rc == WPTERR_GPG_OPT_KEYRINGS) {
516          update_keycache (hwnd);              ec = msg_box (NULL,
517          check_crypto_engine ();                  _("Could not access and/or find the public and secret keyring.\n"
518      }                    "If this is an accident, quit the program and fix it.\n\n"
519      else {                    "Continue if you want that WinPT offers you more choices.\n"),
520          gpg_keycache_t c;                    "WinPT", MB_INFO|MB_YESNO);
521          update_keycache (hwnd);              if (ec == IDYES)
522          c = keycache_get_ctx (1);                  first_start = 1;
523          if (!c || !gpg_keycache_get_size (c)) {          }
524              gnupg_display_error ();          if (!first_start) {
525              msg_box (hwnd, _("The keycache was not initialized or is empty.\n"              msg_box (NULL, winpt_strerror (rc), _("WinPT Error"), MB_ERR);
526                               "Please check your GPG config (keyrings, pathes...)"),              return 0;
527                               _("WinPT Error"), MB_ERR);          }
528              ec = msg_box (NULL, _("It seems that GPG is not set properly.\n"      }
529                                    "Do you want to start the GPG preferences dialog?"),      if (check_for_empty_keyrings (false))
530                              "WinPT", MB_INFO|MB_YESNO);          first_start = 1;
531              if (ec == IDYES) {  
532                  DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_GPGPREFS, hwnd,      if (!first_start) {
533                                  gpgprefs_dlg_proc, NULL);          rc = gpg_check_permissions (1);
534                  update_keycache (hwnd);          if (rc && rc == 2)
535              }              gpg_read_only = 1;
536              else {          else if (rc)
537                  DestroyWindow (hwnd);              return 0;
538                  free_gnupg_table ();      }
539                  return 0;      
540              }      init_gnupg_table ();
541          }  
542          if (check_default_key (c)) {      if (fm_parse_command_line (cmdline) > 0) {
543              char * p = get_gnupg_default_key ();          free_gnupg_table ();
544              log_box (_("WinPT Error"), MB_ERR,          return 0;
545                       _("Default key from the GPG options file could not be found.\n"      }
546                         "Please check your gpg.conf (options) to correct this:\n\n"  
547                         "%s: public key not found."), p? p : "[null]");      if (cmdline && stristr (cmdline, "--wipe-freespace")) {
548              free_if_alloc (p);          dialog_box_param (glob_hinst, (LPCTSTR)IDD_WINPT_SPACE_SECDEL,
549              DestroyWindow (hwnd);                              GetDesktopWindow(), space_wipefrees_dlg_proc, 0,
550              free_gnupg_table ();                              _("Wipe Free Space"), IDS_WINPT_SPACE_SECDEL);
551              return 0;          free_gnupg_table ();
552          }          return 0;
553          if (count_insecure_elgkeys ())      }
554              DialogBoxParam (glob_hinst, (LPCTSTR)IDD_WINPT_ELGWARN, glob_hwnd,  
555                              elgamal_warn_dlg_proc, NULL);      load_keyserver_conf (cmdline? 1 : 0);
556      }  
557        if (cmdline && (stristr (cmdline, "--keymanager")
558      accel_tab = LoadAccelerators (glob_hinst, (LPCTSTR)IDR_WINPT_ACCELERATOR);                  || stristr (cmdline, "--cardmanager"))) {
559      keyring_check_last_access (); /* init */          /* If an instance of WinPT is running, just send the command
560      while (GetMessage (&msg, hwnd, 0, 0)) {             to open the key manager. Otherwise start a new instance.
561          if (!TranslateAccelerator (msg.hwnd, accel_tab, &msg)) {           */
562              TranslateMessage (&msg);          HWND tray = FindWindow ("WinPT", "WinPT");
563              DispatchMessage (&msg);          if (stristr (cmdline, "keymanager"))
564          }              start_manager = ID_WINPT_KEY;
565      }          else
566                        start_manager = ID_WINPT_CARD;
567      return 0;          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.34  
changed lines
  Added in v.168

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26