Subversion Repositories wimsdev

Rev

Rev 15454 | Rev 16615 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
5350 guerimand 1
!read wimshome/log/classes/$class/.def
2
!default step=0
3
 
4
!if $step=1
12720 bpr 5
  tmp=!defof user_exists\
5350 guerimand 6
user_email in wimshome/log/classes/$class/.users/$auth_user
12720 bpr 7
  !distribute line $tmp into u,m
8
  !if $u!=yes or $m=$empty
9
    error=bad_loginmail
10
    step=0
11
    !exit
12
  !else
13
    npwd=!randint 111111,999999
15454 obado 14
    !! delay 5 minutes after wrong auth password.
12720 bpr 15
    !read adm/class/authdelay
16
    npwdc=!passcrypt $npwd
17
    !if $delay!=bad
15454 obado 18
      !set mailbody=!record 0 of adm/lang/forgetpwd.$lang.phtml
12720 bpr 19
      !setdef !set user_password=$npwdc in wimshome/log/classes/$class/.users/$auth_user
20
      !mailto $m\
15488 obado 21
\
5350 guerimand 22
$wims_name_n_forgetpwd\
15454 obado 23
$mailbody\
5350 guerimand 24
 
5654 bpr 25
 
26
!! the empty line before must be leaved
12720 bpr 27
    !else
28
      step=0
29
    !endif
30
  !endif
31
!endif