Code

Updated divlists to include the ldap base
[gosa.git] / bin / mkntpasswd
index e14b057b21a46777833a19d8f02ac905b099562b..1749958298cb52c14c5c888e6cd8d9b9484606ec 100755 (executable)
@@ -1,3 +1,10 @@
 #!/bin/sh
-perl -MCrypt::SmbHash -e "ntlmgen \"\$ARGV[0]\", \$lm, \$nt; print \"\${lm}:\${nt}\n\";" $1 
+if [ $# -ne 1 ]; then
+       echo "Usage: mkntpwd <password>"
+       exit 1
+fi
+
+# Render hash using perl
+perl -MCrypt::SmbHash -e "print join(q[:], ntlmgen $ARGV[0]), $/;"
+
 exit 0