Page Menu
Home
Phorge
Search
Configure Global Search
Log In
Files
F85823848
No One
Temporary
Actions
View File
Edit File
Delete File
View Transforms
Subscribe
Mute Notifications
Flag For Later
Award Token
Authored By
Unknown
Size
2 KB
Referenced Files
None
Subscribers
None
View Options
diff --git a/debug_server.exs b/debug_server.exs
index 1de1e63..872fd30 100644
--- a/debug_server.exs
+++ b/debug_server.exs
@@ -1,72 +1,82 @@
require Logger
Application.ensure_started(:cacophony)
Application.ensure_all_started(:ranch)
alias Cacophony.Message
defmodule DebugServer do
def handle_message(%Message.BindRequest{} = request, state) do
bind_dn = request.dn != "" && request.dn || "cn=anonymous"
state = put_in(state, [:dn], bind_dn)
response = %Message.BindResponse{
id: request.id,
result_code: :success,
matched_dn: state.dn
}
{:ok, response, state}
end
def handle_message(%Message.UnbindRequest{}, _state), do: :noreply
def handle_message(%Message.WhoAmIRequest{} = request, %{dn: dn} = state) do
"cn=" <> authzid = dn
response = %Message.WhoAmIResponse{
id: request.id,
matched_dn: dn,
result_code: :success,
- authzid: "#{authzid}@example.com"
+ authzid: "u:#{authzid}@example.com"
+ }
+
+ {:ok, response, state}
+ end
+
+ def handle_message(%Message.SearchRequest{} = request, state) do
+ response = %Message.SearchResultDone{
+ id: request.id,
+ matched_dn: "",
+ result_code: :success
}
{:ok, response, state}
end
def handle_message(_message), do: {:error, :badmatch}
end
defmodule DebugListener do
def start_link(_opts) do
:ranch.start_listener(make_ref(), :ranch_tcp, [{:port, 6389}], Cacophony.Server, [mod: DebugServer])
end
def child_spec(_) do
%{id: __MODULE__, start: {__MODULE__, :start_link, [[]]}}
end
end
defmodule DebugSupervisor do
use Supervisor
def start_link(opts) do
Supervisor.start_link(__MODULE__, :ok, opts)
end
@impl true
def init(:ok) do
children = [DebugListener]
Supervisor.init(children, strategy: :one_for_one)
end
end
{:ok, pid} = DebugSupervisor.start_link([])
ref = Process.monitor(pid)
Logger.info("Debugging server started on port 6389.")
receive do
{:DOWN, ^ref, _, _, _} -> Process.exit()
end
File Metadata
Details
Attached
Mime Type
text/x-diff
Expires
Thu, Oct 29, 9:40 AM (19 h, 43 m)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
1797882
Default Alt Text
(2 KB)
Attached To
Mode
R11 cacophony
Attached
Detach File
Event Timeline