aboutsummaryrefslogtreecommitdiff
path: root/shardweb/lib/shard_web/controllers/page_controller.ex
blob: 261b5d64f9b9a25e9aa34095f5c4b613ef9b9299 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
defmodule ShardWeb.PageController do
  use ShardWeb, :controller

  def index(conn, _params) do
    render conn, "index.html"
  end

  def add_peer(conn, _params) do
    try do
      ip = conn.params["ip"]
      port = conn.params["port"]
      {:ok, ip_tuple} = case :inet.parse_address(to_charlist(ip)) do
        {:ok, tup} -> {:ok, tup}
        _ ->
          case :inet.gethostbyname(to_charlist(ip)) do
            {:ok, {:hostent, _, _, :inet, 4, [ip_tup | _]}} -> {:ok, ip_tup}
            _ -> :error
          end
      end
      {port_num, _} = Integer.parse port
      SNet.Manager.add_peer({:inet, ip_tuple, port_num})
    rescue
      _ -> nil
    end
    redirect conn, to: page_path(conn, :index)
  end
end