Subversion Repositories wimsdev

Rev

Rev 12845 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 12845 Rev 15324
Line 34... Line 34...
34 
!if $pass!=$empty
 34 
!if $pass!=$empty
35 
  !for c in $neib
 35 
  !for c in $neib
36 
    t=!defof n_$nam in wimshome/log/classes/$c/neighbors
 36 
    t=!defof n_$nam in wimshome/log/classes/$c/neighbors
37 
    !read adm/class/userdef classes,$c,$wims_user
 37 
    !read adm/class/userdef classes,$c,$wims_user
38 
    np=!defof user_password in $userdef
 38 
    np=!defof user_password in $userdef
- 
 
 39 
    !! both should be crypten
- 
 
 40 
    !! what happens if they were crypten in different ways ?
- 
 
 41 
    !! hope not !
39 
    np=!word 1 of $np
 42 
    np=!word 1 of $np
40 
    np=!passcrypt $np
 43 
    np=!passcrypt $np
41 
    passc=!passcrypt $pass
 44 
    passc=!passcrypt $pass
42 
    !if $wims_class isitemof $t and $np=$passc
 45 
    !if $wims_class isitemof $t and $np=$passc
43 
      !if $auth_method isitemof $auth_method_list
 46 
      !if $auth_method isitemof $auth_method_list