marcie
befc40ccf4
usage_error contract (stderr + exit 2), strict option-like value guards, missing -n checks; pr-list usage() default exit 2. Four suites enrolled (population 93). Closes the viewer gap from the #1464 census: carriers now 20 of the 22; remaining non-carriers are the deliberate design-first class (ci-queue-wait, pr-merge, pr-ci-wait, mosaic-worktree).
135 lines
4.5 KiB
Bash
Executable File
135 lines
4.5 KiB
Bash
Executable File
#!/bin/bash
|
|
# pr-list.sh - List pull requests on Gitea or GitHub
|
|
# Usage: pr-list.sh [-r owner/repo] [-s state] [-l label] [-a author]
|
|
|
|
set -e
|
|
|
|
SCRIPT_DIR="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)"
|
|
source "$SCRIPT_DIR/detect-platform.sh"
|
|
|
|
# Default values
|
|
STATE="open"
|
|
LABEL=""
|
|
AUTHOR=""
|
|
LIMIT=100
|
|
REPO_OVERRIDE=""
|
|
|
|
usage() {
|
|
cat <<EOF
|
|
Usage: $(basename "$0") [OPTIONS]
|
|
|
|
List pull requests from the current repository (Gitea or GitHub).
|
|
|
|
Options:
|
|
-s, --state STATE Filter by state: open, closed, merged, all (default: open)
|
|
-l, --label LABEL Filter by label
|
|
-a, --author USER Filter by author
|
|
-n, --limit N Maximum PRs to show (default: 100)
|
|
-r, --repo OWNER/REPO Repository slug (default: infer from git origin)
|
|
-h, --help Show this help message
|
|
|
|
Examples:
|
|
$(basename "$0") # List open PRs
|
|
$(basename "$0") -s all # All PRs
|
|
$(basename "$0") -s merged -a username # Merged PRs by user
|
|
$(basename "$0") --repo ddk/ai-bma # List PRs from anywhere
|
|
EOF
|
|
exit "${1:-2}"
|
|
}
|
|
|
|
# Parse arguments
|
|
# Usage-error contract (R4): usage errors print to STDERR and exit 2,
|
|
# distinct from provider, credential, and verification failures (exit 1).
|
|
usage_error() {
|
|
echo "Error: $*" >&2
|
|
usage >&2
|
|
}
|
|
|
|
while [[ $# -gt 0 ]]; do
|
|
case $1 in
|
|
-s|--state)
|
|
[[ $# -ge 2 && "$2" != - && "$2" != --* && ! "$2" =~ ^-[[:alnum:]] ]] || usage_error "option $1 requires a value (option-like values are rejected; bare - is reserved)"
|
|
STATE="$2"
|
|
shift 2
|
|
;;
|
|
-l|--label)
|
|
[[ $# -ge 2 && "$2" != - && "$2" != --* && ! "$2" =~ ^-[[:alnum:]] ]] || usage_error "option $1 requires a value (option-like values are rejected; bare - is reserved)"
|
|
LABEL="$2"
|
|
shift 2
|
|
;;
|
|
-a|--author)
|
|
[[ $# -ge 2 && "$2" != - && "$2" != --* && ! "$2" =~ ^-[[:alnum:]] ]] || usage_error "option $1 requires a value (option-like values are rejected; bare - is reserved)"
|
|
AUTHOR="$2"
|
|
shift 2
|
|
;;
|
|
-n|--limit)
|
|
[[ $# -ge 2 && "$2" != - && "$2" != --* && ! "$2" =~ ^-[[:alnum:]] ]] || usage_error "option $1 requires a value (option-like values are rejected; bare - is reserved)"
|
|
LIMIT="$2"
|
|
shift 2
|
|
;;
|
|
-r|--repo)
|
|
[[ $# -ge 2 && "$2" != - && "$2" != --* && ! "$2" =~ ^-[[:alnum:]] ]] || usage_error "option $1 requires a value (option-like values are rejected; bare - is reserved)"
|
|
REPO_OVERRIDE="$2"
|
|
shift 2
|
|
;;
|
|
-h|--help)
|
|
usage 0
|
|
;;
|
|
*)
|
|
usage_error "unknown option: $1"
|
|
;;
|
|
esac
|
|
done
|
|
|
|
if [[ -n "$REPO_OVERRIDE" ]]; then
|
|
REPO_INFO="$REPO_OVERRIDE"
|
|
# Explicit --repo is primarily for Gitea wrappers; if a git origin is present,
|
|
# still honor GitHub detection for cross-platform behavior.
|
|
PLATFORM=$(detect_platform 2>/dev/null || echo gitea)
|
|
else
|
|
PLATFORM=$(detect_platform)
|
|
REPO_INFO=$(get_repo_info)
|
|
fi
|
|
|
|
if [[ -z "$REPO_INFO" || "$REPO_INFO" == error:* ]]; then
|
|
echo "Error: Could not determine repository from git origin. Run from a repo or pass --repo." >&2
|
|
exit 1
|
|
fi
|
|
|
|
case "$PLATFORM" in
|
|
github)
|
|
CMD=(gh pr list --repo "$REPO_INFO" --state "$STATE" --limit "$LIMIT")
|
|
[[ -n "$LABEL" ]] && CMD+=(--label "$LABEL")
|
|
[[ -n "$AUTHOR" ]] && CMD+=(--author "$AUTHOR")
|
|
"${CMD[@]}"
|
|
;;
|
|
gitea)
|
|
if [[ -n "$REPO_OVERRIDE" ]]; then
|
|
GITEA_LOGIN_NAME=$(get_gitea_login_for_repo_override "$REPO_OVERRIDE") || {
|
|
echo "Error: could not resolve a Gitea login for the --repo override (the lines above say why). Set GITEA_LOGIN to name one explicitly." >&2
|
|
exit 1
|
|
}
|
|
else
|
|
GITEA_LOGIN_NAME=$(get_gitea_login) || {
|
|
echo "Error: Could not resolve Gitea login for remote host" >&2
|
|
exit 1
|
|
}
|
|
fi
|
|
CMD=(tea pr list --repo "$REPO_INFO" --login "$GITEA_LOGIN_NAME" --state "$STATE" --limit "$LIMIT")
|
|
|
|
# tea filtering may be limited
|
|
if [[ -n "$LABEL" ]]; then
|
|
echo "Note: Label filtering may require manual review for Gitea" >&2
|
|
fi
|
|
if [[ -n "$AUTHOR" ]]; then
|
|
echo "Note: Author filtering may require manual review for Gitea" >&2
|
|
fi
|
|
|
|
"${CMD[@]}"
|
|
;;
|
|
*)
|
|
echo "Error: Could not detect git platform" >&2
|
|
exit 1
|
|
;;
|
|
esac
|