summaryrefslogtreecommitdiff
path: root/win32/win32.c
diff options
context:
space:
mode:
authorJan Dubois <jand@activestate.com>2010-12-07 13:51:46 -0800
committerJan Dubois <jand@activestate.com>2010-12-07 14:20:53 -0800
commit9cef83062267e94311e1fd8744396e440642738e (patch)
tree91d98f7d1d66f9e760e1d3c0648374bca7087fa4 /win32/win32.c
parent9d021ad4f2bddaf5f0cd07d1c565a2ebdc9f4d6d (diff)
downloadperl-9cef83062267e94311e1fd8744396e440642738e.tar.gz
Always build with crypt() support on Windows
The sources did support to drop win32/fcrypt.c from a Perl distribution and build without a crypt() implementation to account for the paranoia around distribution of encryption technology. However sources and binaries have been released for at least 10 years with all the code in place, so there is not much point in making it configurable.
Diffstat (limited to 'win32/win32.c')
-rw-r--r--win32/win32.c7
1 files changed, 0 insertions, 7 deletions
diff --git a/win32/win32.c b/win32/win32.c
index 721f4d6406..228dddedb8 100644
--- a/win32/win32.c
+++ b/win32/win32.c
@@ -2264,20 +2264,13 @@ win32_alarm(unsigned int sec)
return 0;
}
-#ifdef HAVE_DES_FCRYPT
extern char * des_fcrypt(const char *txt, const char *salt, char *cbuf);
-#endif
DllExport char *
win32_crypt(const char *txt, const char *salt)
{
dTHX;
-#ifdef HAVE_DES_FCRYPT
return des_fcrypt(txt, salt, w32_crypt_buffer);
-#else
- Perl_croak(aTHX_ "The crypt() function is unimplemented due to excessive paranoia.");
- return NULL;
-#endif
}
/* simulate flock by locking a range on the file */