Subversion Repositories wimsdev

Rev

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

Rev 5654 Rev 12720
Line 4... Line 4...
4
!if $step=1
4
!if $step=1
5
 tmp=!defof user_exists\
5
  tmp=!defof user_exists\
6
user_email in wimshome/log/classes/$class/.users/$auth_user
6
user_email in wimshome/log/classes/$class/.users/$auth_user
7
 !distribute line $tmp into u,m
7
  !distribute line $tmp into u,m
8
 !if $u!=yes or $m=$empty
8
  !if $u!=yes or $m=$empty
9
  error=bad_loginmail
9
    error=bad_loginmail
10
  step=0
10
    step=0
11
  !exit
11
    !exit
12
 !else
12
  !else
13
   npwd=!randint 111111,999999
13
    npwd=!randint 111111,999999
14
   !read adm/class/authdelay
14
    !read adm/class/authdelay
15
   npwdc=!passcrypt $npwd
15
    npwdc=!passcrypt $npwd
16
   !if $delay!=bad
16
    !if $delay!=bad
17
    !setdef !set user_password=$npwdc in wimshome/log/classes/$class/.users/$auth_user
17
      !setdef !set user_password=$npwdc in wimshome/log/classes/$class/.users/$auth_user
18
    !mailto $m\
18
      !mailto $m\
19
$wims_name_n_forgetpwd\
19
$wims_name_n_forgetpwd\
20
$npwd\
20
$npwd\
21
\
21
\
22
 
22
 
23
 
23
 
24
!! the empty line before must be leaved
24
!! the empty line before must be leaved
25
   !else
25
    !else
26
    step=0
26
      step=0
27
   !endif
27
    !endif
28
 !endif
28
  !endif
29
!endif
29
!endif