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

[email protected]
ViewVC Help
Powered by ViewVC 1.1.26