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