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