Subversion Repositories wimsdev

# Input variables: authdef=def file.
# Parameters: auth_user, auth_password.

auth_test=ERROR
auth_real_login=ERROR


ldap_find=!sh which ldapsearch
!if $ldap_find issametext $empty
 auth_test=ERROR no_ldap
 !exit
!endif

ldap_host=!defof class_ldap_host in $authdef
!!default ldap_host=ldap.u-psud.fr

ldap_port=!defof class_ldap_port in $authdef
!default ldap_port=389

ldap_version=!defof class_ldap_version in $authdef
!default ldap_version=3

ldap_base=!defof class_ldap_base in $authdef
!!default ldap_base=ou=people,dc=u-psud,dc=fr

ldap_branch=!defof class_ldap_branch in $authdef
!!default ldap_branch=ou=people,dc=u-psud,dc=fr

ldap_uid=!defof class_ldap_uid in $authdef
!!default ldap_uid=uid

#ldap_id=!replace internal " by in $ldap_uid=$(wims_read_parm[1]),$ldap_branch,$ldap_base
ldap_id=!replace internal " by in $ldap_uid=$(wims_read_parm[1])

ldap_login=!defof class_ldap_login in $authdef
!default ldap_login=supannAliasLogin

!if $ldap_login=$empty or $ldap_uid=$empty or $ldap_base=$empty \
       or $ldap_branch=$empty  or $ldap_host=$empty 
   auth_test=ERROR no_ldap_config
   !exit
!endif

ldap_search=!sh ldapsearch -x -h $ldap_host -p $ldap_port -b "$ldap_base" '$ldap_id' -D "$ldap_id , $ldap_base" -w '$(wims_read_parm[2])'

ldap_cnt=!linecnt $ldap_search
!for i=1 to $ldap_cnt
 l=!line $i of $ldap_search
 field=!word 1 of $l    

 !if $field iswordof $ldap_login:
  auth_real_login=!word 2 of $l
 !endif

 !if $l issametext result: 0 Success
  auth_test=$auth_real_login
 !endif

!next i


cnt_=!charcnt $auth_test
!if $cnt_=3
 auth_test=!nospace $auth_test 0
!endif
auth_error=$wims_exec_error
wims_exec_error=