Add adresses

Signed-off-by: Thomas Citharel <tcit@tcit.fr>

lib/eventos/addresses/address.ex

@@ -0,0 +1,31 @@
+defmodule Eventos.Addresses.Address do
+  @moduledoc "An address for an event or a group"
+
+  use Ecto.Schema
+  import Ecto.Changeset
+  alias Eventos.Addresses.Address
+  alias Eventos.Events.Event
+  alias Eventos.Groups.Group
+
+  schema "addresses" do
+    field :addressCountry, :string
+    field :addressLocality, :string
+    field :addressRegion, :string
+    field :description, :string
+    field :floor, :string
+    field :geom, Geo.Geometry
+    field :postalCode, :string
+    field :streetAddress, :string
+    has_one :event, Event
+    has_one :group, Group
+
+    timestamps()
+  end
+
+  @doc false
+  def changeset(%Address{} = address, attrs) do
+    address
+    |> cast(attrs, [:description, :floor, :geom, :addressCountry, :addressLocality, :addressRegion, :postalCode, :streetAddress])
+    |> validate_required([:geom])
+  end
+end

lib/eventos/addresses/addresses.ex

@@ -0,0 +1,104 @@
+defmodule Eventos.Addresses do
+  @moduledoc """
+  The Addresses context.
+  """
+
+  import Ecto.Query, warn: false
+  alias Eventos.Repo
+
+  alias Eventos.Addresses.Address
+
+  @doc """
+  Returns the list of addresses.
+
+  ## Examples
+
+      iex> list_addresses()
+      [%Address{}, ...]
+
+  """
+  def list_addresses do
+    Repo.all(Address)
+  end
+
+  @doc """
+  Gets a single address.
+
+  Raises `Ecto.NoResultsError` if the Address does not exist.
+
+  ## Examples
+
+      iex> get_address!(123)
+      %Address{}
+
+      iex> get_address!(456)
+      ** (Ecto.NoResultsError)
+
+  """
+  def get_address!(id), do: Repo.get!(Address, id)
+
+  @doc """
+  Creates a address.
+
+  ## Examples
+
+      iex> create_address(%{field: value})
+      {:ok, %Address{}}
+
+      iex> create_address(%{field: bad_value})
+      {:error, %Ecto.Changeset{}}
+
+  """
+  def create_address(attrs \\ %{}) do
+    %Address{}
+    |> Address.changeset(attrs)
+    |> Repo.insert()
+  end
+
+  @doc """
+  Updates a address.
+
+  ## Examples
+
+      iex> update_address(address, %{field: new_value})
+      {:ok, %Address{}}
+
+      iex> update_address(address, %{field: bad_value})
+      {:error, %Ecto.Changeset{}}
+
+  """
+  def update_address(%Address{} = address, attrs) do
+    address
+    |> Address.changeset(attrs)
+    |> Repo.update()
+  end
+
+  @doc """
+  Deletes a Address.
+
+  ## Examples
+
+      iex> delete_address(address)
+      {:ok, %Address{}}
+
+      iex> delete_address(address)
+      {:error, %Ecto.Changeset{}}
+
+  """
+  def delete_address(%Address{} = address) do
+    Repo.delete(address)
+  end
+
+  @doc """
+  Returns an `%Ecto.Changeset{}` for tracking address changes.
+
+  ## Examples
+
+      iex> change_address(address)
+      %Ecto.Changeset{source: %Address{}}
+
+  """
+  def change_address(%Address{} = address) do
+    Address.changeset(address, %{})
+  end
+end

lib/eventos/events/event.ex

@@ -36,13 +36,13 @@ defmodule Eventos.Events.Event do
   alias Eventos.Events.Event.TitleSlug
   alias Eventos.Accounts.Account
   alias Eventos.Groups.Group
+  alias Eventos.Addresses.Address
 
   schema "events" do
     field :begins_on, Timex.Ecto.DateTimeWithTimezone
     field :description, :string
     field :ends_on, Timex.Ecto.DateTimeWithTimezone
     field :title, :string
-    field :geom, Geo.Geometry
     field :slug, TitleSlug.Type
     field :state, :integer, default: 0
     field :status, :integer, default: 0
@@ -58,6 +58,7 @@ defmodule Eventos.Events.Event do
     has_many :event_request, Request
     has_many :tracks, Track
     has_many :sessions, Session
+    belongs_to :address, Address
 
     timestamps()
   end
@@ -65,8 +66,9 @@ defmodule Eventos.Events.Event do
   @doc false
   def changeset(%Event{} = event, attrs) do
     event
-    |> cast(attrs, [:title, :description, :begins_on, :ends_on, :organizer_account_id, :organizer_group_id, :category_id, :state, :geom, :status, :public, :thumbnail, :large_image, :publish_at])
+    |> cast(attrs, [:title, :description, :begins_on, :ends_on, :organizer_account_id, :organizer_group_id, :category_id, :state, :status, :public, :thumbnail, :large_image, :publish_at])
     |> cast_assoc(:tags)
+    |> cast_assoc(:address)
     |> validate_required([:title, :description, :begins_on, :ends_on, :organizer_account_id, :category_id])
     |> TitleSlug.maybe_generate_slug()
     |> TitleSlug.unique_constraint()

lib/eventos/events/events.ex

@@ -43,7 +43,7 @@ defmodule Eventos.Events do
   """
   def get_event_full!(id) do
     event = Repo.get!(Event, id)
-    Repo.preload(event, [:organizer_account, :organizer_group, :category, :sessions, :tracks, :tags, :participants])
+    Repo.preload(event, [:organizer_account, :organizer_group, :category, :sessions, :tracks, :tags, :participants, :address])
   end
 
   @doc """

lib/eventos/groups/group.ex

@@ -36,6 +36,7 @@ defmodule Eventos.Groups.Group do
   alias Eventos.Groups.{Group, Member, Request}
   alias Eventos.Accounts.Account
   alias Eventos.Groups.Group.TitleSlug
+  alias Eventos.Addresses.Address
 
   schema "groups" do
     field :description, :string
@@ -47,6 +48,7 @@ defmodule Eventos.Groups.Group do
     many_to_many :members, Account, join_through: Member
     has_many :organized_events, Event, [foreign_key: :organizer_group_id]
     has_many :requests, Request
+    belongs_to :address, Address
 
     timestamps()
   end
@@ -54,7 +56,7 @@ defmodule Eventos.Groups.Group do
   @doc false
   def changeset(%Group{} = group, attrs) do
     group
-    |> cast(attrs, [:title, :description, :suspended, :url, :uri])
+    |> cast(attrs, [:title, :description, :suspended, :url, :uri, :address_id])
     |> validate_required([:title, :description, :suspended, :url, :uri])
     |> TitleSlug.maybe_generate_slug()
     |> TitleSlug.unique_constraint()

lib/eventos_web/controllers/address_controller.ex

@@ -0,0 +1,65 @@
+defmodule EventosWeb.AddressController do
+  @moduledoc """
+  A controller for addresses
+  """
+
+  use EventosWeb, :controller
+
+  alias Eventos.Addresses
+  alias Eventos.Addresses.Address
+
+  action_fallback EventosWeb.FallbackController
+
+  def index(conn, _params) do
+    addresses = Addresses.list_addresses()
+    render(conn, "index.json", addresses: addresses)
+  end
+
+  def create(conn, %{"address" => address_params}) do
+    address_params = %{address_params | "geom" => process_geom(address_params["geom"])}
+    with {:ok, %Address{} = address} <- Addresses.create_address(address_params) do
+      conn
+      |> put_status(:created)
+      |> put_resp_header("location", address_path(conn, :show, address))
+      |> render("show.json", address: address)
+    end
+  end
+
+  def process_geom(%{"type" => type, "data" => data}) do
+    types = [:point]
+    unless is_atom(type) do
+      type = String.to_existing_atom(type)
+    end
+    case type do
+      :point ->
+        %Geo.Point{coordinates: {data["latitude"], data["longitude"]}, srid: 4326}
+      nil ->
+        nil
+    end
+  end
+
+  def process_geom(nil) do
+    nil
+  end
+
+  def show(conn, %{"id" => id}) do
+    address = Addresses.get_address!(id)
+    render(conn, "show.json", address: address)
+  end
+
+  def update(conn, %{"id" => id, "address" => address_params}) do
+    address = Addresses.get_address!(id)
+    address_params = %{address_params | "geom" => process_geom(address_params["geom"])}
+
+    with {:ok, %Address{} = address} <- Addresses.update_address(address, address_params) do
+      render(conn, "show.json", address: address)
+    end
+  end
+
+  def delete(conn, %{"id" => id}) do
+    address = Addresses.get_address!(id)
+    with {:ok, %Address{}} <- Addresses.delete_address(address) do
+      send_resp(conn, :no_content, "")
+    end
+  end
+end

lib/eventos_web/controllers/event_controller.ex

@@ -16,6 +16,7 @@ defmodule EventosWeb.EventController do
   end
 
   def create(conn, %{"event" => event_params}) do
+    event_params = %{event_params | "address" => process_address(event_params["address"])}
     with {:ok, %Event{} = event} <- Events.create_event(event_params) do
       conn
       |> put_status(:created)
@@ -24,6 +25,16 @@ defmodule EventosWeb.EventController do
     end
   end
 
+  defp process_address(address) do
+    geom = EventosWeb.AddressController.process_geom(address["geom"])
+    case geom do
+      nil ->
+        address
+      _ ->
+        %{address | "geom" => geom}
+    end
+  end
+
   def show(conn, %{"id" => id}) do
     event = Events.get_event_full!(id)
     render(conn, "show.json", event: event)

lib/eventos_web/router.ex

@@ -36,6 +36,7 @@ defmodule EventosWeb.Router do
     resources "/categories", CategoryController, only: [:index, :show]
     resources "/sessions", SessionController, only: [:index, :show]
     resources "/tracks", TrackController, only: [:index, :show]
+    resources "/addresses", AddressController, only: [:index, :show]
   end
 
   # Other scopes may use custom stacks.
@@ -59,6 +60,7 @@ defmodule EventosWeb.Router do
      get "/tracks/:id/sessions", SessionController, :show_sessions_for_track
      resources "/categories", CategoryController
      resources "/tags", TagController
+     resources "/addresses", AddressController, except: [:index, :show]
   end
 
   scope "/", EventosWeb do

lib/eventos_web/views/address_view.ex

@@ -0,0 +1,40 @@
+defmodule EventosWeb.AddressView do
+  @moduledoc """
+  View for addresses
+  """
+
+  use EventosWeb, :view
+  alias EventosWeb.AddressView
+
+  def render("index.json", %{addresses: addresses}) do
+    %{data: render_many(addresses, AddressView, "address.json")}
+  end
+
+  def render("show.json", %{address: address}) do
+    %{data: render_one(address, AddressView, "address.json")}
+  end
+
+  def render("address.json", %{address: address}) do
+    %{id: address.id,
+      description: address.description,
+      floor: address.floor,
+      addressCountry: address.addressCountry,
+      addressLocality: address.addressLocality,
+      addressRegion: address.addressRegion,
+      postalCode: address.postalCode,
+      streetAddress: address.streetAddress,
+      geom: render_one(address.geom, AddressView, "geom.json")
+    }
+  end
+
+  def render("geom.json", %{address: %Geo.Point{} = point}) do
+    [lat, lon] = Tuple.to_list(point.coordinates)
+    %{
+      type: "point",
+      data: %{
+        "latitude": lat,
+        "longitude": lon,
+      }
+    }
+  end
+end

lib/eventos_web/views/event_view.ex

@@ -3,7 +3,7 @@ defmodule EventosWeb.EventView do
   View for Events
   """
   use EventosWeb, :view
-  alias EventosWeb.{EventView, AccountView, GroupView}
+  alias EventosWeb.{EventView, AccountView, GroupView, AddressView}
 
   def render("index.json", %{events: events}) do
     %{data: render_many(events, EventView, "event_simple.json")}
@@ -35,6 +35,7 @@ defmodule EventosWeb.EventView do
       organizer: render_one(event.organizer_account, AccountView, "acccount_basic.json"),
       group: render_one(event.organizer_group, GroupView, "group_basic.json"),
       participants: render_many(event.participants, AccountView, "show_basic.json"),
+      address: render_one(event.address, AddressView, "address.json"),
     }
   end
 end