Subversion Repositories wimsdev

!!! init some parameters of a class

!!!INPUT = number of a class

!!!OUTPUT= superclass, auth_method_list, aut_idp_method_list, auth_method,

!!! aut_idp_method, type_class, theme_class, regvars_class

!distribute items $wims_read_parm into pclass,option

!set pclass=!text select 1234567890/ in $pclass

!if $pclass=$empty

  !exit

!endif

!if $option=auth

  !goto auth

!endif

!set superclass=!text remove . in $pclass

!set superclass=!replace internal / by , in $superclass

!set superclass=$(superclass[1])

:auth

!reset host_auth

!!FIXME should be in wims.conf

!set auth_method_list=ldap,cas,php

!set idp_method_list=ldap,php

!! idp method used for someone else than the user so without identification before

!set idp_method_list2=ldap

!set ssclass=!text remove . in $pclass

!set ssclass=!replace internal / by , in $ssclass

!set ssclass=$(ssclass[1])

!set type_class=!defof class_type in wimshome/log/classes/$pclass/.def

!set theme_class=!defof class_theme in wimshome/log/classes/$pclass/.def

!set regvars_class=!defof class_regvars in wimshome/log/classes/$ssclass/.def

!set authidp_method=!defof class_authidp in wimshome/log/classes/$ssclass/.def

!set class_authidp=$authidp_method

!set auth_method=$(authidp_method[1;])

!set idp_method =$(authidp_method[2;])

!set idp_method2=!listintersect $idp_method and $idp_method_list2

!bound auth_method within $auth_method_list default $

!bound idp_method within $idp_method_list default $

!set class_auth=$auth_method

!!!FIXME : change the name ($ldap_auth in another place)

!set host_auth=!defof class_$(auth_method)_auth in wimshome/log/classes/$ssclass/.def

!default authdef=wimshome/log/classes/$ssclass/.def

!!FIXME tester si l'hôte répond ???