extra/crypto/passwd-md5/passwd-md5-tests.factor

   1 ! Copyright (C) 2008 Doug Coleman.
   2 ! See http://factorcode.org/license.txt for BSD license.
   3 USING: tools.test crypto.passwd-md5 ;
   4 IN: crypto.passwd-md5.tests
   5
   6
   7 { "$1$npUpD5oQ$1.X7uXR2QG0FzPifVeZ2o1" }
   8 [ "$1$" "npUpD5oQ" "factor" passwd-md5 ] unit-test
   9
  10 { "$1$Kilak4kR$wlEr5Dv5DcdqPjKjQtt430" }
  11 [
  12     "$1$"
  13     "Kilak4kR"
  14     "longpassword12345678901234567890"
  15     passwd-md5
  16 ] unit-test