bin/mkntpasswd

   1 #!/bin/sh
   2 if [ $# -ne 1 ]; then
   3         echo "Usage: mkntpwd <password>"
   4         exit 1
   5 fi
   6
   7 # Render hash using perl
   8 perl -MCrypt::SmbHash -e "print join(q[:], ntlmgen $ARGV[0]), $/;"
   9
  10 exit 0