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

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

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26