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