1 files changed, 25 insertions, 0 deletions
diff --git a/lib/octonetcat/accepter.ex b/lib/octonetcat/accepter.ex
new file mode 100644
index 0000000..c76d0af
--- /dev/null
+++ b/lib/octonetcat/accepter.ex
@@ -0,0 +1,25 @@
+defmodule Octonetcat.Accepter do
+  @moduledoc """
+  Simple Socket/Connection Accepter
+  """
+
+  require Logger
+
+  @listen_port Application.get_env(:octonetcat, :listen_port) || 9999
+
+  def accept do
+    {:ok, socket} = :gen_tcp.listen(
+      @listen_port,
+      [:binary, packet: :line, active: false, reuseaddr: true])
+    loop_accepter(socket)
+  end
+
+  defp loop_accepter(socket) do
+    {:ok, client} = :gen_tcp.accept(socket)
+    Logger.info("Accepted connection")
+    Logger.info("Closing connection")
+    :gen_tcp.close(client)
+    loop_accepter(socket)
+  end
+
+end