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 |