gh

1#!/usr/bin/env bash
2# Stand-in for `gh` in behavior-eval fixtures that need a pull request without one existing on GitHub.
3# Serves `gh pr view` and `gh pr diff` for one canned pull request from pr.json, pr.diff, and pr.files
4# beside this script, and logs every invocation to calls.log. It never calls the real gh: anything
5# else exits 1, so a run cannot reach GitHub through it.
6set -euo pipefail
7
8here="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)"
9printf '%s\n' "$*" >>"$here/calls.log"
10
11fail() { echo "gh stub: $*" >&2; exit 1; }
12
13[[ $# -ge 2 && "$1" == pr ]] || fail "unsupported command: gh $*"
14cmd="$2"
15shift 2
16[[ "$cmd" == view || "$cmd" == diff ]] || fail "unsupported command: gh pr $cmd"
17
18number="$(jq -r .number "$here/pr.json")"
19url="$(jq -r .url "$here/pr.json")"
20repo="${url#https://github.com/}"
21repo="${repo%/pull/*}"
22
23selector=""
24fields=""
25expr=""
26name_only=false
27while [[ $# -gt 0 ]]; do
28  case "$1" in
29    --json) fields="${2:?--json needs fields}"; shift 2 ;;
30    --json=*) fields="${1#--json=}"; shift ;;
31    -q|--jq) expr="${2:?--jq needs an expression}"; shift 2 ;;
32    --jq=*) expr="${1#--jq=}"; shift ;;
33    -R|--repo) [[ "${2:-}" == "$repo" ]] || fail "no pull requests found in ${2:-}"; shift 2 ;;
34    --repo=*) [[ "${1#--repo=}" == "$repo" ]] || fail "no pull requests found in ${1#--repo=}"; shift ;;
35    --name-only) name_only=true; shift ;;
36    --patch|--comments) shift ;;
37    --color) shift 2 ;;
38    --color=*) shift ;;
39    -*) fail "unsupported flag: $1" ;;
40    *) [[ -z "$selector" ]] || fail "unexpected argument: $1"; selector="$1"; shift ;;
41  esac
42done
43
44case "$selector" in
45  "$number" | "#$number" | "$url") ;;
46  "") fail "no pull request found for the current branch" ;;
47  *) fail "no pull requests found for $selector" ;;
48esac
49
50if [[ "$cmd" == diff ]]; then
51  if $name_only; then cat "$here/pr.files"; else cat "$here/pr.diff"; fi
52  exit 0
53fi
54
55if [[ -n "$fields" ]]; then
56  json="$(jq -c --arg f "$fields" '($f | split(",")) as $k | with_entries(select(.key as $x | $k | index($x)))' "$here/pr.json")"
57  if [[ -n "$expr" ]]; then jq -r "$expr" <<<"$json"; else jq . <<<"$json"; fi
58  exit 0
59fi
60
61jq -r '"title:\t\(.title)\nstate:\t\(.state)\nauthor:\t\(.author.login)\nlabels:\t\nassignees:\t\nreviewers:\t\nprojects:\t\nmilestone:\t\nnumber:\t\(.number)\nurl:\t\(.url)\nadditions:\t\(.additions)\ndeletions:\t\(.deletions)\nauto-merge:\tdisabled\n--\n\(.body)"' "$here/pr.json"