defmodule EventosWeb.EventController do
  @moduledoc """
  Controller for Events
  """
  use EventosWeb, :controller

  alias Eventos.Events
  alias Eventos.Events.Event
  alias Eventos.Export.ICalendar

  require Logger

  action_fallback EventosWeb.FallbackController

  def index(conn, _params) do
    ip = "88.161.154.97"
    Logger.debug(inspect Geolix.lookup(ip), pretty: true)
    with %{city: %Geolix.Result.City{city: city, country: country, location: %Geolix.Record.Location{latitude: latitude, longitude: longitude}}} <- Geolix.lookup(ip) do
      Logger.debug(inspect city)
      Logger.debug(inspect [latitude, longitude])
      distance = case city do
        nil -> 500_000
        _ -> 50_000
      end
      events = Events.find_close_events(longitude, latitude, distance)
      render(conn, "index.json", events: events, coord: %{longitude: longitude, latitude: latitude, distance: distance}, city: city, country: country)
    end
  end

  def create(conn, %{"event" => event_params}) do
    event_params = process_event_address(event_params)
    Logger.debug("creating event with")
    Logger.debug(inspect event_params)
    with {:ok, %Event{} = event} <- Events.create_event(event_params) do
      conn
      |> put_status(:created)
      |> put_resp_header("location", event_path(conn, :show, event.uuid))
      |> render("show_simple.json", event: event)
    end
  end

  defp process_event_address(event) do
    cond do
      Map.has_key?(event, "address_type") && event["address_type"] !== :physical ->
        event
      Map.has_key?(event, "physical_address") ->
        address = event["physical_address"]
        geom = EventosWeb.AddressController.process_geom(address["geom"])
        address = case geom do
          nil ->
            address
          _ ->
            %{address | "geom" => geom}
        end
        %{event | "physical_address" => address}
      true ->
        event
    end
  end

  def search(conn, %{"name" => name}) do
    events = Events.find_events_by_name(name)
    render(conn, "index.json", events: events)
  end

  def show(conn, %{"uuid" => uuid}) do
    case Events.get_event_full_by_uuid(uuid) do
      nil ->
        send_resp(conn, 404, "")
      event ->
        render(conn, "show.json", event: event)
    end
  end

  def export_to_ics(conn, %{"uuid" => uuid}) do
    event = uuid |> Events.get_event_full_by_uuid() |> ICalendar.export_event()
    send_resp(conn, 200, event)
  end

  def update(conn, %{"uuid" => uuid, "event" => event_params}) do
    event = Events.get_event_full_by_uuid(uuid)

    with {:ok, %Event{} = event} <- Events.update_event(event, event_params) do
      render(conn, "show_simple.json", event: event)
    end
  end

  def delete(conn, %{"uuid" => uuid}) do
    with event <- Events.get_event_by_uuid(uuid),
      {:ok, %Event{}} <- Events.delete_event(event) do
      send_resp(conn, :no_content, "")
    end
  end
end