Subversion Repositories wimsdev

Rev

Rev 13323 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13323 Rev 17846
Line 4... Line 4...
4 
!readproc adm/class/initldap
 4 
!readproc adm/class/initldap
5 
!set l_=$wims_read_parm
 5 
!set l_=$wims_read_parm
6 
!default l_=$auth_user
 6 
!default l_=$auth_user
7 
!set sup_=!item 2 to -1 of $l_
 7 
!set sup_=!item 2 to -1 of $l_
8 
!set l_=!item 1 of $l_
 8 
!set l_=!item 1 of $l_
- 
 
 9 
!if xxxldap: notin xxx$ldap_auth and xxxldaps: notin xxx$ldap_auth
- 
 
 10 
  ldap_auth=ldap://$ldap_auth
- 
 
 11 
!endif
9 
!! quite anonymous search, since $ldap_oneuser is unpriviledged
 12 
!! quite anonymous search, since $ldap_oneuser is unpriviledged
10 
ldap_user=!sh ldapsearch -x -LLL -t -H ldap://$ldap_auth:$ldap_port -b "$ldap_base" $ldap_accreditation $ldap_uid="$l_" $ldap_code_ | grep -v "^[d]n:"
 13 
ldap_user=!sh ldapsearch -x -LLL -t -H $ldap_auth:$ldap_port -b "$ldap_base" $ldap_accreditation $ldap_uid="$l_" $ldap_code_ | grep -v "^[d]n:"
11 
ldap_user=!replace internal http: by httpxx in $ldap_user
 14 
ldap_user=!replace internal http: by httpxx in $ldap_user
12 
ldap_user=!replace internal : by = in $ldap_user
 15 
ldap_user=!replace internal : by = in $ldap_user
13 
ldap_user=!replace internal httpxx by http: in $ldap_user
 16 
ldap_user=!replace internal httpxx by http: in $ldap_user
14 
!!    f=!replace internal .. by $adonis in $f
 17 
!!    f=!replace internal .. by $adonis in $f
15 
 !!gestion des accents (avec l'option -h ou -t ? de ldapsearch)
 18 
 !!gestion des accents (avec l'option -h ou -t ? de ldapsearch)