Subversion Repositories wimsdev

Rev

Rev 5352 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5352 Rev 12555
Line 3... Line 3...
3 
currentauth=$wims_nowseconds
 3 
currentauth=$wims_nowseconds
4 
lastauth=!record 0 of wimshome/$wims_sesdir/lastauth
 4 
lastauth=!record 0 of wimshome/$wims_sesdir/lastauth
5 
lastauth=!word 1 of $lastauth
 5 
lastauth=!word 1 of $lastauth
6 
!writefile wimshome/$wims_sesdir/lastauth $currentauth
 6 
!writefile wimshome/$wims_sesdir/lastauth $currentauth
7 
!if $lastauth!=$empty and $lastauth>=$currentauth-5
 7 
!if $lastauth!=$empty and $lastauth>=$currentauth-5
8 
 auth_password=?$[$currentauth-$lastauth]????
 8 
  auth_password=?$[$currentauth-$lastauth]????
9 
 delay=bad
 9 
  delay=bad
10 
!else
 10 
!else
11 
 delay=good
 11 
  delay=good
12 
 auth_password=!passcrypt $auth_password
 12 
  auth_password=!passcrypt $auth_password
13 
!endif
 13 
!endif
14
14