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

Legend:
Removed from v.32  
changed lines
  Added in v.181

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26