/[winpt]/trunk/Src/WinPT.cpp
ViewVC logotype

Diff of /trunk/Src/WinPT.cpp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

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

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

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26