Rev 5042 | Rev 5069 | 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 |
5028 | bpr | 4 | |
5 | !distribute items $wims_read_parm into class,option |
||
6 | !set class=!text select 1234567890/ in $class |
||
7 | !if $class=$empty |
||
5013 | bpr | 8 | !exit |
9 | !endif |
||
5015 | bpr | 10 | |
5027 | bpr | 11 | !if $option=auth |
12 | !goto auth |
||
13 | !endif |
||
14 | |||
5013 | bpr | 15 | !set superclass=!text remove . in $class |
16 | !set superclass=!replace internal / by , in $superclass |
||
17 | !set superclass=$(superclass[1]) |
||
18 | |||
5027 | bpr | 19 | :auth |
20 | !set ssclass=!text remove . in $class |
||
21 | !set ssclass=!replace internal / by , in $ssclass |
||
22 | !set ssclass=$(ssclass[1]) |
||
23 | !set type_class=!defof class_type in wimshome/log/classes/$class/.def |
||
5019 | bpr | 24 | !set auth_method_list=ldap,cas,php |
25 | !set idp_method_list=ldap,php |
||
5027 | bpr | 26 | !set auth_method=!defof class_auth in wimshome/log/classes/$ssclass/.def |
27 | !set idp_method=!defof class_idp in wimshome/log/classes/$ssclass/.def |
||
5013 | bpr | 28 | !bound auth_method within $auth_method_list default $ |
29 | !bound idp_method within $idp_method_list default $ |
||
5042 | bpr | 30 | !set class_auth=$auth_method |
5060 | bpr | 31 | !!!FIXME : change the name ($ldap_auth in another place) |
5042 | bpr | 32 | !set host_auth=!defof class_$(auth_method)_auth in wimshome/log/classes/$ssclass/.def |
5060 | bpr | 33 | !default authdef=wimshome/log/classes/$ssclass/.def |
5042 | bpr | 34 | !!FIXME tester si l'hôte répond ??? |