Subversion Repositories wimsdev

Rev

Rev 5352 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

# delay 5 minutes after wrong auth password.

currentauth=$wims_nowseconds
lastauth=!record 0 of wimshome/$wims_sesdir/lastauth
lastauth=!word 1 of $lastauth
!writefile wimshome/$wims_sesdir/lastauth $currentauth
!if $lastauth!=$empty and $lastauth>=$currentauth-5
  auth_password=?$[$currentauth-$lastauth]????
  delay=bad
!else
  delay=good
  auth_password=!passcrypt $auth_password
!endif