crypto
Anastasia Gornostaeva
ermine@REDACTED
Fri Apr 18 11:43:58 CEST 2003
On Thu, Apr 17, 2003 at 01:14:47PM +0400, Anastasia Gornostaeva wrote:
> On FreeBSD, we have:
>
> bash-2.05b$ erl
> Erlang (BEAM) emulator version 5.2.3.3 [source] [hipe] [threads:0]
>
> Eshell V5.2.3.3 (abort with ^G)
> 1> crypto:start().
> crypto_drv:start : function 9 not initialized
> {error,{shutdown,{crypto_app,start,[normal,[]]}}}
>
> =INFO REPORT==== 17-Apr-2003::13:09:09 ===
> application: crypto
> exited: {shutdown,{crypto_app,start,[normal,[]]}}
> type: temporary
> 2>
>
> Why? Please give a good solution.
Patch is for FreeBSD 4.8 and is below. Big thanks to Alexander Timoshenko.
ermine
diff -ur lib/crypto.old/c_src/Makefile.in lib/crypto/c_src/Makefile.in
--- lib/crypto.old/c_src/Makefile.in Fri Apr 18 10:20:27 2003
+++ lib/crypto/c_src/Makefile.in Fri Apr 18 10:20:58 2003
@@ -107,9 +107,9 @@
-u SHA1_Init \
-u SHA1_Update \
-u SHA1_Final \
- -u des_set_key \
- -u des_ncbc_encrypt \
- -u des_ede3_cbc_encrypt
+ -u DES_set_key \
+ -u DES_ncbc_encrypt \
+ -u DES_ede3_cbc_encrypt
endif
# ----------------------------------------------------
diff -ur lib/crypto.old/c_src/crypto_drv.c lib/crypto/c_src/crypto_drv.c
--- lib/crypto.old/c_src/crypto_drv.c Fri Apr 18 10:20:27 2003
+++ lib/crypto/c_src/crypto_drv.c Fri Apr 18 10:21:19 2003
@@ -208,9 +208,9 @@
cfs.SHA1_Init = driver_dl_sym(lib_handle, "SHA1_Init");
cfs.SHA1_Update = driver_dl_sym(lib_handle, "SHA1_Update");
cfs.SHA1_Final = driver_dl_sym(lib_handle, "SHA1_Final");
- cfs.des_set_key = driver_dl_sym(lib_handle, "des_set_key");
- cfs.des_ncbc_encrypt = driver_dl_sym(lib_handle, "des_ncbc_encrypt");
- cfs.des_ede3_cbc_encrypt = driver_dl_sym(lib_handle, "des_ede3_cbc_encrypt");
+ cfs.des_set_key = driver_dl_sym(lib_handle, "DES_set_key");
+ cfs.des_ncbc_encrypt = driver_dl_sym(lib_handle, "DES_ncbc_encrypt");
+ cfs.des_ede3_cbc_encrypt = driver_dl_sym(lib_handle, "DES_ede3_cbc_encrypt");
/* Check that all pointer where initialized */
for (i = 0; i < sizeof(crypto_funcs)/sizeof(void*); i++) {
More information about the erlang-questions
mailing list