Subversion Repositories wimsdev

Rev

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

Rev 5542 Rev 9475
Line 1... Line 1...
1
!!! init some parameters of a class
1
!!! init some parameters of a class
2
!!!INPUT = number of a class
2
!!!INPUT = number of a class
3
!!!OUTPUT= superclass, auth_method_list, aut_idp_method_list, auth_method, aut_idp_method, type_class
3
!!!OUTPUT= superclass, auth_method_list, aut_idp_method_list, auth_method,
-
 
4
!!! aut_idp_method, type_class, theme_class, regvars_class
4
 
5
 
5
!distribute items $wims_read_parm into pclass,option
6
!distribute items $wims_read_parm into pclass,option
6
!set pclass=!text select 1234567890/ in $pclass
7
!set pclass=!text select 1234567890/ in $pclass
7
!if $pclass=$empty
8
!if $pclass=$empty
8
  !exit
9
  !exit
Line 24... Line 25...
24
 
25
 
25
!set ssclass=!text remove . in $pclass
26
!set ssclass=!text remove . in $pclass
26
!set ssclass=!replace internal / by , in $ssclass
27
!set ssclass=!replace internal / by , in $ssclass
27
!set ssclass=$(ssclass[1])
28
!set ssclass=$(ssclass[1])
28
!set type_class=!defof class_type in wimshome/log/classes/$pclass/.def
29
!set type_class=!defof class_type in wimshome/log/classes/$pclass/.def
29
 
-
 
-
 
30
!set theme_class=!defof class_theme in wimshome/log/classes/$pclass/.def
-
 
31
!set regvars_class=!defof class_regvars in wimshome/log/classes/$pclass/.def
30
!set authidp_method=!defof class_authidp in wimshome/log/classes/$ssclass/.def
32
!set authidp_method=!defof class_authidp in wimshome/log/classes/$ssclass/.def
31
!set class_authidp=$authidp_method
33
!set class_authidp=$authidp_method
32
!set auth_method=$(authidp_method[1;])
34
!set auth_method=$(authidp_method[1;])
33
!set idp_method =$(authidp_method[2;])
35
!set idp_method =$(authidp_method[2;])
34
!bound auth_method within $auth_method_list default $
36
!bound auth_method within $auth_method_list default $