Subversion Repositories wimsdev

Rev

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

Rev 12811 Rev 15324
Line 60... Line 60...
60
  !read ./adm/class/authdelay
60
  !read ./adm/class/authdelay
61
  !if ? isin $auth_password
61
  !if ? isin $auth_password
62
    p_=$auth_password
62
    p_=$auth_password
63
  !else
63
  !else
64
    p_=!passcrypt $p_
64
    p_=!passcrypt $p_
-
 
65
    pass_check=!passcheck $p_ and $pck
65
  !endif
66
  !endif
66
  !if $p_=$empty or $p_!=$pck
67
  !if $p_=$empty or $pass_check!=yes
67
    !writefile wimshome/$wims_sesdir/lastauth
68
    !writefile wimshome/$wims_sesdir/lastauth
68
    !set authidp_method=!defof class_authidp in wimshome/log/classes/$c_/.def
69
    !set authidp_method=!defof class_authidp in wimshome/log/classes/$c_/.def
69
    !set class_auth=$(authidp_method[1;])
70
    !set class_auth=$(authidp_method[1;])
70
    !if $class_auth iswordof cas ldap php
71
    !if $class_auth iswordof cas ldap php
71
      !restart module=adm/class/classes&type=participant
72
      !restart module=adm/class/classes&type=participant