Subversion Repositories wimsdev

Rev

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

Rev 16813 Rev 16820
Line 5... Line 5...
5 
!if user notwordof $wims_prefix
 5 
!if user notwordof $wims_prefix
6 
  wims_prefix=$wims_prefix user class
 6 
  wims_prefix=$wims_prefix user class
7 
!endif
 7 
!endif
8 
!default up_class=$wims_class
 8 
!default up_class=$wims_class
9 
class_type=!defof class_type in wimshome/log/classes/$up_class/.def
 9 
class_type=!defof class_type in wimshome/log/classes/$up_class/.def
10 
cas_auth=!defof class_cas_auth in wimshome/log/classes/$up_class/.def
 10 
authidp=!defof class_authidp in wimshome/log/classes/$up_class/.def
11 
!default class_type=0
 11 
!default class_type=0
12 
!read adm/class/authchars
 12 
!read adm/class/authchars
13 
l=!text select $char_login in $uu
 13 
l=!text select $char_login in $uu
14 
t=!char 1 of $uu
 14 
t=!char 1 of $uu
15 
n=!charcnt $l
 15 
n=!charcnt $l
Line 245... Line 245...
245 
    bad=!append item $uu to $bad
 245 
    bad=!append item $uu to $bad
246 
    !exit
 246 
    !exit
247 
  !endif
 247 
  !endif
248 
  up_password=!passcrypt $up_password
 248 
  up_password=!passcrypt $up_password
249 
  replace_=!append line !set user_password=$up_password to $replace_
 249 
  replace_=!append line !set user_password=$up_password to $replace_
250 
  !if $wims_user!=$empty and $uu!=$wims_user and $cas_auth=$empty
 250 
  !if $wims_user!=$empty and $uu!=$wims_user and $(authidp[1;])=$empty
251 
    up_forcechpwd=yes
 251 
    up_forcechpwd=yes
252 
  !else
 252 
  !else
253 
    up_forcechpwd=no
 253 
    up_forcechpwd=no
254 
  !endif
 254 
  !endif
255 
  replace_=!append line !set user_forcechpwd=$up_forcechpwd to $replace_
 255 
  replace_=!append line !set user_forcechpwd=$up_forcechpwd to $replace_