66 lines
1.8 KiB
Elixir
66 lines
1.8 KiB
Elixir
|
defmodule Mobilizon.Service.Pictures.Unsplash do
|
||
|
|
@moduledoc """
|
||
|
|
[Unsplash](https://unsplash.com) backend.
|
||
|
|
"""
|
||
|
|
|
||
|
|
alias Mobilizon.Service.Pictures.{Information, Provider}
|
||
|
|
alias Mobilizon.Service.HTTP.GenericJSONClient
|
||
|
|
require Logger
|
||
|
|
|
||
|
|
@unsplash_api "/search/photos"
|
||
|
|
@unsplash_name "Unsplash"
|
||
|
|
|
||
|
|
@behaviour Provider
|
||
|
|
|
||
|
|
@impl Provider
|
||
|
|
@doc """
|
||
|
|
Unsplash implementation for `c:Mobilizon.Service.Geospatial.Provider.geocode/3`.
|
||
|
|
"""
|
||
|
|
@spec search(String.t(), keyword()) :: list(Information.t())
|
||
|
|
def search(location, _options \\ []) do
|
||
|
|
url = "#{unsplash_endpoint()}#{@unsplash_api}?query=#{location}&orientation=landscape"
|
||
|
|
|
||
|
|
client =
|
||
|
|
GenericJSONClient.client(headers: [{:Authorization, "Client-ID #{unsplash_access_key()}"}])
|
||
|
|
|
||
|
|
with {:ok, %{status: 200, body: body}} <- GenericJSONClient.get(client, url),
|
||
|
|
selectedPicture <- Enum.random(body["results"]) do
|
||
|
|
%Information{
|
||
|
|
url: selectedPicture["urls"]["small"],
|
||
|
|
author: %{
|
||
|
|
name: selectedPicture["user"]["name"],
|
||
|
|
url: "#{selectedPicture["user"]["links"]["html"]}#{unsplash_utm_source()}"
|
||
|
|
},
|
||
|
|
source: %{
|
||
|
|
name: @unsplash_name,
|
||
|
|
url: unsplash_url()
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
_ ->
|
||
|
|
nil
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
defp unsplash_app_name do
|
||
|
|
Application.get_env(:mobilizon, __MODULE__) |> get_in([:app_name])
|
||
|
|
end
|
||
|
|
|
||
|
|
defp unsplash_utm_source do
|
||
|
|
"?utm_source=#{unsplash_app_name()}&utm_medium=referral"
|
||
|
|
end
|
||
|
|
|
||
|
|
defp unsplash_url do
|
||
|
|
"https://unsplash.com/#{unsplash_utm_source()}"
|
||
|
|
end
|
||
|
|
|
||
|
|
defp unsplash_endpoint do
|
||
|
|
Application.get_env(:mobilizon, __MODULE__) |> get_in([:endpoint]) ||
|
||
|
|
"https://api.unsplash.com"
|
||
|
|
end
|
||
|
|
|
||
|
|
defp unsplash_access_key do
|
||
|
|
Application.get_env(:mobilizon, __MODULE__) |> get_in([:access_key])
|
||
|
|
end
|
||
|
|
end
|