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
!if $wims_read_parm=$empty
  !exit
!endif

!distribute items $wims_read_parm into class,option
!if $option=auth
  !goto auth
!endif

!set superclass=!text remove . in $class
!set superclass=!replace internal / by , in $superclass
!set superclass=$(superclass[1])

:auth
!set ssclass=!text remove . in $class
!set ssclass=!replace internal / by , in $ssclass
!set ssclass=$(ssclass[1])
!set type_class=!defof class_type in wimshome/log/classes/$class/.def
!set auth_method_list=ldap,cas,php
!set idp_method_list=ldap,php
!set auth_method=!defof class_auth in wimshome/log/classes/$ssclass/.def
!set idp_method=!defof class_idp in wimshome/log/classes/$ssclass/.def
!set class_auth=$auth_method
!bound auth_method within $auth_method_list default $
!bound idp_method within $idp_method_list default $