From 70b9bba56f5319361ce5a7df5c489b9c0d6905ce Mon Sep 17 00:00:00 2001
From: Jordan Bracco <href@random.sh>
Date: Tue, 20 Dec 2022 02:13:47 +0000
Subject: Rename to Nola

Summary:
Nola rename cont. pt. 2. Refs T77.

`find lib -name "*.ex" -type f | xargs sed -i '' 's/LSG/Nola/g'`

Nola rename, cont. pt. 3. Refs T77.

`s/:lsg/:nola/g`

Nola rename, cont. pt. 4. Refs T77.

Nola rename, cont. pt. 5. Refs T77. Configs.

    find config -type f | xargs sed -i '' 's/LSG/Nola/g'
    find config -type f | xargs sed -i '' 's/lsg/nola/g'

BREAKING CHANGE: Config keys switch from `:lsg` to `:nola`

Nola rename, the end. pt 6. Refs T77.

Nola rename: The Big Move, Refs T77

Update repo URL, refs T77.

Nola rename: Nola.Plugins, refs T77

Maniphest Tasks: T77

Differential Revision: https://phab.random.sh/D3
---
 lib/nola_plugins/untappd.ex | 66 +++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 66 insertions(+)
 create mode 100644 lib/nola_plugins/untappd.ex

(limited to 'lib/nola_plugins/untappd.ex')

diff --git a/lib/nola_plugins/untappd.ex b/lib/nola_plugins/untappd.ex
new file mode 100644
index 0000000..cf5c694
--- /dev/null
+++ b/lib/nola_plugins/untappd.ex
@@ -0,0 +1,66 @@
+defmodule Nola.Plugins.Untappd do
+
+  def irc_doc() do
+    """
+    # [Untappd](https://untappd.com)
+
+    * `!beer <beer name>` Information about the first beer matching `<beer name>`
+    * `?beer <beer name>` List the 10 firsts beer matching `<beer name>`
+
+    _Note_: The best way to search is always "Brewery Name + Beer Name", such as "Dogfish 60 Minute".
+
+    Link your Untappd account to the bot (for automated checkins on [alcoolog](#alcoolog), ...) with the `enable-untappd` command, in private.
+    """
+  end
+
+  def start_link() do
+    GenServer.start_link(__MODULE__, [], name: __MODULE__)
+  end
+
+  def init(_) do
+    {:ok, _} = Registry.register(IRC.PubSub, "trigger:beer", [plugin: __MODULE__])
+    {:ok, %{}}
+  end
+
+  def handle_info({:irc, :trigger, _, m = %IRC.Message{trigger: %{type: :bang, args: args}}}, state) do
+    case Untappd.search_beer(Enum.join(args, " "), limit: 1) do
+      {:ok, %{"response" => %{"beers" => %{"count" => count, "items" => [result | _]}}}} ->
+        %{"beer" => beer, "brewery" => brewery} = result
+        description = Map.get(beer, "beer_description")
+                      |> String.replace("\n", " ")
+                      |> String.replace("\r", " ")
+                      |> String.trim()
+        beer_s = "#{Map.get(brewery, "brewery_name")}: #{Map.get(beer, "beer_name")} - #{Map.get(beer, "beer_abv")}°"
+        city = get_in(brewery, ["location", "brewery_city"])
+        location = [Map.get(brewery, "brewery_type"), city, Map.get(brewery, "country_name")]
+                   |> Enum.filter(fn(x) -> x end)
+                   |> Enum.join(", ")
+        extra = "#{Map.get(beer, "beer_style")} - IBU: #{Map.get(beer, "beer_ibu")} - #{location}"
+        m.replyfun.([beer_s, extra, description])
+      err ->
+        m.replyfun.("Error")
+    end
+    {:noreply, state}
+  end
+
+
+  def handle_info({:irc, :trigger, _, m = %IRC.Message{trigger: %{type: :query, args: args}}}, state) do
+    case Untappd.search_beer(Enum.join(args, " ")) do
+      {:ok, %{"response" => %{"beers" => %{"count" => count, "items" => results}}}} ->
+        beers = for %{"beer" => beer, "brewery" => brewery} <- results do
+          "#{Map.get(brewery, "brewery_name")}: #{Map.get(beer, "beer_name")} - #{Map.get(beer, "beer_abv")}°"
+        end
+        |> Enum.intersperse(", ")
+        |> Enum.join("")
+        m.replyfun.("#{count}. #{beers}")
+      err ->
+        m.replyfun.("Error")
+    end
+    {:noreply, state}
+  end
+
+  def handle_info(info, state) do
+    {:noreply, state}
+  end
+
+end
-- 
cgit v1.2.3