Browse Source

almost working

main
pvincent 2 weeks ago
parent
commit
82024a6efb
  1. 11
      examples/ldapdb.yaml
  2. 6
      examples/server2.rb

11
examples/ldapdb.yaml

@ -1,14 +1,4 @@
---
dc=zourit,dc=re:
cn:
- Top object
cn=pvincent,dc=zourit,dc=re:
cn:
- pvincent
sn:
- P.Vincent
mail:
- pvincent@zourit.re
dc=pvincent,dc=re:
cn:
- Top object
@ -19,3 +9,4 @@ cn=admin,dc=pvincent,dc=re:
- Vincentdmin
mail:
- admin@pvincent.re

6
examples/server2.rb

@ -26,7 +26,7 @@ class HashOperation < LDAP::Server::Operation
version = protocolOp.value[0].value
authentication = protocolOp.value[2]
password = authentication.value
$logger.info("AUTHENTICATION ..version=#{version}, dn=#{dn}")
$logger.info("AUTHENTICATION ..version=#{version}, dn=#{dn}, password=#{password}")
super
end
@ -51,12 +51,14 @@ class HashOperation < LDAP::Server::Operation
obj = @hash[basedn]
raise LDAP::ResultError::NoSuchObject unless obj
$logger.info('BaseObject')
result = send_SearchResultEntry(basedn, obj) if LDAP::Server::Filter.run(filter, obj)
when LDAP::Server::WholeSubtree
@hash.each do |dn, av|
next unless dn.index(basedn, -basedn.length) # under basedn?
next unless LDAP::Server::Filter.run(filter, av) # attribute filter?
$logger.info('WholeSubtree')
result = send_SearchResultEntry(dn, av)
end
@ -65,7 +67,7 @@ class HashOperation < LDAP::Server::Operation
end
$logger.info "result=#{result}"
result
# result
end
end

Loading…
Cancel
Save