feat: enhance GitHub integration with label management and comment deletion

- Added functionality to delete issue comments and list labels in the GitHub client.
- Implemented a method to remove existing amount labels from issues in the Workspace module.
- Updated the BountiesLive module to handle bounty deletion, including comment and label management.

Author: zcesur

lib/algora/bounties/jobs/notify_bounty.ex

@@ -80,6 +80,7 @@ defmodule Algora.Bounties.Jobs.NotifyBounty do
            Workspace.ensure_ticket(token, ticket_ref.owner, ticket_ref.repo, ticket_ref.number),
          bounties when bounties != [] <- Bounties.list_bounties(ticket_id: ticket.id),
          {:ok, _} <- Github.add_labels(token, ticket_ref.owner, ticket_ref.repo, ticket_ref.number, ["💎 Bounty"]),
+         :ok <- Workspace.remove_existing_amount_labels(token, ticket_ref.owner, ticket_ref.repo, ticket_ref.number),
          :ok <-
            Workspace.add_amount_label(token, ticket_ref.owner, ticket_ref.repo, ticket_ref.number, Money.parse(amount)) do
       attempts = Bounties.list_attempts_for_ticket(ticket.id)

lib/algora/integrations/github/behaviour.ex

@@ -24,13 +24,17 @@ defmodule Algora.Github.Behaviour do
               {:ok, map()} | {:error, String.t()}
   @callback update_issue_comment(token(), String.t(), String.t(), integer(), String.t()) ::
               {:ok, map()} | {:error, String.t()}
+  @callback delete_issue_comment(token(), String.t(), String.t(), integer()) ::
+              {:ok, map()} | {:error, String.t()}
   @callback list_user_repositories(token(), String.t(), keyword()) :: {:ok, [map()]} | {:error, String.t()}
   @callback list_repository_events(token(), String.t(), String.t(), keyword()) :: {:ok, [map()]} | {:error, String.t()}
   @callback list_repository_comments(token(), String.t(), String.t(), keyword()) :: {:ok, [map()]} | {:error, String.t()}
   @callback list_repository_languages(token(), String.t(), String.t()) :: {:ok, [map()]} | {:error, String.t()}
   @callback list_repository_contributors(token(), String.t(), String.t()) :: {:ok, [map()]} | {:error, String.t()}
   @callback add_labels(token(), String.t(), String.t(), integer(), [String.t()]) :: {:ok, [map()]} | {:error, String.t()}
+  @callback list_labels(token(), String.t(), String.t(), integer()) :: {:ok, [map()]} | {:error, String.t()}
   @callback create_label(token(), String.t(), String.t(), map()) :: {:ok, map()} | {:error, String.t()}
   @callback get_label(token(), String.t(), String.t(), String.t()) :: {:ok, map()} | {:error, String.t()}
   @callback remove_label(token(), String.t(), String.t(), String.t()) :: {:ok, map()} | {:error, String.t()}
+  @callback remove_label_from_issue(token(), String.t(), String.t(), integer(), String.t()) :: {:ok, map()} | {:error, String.t()}
 end

lib/algora/integrations/github/client.ex

@@ -241,6 +241,22 @@ defmodule Algora.Github.Client do
     )
   end
 
+  @impl true
+  def delete_issue_comment(access_token, owner, repo, comment_id) do
+    access_token
+    |> fetch(
+      "/repos/#{owner}/#{repo}/issues/comments/#{comment_id}",
+      "DELETE"
+    )
+    |> case do
+      {:error, %Jason.DecodeError{position: 0, token: nil, data: ""}} ->
+        {:ok, nil}
+
+      res ->
+        res
+    end
+  end
+
   @impl true
   def list_user_repositories(access_token, username, opts \\ []) do
     fetch(access_token, "/users/#{username}/repos#{build_query(opts)}")
@@ -273,6 +289,11 @@ defmodule Algora.Github.Client do
     })
   end
 
+  @impl true
+  def list_labels(access_token, owner, repo, number) do
+    fetch(access_token, "/repos/#{owner}/#{repo}/issues/#{number}/labels")
+  end
+
   @impl true
   def create_label(access_token, owner, repo, label) do
     fetch(access_token, "/repos/#{owner}/#{repo}/labels", "POST", label)
@@ -285,6 +306,27 @@ defmodule Algora.Github.Client do
 
   @impl true
   def remove_label(access_token, owner, repo, label) do
-    fetch(access_token, "/repos/#{owner}/#{repo}/labels/#{label}", "DELETE")
+    access_token
+    |> fetch("/repos/#{owner}/#{repo}/labels/#{label}", "DELETE")
+    |> case do
+      {:error, %Jason.DecodeError{position: 0, token: nil, data: ""}} ->
+        {:ok, nil}
+
+      res ->
+        res
+    end
+  end
+
+  @impl true
+  def remove_label_from_issue(access_token, owner, repo, number, label) do
+    access_token
+    |> fetch("/repos/#{owner}/#{repo}/issues/#{number}/labels/#{URI.encode(label)}", "DELETE")
+    |> case do
+      {:error, %Jason.DecodeError{position: 0, token: nil, data: ""}} ->
+        {:ok, nil}
+
+      res ->
+        res
+    end
   end
 end

lib/algora/integrations/github/github.ex

@@ -126,6 +126,10 @@ defmodule Algora.Github do
   def update_issue_comment(token, owner, repo, comment_id, body),
     do: client().update_issue_comment(token, owner, repo, comment_id, body)
 
+  @impl true
+  def delete_issue_comment(token, owner, repo, comment_id),
+    do: client().delete_issue_comment(token, owner, repo, comment_id)
+
   @impl true
   def list_user_repositories(token, username, opts \\ []), do: client().list_user_repositories(token, username, opts)
 
@@ -145,6 +149,9 @@ defmodule Algora.Github do
   @impl true
   def add_labels(token, owner, repo, number, labels), do: client().add_labels(token, owner, repo, number, labels)
 
+  @impl true
+  def list_labels(token, owner, repo, number), do: client().list_labels(token, owner, repo, number)
+
   @impl true
   def create_label(token, owner, repo, label), do: client().create_label(token, owner, repo, label)
 
@@ -153,4 +160,7 @@ defmodule Algora.Github do
 
   @impl true
   def remove_label(token, owner, repo, label), do: client().remove_label(token, owner, repo, label)
+
+  @impl true
+  def remove_label_from_issue(token, owner, repo, number, label), do: client().remove_label_from_issue(token, owner, repo, number, label)
 end

lib/algora/workspace/workspace.ex

@@ -882,4 +882,30 @@ defmodule Algora.Workspace do
       end)
     end)
   end
+
+  def remove_existing_amount_labels(token, owner, repo, number) do
+    case Github.list_labels(token, owner, repo, number) do
+      {:ok, labels} ->
+        amount_labels =
+          labels
+          |> Enum.filter(fn label -> String.starts_with?(label["name"], "$") end)
+          |> Enum.map(fn label -> label["name"] end)
+
+        case amount_labels do
+          [] ->
+            :ok
+
+          _ ->
+            Enum.each(amount_labels, fn label_name ->
+              Github.remove_label_from_issue(token, owner, repo, number, label_name)
+            end)
+
+            :ok
+        end
+
+      {:error, reason} ->
+        Logger.warning("Failed to list labels for #{owner}/#{repo}##{number}: #{inspect(reason)}")
+        :ok
+    end
+  end
 end

lib/algora_web/live/org/bounties_live.ex

@@ -4,11 +4,11 @@ defmodule AlgoraWeb.Org.BountiesLive do
   use Ecto.Schema
 
   import Ecto.Changeset
-  import Ecto.Query
 
   alias Algora.Accounts.User
   alias Algora.Bounties
   alias Algora.Bounties.Bounty
+  alias Algora.Github
   alias Algora.Payments
   alias Algora.Repo
   alias Algora.Types.USD
@@ -364,15 +364,49 @@ defmodule AlgoraWeb.Org.BountiesLive do
   end
 
   def handle_event("delete-bounty", %{"id" => bounty_id}, socket) do
-    bounty = Repo.get!(Bounty, bounty_id)
-
-    case Bounties.delete_bounty(bounty) do
-      {:ok, _bounty} ->
-        {:noreply,
-         socket
-         |> put_flash(:info, "Bounty deleted successfully")
-         |> assign_bounties()}
-
+    bounty =
+      Bounty
+      |> Repo.get(bounty_id)
+      |> Repo.preload([:owner, [ticket: [repository: :user]]])
+
+    with {:ok, installation} <-
+           Workspace.fetch_installation_by(
+             provider: "github",
+             connected_user_id: bounty.ticket.repository.user.id
+           ),
+         {:ok, token} <- Github.get_installation_token(installation.provider_id),
+         {:ok, cr} <-
+           Workspace.fetch_command_response(bounty.ticket_id, :bounty),
+         dbg(cr),
+         {:ok, _} <-
+           Github.delete_issue_comment(
+             token,
+             bounty.ticket.repository.user.provider_login,
+             bounty.ticket.repository.name,
+             cr.provider_response_id
+           ),
+         :ok <-
+           Workspace.remove_existing_amount_labels(
+             token,
+             bounty.ticket.repository.user.provider_login,
+             bounty.ticket.repository.name,
+             bounty.ticket.number
+           ),
+         {:ok, _} <-
+           Github.remove_label_from_issue(
+             token,
+             bounty.ticket.repository.user.provider_login,
+             bounty.ticket.repository.name,
+             bounty.ticket.number,
+             "💎 Bounty"),
+           
+         {:ok, _} <- Workspace.delete_command_response(cr.id),
+         {:ok, _bounty} <- Bounties.delete_bounty(bounty) do
+      {:noreply,
+       socket
+       |> put_flash(:info, "Bounty deleted successfully")
+       |> assign_bounties()}
+    else
       {:error, _changeset} ->
         {:noreply, put_flash(socket, :error, "Failed to delete bounty")}
     end