mirror of
https://git.freebsd.org/ports.git
synced 2025-07-09 05:19:16 -04:00
52b76e1327
author. As before, we modify the author's code to use either OpenSSL's -lcrypto or BSD's -lmd /directly/ instead of compiling the bundled definitions digests. We also link with -lz and -lbz2 instead of dlopen-ing them at run-time.
36 lines
788 B
Text
36 lines
788 B
Text
--- generic/crypt.c 2009-06-18 00:54:43.000000000 -0400
|
|
+++ generic/crypt.c 2009-07-12 21:34:19.000000000 -0400
|
|
@@ -28,5 +28,9 @@
|
|
*/
|
|
|
|
-#include "loadman.h"
|
|
+#ifndef __WIN32__
|
|
+# include <sys/types.h>
|
|
+# include <unistd.h>
|
|
+#endif
|
|
+#include "transformInt.h"
|
|
|
|
static int
|
|
@@ -112,4 +116,6 @@
|
|
*/
|
|
|
|
+char *crypt_md5(const char *pw, const char *salt); /* Lives in -lcrypt */
|
|
+
|
|
static int
|
|
TrfMd5CryptObjCmd (notUsed, interp, objc, objv)
|
|
@@ -128,8 +134,4 @@
|
|
Tcl_Obj* res;
|
|
|
|
- if (TrfLoadMD5 (interp) != TCL_OK) {
|
|
- return TCL_ERROR;
|
|
- }
|
|
-
|
|
if (objc != 3) {
|
|
Tcl_AppendResult (interp,
|
|
@@ -159,5 +161,5 @@
|
|
|
|
TrfLock;
|
|
- res = Tcl_NewStringObj ((char*) md5f.crypt (passwd, salt_b) + 3, -1);
|
|
+ res = Tcl_NewStringObj (crypt_md5(passwd, salt_b) + 3, -1);
|
|
TrfUnlock;
|
|
|