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

Legend:
Removed from v.34  
changed lines
  Added in v.154

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26