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

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26