Rev 5352 | Go to most recent revision | Details | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
20 | reyssat | 1 | # delay 5 minutes after wrong auth password. |
2 | |||
3 | currentauth=$wims_nowseconds |
||
4 | lastauth=!record 0 of wimshome/$wims_sesdir/lastauth |
||
5 | lastauth=!word 1 of $lastauth |
||
6 | !writefile wimshome/$wims_sesdir/lastauth $currentauth |
||
7 | !if $lastauth!=$empty and $lastauth>=$currentauth-5 |
||
8 | auth_password=?$[$currentauth-$lastauth]???? |
||
9 | !else |
||
10 | auth_password=!passcrypt $auth_password |
||
11 | !endif |
||
12 |