aboutsummaryrefslogtreecommitdiff
path: root/lib/octochat/servers/echo.ex
diff options
context:
space:
mode:
Diffstat (limited to 'lib/octochat/servers/echo.ex')
-rw-r--r--lib/octochat/servers/echo.ex23
1 files changed, 23 insertions, 0 deletions
diff --git a/lib/octochat/servers/echo.ex b/lib/octochat/servers/echo.ex
new file mode 100644
index 0000000..fe25079
--- /dev/null
+++ b/lib/octochat/servers/echo.ex
@@ -0,0 +1,23 @@
+defmodule Octochat.Echo do
+ @moduledoc """
+ Octochat Echo server
+ """
+
+ def serve(socket) do
+ socket
+ |> read_line!()
+ |> write_line!(socket)
+
+ serve(socket)
+ end
+
+ defp read_line!(socket) do
+ {:ok, line} = :gen_tcp.recv(socket, 0)
+ line
+ end
+
+ defp write_line!(line, socket) do
+ :gen_tcp.send(socket, line)
+ end
+
+end