Subversion Repositories wimsdev

Rev

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

Rev 10618 Rev 10677
Line 20... Line 20...
20 
!if $newlevels=$empty or $avcnt<$newcnt
 20 
!if $newlevels=$empty or $avcnt<$newcnt
21 
 error=level_full
 21 
 error=level_full
22 
 !exit
 22 
 !exit
23 
!endif
 23 
!endif
24 
 
 24 
 
25 
 
 - 
 
26 
!! no supervisor password needed in a gateway for level (auth by useraccount)
 - 
 
27 
!!!if $passs!=$empty
 25 
!if $passs!=$empty
28 
!! passs=!text select $char_passwd in $passs
 26 
 passs=!text select $char_passwd in $passs
29 
!! passlen=!charcnt $passs
 27 
 passlen=!charcnt $passs
30 
!! !if $passlen<$passwd_min or $passlen>$passwd_max or $passs != $passs2
 28 
 !if $passlen<$passwd_min or $passlen>$passwd_max or $passs != $passs2
31 
!!  error=bad_password
 29 
  error=bad_password
32 
!!  !exit
 30 
  !exit
33 
!! !endif
 31 
 !endif
34 
!!!else
 32 
!else
35 
!! passs=!defof user_password in wimshome/log/classes/$wims_superclass/supervisor
 33 
 passs=!defof user_password in wimshome/log/classes/$wims_superclass/supervisor
36 
!!!endif
 34 
!endif
37 
 
 35 
 
38 
1=!defof user_exists in $userdir/$s_
 36 
1=!defof user_exists in $userdir/$s_
39 
ac_su_list=
 37 
ac_su_list=
40 
sup_save=$s_
 38 
sup_save=$s_
41 
!if $1!=yes
 39 
!if $1!=yes
Line 54... Line 52...
54 
cadd_Supervisor=$s_
 52 
cadd_Supervisor=$s_
55 
tmp=!defof user_firstname,user_lastname,user_email,user_password in $userdef
 53 
tmp=!defof user_firstname,user_lastname,user_email,user_password in $userdef
56 
!distribute item $tmp into sadd_firstname,sadd_lastname,sadd_email,sadd_password
 54 
!distribute item $tmp into sadd_firstname,sadd_lastname,sadd_email,sadd_password
57 
cadd_email=$sadd_email
 55 
cadd_email=$sadd_email
58 
cadd_level=$alevel
 56 
cadd_level=$alevel
59 
!!cadd_password=
 57 
cadd_password=
- 
 
 58 
sadd_password=$passs
60 
cadd_secure=$sechost
 59 
cadd_secure=$sechost
61 
cadd_superclass=$wims_superclass
 60 
cadd_superclass=$wims_superclass
62 
cadd_parent=$wims_superclass
 61 
cadd_parent=$wims_superclass
63 
cadd_type=3
 62 
cadd_type=3
64 
cadd_typename=level
 63 
cadd_typename=level