PoC for opening existing Safari tab

.gitignore

@@ -2,3 +2,4 @@
 !.vscode/extensions.json
 cache/*
 !cache/.gitkeep
+*.DS_Store

bin/echo-urls

@@ -0,0 +1,15 @@
+#!/usr/bin/env dash
+
+SCRIPT_DIR=$(dirname "$(realpath "$0")")
+
+# Run the AppleScript and capture the output
+urls=$(osascript "$SCRIPT_DIR/../scripts/get_safari_urls.scpt")
+
+# Convert the output to a list
+IFS=', '
+
+# Print the URLs (optional)
+for url in $urls; do
+    echo
+    echo "$url"
+done

bin/gpr

@@ -43,6 +43,28 @@ if [ "$branch" = "$default_branch" ]; then
 	exit $?
 fi
 
-# Open the URL that either directs to the existing PR or to the wizard to open a new one.
-pr_url="$repo_url/pull/$branch"
+owner=$(echo "$repo_url" | cut -d'/' -f4)
+repo=$(echo "$repo_url" | cut -d'/' -f5)
+
+pr_url=$(gh api "repos/$owner/$repo/pulls?head=$owner:$branch" --jq '.[0].html_url')
+
+if [ -z "$pr_url" ]; then
+  # TODO: push branch if it hasn't been pushed to remote.
+  open "$repo_url/pull/$branch"
+  exit 0
+fi
+
+# Iterate through currently open URLs in Safari and open the one that matches the PR URL.
+SCRIPT_DIR=$(dirname "$(realpath "$0")")
+urls=$(osascript "$SCRIPT_DIR/../scripts/get_safari_urls.scpt")
+IFS=', ' # Convert the output to a list
+
+for url in $urls; do
+    if echo "$url" | grep -q "$pr_url"; then
+        open "$url"
+        exit 0
+    fi
+done
+
+# Otherwise fall back to old behavior.
 open "$pr_url"