113 lines
2.9 KiB
Bash
Executable File
113 lines
2.9 KiB
Bash
Executable File
#!/usr/bin/env bash
|
|
set -euo pipefail
|
|
|
|
usage() {
|
|
cat <<'USAGE'
|
|
Usage: find-sessions.sh [-L socket-name|-S socket-path|-A] [-q pattern]
|
|
|
|
List tmux sessions on a socket (default tmux socket if none provided).
|
|
|
|
Options:
|
|
-L, --socket tmux socket name (passed to tmux -L)
|
|
-S, --socket-path tmux socket path (passed to tmux -S)
|
|
-A, --all scan all sockets under CLAWDBOT_TMUX_SOCKET_DIR
|
|
-q, --query case-insensitive substring to filter session names
|
|
-h, --help show this help
|
|
USAGE
|
|
}
|
|
|
|
socket_name=""
|
|
socket_path=""
|
|
query=""
|
|
scan_all=false
|
|
socket_dir="${CLAWDBOT_TMUX_SOCKET_DIR:-${TMPDIR:-/tmp}/moltbot-tmux-sockets}"
|
|
|
|
while [[ $# -gt 0 ]]; do
|
|
case "$1" in
|
|
-L|--socket) socket_name="${2-}"; shift 2 ;;
|
|
-S|--socket-path) socket_path="${2-}"; shift 2 ;;
|
|
-A|--all) scan_all=true; shift ;;
|
|
-q|--query) query="${2-}"; shift 2 ;;
|
|
-h|--help) usage; exit 0 ;;
|
|
*) echo "Unknown option: $1" >&2; usage; exit 1 ;;
|
|
esac
|
|
done
|
|
|
|
if [[ "$scan_all" == true && ( -n "$socket_name" || -n "$socket_path" ) ]]; then
|
|
echo "Cannot combine --all with -L or -S" >&2
|
|
exit 1
|
|
fi
|
|
|
|
if [[ -n "$socket_name" && -n "$socket_path" ]]; then
|
|
echo "Use either -L or -S, not both" >&2
|
|
exit 1
|
|
fi
|
|
|
|
if ! command -v tmux >/dev/null 2>&1; then
|
|
echo "tmux not found in PATH" >&2
|
|
exit 1
|
|
fi
|
|
|
|
list_sessions() {
|
|
local label="$1"; shift
|
|
local tmux_cmd=(tmux "$@")
|
|
|
|
if ! sessions="$("${tmux_cmd[@]}" list-sessions -F '#{session_name}\t#{session_attached}\t#{session_created_string}' 2>/dev/null)"; then
|
|
echo "No tmux server found on $label" >&2
|
|
return 1
|
|
fi
|
|
|
|
if [[ -n "$query" ]]; then
|
|
sessions="$(printf '%s\n' "$sessions" | grep -i -- "$query" || true)"
|
|
fi
|
|
|
|
if [[ -z "$sessions" ]]; then
|
|
echo "No sessions found on $label"
|
|
return 0
|
|
fi
|
|
|
|
echo "Sessions on $label:"
|
|
printf '%s\n' "$sessions" | while IFS=$'\t' read -r name attached created; do
|
|
attached_label=$([[ "$attached" == "1" ]] && echo "attached" || echo "detached")
|
|
printf ' - %s (%s, started %s)\n' "$name" "$attached_label" "$created"
|
|
done
|
|
}
|
|
|
|
if [[ "$scan_all" == true ]]; then
|
|
if [[ ! -d "$socket_dir" ]]; then
|
|
echo "Socket directory not found: $socket_dir" >&2
|
|
exit 1
|
|
fi
|
|
|
|
shopt -s nullglob
|
|
sockets=("$socket_dir"/*)
|
|
shopt -u nullglob
|
|
|
|
if [[ "${#sockets[@]}" -eq 0 ]]; then
|
|
echo "No sockets found under $socket_dir" >&2
|
|
exit 1
|
|
fi
|
|
|
|
exit_code=0
|
|
for sock in "${sockets[@]}"; do
|
|
if [[ ! -S "$sock" ]]; then
|
|
continue
|
|
fi
|
|
list_sessions "socket path '$sock'" -S "$sock" || exit_code=$?
|
|
done
|
|
exit "$exit_code"
|
|
fi
|
|
|
|
tmux_cmd=(tmux)
|
|
socket_label="default socket"
|
|
|
|
if [[ -n "$socket_name" ]]; then
|
|
tmux_cmd+=(-L "$socket_name")
|
|
socket_label="socket name '$socket_name'"
|
|
elif [[ -n "$socket_path" ]]; then
|
|
tmux_cmd+=(-S "$socket_path")
|
|
socket_label="socket path '$socket_path'"
|
|
fi
|
|
|
|
list_sessions "$socket_label" "${tmux_cmd[@]:1}"
|