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