Rev 5019 | Rev 5028 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
5013 | bpr | 1 | !!! init some parameters of a class |
2 | !!!INPUT = number of a class |
||
5019 | bpr | 3 | !!!OUTPUT= superclass, auth_method_list, aut_idp_method_list, auth_method, aut_idp_method, type_class |
5013 | bpr | 4 | !if $wims_read_parm=$empty |
5 | !exit |
||
6 | !endif |
||
5015 | bpr | 7 | |
5027 | bpr | 8 | !distribute items $wims_read_parm into class,option |
9 | !if $option=auth |
||
10 | !goto auth |
||
11 | !endif |
||
12 | |||
5013 | bpr | 13 | !set superclass=!text remove . in $class |
14 | !set superclass=!replace internal / by , in $superclass |
||
15 | !set superclass=$(superclass[1]) |
||
16 | |||
5027 | bpr | 17 | :auth |
18 | !set ssclass=!text remove . in $class |
||
19 | !set ssclass=!replace internal / by , in $ssclass |
||
20 | !set ssclass=$(ssclass[1]) |
||
21 | !set type_class=!defof class_type in wimshome/log/classes/$class/.def |
||
5019 | bpr | 22 | !set auth_method_list=ldap,cas,php |
23 | !set idp_method_list=ldap,php |
||
5027 | bpr | 24 | !set auth_method=!defof class_auth in wimshome/log/classes/$ssclass/.def |
25 | !set idp_method=!defof class_idp in wimshome/log/classes/$ssclass/.def |
||
26 | !set class_auth=$auth_method |
||
5013 | bpr | 27 | !bound auth_method within $auth_method_list default $ |
28 | !bound idp_method within $idp_method_list default $ |