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 <config.h> |
22 |
|
#endif |
23 |
|
|
24 |
#include <windows.h> |
#include <windows.h> |
25 |
#include <string.h> |
#include <string.h> |
26 |
#include <stdio.h> |
#include <stdio.h> |
30 |
#include <time.h> |
#include <time.h> |
31 |
|
|
32 |
#include "wptGPG.h" |
#include "wptGPG.h" |
33 |
#include "wptGPGCmds.h" |
#include "wptGpgCmds.h" |
34 |
#include "wptGPGOptSkel.h" |
#include "wptGPGOptSkel.h" |
35 |
#include "wptTypes.h" |
#include "wptTypes.h" |
36 |
#include "wptNLS.h" |
#include "wptNLS.h" |
39 |
#include "wptW32API.h" |
#include "wptW32API.h" |
40 |
#include "wptCrypto.h" |
#include "wptCrypto.h" |
41 |
|
|
42 |
#define GPG_CONF "gpg.conf" |
#define GPG_CONF "gpg.conf" |
43 |
|
#define GPG_REG_EXE "gpgProgram" /* registry name for the binary. */ |
44 |
|
#define GPG_REG_HOME "HomeDir" /* registry name of the home dir. */ |
45 |
|
|
46 |
struct gpg_watcher_s { |
struct gpg_watcher_s { |
47 |
FILETIME last_access; |
FILETIME last_access; |
63 |
|
|
64 |
/* Return the application data folder of the current user. */ |
/* Return the application data folder of the current user. */ |
65 |
static char* |
static char* |
66 |
multi_gnupg_path (void) |
multi_gnupg_path (int strict) |
67 |
{ |
{ |
68 |
static char buf[256+64]; |
static char buf[256+64]; |
69 |
BOOL ec; |
BOOL ec; |
72 |
memset (buf, 0, sizeof (buf)); |
memset (buf, 0, sizeof (buf)); |
73 |
/* XXX: ec should be NOERROR (MSDN) but NOERROR is defined as '0' !? */ |
/* XXX: ec should be NOERROR (MSDN) but NOERROR is defined as '0' !? */ |
74 |
ec = SHGetSpecialFolderPath (HWND_DESKTOP, buf, CSIDL_APPDATA, TRUE); |
ec = SHGetSpecialFolderPath (HWND_DESKTOP, buf, CSIDL_APPDATA, TRUE); |
75 |
if (ec != 1) |
if (ec != 1) { |
76 |
|
log_debug ("multi_gnupg_path: SHGetSpecialFolderPath() failed\r\n", |
77 |
|
(int)GetLastError ()); |
78 |
return NULL; |
return NULL; |
79 |
|
} |
80 |
strcat (buf, "\\gnupg"); |
strcat (buf, "\\gnupg"); |
81 |
if (access (buf, 00)) |
if (strict && access (buf, 00)) |
82 |
return NULL; |
return NULL; |
83 |
return m_strdup (buf); |
return m_strdup (buf); |
84 |
} |
} |
90 |
char* |
char* |
91 |
get_gnupg_path (void) |
get_gnupg_path (void) |
92 |
{ |
{ |
93 |
char *p = NULL, *path = NULL; |
char *p = NULL; |
94 |
|
char *path = NULL; |
95 |
|
|
96 |
p = get_reg_entry_gpg ("HomeDir"); |
p = get_reg_entry_gpg (GPG_REG_HOME); |
97 |
if (p) { |
if (p) { |
98 |
path = m_strdup (p); |
path = m_strdup (p); |
99 |
free_if_alloc (p); |
free_if_alloc (p); |
100 |
return path; |
return path; |
101 |
} |
} |
102 |
else |
else |
103 |
return multi_gnupg_path (); |
return multi_gnupg_path (1); |
104 |
return m_strdup ("c:\\gnupg"); |
return m_strdup ("c:\\gnupg"); |
105 |
} |
} |
106 |
|
|
110 |
char* |
char* |
111 |
get_gnupg_cfgfile (void) |
get_gnupg_cfgfile (void) |
112 |
{ |
{ |
113 |
char *p = NULL, *optfile = NULL, *path = NULL; |
char *p = NULL; |
114 |
|
char *optfile = NULL; |
115 |
|
char *path = NULL; |
116 |
size_t nlen = 0; |
size_t nlen = 0; |
117 |
|
|
118 |
path = get_gnupg_path (); |
path = get_gnupg_path (); |
163 |
free_if_alloc (path); |
free_if_alloc (path); |
164 |
return keyring; |
return keyring; |
165 |
} |
} |
166 |
if (file_exist_check (keyring) || get_file_size (keyring) == 0) { |
if (file_exist_check (keyring) || pub && get_file_size (keyring) == 0) { |
167 |
free_if_alloc (keyring); |
free_if_alloc (keyring); |
168 |
optfile = make_filename (path, GPG_CONF, NULL); |
optfile = make_filename (path, GPG_CONF, NULL); |
169 |
keyring = get_gnupg_keyring_from_options (optfile, pub); |
keyring = get_gnupg_keyring_from_options (optfile, pub); |
177 |
/* Return the full path (with the gpg exe name). First the registry is scanned |
/* Return the full path (with the gpg exe name). First the registry is scanned |
178 |
for the entry 'gpgProgram'. If it wasn't set, the default path is the |
for the entry 'gpgProgram'. If it wasn't set, the default path is the |
179 |
appended string 'gpg.exe' is used. */ |
appended string 'gpg.exe' is used. */ |
180 |
|
|
181 |
|
/* FIXME: Use gpgme's engine info here. */ |
182 |
char* |
char* |
183 |
get_gnupg_prog (void) |
get_gnupg_prog (void) |
184 |
{ |
{ |
185 |
char *p; |
char *p; |
186 |
char *pgm = NULL; |
char *pgm = NULL; |
|
size_t nlen = 0; |
|
187 |
|
|
188 |
p = get_reg_entry_gpg ("gpgProgram"); |
p = get_reg_entry_gpg (GPG_REG_EXE); |
189 |
if (!p) { |
if (!p) { |
190 |
char *path = get_gnupg_path (); |
char *path = get_gnupg_path (); |
191 |
if (!path) |
if (!path) |
207 |
static char * |
static char * |
208 |
default_key_from_cache (int *ret_no_useable) |
default_key_from_cache (int *ret_no_useable) |
209 |
{ |
{ |
210 |
const char * s; |
const char *s; |
211 |
char * keyid = NULL; |
char *keyid = NULL; |
212 |
gpgme_key_t key; |
gpgme_key_t key; |
213 |
gpg_keycache_t sec = keycache_get_ctx (0); |
gpg_keycache_t sec = keycache_get_ctx (0); |
214 |
|
|
223 |
break; |
break; |
224 |
} |
} |
225 |
} |
} |
226 |
if (!keyid) { |
if (!keyid) |
227 |
*ret_no_useable = 1; |
*ret_no_useable = 1; |
|
msg_box (NULL, _("No useable secret key found."), _("GPG Error"), MB_ERR); |
|
|
} |
|
228 |
return keyid; |
return keyid; |
229 |
} |
} |
230 |
|
|
268 |
return default_key_from_cache (&no_usable); |
return default_key_from_cache (&no_usable); |
269 |
rc = parse_gpg_options (optfile, &opt); |
rc = parse_gpg_options (optfile, &opt); |
270 |
if (rc) { |
if (rc) { |
271 |
free_if_alloc( optfile ); |
free_if_alloc (optfile); |
272 |
return default_key_from_cache( &no_usable ); |
return default_key_from_cache (&no_usable); |
273 |
} |
} |
274 |
e = find_option( opt, "default-key" ); |
e = find_option( opt, "default-key" ); |
275 |
if ( e ) |
if ( e ) |
293 |
} /* get_gnupg_default_key */ |
} /* get_gnupg_default_key */ |
294 |
|
|
295 |
|
|
296 |
|
char* get_reg_entry_gpg4win (const char *path); |
297 |
|
|
298 |
|
/* Check if GPG4WIN is available and if so, use the |
299 |
|
install path to figure out where the gpg.exe is. */ |
300 |
|
char* |
301 |
|
check_for_gpg4win (void) |
302 |
|
{ |
303 |
|
return get_reg_entry_gpg4win ("gpg.exe"); |
304 |
|
} |
305 |
|
|
306 |
|
|
307 |
/* Check if the gpg application (exe file) is available. */ |
/* Check if the gpg application (exe file) is available. */ |
308 |
int |
int |
309 |
check_gnupg_prog (void) |
check_gnupg_prog (void) |
310 |
{ |
{ |
311 |
char *pgm = NULL; |
char *gpgexe = NULL; |
312 |
int rc = 0; |
int rc = 0; |
313 |
|
|
314 |
pgm = get_gnupg_prog (); |
gpgexe = get_gnupg_prog (); |
315 |
if (!pgm) |
if (!gpgexe || file_exist_check (gpgexe)) { |
316 |
rc = WPTERR_GPG_EXEFILE; |
free_if_alloc (gpgexe); |
317 |
if (file_exist_check (pgm)) |
gpgexe = check_for_gpg4win (); |
318 |
rc = WPTERR_GPG_EXEFILE; |
if (!gpgexe || file_exist_check (gpgexe)) |
319 |
free_if_alloc (pgm); |
rc = WPTERR_GPG_EXEFILE; |
320 |
|
else |
321 |
|
set_reg_entry_gpg (GPG_REG_EXE, gpgexe); |
322 |
|
} |
323 |
|
free_if_alloc (gpgexe); |
324 |
return rc; |
return rc; |
325 |
} |
} |
326 |
|
|
342 |
tmp[i] = 0; buf++; |
tmp[i] = 0; buf++; |
343 |
*minor = atol (tmp); |
*minor = atol (tmp); |
344 |
i=0; |
i=0; |
345 |
while (buf && isdigit( *buf ) && i < 8) |
while (buf && isdigit (*buf) && i < 8) |
346 |
tmp[i++] = *buf++; |
tmp[i++] = *buf++; |
347 |
tmp[i] = 0; |
tmp[i] = 0; |
348 |
*patch = atol (tmp); |
*patch = atol (tmp); |
358 |
{ |
{ |
359 |
gpgme_ctx_t ctx; |
gpgme_ctx_t ctx; |
360 |
gpgme_engine_info_t inf; |
gpgme_engine_info_t inf; |
361 |
char * eng = NULL; |
char *eng = NULL; |
362 |
int major=0, minor=0, patch=0; |
int major=0, minor=0, patch=0; |
363 |
int rc; |
int rc = 1; |
364 |
|
|
365 |
gpgme_new (&ctx); |
gpgme_new (&ctx); |
366 |
inf = gpgme_ctx_get_engine_info (ctx); |
inf = gpgme_ctx_get_engine_info (ctx); |
368 |
gpgme_release (ctx); |
gpgme_release (ctx); |
369 |
return -1; |
return -1; |
370 |
} |
} |
371 |
|
|
372 |
/* We need to exec GPG again to find out if IDEA is available. */ |
/* We need to exec GPG again to find out if IDEA is available. */ |
373 |
if (gpg_get_version (&eng)) |
if (gpg_get_version (&eng)) |
374 |
return -1; |
return -1; |
375 |
if (strstr (eng, "IDEA")) |
if (strstr (eng, "IDEA")) |
376 |
idea_available = 1; |
idea_available = 1; |
377 |
free (eng); |
free (eng); |
378 |
rc = parse_version_nr( inf->version, &major, &minor, &patch ); |
rc = parse_version_nr (inf->version, &major, &minor, &patch); |
379 |
if( rc ) { |
if (rc) { |
380 |
gpgme_release (ctx); |
gpgme_release (ctx); |
381 |
return rc; |
return rc; |
382 |
} |
} |
383 |
if (major < *r_major || minor < *r_minor) |
|
384 |
rc = 1; |
if (major > *r_major) |
|
else { |
|
|
if (patch < *r_patch) |
|
|
rc = 1; |
|
385 |
rc = 0; |
rc = 0; |
386 |
} |
else if (major == *r_major && minor > *r_minor) |
387 |
|
rc = 0; |
388 |
|
else if (major == *r_major && minor == *r_minor && |
389 |
|
patch >= *r_patch) |
390 |
|
rc = 0; |
391 |
|
|
392 |
*r_major = major; |
*r_major = major; |
393 |
*r_minor = minor; |
*r_minor = minor; |
394 |
*r_patch = patch; |
*r_patch = patch; |
444 |
rc = WPTERR_GPG_KEYRINGS; |
rc = WPTERR_GPG_KEYRINGS; |
445 |
else |
else |
446 |
secring_ok = 1; |
secring_ok = 1; |
447 |
|
|
448 |
if (!pubring_ok || !secring_ok) { |
if (!pubring_ok || !secring_ok) { |
449 |
optfile = get_gnupg_cfgfile (); |
optfile = get_gnupg_cfgfile (); |
450 |
if (!optfile) |
if (!optfile) |
451 |
return WPTERR_GPG_KEYRINGS; |
return WPTERR_GPG_KEYRINGS; |
452 |
rc = file_exist_check (optfile); |
rc = file_exist_check (optfile); |
453 |
if (!rc && get_file_size(optfile) > 0) { |
if (!rc && get_file_size (optfile) > 0) { |
454 |
rc = check_gnupg_cfgfile (optfile, &secrings, &pubrings); |
rc = check_gnupg_cfgfile (optfile, &secrings, &pubrings); |
455 |
if (!rc && secrings && pubrings) { |
if (!rc && secrings && pubrings) { |
456 |
free_if_alloc (optfile); |
free_if_alloc (optfile); |
477 |
FILE *fp; |
FILE *fp; |
478 |
char *s, *optfile; |
char *s, *optfile; |
479 |
|
|
480 |
s = get_gnupg_path( ); |
s = get_gnupg_path (); |
481 |
if( s == NULL ) |
if( s == NULL ) |
482 |
return WPTERR_FILE_CREAT; |
return WPTERR_FILE_CREAT; |
483 |
optfile = make_filename( s, GPG_CONF, NULL ); |
optfile = make_filename (s, GPG_CONF, NULL); |
484 |
fp = fopen( optfile, "wb" ); |
fp = fopen( optfile, "wb" ); |
485 |
if( fp == NULL ) { |
if( fp == NULL ) { |
486 |
return WPTERR_FILE_CREAT; |
return WPTERR_FILE_CREAT; |
789 |
} |
} |
790 |
|
|
791 |
|
|
792 |
|
/* Check the file permissions of the public keyring. |
793 |
|
If @showmsg is 1 output a message in case of errors. |
794 |
|
Return value: 1 if read-only attribute |
795 |
|
2 if file is opened by another process exclusively. */ |
796 |
int |
int |
797 |
gpg_check_permissions (int showmsg) |
gpg_check_permissions (int showmsg) |
798 |
{ |
{ |
819 |
} |
} |
820 |
} |
} |
821 |
else if (ans == IDNO) { |
else if (ans == IDNO) { |
822 |
/* |
/* All commands with write access will be disabled. */ |
|
msg_box (NULL, _("All commands with write access to the keyring\n" |
|
|
"will be disabled."), _("GPG Information"), MB_INFO); |
|
|
*/ |
|
823 |
failed = 1; |
failed = 1; |
824 |
} |
} |
825 |
} |
} |
837 |
} |
} |
838 |
free_if_alloc (name); |
free_if_alloc (name); |
839 |
return failed; |
return failed; |
840 |
} /* gpg_check_permissions */ |
} |
841 |
|
|
842 |
|
|
843 |
/* Check the GPG home dir. If all methods failed, try to |
/* Check the GPG home dir. If all methods failed, try to |
846 |
check_homedir (void) |
check_homedir (void) |
847 |
{ |
{ |
848 |
char *homedir = NULL; |
char *homedir = NULL; |
849 |
int yes = 0; |
int yes = 0, set_reg=0; |
850 |
|
int rc = 0; |
851 |
|
|
852 |
homedir = get_reg_entry_gpg ("HomeDir"); |
homedir = get_reg_entry_gpg (GPG_REG_HOME); |
853 |
if (!homedir) |
if (!homedir) { |
854 |
homedir = multi_gnupg_path (); |
set_reg = 1; |
855 |
|
homedir = multi_gnupg_path (0); |
856 |
|
} |
857 |
if (!homedir) |
if (!homedir) |
858 |
homedir = m_strdup ("c:\\gnupg"); |
homedir = m_strdup ("c:\\gnupg"); |
859 |
if (homedir) { |
if (homedir) { |
862 |
_("%s does not exit.\n" |
_("%s does not exit.\n" |
863 |
"Do you want to create this directory?"), homedir); |
"Do you want to create this directory?"), homedir); |
864 |
if (yes == IDYES) { |
if (yes == IDYES) { |
865 |
BOOL ec = CreateDirectory (homedir, NULL); |
if (!CreateDirectory (homedir, NULL)) |
866 |
free_if_alloc (homedir); |
rc = WPTERR_DIR_CREAT; |
|
if (ec == FALSE) |
|
|
return WPTERR_DIR_CREAT; |
|
|
return 0; |
|
867 |
} |
} |
868 |
return WPTERR_DIR_OPEN; |
else |
869 |
|
rc = WPTERR_DIR_OPEN; |
870 |
} |
} |
871 |
|
if (set_reg) |
872 |
|
set_reg_entry_gpg (GPG_REG_HOME, homedir); |
873 |
free_if_alloc (homedir); |
free_if_alloc (homedir); |
874 |
} |
} |
875 |
return 0; |
return rc; |
876 |
} |
} |
877 |
|
|
878 |
|
|
881 |
{ |
{ |
882 |
char *homedir = NULL; |
char *homedir = NULL; |
883 |
char *prog = NULL; |
char *prog = NULL; |
884 |
int rc = 0, ec = 0; |
int rc = 0; |
885 |
|
|
886 |
rc = check_homedir (); |
rc = check_homedir (); |
887 |
if (rc) |
if (rc) |
888 |
return rc; |
return rc; |
889 |
if ((homedir = get_reg_entry_gpg ("HomeDir")) && |
if ((homedir = get_reg_entry_gpg (GPG_REG_HOME)) && |
890 |
!(prog = get_reg_entry_gpg ("gpgProgram" ))) { |
!(prog = get_reg_entry_gpg (GPG_REG_EXE ))) { |
891 |
prog = make_filename (homedir, "gpg", "exe"); |
prog = make_filename (homedir, "gpg", "exe"); |
892 |
if (file_exist_check (prog) == 0) { |
if (file_exist_check (prog) == 0) { |
893 |
rc = set_reg_entry_gpg ("gpgProgram", prog); |
rc = set_reg_entry_gpg (GPG_REG_EXE, prog); |
894 |
if (rc) |
if (rc) |
895 |
goto fail; |
goto fail; |
896 |
} |
} |
898 |
free_if_alloc (prog); |
free_if_alloc (prog); |
899 |
return rc; |
return rc; |
900 |
} |
} |
901 |
if ((prog = get_reg_entry_gpg ("gpgProgram")) |
if ((prog = get_reg_entry_gpg (GPG_REG_EXE)) |
902 |
&& file_exist_check (prog)) { |
&& file_exist_check (prog)) { |
903 |
free_if_alloc (prog); |
free_if_alloc (prog); |
904 |
homedir = get_reg_entry_gpg ("HomeDir"); |
homedir = get_reg_entry_gpg (GPG_REG_HOME); |
905 |
if (!homedir) { |
if (!homedir) { |
906 |
rc = WPTERR_GENERAL; |
rc = WPTERR_GENERAL; |
907 |
goto fail; |
goto fail; |
908 |
} |
} |
909 |
prog = make_filename (homedir, "gpg", "exe"); |
prog = make_filename (homedir, "gpg", "exe"); |
910 |
if (file_exist_check (prog) == 0) { |
if (file_exist_check (prog) == 0) { |
911 |
rc = set_reg_entry_gpg ("gpgProgram", prog); |
rc = set_reg_entry_gpg (GPG_REG_EXE, prog); |
912 |
if (rc) |
if (rc) |
913 |
goto fail; |
goto fail; |
914 |
free_if_alloc (prog); |
free_if_alloc (prog); |
941 |
return WPTERR_GENERAL; |
return WPTERR_GENERAL; |
942 |
hwnd = GetDesktopWindow (); |
hwnd = GetDesktopWindow (); |
943 |
|
|
944 |
pring = get_filename_dlg (hwnd, FILE_OPEN, _("Please choose your public keyring"), |
pring = get_fileopen_dlg (hwnd, _("Please choose your public keyring"), |
945 |
_("GPG Keyrings (*.gpg)\0*.gpg\0\0"),NULL); |
_("GPG Keyrings (*.gpg)\0*.gpg\0\0"),NULL); |
946 |
if (!pring) { |
if (!pring) { |
947 |
msg_box (hwnd, _("No keyring was chosen. Exit."), _("WinPT Error"), MB_ERR); |
msg_box (hwnd, _("No keyring was chosen. Exit."), _("WinPT Error"), MB_ERR); |
961 |
} |
} |
962 |
free_if_alloc (file); |
free_if_alloc (file); |
963 |
|
|
964 |
sring = get_filename_dlg (hwnd, FILE_OPEN, _("Please choose your secret keyring"), |
sring = get_fileopen_dlg (hwnd, _("Please choose your secret keyring"), |
965 |
_("GPG Keyrings (*.gpg)\0*.gpg\0\0"), NULL); |
_("GPG Keyrings (*.gpg)\0*.gpg\0\0"), NULL); |
966 |
if (!sring) { |
if (!sring) { |
967 |
msg_box( NULL, _("No keyring was chosen. Exit."), _("WinPT Error"), MB_ERR ); |
msg_box( NULL, _("No keyring was chosen. Exit."), _("WinPT Error"), MB_ERR ); |
1109 |
else { |
else { |
1110 |
rc = 0; |
rc = 0; |
1111 |
fclose (fp); |
fclose (fp); |
1112 |
unlink (tmpfile); |
remove (tmpfile); |
1113 |
} |
} |
1114 |
free_if_alloc (tmpfile); |
free_if_alloc (tmpfile); |
1115 |
if (!fp || rc == IDCANCEL) |
if (!fp || rc == IDCANCEL) |