@rt-tools/agent-kit 0.9.1 → 0.11.0

package/assets/hooks/commit-msg.sh

@@ -15,6 +15,8 @@
 # ОТКАЗ В ПОЛЬЗУ РАБОТЫ: проверяльщика нет (свежий клон без установленных зависимостей) —
 # пропуск. Формат тогда не проверяется, и это лучше, чем заклинивший коммит.
 
+. "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/utf8.sh" 2>/dev/null || true
+
 msg_file="$1"
 [ -z "$msg_file" ] && exit 0
 

package/assets/hooks/conscience-guard.sh

@@ -0,0 +1,100 @@
+#!/usr/bin/env bash
+# rt-hook: Stop
+# Требует: agents/conscience.md, hooks/roles.sh, hooks/deny-tail.sh
+# Гард совести: ход, в котором роль совести нашла повтор разобранного промаха, не заканчивается,
+# пока повтор не разобран или не назван владельцу.
+#
+# Зачем именно так. Разбор происшествия объясняет механизм промаха, но читает его только тот, кто
+# открывает каталог сам. Промах, о котором надо напомнить, — ровно тот, о котором исполнитель в
+# эту минуту не помнит, поэтому вызов роли не оставляют на его усмотрение: он не случится там,
+# где нужнее всего.
+#
+# Роль отвечает первой строкой: «СОВЕСТЬ: повтор» либо «СОВЕСТЬ: чисто». Гард судит последний
+# ответ за ход и ничего не знает о том, верна ли находка: это решает исполнитель, и его решение
+# — работа следующего хода, а не молчание этого.
+#
+# Ход отпускается, когда после находки исполнитель сделал хоть что-то по ней: завёл разбор
+# происшествия, поправил работу или назвал повтор владельцу. Проверяется это по тому же ходу.
+#
+# ОТКАЗ В ПОЛЬЗУ РАБОТЫ: нет `jq`, нет записи хода, роль молчит или отвечает не по форме — ход
+# разрешается. Сломанная совесть не имеет права заклинить разговор.
+
+. "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/utf8.sh" 2>/dev/null || true
+
+input="$(cat 2>/dev/null)"
+[ -z "$input" ] && exit 0
+command -v jq >/dev/null 2>&1 || exit 0
+
+# Роль, выключенная деревом, гарда не держит: список выключенных лежит в настройке дерева, а
+# читает его помощник рядом. Нечитаемая настройка выключением не считается — гард работает как
+# прежде.
+rt_hooks_dir="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)"
+# shellcheck disable=SC1090
+[ -f "$rt_hooks_dir/roles.sh" ] && . "$rt_hooks_dir/roles.sh" 2>/dev/null
+command -v rt_role_off >/dev/null 2>&1 && rt_role_off conscience && exit 0
+
+active="$(printf '%s' "$input" | jq -r '.stop_hook_active // false' 2>/dev/null)"
+[ "$active" = "true" ] && exit 0
+
+transcript="$(printf '%s' "$input" | jq -r '.transcript_path // empty' 2>/dev/null)"
+[ -z "$transcript" ] && exit 0
+[ -f "$transcript" ] || exit 0
+
+# Ход — всё, что записано после последней настоящей реплики владельца. Ответ инструмента
+# приходит той же ролью, поэтому строки с `tool_result` репликой не считаются.
+verdict="$(tail -n 400 "$transcript" 2>/dev/null | jq -s -r '
+    def is_input:
+        .type == "user"
+        and (((.message.content // []) | if type == "array"
+                then ([.[] | select(.type == "tool_result")] | length)
+                else 0 end) == 0);
+
+    (map(is_input) | rindex(true)) as $i
+    | (if $i == null then [] else .[$i:] end) as $turn
+    | [ $turn[]
+        | if .type == "assistant"
+          then ([(.message.content // [])[]
+                  | if .type == "tool_use" then (.input.command // "") else (.text // "") end] | join("\n"))
+          elif .type == "user"
+          then ([(.message.content // []) | select(type == "array") | .[]
+                   | select(.type == "tool_result") | .content
+                   | if type == "string" then . elif type == "array"
+                     then (map(if type == "object" then (.text // "") else tostring end) | join("\n"))
+                     else tostring end] | join("\n"))
+          else "" end ] as $flow
+    | ($flow | map(test("СОВЕСТЬ:[[:space:]]*повтор")) | index(true)) as $found
+    | if $found == null then "нет-находки"
+      else ($flow[($found + 1):] | join("\n")
+            | if test("postmortems|разбор происшествия|СОВЕСТЬ: разобрано") then "разобрано" else "висит" end)
+      end
+' 2>/dev/null)"
+
+[ "$verdict" = "висит" ] || exit 0
+
+detail="$(tail -n 400 "$transcript" 2>/dev/null | grep -m1 -A3 'СОВЕСТЬ:[[:space:]]*повтор' | tr -d '\\"' | head -4)"
+
+reason="BLOCKED by conscience-guard: совесть нашла в этом ходе повтор разобранного промаха, и по нему не сделано ничего.
+
+${detail}
+
+Ход не кончается на находке. Сделай одно из трёх этим же ходом: поправь работу, заведи разбор происшествия, если механизм новый, или назови повтор владельцу словами — что повторяется и чем это кончилось в прошлый раз.
+
+Находка неверна — так и скажи владельцу: ложная находка тоже стоит хода, и молчанием она не чинится.
+
+Гард судит один ход: следующий заход не отбивается."
+
+# Общий хвост отказа: два законных хода. Файл может быть не разложен — тогда хвоста нет,
+# а причина отказа остаётся прежней.
+# shellcheck disable=SC1090
+[ -f "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/deny-tail.sh" ] \
+    && . "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/deny-tail.sh" 2>/dev/null
+command -v rt_deny_tail >/dev/null 2>&1 || rt_deny_tail() { :; }
+deny_tail_text="$(rt_deny_tail "")"
+[ -n "$deny_tail_text" ] && reason="${reason}
+
+${deny_tail_text}"
+
+jq -n --arg r "$reason" '{decision:"block",reason:$r}' 2>/dev/null \
+    || printf '{"decision":"block","reason":"conscience-guard: найден повтор разобранного промаха — разбери его или назови владельцу."}\n'
+
+exit 0

package/assets/hooks/constitution-index.sh

@@ -12,6 +12,8 @@
 # ОТКАЗ В ПОЛЬЗУ РАБОТЫ: любая ошибка начинает сессию без добавленного контекста (exit 0).
 # Сломанный вход не имеет права остановить сессию.
 
+. "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/utf8.sh" 2>/dev/null || true
+
 dir="${CLAUDE_PROJECT_DIR:-.}/docs/constitution"
 [ -d "$dir" ] || exit 0
 

package/assets/hooks/deny-tail.sh

@@ -0,0 +1,32 @@
+#!/usr/bin/env bash
+# Общий хвост отказа. НЕ гард: объявления `rt-hook:` у него нет, к событиям агента он не
+# подключается. Его источают сами гарды — тем же приёмом, каким они источают запись наблюдений и
+# слово о нехватке функции профиля.
+#
+# Зачем он есть. Отказ гарда называет промах и способ его снять, а что делать, когда снять не
+# выходит, не называет никто. Пустое место занимает третий ход, которого нет в правилах: обойти
+# молча — командой оболочки, соседним инструментом, правкой самого гарда. Так и было: за один час
+# отказ обошли дважды, и оба раза правка легла мимо гарда. Ходов законных два, и оба называются
+# прямо в тексте отказа, а не остаются на догадку читающего.
+#
+# ЧТО ГОВОРИТСЯ. Починить названное и повторить вызов — либо принести владельцу цену обхода и
+# ждать его слова. Там, где у обхода есть законная форма — строка в теле коммита, строка в
+# замысле, ключ команды, — она называется тем же хвостом: обход, о котором известно, что он
+# законен, ищут не мимо гарда, а по его же словам.
+#
+# ЧЕГО ХВОСТ НЕ ДЕЛАЕТ. Он не судит, годится ли обход в этом случае: это решает владелец. И он не
+# заменяет причины отказа — она стоит перед ним и называет промах поимённо.
+
+# Хвост отказа строкой. Первый параметр — законная форма обхода, если она у отказа есть; пусто —
+# значит законной формы нет вовсе, и говорится об этом прямо.
+#
+#   reason="BLOCKED: <причина>. $(rt_deny_tail 'строка `Docs-skip: <причина>` в теле коммита')"
+#   reason="BLOCKED: <причина>. $(rt_deny_tail)"
+rt_deny_tail() {
+    if [ -n "$1" ]; then
+        printf 'Ходов отсюда два: починить названное и повторить вызов — либо принести владельцу цену обхода и ждать его слова. Законная форма обхода: %s. Молча мимо гарда правка не кладётся: он отбивает один вызов, а обойдённый снимает требование со всего дерева и молчит об этом.' "$1"
+        return 0
+    fi
+
+    printf 'Ходов отсюда два: починить названное и повторить вызов — либо принести владельцу цену обхода и ждать его слова. Законной формы обхода у этого отказа нет. Молча мимо гарда правка не кладётся: он отбивает один вызов, а обойдённый снимает требование со всего дерева и молчит об этом.'
+}

package/assets/hooks/dev-server-guard.sh

@@ -1,5 +1,6 @@
 #!/usr/bin/env bash
 # rt-hook: PreToolUse Bash|mcp__webstorm__execute_terminal_command|mcp__webstorm__execute_run_configuration|mcp__webstorm__execute_tool
+# Требует: hooks/deny-tail.sh
 # Гард второго сервера разработки. PreToolUse.
 #
 # Приложения уже подняты владельцем, и всякая проверка через браузер идёт туда. Второй
@@ -13,6 +14,8 @@
 # Где именно подняты приложения, знает профиль проекта: .claude/rt-kit/project.sh, переменная
 # RT_STANDS. Нет профиля — текст отказа остаётся общим, сам гард работает.
 
+. "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/utf8.sh" 2>/dev/null || true
+
 input="$(cat 2>/dev/null)"
 
 tool="$(printf '%s' "$input" | jq -r '.tool_name // empty' 2>/dev/null)"
@@ -75,11 +78,16 @@ for profile in "$rt_hooks_dir/../rt-kit/defaults/project.sh" "$rt_hooks_dir/../d
 done
 stands="${RT_STANDS:-}"
 
+# shellcheck disable=SC1090
+[ -f "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/deny-tail.sh" ] \
+    && . "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/deny-tail.sh" 2>/dev/null
+command -v rt_deny_tail >/dev/null 2>&1 || rt_deny_tail() { :; }
+
 deny() {
     if [ -n "$stands" ]; then
-        echo "$1 Приложения уже подняты владельцем: ${stands} — проверяй их. Свой экземпляр не поднимай; если порт не отвечает, скажи владельцу, а не запускай второй." >&2
+        echo "$1 Приложения уже подняты владельцем: ${stands} — проверяй их. Свой экземпляр не поднимай; если порт не отвечает, скажи владельцу, а не запускай второй. $(rt_deny_tail)" >&2
     else
-        echo "$1 Приложения уже подняты владельцем — проверяй их. Свой экземпляр не поднимай; если порт не отвечает, скажи владельцу, а не запускай второй." >&2
+        echo "$1 Приложения уже подняты владельцем — проверяй их. Свой экземпляр не поднимай; если порт не отвечает, скажи владельцу, а не запускай второй. $(rt_deny_tail)" >&2
     fi
     exit 2
 }

package/assets/hooks/docs-guard.sh

@@ -1,6 +1,6 @@
 #!/usr/bin/env bash
 # rt-hook: PreToolUse Edit|Write|MultiEdit|Bash|mcp__webstorm__create_new_file|mcp__webstorm__execute_terminal_command|mcp__webstorm__execute_tool
-# Требует: hooks/profile-check.sh
+# Требует: hooks/profile-check.sh, hooks/deny-tail.sh
 # Гард пары «правка и её документ». PreToolUse.
 #
 # Расхождение кода с текстом беззвучно. Ни линтер, ни сборка, ни тесты не читают правила,
@@ -26,6 +26,8 @@
 # ОТКАЗ В ПОЛЬЗУ РАБОТЫ: не репозиторий, нет разборщика, битый ввод, пустой список файлов —
 # пропуск.
 
+. "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/utf8.sh" 2>/dev/null || true
+
 input="$(cat 2>/dev/null)"
 [ -z "$input" ] && exit 0
 command -v jq >/dev/null 2>&1 || exit 0
@@ -43,7 +45,19 @@ decide() {
             && rt_note guard-deny res=docs-guard "sid=$(printf '%s' "$input" | jq -r '.session_id // "nosession"' 2>/dev/null)"
     fi
 
-    jq -n --arg d "$1" --arg r "$2" \
+    reason="$2"
+    if [ "$1" = "deny" ]; then
+        # shellcheck disable=SC1090
+        [ -f "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/deny-tail.sh" ] \
+            && . "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/deny-tail.sh" 2>/dev/null
+        if command -v rt_deny_tail >/dev/null 2>&1; then
+            reason="$2
+
+$(rt_deny_tail "строка \`Docs-skip: <причина>\` в теле коммита; пустая причина не принимается")"
+        fi
+    fi
+
+    jq -n --arg d "$1" --arg r "$reason" \
         '{hookSpecificOutput:{hookEventName:"PreToolUse",permissionDecision:$d,permissionDecisionReason:$r}}' 2>/dev/null \
         || printf '{"hookSpecificOutput":{"hookEventName":"PreToolUse","permissionDecision":"deny","permissionDecisionReason":"Документ едет тем же коммитом."}}\n'
     exit 0

package/assets/hooks/exam-guard.sh

@@ -0,0 +1,123 @@
+#!/usr/bin/env bash
+# rt-hook: PreToolUse Edit|Write|MultiEdit|mcp__webstorm__create_new_file|Bash
+# Требует: agents/strict-teacher.md, hooks/roles.sh, hooks/deny-tail.sh
+# Гард экзамена: правка не идёт, пока за сессию не сдан экзамен по загруженным правилам.
+#
+# Зачем именно так. Гейт правил требует загрузить правило перед правкой и на этом кончается:
+# загруженное правило и прочитанное правило для дерева неразличимы. Правило на четыре сотни
+# строк уезжает в контекст целиком, а исполняется выборочно — промахи случаются после того, как
+# правило было загружено. Спрашивает роль экзаменатора, а гард судит её вердикт.
+#
+# Вердикт роль отдаёт первой строкой: «ЭКЗАМЕН: сдано N из 5». Сдано — это пять из пяти; любое
+# другое число означает, что правило перечитывается целиком и экзамен пересдаётся.
+#
+# Списанный ответ экзаменом не считается. Отличить его от знания роль не может — а гард может:
+# между вопросами и ответами не должно быть чтения тех же правил. Признак грубый и своей границы
+# не скрывает: чтение соседнего правила он засчитает списыванием тоже.
+#
+# FAIL-OPEN: нет jq, нет записи хода, чужой инструмент → пропуск. Сломанный гард не должен
+# мешать работать.
+
+. "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/utf8.sh" 2>/dev/null || true
+
+input="$(cat 2>/dev/null)"
+[ -z "$input" ] && exit 0
+command -v jq >/dev/null 2>&1 || exit 0
+
+# Роль, выключенная деревом, гарда не держит: список выключенных лежит в настройке дерева, а
+# читает его помощник рядом. Нечитаемая настройка выключением не считается — гард работает как
+# прежде.
+rt_hooks_dir="$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)"
+# shellcheck disable=SC1090
+[ -f "$rt_hooks_dir/roles.sh" ] && . "$rt_hooks_dir/roles.sh" 2>/dev/null
+command -v rt_role_off >/dev/null 2>&1 && rt_role_off strict-teacher && exit 0
+
+tool="$(printf '%s' "$input" | jq -r '.tool_name // empty' 2>/dev/null)"
+# Второй экзамен спрашивается на снятии черновика: работа кончилась, и правила поставки к этому
+# моменту читались давно — между их чтением и этой минутой прошёл весь заход.
+ready=0
+case "$tool" in
+    Edit | Write | MultiEdit | mcp__webstorm__create_new_file) ;;
+    Bash)
+        cmd="$(printf '%s' "$input" | jq -r '.tool_input.command // empty' 2>/dev/null)"
+        printf '%s' "$cmd" | grep -qE 'pr[[:space:]]+ready|mr[[:space:]]+update[^|;&]*--ready' || exit 0
+        ready=1
+        ;;
+    *) exit 0 ;;
+esac
+
+transcript="$(printf '%s' "$input" | jq -r '.transcript_path // empty' 2>/dev/null)"
+[ -z "$transcript" ] && exit 0
+[ -f "$transcript" ] || exit 0
+
+# Общий хвост отказа: два законных хода и законная форма обхода, если она у отказа есть. Файл
+# может быть не разложен — тогда хвоста нет, а причина отказа остаётся прежней.
+# shellcheck disable=SC1090
+[ -f "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/deny-tail.sh" ] \
+    && . "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/deny-tail.sh" 2>/dev/null
+command -v rt_deny_tail >/dev/null 2>&1 || rt_deny_tail() { :; }
+
+deny() {
+    reason="$1"
+    tail_text="$(rt_deny_tail "$2")"
+    [ -n "$tail_text" ] && reason="$1 ${tail_text}"
+    jq -n --arg r "$reason" '{hookSpecificOutput:{hookEventName:"PreToolUse",permissionDecision:"deny",permissionDecisionReason:$r}}' 2>/dev/null \
+        || printf '{"hookSpecificOutput":{"hookEventName":"PreToolUse","permissionDecision":"deny","permissionDecisionReason":"%s"}}\n' "$reason"
+    exit 0
+}
+
+# Судится вся сессия, а не последний ход: экзамен сдаётся один раз на старте и держится до конца.
+verdict="$(jq -s -r '
+    [.[] | select(.type == "user") | .message.content // [] | select(type == "array") | .[]
+       | select(.type == "tool_result") | .content
+       | if type == "string" then .
+         elif type == "array" then (map(if type == "object" then (.text // "") else tostring end) | join("\n"))
+         else tostring end] | join("\n")
+    | [scan("ЭКЗАМЕН:[[:space:]]*сдано[[:space:]]*([0-9]+)[[:space:]]*из[[:space:]]*([0-9]+)")]
+    | if length == 0 then "нет"
+      else (.[-1] | if .[0] == .[1] then "сдан" else "провален" end)
+      end
+' "$transcript" 2>/dev/null)"
+
+# Второй экзамен — тот, что вынесен после открытия PR. Первый его не заменяет: спрашивают о
+# разном, и между ними лежит вся работа.
+if [ "$ready" = "1" ]; then
+    # Записи сводятся в один поток в порядке их появления: команда и ответ инструмента лежат в
+    # разных полях, и индекс из одного массива в другом не значит ничего.
+    after="$(jq -s -r '
+        [ .[]
+          | if .type == "assistant"
+            then ([(.message.content // [])[] | select(.type == "tool_use") | (.input.command // "")] | join("\n"))
+            elif .type == "user"
+            then ([(.message.content // []) | select(type == "array") | .[]
+                     | select(.type == "tool_result") | .content
+                     | if type == "string" then . elif type == "array"
+                       then (map(if type == "object" then (.text // "") else tostring end) | join("\n"))
+                       else tostring end] | join("\n"))
+            else "" end ] as $flow
+        | ($flow | map(test("pr[[:space:]]+create|mr[[:space:]]+create")) | index(true)) as $opened
+        | if $opened == null then "нет-pr"
+          else ($flow[($opened + 1):] | join("\n")
+                | [scan("ЭКЗАМЕН:[[:space:]]*сдано[[:space:]]*([0-9]+)[[:space:]]*из[[:space:]]*([0-9]+)")]
+                | if length == 0 then "нет"
+                  elif (.[-1] | .[0] == .[1]) then "сдан"
+                  else "провален" end)
+          end
+    ' "$transcript" 2>/dev/null)"
+    case "$after" in
+        сдан | нет-pr) exit 0 ;;
+        *)
+            deny "BLOCKED by exam-guard: черновик снимается после второго экзамена, а его за эту сессию не было. Позови роль strict-teacher с правилами поставки и с тем, чего требовала задача: между чтением этих правил и снятием черновика прошёл весь заход."
+            ;;
+    esac
+fi
+
+case "$verdict" in
+    сдан) exit 0 ;;
+    провален)
+        deny "BLOCKED by exam-guard: экзамен по загруженным правилам провален. Перечитай правило целиком — не тот кусок, о котором спрашивали, — и позови роль strict-teacher снова. Показанный ответ даёт знание одной строки, а не правила."
+        ;;
+    *)
+        deny "BLOCKED by exam-guard: за эту сессию экзамена по загруженным правилам не было. Позови роль strict-teacher, передай ей список загруженных правил, ответь на её вопросы по памяти и верни ей ответы — вердикт она отдаёт строкой «ЭКЗАМЕН: сдано N из 5». Загруженное правило и прочитанное правило — разные вещи, и цену этой разницы платит владелец."
+        ;;
+esac

package/assets/hooks/git-guard-delivery-signature.sh

@@ -0,0 +1,77 @@
+#!/usr/bin/env bash
+# Подпись машинного коммита для гарда поставки: чей это коммит, той ли почтой он подписан и что
+# делать, если нет.
+#
+# Строки `# rt-hook:` здесь нет намеренно: событие и образец вызова объявляет сам гард, а
+# помощник рядом хуком не регистрируется и в одиночку ничего не решает. Он зовётся из гарда и
+# пользуется его же переменными — командой, объявленной почтой, именем главной ветки — и его
+# отказом.
+#
+# Вынесен он отсюда потому, что гард дорос до предела длины: предметов в нём пять, и подпись
+# среди них самая отдельная — своя точка проверки, свои условия молчания, свой отказ.
+
+. "$(cd "$(dirname "${BASH_SOURCE[0]}")" && pwd)/utf8.sh" 2>/dev/null || true
+
+rt_delivery_signature() {
+# --- подпись машинного коммита ------------------------------------------------------------
+#
+# Служебный адрес хостинга состоит из числа, логина и домена, а сопоставляется по числу: логин
+# рядом с ним не сверяет никто. Коммит с чужим числом хостинг припишет постороннему человеку, и
+# изнутри это выглядит верным — имя учётной записи в истории то самое. Так одиннадцать коммитов
+# и уехали в главную ветку за чужой подписью; нашёл это владелец, читая историю глазами.
+#
+# Точка — пуш: до него подпись переписывается на месте всей веткой сразу, после — только силовой
+# отправкой. На коммите гард не стоит: почта задаётся переменными самой команды, и разбор её из
+# текста ловил бы ту же строку, которая и так перед глазами у набравшего её.
+#
+# Судится коммит, НАЗВАВШИЙСЯ машинной записью: её логин стоит именем автора либо левой частью
+# почты. Опознавать по самой почте нельзя — она в таком коммите как раз и неверна, а требовать
+# машинную подпись от каждого коммита значило бы отбивать работу, сделанную человеком своими
+# руками в том же дереве.
+#
+# Логин читается из объявленной почты, а не объявляется вторым свойством: два объявления одного
+# логина разошлись бы молча. Исполнителем задачи он тоже не бывает — в дереве, где хостинг
+# ограничил машинную запись, исполнителем ставят человека, а коммит остаётся машинным.
+#
+# Вызов пуша узнаётся по двум признакам сразу — команда `git` в начале строки или за
+# разделителем и слово `push` отдельным словом. Одной подстрокой «git push» его не поймать:
+# помощник учётных данных и заголовок запроса ставятся ключами `-c` между ними.
+# Пробный пуш не отправляет ничего, и подпись у него не спрашивают. Отложенная правка — тоже:
+# `git stash push` кладёт правку в тайник этой же машины, поэтому тайник вырезается из строки, а
+# признак считается по остатку.
+if printf '%s' "$cmd" | grep -qE '(^|[;&|(]|&&|\|\|)[[:space:]]*git([[:space:]]|$)' \
+    && printf '%s' "$cmd" | sed -E 's/git[[:space:]]+stash[[:space:]]+push/git stash/g' | grep -qE '(^|[[:space:]])push([[:space:]]|$)' \
+    && ! printf '%s' "$cmd" | grep -q -- '--dry-run'; then
+    # Два условия молчания. Дерево, не назвавшее почты машинной записи, требования не получает:
+    # своей машинной записи у пакета нет, а выдуманная отбивала бы работу в чужом дереве.
+    # Вершины главной ветки нет — вклад считать не от чего.
+    #
+    # Судится вклад ветки, а не вся история: влитое в главную этой веткой уже не чинится, и
+    # отказ за него отбивал бы работу вместо промаха.
+    if [ -n "$commit_email" ] \
+        && git rev-parse --verify --quiet "refs/remotes/origin/${main_branch}" >/dev/null 2>&1; then
+        # Левая часть служебного адреса: `<число>+<логин>` либо просто логин.
+        bot_login="${commit_email%%@*}"
+        bot_login="${bot_login##*+}"
+
+        strangers=''
+        while IFS="$(printf '\t')" read -r short author email; do
+            [ -z "$short" ] && continue
+            login="${email%%@*}"
+            login="${login##*+}"
+            [ "$author" = "$bot_login" ] || [ "$login" = "$bot_login" ] || continue
+            [ "$email" = "$commit_email" ] && continue
+            strangers="${strangers}${strangers:+, }${short} <${email}>"
+        done <<EOF
+$(git log --format='%h%x09%an%x09%ae' "origin/${main_branch}..HEAD" 2>/dev/null)
+EOF
+
+        [ -n "$strangers" ] \
+            && deny "BLOCKED: машинный коммит подписан не той почтой, что объявлена деревом. Хостинг сопоставляет служебный адрес по числу в нём, и коммит с чужим числом он припишет постороннему человеку — изнутри промах не виден, потому что имя учётной записи рядом верное. Расходятся: ${strangers}. Объявлено: ${commit_email} — почта берётся оттуда, а не набирается по памяти. Перепиши подпись до пуша, после него это чинит только силовая отправка:
+    последний коммит — GIT_AUTHOR_NAME=\"${bot_login}\" GIT_AUTHOR_EMAIL=\"${commit_email}\" GIT_COMMITTER_NAME=\"${bot_login}\" GIT_COMMITTER_EMAIL=\"${commit_email}\" git commit --amend --no-edit --reset-author
+    весь вклад ветки — git filter-branch -f --env-filter 'GIT_AUTHOR_EMAIL=\"${commit_email}\"; GIT_COMMITTER_EMAIL=\"${commit_email}\"' origin/${main_branch}..HEAD"
+    fi
+fi
+# Своего выхода у этой точки нет: пуш бывает и составной командой, а второе её звено судят
+# разделы ниже.
+}