Subversion Repositories wimsdev

Rev

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

Rev 14334 Rev 15324
Line 137... Line 137...
137 
  !if $supervisable!=yes
 137 
  !if $supervisable!=yes
138 
    current_pass=
 138 
    current_pass=
139 
  !endif
 139 
  !endif
140 
!endif
 140 
!endif
141 
 
 141 
 
142 
cps=!passcrypt $current_pass
 142 
auth_password_check=!passcheck $current_pass and $pass
143 
!if ($auth_user!=$empty and $class $auth_user isitemof $wims_otherclass) or \
 143 
!if ($auth_user!=$empty and $class $auth_user isitemof $wims_otherclass) or \
144 
  ($current_pass!=$empty and $cps iswordof $pass) or \
 144 
  ($current_pass!=$empty and $auth_password_check=yes) or \
145 
  ($auth_user=$wims_user and $class isitemof $wims_participate) or \
 145 
  ($auth_user=$wims_user and $class isitemof $wims_participate) or \
146 
  ($auth_user=supervisor and $wims_user=supervisor and \
 146 
  ($auth_user=supervisor and $wims_user=supervisor and \
147 
    (../$wims_class/ isin ../$class/ or $superclass=$wims_class)) or \
 147 
    (../$wims_class/ isin ../$class/ or $superclass=$wims_class)) or \
148 
  ($auth_user=supervisor and $class isitemof $wims_supervise)
 148 
  ($auth_user=supervisor and $class isitemof $wims_supervise)
149 
  !goto auth_ok
 149 
  !goto auth_ok
Line 152... Line 152...
152 
!if $auth_password=$empty
 152 
!if $auth_password=$empty
153 
  !exit
 153 
  !exit
154 
!endif
 154 
!endif
155 
 
 155 
 
156 
!read adm/class/authdelay
 156 
!read adm/class/authdelay
157 
!if $auth_password notwordof $pass
 157 
!if $auth_password_check=no
158 
  !if $auth_user_orig=$empty and $auth_password=$empty
 158 
  !if $auth_user_orig=$empty and $auth_password=$empty
159 
    !exit
 159 
    !exit
160 
  !endif
 160 
  !endif
161 
  passwd=??????
 161 
  passwd=??????
162 
  !appendfile $logfile $logline
 162 
  !appendfile $logfile $logline