ldap search

synrc · Jul 23, 2023 · 96a371b · 96a371b
1 parent c534e54
commit 96a371b
Showing 1 changed file with 2 additions and 10 deletions.
diff --git a/lib/ldap.ex b/lib/ldap.ex
@@ -62,13 +62,6 @@ defmodule LDAP.TCP do
    def match({:or,  list}),                        do: "(" <> join(list, 'or')  <> ")"
    def match({:not, x}),                           do: "(not(" <> match(x) <> "))"
 
-   def sel(name, filter) do
-       {:ok, db} = open(name)
-       scope = :singleLevel
-       dn = "dc=synrc,dc=com"
-       select([], [], db, filter, scope, dn)
-   end
-
    def select(socket, no, db, filter, scope, dn) do
        {:ok, st} = prepare(db, query(scope, filter, dn))
        case step(db,st) do
@@ -86,7 +79,7 @@ defmodule LDAP.TCP do
 
    def start() do
        instance = code()
-       :erlang.spawn(fn -> listen(1489,instance) end)
+       :erlang.spawn(fn -> listen(:application.get_env(:ldap,:port,1489),instance) end)
    end
 
    def initDB(path) do
@@ -106,7 +99,7 @@ defmodule LDAP.TCP do
        createDN(conn, "ou=schema", [attr("ou",["schema"]),attr("objectClass",["top","domain"])])
        createDN(conn, "cn=tonpa,dc=synrc,dc=com", [attr("cn",["tonpa"]),attr("uid",["1000"]),attr("objectClass",["inetOrgPerson","posixAccount"])])
        createDN(conn, "cn=rocco,dc=synrc,dc=com", [attr("cn",["rocco"]),attr("uid",["1001"]),attr("objectClass",["inetOrgPerson","posixAccount"])])
-       createDN(conn, "cn=admin,dc=synrc,dc=com", [attr("rootpw",["secret"]),attr("cn",["admin"])])
+       createDN(conn, "cn=admin,dc=synrc,dc=com", [attr("rootpw",["secret"]),attr("cn",["admin"]),attr("objectClass",["inetOrgPerson"])])
        {:ok, socket} = :gen_tcp.listen(port,
          [:binary, {:packet, 0}, {:active, false}, {:reuseaddr, true}])
        accept(socket,conn)
@@ -253,7 +246,6 @@ defmodule LDAP.TCP do
        message = LDAP."LDAPMessage"(messageID: no, protocolOp: {op, response})
        {:ok, bytes} = :'LDAP'.encode(:'LDAPMessage', message)
        send = :gen_tcp.send(socket, :erlang.iolist_to_binary(bytes))
-       :io.format 'SEND: ~p ~p ~p ~p~n', [send, no, op, response]
    end
 
    def appendNotEmpty([]),  do: []