86 lines
2.8 KiB
Elixir
86 lines
2.8 KiB
Elixir
|
defmodule Mobilizon.Service.Geospatial.Addok do
|
||
|
|
@moduledoc """
|
||
|
|
[Addok](https://github.com/addok/addok) backend.
|
||
|
|
"""
|
||
|
|
alias Mobilizon.Service.Geospatial.Provider
|
||
|
|
require Logger
|
||
|
|
alias Mobilizon.Addresses.Address
|
||
|
|
|
||
|
|
@behaviour Provider
|
||
|
|
|
||
|
|
@endpoint Application.get_env(:mobilizon, __MODULE__) |> get_in([:endpoint])
|
||
|
|
|
||
|
|
@impl Provider
|
||
|
|
@doc """
|
||
|
|
Addok implementation for `c:Mobilizon.Service.Geospatial.Provider.geocode/3`.
|
||
|
|
"""
|
||
|
|
@spec geocode(String.t(), keyword()) :: list(Address.t())
|
||
|
|
def geocode(lon, lat, options \\ []) do
|
||
|
|
url = build_url(:geocode, %{lon: lon, lat: lat}, options)
|
||
|
|
|
||
|
|
Logger.debug("Asking addok for addresses with #{url}")
|
||
|
|
|
||
|
|
with {:ok, %HTTPoison.Response{status_code: 200, body: body}} <-
|
||
|
|
HTTPoison.get(url),
|
||
|
|
{:ok, %{"features" => features}} <- Poison.decode(body) do
|
||
|
|
processData(features)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
@impl Provider
|
||
|
|
@doc """
|
||
|
|
Addok implementation for `c:Mobilizon.Service.Geospatial.Provider.search/2`.
|
||
|
|
"""
|
||
|
|
@spec search(String.t(), keyword()) :: list(Address.t())
|
||
|
|
def search(q, options \\ []) do
|
||
|
|
url = build_url(:search, %{q: q}, options)
|
||
|
|
Logger.debug("Asking addok for addresses with #{url}")
|
||
|
|
|
||
|
|
with {:ok, %HTTPoison.Response{status_code: 200, body: body}} <-
|
||
|
|
HTTPoison.get(url),
|
||
|
|
{:ok, %{"features" => features}} <- Poison.decode(body) do
|
||
|
|
processData(features)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
@spec build_url(atom(), map(), list()) :: String.t()
|
||
|
|
defp build_url(method, args, options) do
|
||
|
|
limit = Keyword.get(options, :limit, 10)
|
||
|
|
coords = Keyword.get(options, :coords, nil)
|
||
|
|
endpoint = Keyword.get(options, :endpoint, @endpoint)
|
||
|
|
|
||
|
|
case method do
|
||
|
|
:geocode ->
|
||
|
|
"#{endpoint}/reverse/?lon=#{args.lon}&lat=#{args.lat}&limit=#{limit}"
|
||
|
|
|
||
|
|
:search ->
|
||
|
|
url = "#{endpoint}/search/?q=#{URI.encode(args.q)}&limit=#{limit}"
|
||
|
|
if is_nil(coords), do: url, else: url <> "&lat=#{coords.lat}&lon=#{coords.lon}"
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
defp processData(features) do
|
||
|
|
features
|
||
|
|
|> Enum.map(fn %{"geometry" => geometry, "properties" => properties} ->
|
||
|
|
%Address{
|
||
|
|
addressCountry: Map.get(properties, "country"),
|
||
|
|
addressLocality: Map.get(properties, "city"),
|
||
|
|
addressRegion: Map.get(properties, "state"),
|
||
|
|
description: Map.get(properties, "name") || streetAddress(properties),
|
||
|
|
floor: Map.get(properties, "floor"),
|
||
|
|
geom: Map.get(geometry, "coordinates") |> Provider.coordinates(),
|
||
|
|
postalCode: Map.get(properties, "postcode"),
|
||
|
|
streetAddress: properties |> streetAddress()
|
||
|
|
}
|
||
|
|
end)
|
||
|
|
end
|
||
|
|
|
||
|
|
defp streetAddress(properties) do
|
||
|
|
if Map.has_key?(properties, "housenumber") do
|
||
|
|
Map.get(properties, "housenumber") <> " " <> Map.get(properties, "street")
|
||
|
|
else
|
||
|
|
Map.get(properties, "street")
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|