1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
--- 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;
|
