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