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