#!/usr/bin/bash # ============================================================================= # overtchat-setup — version dans $VERSION (ne pas dupliquer ici) # Installateur officiel + Panel de gestion Service-Overtchat # Services : Eggdrop / IriX / Anope / Lea # Serveurs : UnrealIRCd / ircd-Hybrid / ircu / Overtchat-ircd # Sécurité : SHA256 + access.json chiffré # ============================================================================= # --debug est cherché dans TOUS les arguments, et non dans le seul premier. # « $0 --root --debug » n'activait donc pas la trace, alors que c'est la # combinaison qu'on utilise justement quand l'installation en root échoue. for _a in "$@"; do [[ "$_a" == "--debug" ]] && { set -x; break; }; done unset _a set -Eeuo pipefail # ============================================================================= # CONSTANTES JSON # ============================================================================= # Version — LUE dans le fichier VERSION de la racine, jamais recopiée ici. # # Elle l'était, et le résultat était prévisible : `VERSION` annonçait 3.5.2 pendant # que Config/access.json et Config/eggdrop.json en étaient restés à 1.0. Aucun de # ces fichiers n'étant dérivé d'un autre, chacun devait être mis à jour à la main — # donc aucun ne l'était. # # Le chemin est déduit de l'emplacement de ce script (Bootstrap/ → racine), et non # de BASE_DIR, qui n'est pas encore défini ici. La valeur en dur reste comme repli : # un fichier absent ou corrompu ne doit pas empêcher le panel de démarrer, et le # format est validé pour qu'un fichier abîmé ne se propage pas dans les JSON. _read_version() { local f v f="$(cd "$(dirname "${BASH_SOURCE[0]}")/.." 2>/dev/null && pwd)/VERSION" [ -r "$f" ] || { printf '4.0.0'; return; } v="$(tr -d '[:space:]' < "$f" 2>/dev/null)" case "$v" in [0-9]*.[0-9]*) printf '%s' "$v" ;; *) printf '4.0.0' ;; esac } readonly VERSION="$(_read_version)" readonly SCRIPT_NAME="overtchat-setup" # ----------------------------------------------------------------------------- # LE CHEMIN DE CE SCRIPT — celui qui tourne, pas celui qu'on suppose # # Le module de mise à jour écrit dans "$BASE_DIR/Bootstrap/overtchat-setup.sh". # Rien ne garantit que ce soit le fichier en cours d'exécution : lancé depuis un # clone posé ailleurs, ou depuis /tmp après un téléchargement, le script se # serait mis à jour SANS SE TOUCHER — il aurait annoncé « à jour » et rejoué la # même version au lancement suivant. Le plus trompeur des succès. # # `readlink -f` suit les liens symboliques ; à défaut on garde le chemin brut, # qui vaut mieux que rien. `$0` ne suffit pas : sourcé ou appelé par un lien, il # ne désigne pas le fichier. # ----------------------------------------------------------------------------- _resolve_script_path() { local p="${BASH_SOURCE[0]:-$0}" if command -v readlink >/dev/null 2>&1; then readlink -f "$p" 2>/dev/null || printf '%s' "$p" elif command -v realpath >/dev/null 2>&1; then realpath "$p" 2>/dev/null || printf '%s' "$p" else printf '%s' "$p" fi } readonly SCRIPT_PATH="$(_resolve_script_path)" # ⚠⚠ `INIT_BASE` et `INIT_DEFAULT` NE SONT PLUS DÉCLARÉS ICI — point 39. # # Ils vivaient dans `/tmp`, et cette place les tuait : un tmpfs est vidé à # chaque redémarrage de la VM, et `systemd-tmpfiles-clean` purge à 10 jours. # Ils sont désormais sous `$BASE_DIR/Runtime/`, et cela impose de les déclarer # APRÈS `BASE_DIR` — c'est-à-dire après `_resolve_project_name`, puisque le nom # de l'installation se choisit au premier lancement. # # ⚠ Les déclarer ici avec `$BASE_DIR` TUERAIT le script : sous `set -u`, la # variable n'existe pas encore à cette ligne. Elles sont donc plus bas, juste # après `BASE_DIR`. Ne pas les remonter. # ── 🔴 LE JOURNAL N'EST PLUS DANS /tmp — audit du 29/09/2026, constat #25 ── # # `/tmp/overtchat-setup.log` était un nom FIXE dans un dossier ouvert à tous. # N'importe quel compte local pouvait le créer avant l'installateur : root y # ajoutait alors son journal (lisible par ce compte), ou échouait en silence # sous `fs.protected_regular`. Il vit désormais chez celui qui lance : # `/var/log/overtchat-setup.log` pour root, `~/.local/state/overtchat/` sinon, # créé en 600 dans un dossier à soi ; un lien à sa place est refusé, et le # journal part alors dans /dev/null plutôt qu'ailleurs. _journal_chemin() { local d f if [[ "${EUID:-$(id -u)}" -eq 0 ]]; then d="/var/log" else d="${XDG_STATE_HOME:-${HOME:-/nonexistent}/.local/state}/overtchat" fi f="$d/overtchat-setup.log" ( umask 077; mkdir -p "$d" ) 2>/dev/null if [[ -d "$d" && ! -L "$d" && -O "$d" && ! -L "$f" ]] \ && ( umask 077; : >> "$f" ) 2>/dev/null; then printf '%s' "$f" else printf '%s' "/dev/null" fi } readonly LOG_FILE="$(_journal_chemin)" # ── 🔴 UN DOSSIER TEMPORAIRE À SOI, POUR TOUT LE LANCEMENT — audit #25 ── # # Le manifeste (`overtchat-manifeste.$$.json`) et l'outil d'allègement Tcl # (`overtchat-depouiller.$$.tcl`) vivaient dans /tmp sous un nom DEVINABLE (le # PID) : un compte local pouvait les poser avant root, et l'outil d'allègement # est ensuite EXÉCUTÉ par tclsh. `mktemp -d` rend un dossier 700 au nom tiré au # sort ; il s'efface à la sortie. Déclaré ici, au niveau du script, parce que # les fonctions qui s'en servent tournent souvent dans un `$(…)` : un dossier # créé là mourrait avec le sous-shell. _OVT_TMP="$(mktemp -d "${TMPDIR:-/tmp}/overtchat-setup.XXXXXXXX" 2>/dev/null || true)" # Effacé à la sortie, ET avant chaque `exec` qui relance le script (un `exec` # ne passe pas par le piège EXIT : le dossier resterait, vide, à chaque relance). _ovt_tmp_menage() { [[ -n "${_OVT_TMP:-}" && -d "$_OVT_TMP" && ! -L "$_OVT_TMP" ]] && rm -rf "$_OVT_TMP"; return 0; } # ── LES REPÈRES MACHINE — pour le Lanceur Windows (08/10/2026) ────────────── # # Le Lanceur (Lanceur/, « Overtchat Setup ») suivait l'installation en lisant # le TEXTE de la console : une frise d'avancement tirée de phrases faites pour # un humain se casse à la première retouche d'une phrase, ou à sa traduction. # Il pose donc OVERTCHAT_PROGRES=1, et ce script émet alors, sur la sortie # standard, des lignes faites pour une MACHINE — stables et versionnées : # # @@OVERTCHAT 1 DEBUT # @@OVERTCHAT 1 ETAPE / # @@OVERTCHAT 1 RESERVE # @@OVERTCHAT 1 ECHEC # @@OVERTCHAT 1 FIN # # ⚠⚠ LE « 1 » EST LA VERSION DU FORMAT. Changer la forme d'une ligne, c'est # passer à 2 — jamais modifier le 1 en place : un Lanceur déjà distribué # ignore (par construction) une version qu'il ne connaît pas, au lieu de # mal lire une ligne qu'il croit connaître. Lecteur : Lanceur/src/coeur/reperes.js. # ⚠ Seulement si OVERTCHAT_PROGRES vaut EXACTEMENT « 1 » : sans elle, la sortie # d'un terminal ordinaire est inchangée, octet pour octet (banc : # Bootstrap/tests/test-reperes-progres.sh). Une fin de ligne dans le texte # est aplatie : un repère tient sur UNE ligne, sinon la suite serait lue # comme du texte. # 📌 FIN passe par le piège EXIT : il couvre TOUTES les sorties (refus, `_die`, # `set -e`, Ctrl+C via le piège INT/TERM) et non la seule fin d'`_auto_installer`. # Il porte le code réel — c'est lui que le Lanceur croit, parce que le code # d'un processus se perd en route (un `a || b` par SSH rendait 1 pour 3). _progres() { [[ "${OVERTCHAT_PROGRES:-}" == "1" ]] || return 0 local l="@@OVERTCHAT 1 $*" l="${l//$'\n'/ }" l="${l//$'\r'/ }" printf '%s\n' "$l" return 0 } _ovt_a_la_sortie() { local rc=$? _ovt_tmp_menage _progres FIN "$rc" return "$rc" } trap _ovt_a_la_sortie EXIT # Le dossier privé, s'il est sain : à nous, pas un lien. Rend 1 sinon, et # l'appelant renonce plutôt que de retomber sur /tmp. _ovt_tmp() { [[ -n "${_OVT_TMP:-}" && -d "$_OVT_TMP" && ! -L "$_OVT_TMP" && -O "$_OVT_TMP" ]] || return 1 printf '%s' "$_OVT_TMP" } readonly SERVERS_KEY="servers" # ----------------------------------------------------------------------------- # RACINE D'INSTALLATION # # Résolue AVANT toute constante dérivée. Utiliser "$HOME" directement était un # piège : lancé via sudo, $HOME vaut /root et toute l'arborescence (sources # compilées, Config/*.json, instance IriX) atterrissait dans /root, invisible # pour l'utilisateur et inutilisable une fois repassé en compte normal. # # On installe donc toujours dans le home de l'utilisateur RÉEL — celui de # $SUDO_USER si on est sous sudo — et jamais dans celui de root. # ----------------------------------------------------------------------------- # ── 🔴 LE COMPTE DES SERVICES N'EST JAMAIS ROOT — audit du 29/09/2026, #8 ── # # Lancé en root SANS `SUDO_USER` (le Lanceur Windows le faisait : `wsl -u # root`), tout partait sous /root et TOUS les services tournaient en root — le # site, le serveur IRC, IriX. `OVERTCHAT_COMPTE=` désigne alors le # compte ordinaire qui portera l'installation ; sans lui, l'installateur REFUSE # (voir `main`). Le compte doit exister et ne pas être root (uid 0). _compte_ordinaire() { local c="${1:-}" uid [[ "$c" =~ ^[a-z_][a-z0-9_.-]{0,31}$ ]] || return 1 uid="$(getent passwd "$c" 2>/dev/null | cut -d: -f3)" [[ -n "$uid" && "$uid" != "0" ]] } _compte_designe() { [[ "${EUID:-$(id -u)}" -eq 0 ]] || return 1 [[ -z "${SUDO_USER:-}" || "$SUDO_USER" == "root" ]] || return 1 _compte_ordinaire "${OVERTCHAT_COMPTE:-}" || return 1 printf '%s' "$OVERTCHAT_COMPTE" } _resolve_base_home() { local h="" c="" if [[ "${EUID:-$(id -u)}" -eq 0 && -n "${SUDO_USER:-}" && "$SUDO_USER" != "root" ]]; then h=$(getent passwd "$SUDO_USER" 2>/dev/null | cut -d: -f6 || true) [[ -z "$h" ]] && h="/home/$SUDO_USER" elif c="$(_compte_designe)"; then h=$(getent passwd "$c" 2>/dev/null | cut -d: -f6 || true) [[ -z "$h" ]] && h="/home/$c" else h="${HOME:-$(getent passwd "$(id -un)" 2>/dev/null | cut -d: -f6 || echo "/tmp")}" fi printf '%s' "$h" } readonly TARGET_HOME="$(_resolve_base_home)" # ----------------------------------------------------------------------------- # NOM DE L'INSTALLATION # # « Service-Overtchat » est le nom du réseau d'origine et reste la propriété de # son auteur. Une installation tierce doit porter le sien : c'est ce nom qui # donne le répertoire racine, et il apparaît ensuite dans les chemins que # l'exploitant lit tous les jours. Deux installations qui s'appellent pareil sur # la même machine, ou sur deux machines qu'on administre ensemble, se # confondent — et une sauvegarde restaurée au mauvais endroit ne prévient pas. # # Résolu ICI, avant toute constante dérivée : $BASE_DIR et la vingtaine de # chemins qui en découlent sont figés en `readonly` juste en dessous. Un nom # décidé plus tard ne les rattraperait pas — c'est pourquoi l'assistant, quand # il en obtient un nouveau, relance le script plutôt que de tenter de corriger # des variables déjà écrites. # # Ordre de résolution, du plus explicite au plus déductible : # # 1. --projet=NOM sur la ligne de commande (c'est ainsi que l'assistant se # relance lui-même) # 2. OVERTCHAT_PROJET dans l'environnement, pour une installation scriptée # 3. le nom enregistré lors d'un lancement précédent, dans l'état /tmp # 4. « Service-Overtchat », le nom historique # # Le point 4 n'est PAS un contournement du refus : il vaut pour l'installation # d'origine, qui existe et doit continuer de fonctionner sans rien changer. # C'est à l'assistant, sur une installation NEUVE, de réclamer un autre nom — # voir `_projet_demander`. # ----------------------------------------------------------------------------- readonly PROJET_HISTORIQUE="Service-Overtchat" # Positionne deux variables plutôt que d'écrire sur la sortie standard : la # SOURCE du nom compte autant que le nom lui-même. Un nom donné explicitement # ne doit pas être redemandé — sans quoi l'assistant, qui se relance avec # `--projet=`, reposerait sa question au lancement suivant, et l'exploitant # répondrait deux fois à la même chose sans comprendre pourquoi. Une # substitution `$( )` s'exécuterait dans une sous-shell, d'où rien ne remonte. PROJET_NOM="" PROJET_SOURCE="defaut" # ----------------------------------------------------------------------------- # LE MODE AUTO — point 48, premier morceau # # « Auto : site + serveur + services, sans question. » L'installation complète # demande aujourd'hui une trentaine de réponses et une quinzaine de pauses : # c'est ce qui rend son épreuve laborieuse, et c'est aussi ce qui interdit de # la lancer depuis un script. # # Ce que le mode AUTO répond à la place : # # · une question de VALEUR → la valeur par défaut déjà proposée ; # · une question de CONSENTEMENT → oui, quand la question porte sur ce que # l'installation vient faire — c'est le sens du drapeau. Les gestes qui # DÉTRUISENT (reset, désinstallation, purge de journal, remise à zéro des # empreintes) ne sont sur aucun chemin d'installation et n'y entrent pas ; # · une question SANS défaut → personne. C'est pourquoi `_auto_prevol` # les exige AVANT que quoi que ce soit ne soit écrit. # # ⚠⚠ Ce que le mode AUTO ne fait PAS : lire l'entrée standard. Un `read` sans # personne devant ne rend pas une réponse, il rend une chaîne vide obtenue par # EOF — c'est-à-dire une réponse fabriquée, que rien ne distingue d'une vraie. # C'est exactement le motif que ce projet appelle une confirmation mensongère. # # Deux façons de l'armer, comme pour le nom de l'installation : # --auto sur la ligne de commande # OVERTCHAT_AUTO=1 dans l'environnement # L'édition demandée en ligne de commande. Vide = « on ne demande rien ». # ⚠ Sous `set -u`, une variable jamais posée fait mourir le script à sa # première lecture — et ce serait au milieu de l'installation. EDITION_CHOISIE="" # L'édition VISÉE par une montée (--monter-edition=). Vide = pas de montée. MONTER_CIBLE="" MODE_AUTO=0 case "${OVERTCHAT_AUTO:-}" in 1|oui|yes|true) MODE_AUTO=1 ;; esac _resolve_project_name() { local a nom="" for a in "$@"; do case "$a" in --projet=*) nom="${a#--projet=}"; PROJET_SOURCE="argument" ;; esac done if [[ -z "$nom" && -n "${OVERTCHAT_PROJET:-}" ]]; then nom="$OVERTCHAT_PROJET"; PROJET_SOURCE="environnement" fi # ⚠⚠ L'ÉTAT DU LANCEMENT PRÉCÉDENT NE SE LIT PLUS DANS /tmp — 29/09/2026 # (audit, #25). Ce bloc lisait le nom du projet dans # `/tmp/.service-overtchat.json`, un nom FIXE qu'un compte local pouvait # poser : root installait alors dans le dossier que ce compte avait # choisi. Cet état vit sous `$BASE_DIR/Runtime/` depuis le point 39 ; le # fichier de /tmp n'est plus écrit par personne (CHANTIERS). Le nom vient # donc de l'argument, de l'environnement, ou du défaut — jamais de /tmp. if [[ -z "$nom" ]]; then nom="$PROJET_HISTORIQUE"; PROJET_SOURCE="defaut" fi # Une valeur venue de l'environnement ou d'un fichier n'est pas une valeur # sûre : elle sert à construire un chemin. Tout ce qui pourrait en sortir # est refusé, et on retombe sur le nom historique plutôt que d'écrire dans # un répertoire que personne n'a demandé. if [[ ! "$nom" =~ ^[A-Za-z0-9][A-Za-z0-9._-]{1,63}$ ]] || [[ "$nom" == *..* ]]; then nom="$PROJET_HISTORIQUE"; PROJET_SOURCE="defaut" fi PROJET_NOM="$nom" } _resolve_project_name "$@" readonly PROJET_NOM PROJET_SOURCE BASE_DIR="$TARGET_HOME/$PROJET_NOM" # ── ⚠⚠ L'ÉTAT D'INSTALLATION — sorti de /tmp le 20/08/2026 (point 39) ─────── # # Ce fichier ne porte PAS que les empreintes SHA256 des configurations. Il # porte `.install` — la mémoire que l'installation a eu lieu —, `.folders` et # ses 18 chemins, la langue, le nom du projet, les 32 modules Tcl à déployer, # et la liste des fichiers surveillés par la mise à jour. # # ⚠ Sa perte ne cassait donc pas seulement la vérification d'intégrité : elle # faisait croire à l'installateur qu'il n'avait jamais tourné. Constaté le # 20/08/2026 — les deux fichiers étaient ABSENTS de la production. # # ⚠ `Runtime/` et non `Config/` : le chemin `Runtime/state.json` était DÉJÀ # réservé dans `_upd_exclu` pour un fichier qui n'existait nulle part. Une des # deux listes était donc faite d'avance ; l'autre — `.gitignore` — a été # complétée dans le même commit, parce qu'un fichier d'état neuf entre dans les # DEUX listes ou dans aucune. # # ⚠ Ces deux lignes DOIVENT rester ici, sous `BASE_DIR`. Les remonter là où # elles étaient tuerait le script : `set -u` sur une variable qui n'existe pas # encore. readonly INIT_BASE="$BASE_DIR/Runtime/state.json" readonly INIT_DEFAULT="$BASE_DIR/Runtime/state.default.json" readonly SERVERS_DIR="$BASE_DIR/Servers" # ----------------------------------------------------------------------------- # IriX — principe "comme Eggdrop" : # - SOURCE (géré par Service-Overtchat : fichiers .tcl, cmds json, versions) # => $HOME/Service-Overtchat/IriX # - INSTANCE (là où IriX tourne réellement, au même titre qu'un bot Eggdrop) # => $HOME/IriX par défaut, personnalisable par l'utilisateur # ----------------------------------------------------------------------------- readonly IRIX_SOURCE_DIR="$BASE_DIR/IriX" readonly IRIX_DEFAULT_INSTANCE_DIR="$TARGET_HOME/IriX" readonly IRIX_FILE="$BASE_DIR/Config/irix.json" # Sous-arborescence réelle d'une instance IriX (cf. Markdown/ARCHITECTURE.md). # Les .tcl vivent dans cmds/, la conf Eggdrop et les fichiers d'état dans # runtime/. Le script déposait auparavant tout à plat à la racine de l'instance. readonly IRIX_CMDS_SUBDIR="cmds" readonly IRIX_RUNTIME_SUBDIR="runtime" # ----------------------------------------------------------------------------- # OverOp — les robots de prêt (cahier : Markdown/PRET-ROBOT.md, §3 et §11). # # Même découpage qu'IriX : une SOURCE synchronisée depuis le dépôt, et des # INSTANCES qui tournent. La différence tient en un mot — il y en a PLUSIEURS. # Un seul code Tcl, trois instances pour commencer (§3.1) : chacune dans son # dossier, avec son pseudonyme, son port de telnet et son propre userfile. # # Ce ne sont PAS des modules d'IriX (§14), et ils ne sont donc ni dans # `git.irix.files` ni déployés dans `cmds/` : ce sont des Eggdrop autonomes, # connectés comme des clients ordinaires. Ils n'ouvrent aucun lien, ne touchent # jamais la base, et n'ont aucun privilège réseau. Un robot qui tombe est une # déconnexion parmi d'autres — c'est toute l'isolation du §4. # ----------------------------------------------------------------------------- readonly OVEROP_SOURCE_DIR="$BASE_DIR/Robots/overop" readonly OVEROP_DEFAULT_BASE_DIR="$TARGET_HOME/OverOp" readonly OVEROP_FILE="$BASE_DIR/Config/overop.json" # Port du telnet d'administration du premier robot ; les suivants prennent le # premier libre au-dessus. 3341 laisse la place au 3333 d'IriX sans collision. readonly OVEROP_PORT_BASE=3341 # ⚠ Le serveur n'accepte que TROIS connexions par adresse IP — `class clients` # et le bloc `allow` d'overtchat.conf —, IriX comprise. Le robot de trop est # refusé, ET LE MESSAGE N'APPARAÎT QUE CÔTÉ ROBOT : rien ne le signale côté # exploitant, qui voit seulement un bot qui ne se connecte pas. # # Cet installateur AVERTIT quand le seuil est atteint. Il ne modifie PAS # overtchat.conf : la configuration du serveur n'est pas à lui, et un bloc # `allow` posé automatiquement relèverait une limite de sécurité sans que # personne l'ait décidé. readonly OVEROP_MAXPERIP=3 # ----------------------------------------------------------------------------- # Constantes du module # ----------------------------------------------------------------------------- readonly UPDATE_BACKUP_DIR="$BASE_DIR/.backups/update" readonly UPDATE_LOG="$BASE_DIR/Runtime/Logs/update.log" # Fichiers noyau toujours surveillés (chemins relatifs à la racine du dépôt). # Doit correspondre EXACTEMENT à .git.setup. # # C'est le SCRIPT qui est surveillé, plus le binaire compilé. Ce dernier a # cessé d'être distribué le 29/07/2026 : shc repasse le script à bash comme un # argument unique, or le noyau plafonne un argument à 131 072 octets et le # script en fait plus du double. Le binaire ne pouvait donc plus être # régénéré, et celui qui circulait datait de trois mois. # # Surveiller les deux aurait de toute façon posé problème : le scan des .sh # ajoutait déjà overtchat-setup.sh, si bien que l'installateur était suivi deux # fois sous deux noms, et une mise à jour pouvait réécrire l'un sans l'autre. # ⚠ `VERSION` et `VERSION.md` sont surveillés ICI, et nulle part ailleurs : # n'ayant pas d'extension pour le premier, ni d'extension surveillée pour le # second, le scan dynamique ne les voyait pas. Le fichier `VERSION` n'était # donc JAMAIS mis à jour — le script se remplaçait lui-même, redémarrait, et # relisait l'ancien numéro. Il se serait cru éternellement à jour après # s'être mis à jour, ce qui est le pire des deux mondes : la mise à jour a # bien eu lieu, et plus rien ne le sait. # # ⚠⚠ LES TROIS `.py` SERVIS DE `Tools/`, ajoutés le 30/09/2026 — même trou, # autre extension. `reserver-robot.sh` et `proteger-irix.sh` dépendent de # `ecrire_sur.py` et `empreinte-mdp.py` depuis l'audit du 29/09 (et # `proteger-irix.sh` d'`irix-conf-serverpass.py`), et `Web/inc/distrib.php` les # sert ; mais le scan ne prend que sh/json/conf/tcl. Un tiers qui met à jour # recevait donc `reserver-robot.sh` NEUF sans ses briques — et un tiers installé # avant le 29/09 ne les a pas du tout : la réservation d'un robot échouait sur # « empreinte non calculée ». # 📌 Écrits ICI et non en ajoutant `py` au scan, pour deux raisons mesurées : # · un fichier de cette liste est suivi même ABSENT du disque (il passe # « en attente » et se télécharge) — le scan, lui, ne voit que ce qui existe ; # · `Tools/` porte cinq autres `.py` que le site NE SERT PAS # (`voix-serveur.py`, `nudite-serveur.py`…) : les scanner, c'est un 404 # à chaque vérification, donc un courriel d'alerte toutes les six heures. # ⚠ Liste RECOPIÉE de l'inventaire : `Web/tests/test-distrib.php` la croise # avec `distrib_inventaire()` — tout `.py` servi y est, aucun autre. readonly -a CORE_WATCHED=( "Bootstrap/overtchat-setup.sh" "VERSION" "VERSION.md" "Tools/ecrire_sur.py" "Tools/empreinte-mdp.py" "Tools/irix-conf-serverpass.py" ) # Extensions scannées dynamiquement dans BASE_DIR (tcl inclus pour IriX) readonly -a WATCHED_EXTENSIONS=( "sh" "json" "conf" "tcl" ) readonly UPDATE_STATE="$BASE_DIR/Config/update_state.json" readonly ACCESS_FILE="$BASE_DIR/Config/access.json" readonly SERVICES_FILE="$BASE_DIR/Config/services.json" readonly SERVERS_FILE="$BASE_DIR/Config/servers.json" readonly EGGDROP_FILE="$BASE_DIR/Config/eggdrop.json" # ============================================================================= # VERSIONS ÉPINGLÉES DES COMPOSANTS TIERS # ============================================================================= # # Un seul endroit. Les numéros vivaient auparavant à trois : le JSON écrit par # _servers_init, celui de _services_init, et un `--branch v1.10.1` en dur au # milieu de _install_eggdrop. Trois copies d'un même fait, donc deux occasions # de mentir — et c'est toujours celle qu'on lit qui a tort. # # Ces valeurs ont été RELEVÉES le 30/07/2026, pas recopiées : code HTTP et # taille pour les archives, tags de l'API GitHub pour les dépôts. # # Épingler plutôt que suivre « latest » est un choix : une URL versionnée se # vérifie par empreinte et se rejoue à l'identique dans six mois, là où # « latest » installe un jour autre chose sans qu'aucune ligne n'ait changé. # Le prix est qu'il faut monter ces numéros à la main — c'est le but. readonly VER_UNREALIRCD="6.2.6" # unrealircd.org — archive directe readonly VER_EGGDROP="1.10.2rc1" # ftp.eggheads.org — voir l'avertissement ci-dessous readonly VER_ANOPE="2.1.25" # dernier tag de la branche 2.1 (module de protocole renommé) readonly VER_HYBRID="8.2.47" # ircd-hybrid.org renvoie vers l'archive GitHub readonly VER_IRCU="u2.10.12.19" # dernier tag d'undernetirc/ircu2 (2019) readonly VER_INSPIRCD="4.11.0" # inspircd.org, publiée le 06/06/2026 — compilée ici le 31/07/2026 readonly VER_BAHAMUT="2.2.4" # DALnet/bahamut, dernier tag — compilé ici le 01/08/2026 # `1.10.2rc1` est une RELEASE CANDIDATE, choisie délibérément le 30/07/2026. # La dernière version publiée est la 1.10.1 (16/08/2025). IriX tourne sur # Eggdrop en production : si une régression apparaît, c'est la première chose # à remettre en cause, et il suffit de reposer 1.10.1 ci-dessus. readonly EGGDROP_EST_RC="oui" readonly URL_UNREALIRCD="https://www.unrealircd.org/downloads/unrealircd-${VER_UNREALIRCD}.tar.gz" # ⚠ En https depuis le 23/09/2026 : le miroir sert les MÊMES octets (empreinte # identique mesurée), et l'http laissait n'importe quel intermédiaire les changer. readonly URL_EGGDROP="https://ftp.eggheads.org/pub/eggdrop/source/1.10/eggdrop-${VER_EGGDROP}.tar.gz" readonly URL_ANOPE="https://github.com/anope/anope/archive/refs/tags/${VER_ANOPE}.tar.gz" readonly URL_HYBRID="https://github.com/ircd-hybrid/ircd-hybrid/archive/${VER_HYBRID}.tar.gz" readonly URL_IRCU="https://github.com/undernetirc/ircu2/archive/refs/tags/${VER_IRCU}.tar.gz" # Le « v » du tag est dans l'URL et pas dans le numéro : inspircd.org publie # « v4.11.0 », mais le binaire s'annonce « InspIRCd-4.11.0 » et c'est ce # dernier que le site affiche. readonly URL_INSPIRCD="https://github.com/inspircd/inspircd/archive/refs/tags/v${VER_INSPIRCD}.tar.gz" # Même convention de tag que pour InspIRCd — « v2.2.4 » —, vérifiée sur la # liste des tags du dépôt DALnet plutôt que devinée. Bahamut n'a pas de site # de téléchargement à lui : ses publications vivent sur GitHub. readonly URL_BAHAMUT="https://github.com/DALnet/bahamut/archive/refs/tags/v${VER_BAHAMUT}.tar.gz" # ── ⚠⚠ LES EMPREINTES SHA-256 ATTENDUES (23/09/2026, point 90 §12.B.12) ──── # # Jusqu'ici seul l'en-tête gzip était contrôlé : une archive remplacée en # chemin, ou chez l'éditeur, se compilait et s'installait sans un mot. Chaque # empreinte a été MESURÉE le 23/09/2026 sur DEUX téléchargements identiques. # # ⚠ ELLES VONT AVEC LA VERSION : monter un VER_* sans remesurer son empreinte # fait REFUSER le téléchargement, en le disant — c'est voulu. Remesurer : # curl -fsSL "" | sha256sum # ⚠ Les archives GitHub (`archive/refs/tags/…`) sont fabriquées à la volée ; # GitHub les garde stables depuis 2023. Si une empreinte GitHub change sans # que la version ait bougé, c'est ELLE qu'il faut examiner avant de remesurer. readonly SHA256_UNREALIRCD="6eaf0f8963c2dc8c28ce580afa0239922e26c7b2df55aed7ec5f73daa307fc9b" readonly SHA256_EGGDROP="a73cd7bb0499f0f81166f2909ff9fb3b8ae27ce261e020ce4473ac8c27a247b1" readonly SHA256_ANOPE="d0837d752ced2cc3ad4a1fe84c7eb89ef2c6185634c4548b4eeb5ac77ae29621" readonly SHA256_HYBRID="eb30d034f3934680bdf7b8db8e2126a422c5a965f9fc0b7b9f0b1b58ccddbad1" readonly SHA256_IRCU="4f125876af2195b7ad9ebfa41664d2084bf42aab753ff1b1579a5ecd79e46fe1" readonly SHA256_INSPIRCD="7f2ea0731a7e337e6ebaa1335bb22d576cba779baefaa311e15558624b5ca31a" readonly SHA256_BAHAMUT="a629d6a54f0c1b1f3e505792d79a92d18fd51330525154a00ddbf97b38718092" # mysqltcl (miroir Debian) et tcltls (révision FIGÉE du tronc, voir _tcltls_build). readonly SHA256_MYSQLTCL="5b6e04430b80fd4af54599551503bae681232be0bae3c55c1a93adeb66702007" readonly SHA256_TCLTLS="cf18a2dfe6743cb7a8626d5636136d8835593e63aef1b070cd505bac00d2cebf" # ============================================================================= # TIMERS & TRAPS # ============================================================================= _start_time=$(date +%s) _end_time() { date -u -d "0 $1 sec" +"%Hh %Mm %Ss"; } trap 'printf "\n%s\n" "Script interrompu. Nettoyage en cours..." >&2; exit 1' INT TERM load_debug="0.5" # ============================================================================= # COULEURS & AFFICHAGE # ============================================================================= # ── ⚠⚠ LA PALETTE VIENT DU SITE, ELLE N'EST PAS INVENTÉE ICI ──────────────── # # Demandé par SerVuS le 20/08/2026 : « adapter visuellement le panel # correspondant au site ». Les valeurs ci-dessous sont celles des variables CSS # de `Web/public/assets/site.css` — `--accent`, `--ok`, `--warn`, `--err`… — # pour que le panel et le site se reconnaissent au premier coup d'œil. # # ⚠ Elles sont RECOPIÉES, et une copie dérive : `Web/tests/test-palette.php` # croise les deux et rougit dès qu'une couleur change d'un côté sans l'autre. # C'est la seule parade quand deux langages ne peuvent pas lire la même source. # # ⚠ Le repli n'est pas décoratif. Les couleurs 24 bits exigent un terminal qui # les annonce (`$COLORTERM`) ; ailleurs — une console de secours, un `ssh` sec, # un `cron` — les séquences s'afficheraient en clair et rendraient le panel # ILLISIBLE. On retombe alors sur les huit couleurs ANSI d'origine. if [[ -t 1 ]]; then if [[ "${COLORTERM:-}" == "truecolor" || "${COLORTERM:-}" == "24bit" ]]; then _rgb() { printf '\033[38;2;%d;%d;%dm' "$1" "$2" "$3"; } RED=$(_rgb 242 98 107) # --err #f2626b GREEN=$(_rgb 63 208 122) # --ok #3fd07a ORANGE=$(_rgb 232 185 63) # --warn #e8b93f CYAN=$(_rgb 53 208 192) # --accent #35d0c0 ← la couleur du réseau PURPLE=$(_rgb 169 132 255) # --purple #a984ff BLUE=$(_rgb 51 68 90) # --border-hi #33445a ← les cadres, discrets WHITE=$(_rgb 216 226 238) # --text #d8e2ee DIM=$(_rgb 85 99 122) # --dim #55637a # ⚠ `DIM` cesse d'être l'attribut ANSI « faible » pour devenir une # VRAIE couleur : l'attribut est rendu différemment d'un terminal à # l'autre, parfois pas du tout. Une couleur, elle, est la même partout. BOLD=$'\033[1m'; RESET=$'\033[0m' BG_BLUE=$'\033[48;2;19;27;36m' # --surface #131b24 else RED=$'\033[0;31m'; GREEN=$'\033[0;32m'; ORANGE=$'\033[0;33m' BLUE=$'\033[0;34m'; CYAN=$'\033[0;36m'; PURPLE=$'\033[0;35m' BOLD=$'\033[1m'; DIM=$'\033[2m'; RESET=$'\033[0m' BG_BLUE=$'\033[44m'; WHITE=$'\033[1;37m' fi else RED=""; GREEN=""; ORANGE=""; BLUE=""; CYAN=""; PURPLE="" BOLD=""; DIM=""; RESET=""; BG_BLUE=""; WHITE="" fi # ----------------------------------------------------------------------------- # LA TRADUCTION — le socle. Voir la section « LANGUE » pour le catalogue. # ----------------------------------------------------------------------------- # # ⚠⚠ POSÉ ICI, AVANT LES HELPERS QUI S'EN SERVENT, ET PAS PLUS BAS. # # `_info` et ses frères appellent `_t`. En bash, l'ordre ne gêne que si un appel # a lieu ENTRE les deux définitions — et vérifier qu'il n'y en a aucun dans # 12 000 lignes est un raisonnement qu'il faudrait refaire à chaque ajout. # 📌 *Mieux vaut supprimer la question que la trancher* : défini avant, il n'y # a plus d'ordre à tenir. # # ⚠ `LANG_CODE` n'est connu que plus bas : `${LANG_CODE:-fr}` évite que `set -u` # fasse échouer un message affiché avant elle. _TRAD_DISPO=0 if declare -A _MSG 2>/dev/null; then _TRAD_DISPO=1; fi # ⚠⚠ RIEN NE PEUT DISPARAÎTRE ICI. Sans table, sans entrée, ou en français, on # rend le texte reçu — la traduction ne peut qu'AJOUTER, jamais retrancher. # C'est ce qui permet de traduire par petits lots sans casser l'écran entre # deux, et ce qui fait qu'une clé oubliée ne se voit pas comme un trou. _t() { local s="$*" [[ "${LANG_CODE:-fr}" == "fr" || "$_TRAD_DISPO" -ne 1 ]] && { printf '%s' "$s"; return 0; } printf '%s' "${_MSG[$s]:-$s}" return 0 } _log() { printf "[%s] [%s] %s\n" "$(date '+%Y-%m-%d %H:%M:%S')" "${FUNCNAME[1]:-main}" "$*" >> "$LOG_FILE"; } _info() { printf " %b\n" "${CYAN}•${RESET} $(_t "$*")"; _log "INFO $*"; } _ok() { printf " %b\n" "${GREEN}✔${RESET} $(_t "$*")"; _log "OK $*"; } _warn() { printf " %b\n" "${ORANGE}⚠${RESET} $(_t "$*")"; _log "WARN $*"; } _err() { printf " %b\n" "${RED}✖${RESET} $(_t "$*")" >&2; _log "ERROR $*"; } # ----------------------------------------------------------------------------- # LES MESSAGES À VARIABLE — `_info_f` et ses frères # ----------------------------------------------------------------------------- # # ⚠⚠ POURQUOI ILS EXISTENT. `_info "Pose de $paquet…"` arrive à `_t` DÉJÀ # ASSEMBLÉ : la clé porte le nom du paquet, et aucune entrée de catalogue ne # peut correspondre. Mesuré le 06/09/2026 : **302 des 662 appels** sont dans ce # cas — la moitié du travail. # # _info_f "Pose de %s…" "$paquet" # # Le GABARIT est traduit, puis assemblé. La clé est stable, elle ne dépend plus # de ce que la variable contient ce jour-là. # # ── ⚠⚠ LA GARDE QU'ON N'ATTEND PAS : COMPTER LES « % » ── # # Une traduction qui perdrait un `%s` — ou en ajouterait un — produirait un # message tronqué, ou un `printf` qui consomme un argument qui n'existe pas. # 🔴 Et ce serait SILENCIEUX : `printf` ne se plaint pas d'un argument en trop. # On compare donc les spécificateurs, et **au moindre écart on retombe sur le # français** — qui, lui, est forcément juste. _specs() { printf '%s' "$1" | grep -oE '%[-0-9.]*[a-zA-Z]' | grep -cv '^%%$' || true; } # Le gabarit FRANÇAIS assemblé — ce qui part au journal, quelle que soit la # langue de l'écran. _t_f_source() { local gab="$1"; shift # ⚠⚠ LE « -- » N'EST PAS DÉCORATIF. Un gabarit qui commence par un tiret — # « --auto s'applique à l'installation… » — serait lu par `printf` comme # une OPTION, et la ligne disparaîtrait de l'écran en silence. Trouvé le # 07/09/2026 par le banc qui rejoue les 208 conversions, pas à l'œil. # shellcheck disable=SC2059 printf -- "$gab" "$@" } _t_f() { local gab="$1"; shift local trad; trad="$(_t "$gab")" # ⚠ Même gabarit rendu : rien à vérifier, c'est le français. if [[ "$trad" != "$gab" ]] && [[ "$(_specs "$trad")" != "$(_specs "$gab")" ]]; then # ⚠ On le DIT au journal : une traduction inutilisable doit se voir, # sinon elle reste en place des années sans que personne le sache. _log "TRAD gabarit incompatible, retour au francais : $gab" trad="$gab" fi # ⚠ Même raison qu'au-dessus : un gabarit qui commence par un tiret. # shellcheck disable=SC2059 printf -- "$trad" "$@" } # ⚠⚠ ILS N'APPELLENT PAS `_info` ET SES FRÈRES, ET C'EST DÉLIBÉRÉ. # # 🔴 Le premier jet faisait `_info "$(_t_f "$@")"`. Le message serait alors # arrivé à `_info` DÉJÀ TRADUIT — et `_info` journalise ce qu'il reçoit. Le # journal serait donc passé en anglais pour ces messages-là, et en français # pour les autres : deux langues dans le même fichier, ce qui est pire que # n'importe laquelle des deux. # # 📌 Ils composent donc les deux versions : le FRANÇAIS pour le journal, la # TRADUITE pour l'écran. C'est trois lignes de plus, et la règle reste vraie # partout — le journal ne dépend jamais de la langue de qui installe. _info_f() { local fr; fr="$(_t_f_source "$@")" printf " %b\n" "${CYAN}•${RESET} $(_t_f "$@")"; _log "INFO $fr" } _ok_f() { local fr; fr="$(_t_f_source "$@")" printf " %b\n" "${GREEN}✔${RESET} $(_t_f "$@")"; _log "OK $fr" } _warn_f() { local fr; fr="$(_t_f_source "$@")" printf " %b\n" "${ORANGE}⚠${RESET} $(_t_f "$@")"; _log "WARN $fr" } _err_f() { local fr; fr="$(_t_f_source "$@")" printf " %b\n" "${RED}✖${RESET} $(_t_f "$@")" >&2; _log "ERROR $fr" } _die() { _err "$*"; exit 1; } # ----------------------------------------------------------------------------- # RENDU — cadres, badges, jauges # # Tout l'affichage passe par ces primitives, pour une raison précise : aligner # une colonne en Bash est un piège à trois détentes, et chacune s'est refermée # ici avant d'être traitée. # # 1. `printf '%-32s'` rembourre en OCTETS. « Installé » fait 8 caractères mais # 9 octets en UTF-8, donc chaque accent décalait la colonne d'un cran. # ${#chaine} compte les CARACTÈRES — à condition que la locale soit UTF-8, # ce qu'on ne peut pas supposer (voir _ui_locale plus bas). # 2. Les séquences de couleur comptent dans ${#chaine} sans occuper de colonne # à l'écran. Une ligne colorée débordait donc systématiquement du cadre. # _ui_vlen les retire avant de mesurer. # 3. La largeur du terminal n'est pas 80. _ui_width la lit, et la borne : # en dessous de 64 les cadres se replient sur eux-mêmes, au-dessus de 100 # l'œil ne suit plus la ligne jusqu'à sa valeur. # # Les lignes de remplissage sont calculées UNE fois par largeur et découpées # ensuite ; les recalculer à chaque ligne coûtait un sous-shell par ligne # affichée, soit une centaine par écran de panel. # ----------------------------------------------------------------------------- shopt -s extglob # Sans locale UTF-8, ${#chaine} recompte en octets et tout l'alignement saute. # On n'impose rien à l'utilisateur : on cherche une locale UTF-8 utilisable et, # à défaut, on retombe sur C.UTF-8 que la glibc fournit toujours. _ui_locale() { case "${LC_ALL:-${LC_CTYPE:-${LANG:-}}}" in *UTF-8*|*utf8*|*UTF8*) return 0 ;; esac if locale -a 2>/dev/null | grep -qix 'C.UTF-8'; then export LC_CTYPE="C.UTF-8" fi } _ui_locale UI_W=80; UI_SP=""; UI_LN=""; UI_DL="" _ui_width() { local c c=$(tput cols 2>/dev/null || echo "${COLUMNS:-80}") [[ "$c" =~ ^[0-9]+$ ]] || c=80 (( c < 64 )) && c=64 (( c > 100 )) && c=100 UI_W=$c printf -v UI_SP '%*s' "$UI_W" '' UI_LN="${UI_SP// /─}" UI_DL="${UI_SP// /═}" } _ui_width # Longueur visible : sans les séquences ANSI, en caractères et non en octets. _ui_vlen() { local s="${1//$'\033'\[*([0-9;])[a-zA-Z]/}"; printf '%s' "${#s}"; } # Rembourrage à droite pour atteindre la colonne voulue. _ui_pad() { local n=$(( $2 - $(_ui_vlen "$1") )) (( n < 0 )) && n=0 printf '%s' "${UI_SP:0:n}" } _ui_top() { printf "${BLUE}┌%s┐${RESET}\n" "${UI_LN:0:UI_W-2}"; } _ui_mid() { printf "${BLUE}├%s┤${RESET}\n" "${UI_LN:0:UI_W-2}"; } _ui_bot() { printf "${BLUE}└%s┘${RESET}\n" "${UI_LN:0:UI_W-2}"; } _ui_blank() { printf "${BLUE}│%s│${RESET}\n" "${UI_SP:0:UI_W-2}"; } # Coupe un texte à la largeur VISIBLE demandée, et le DIT par une ellipse. # # ⚠⚠ AJOUTÉ LE 28/08/2026, SUR UN DÉFAUT MESURÉ. `_ui_pad` borne son # rembourrage à zéro — donc une ligne plus longue que le cadre ne se replie pas : # elle POUSSE LA BORDURE DROITE HORS DU CADRE. Mesuré sur un cadre de 40 # colonnes : une ligne de 64 caractères sort de 24, le cadre se déchire sur # cette ligne et se referme sur la suivante. # # Ce n'est pas un cas d'école. `_ui_width` a pour plancher **64 colonnes**, et le # sous-titre du bandeau porte `version · user@host · BASE_DIR` — sur une # installation dans `/home/quelquun/service-overtchat`, il dépasse largement. # # ⚠ LA COUPE RETIRE LES COULEURS de la ligne coupée, et c'est délibéré : couper # au milieu d'une séquence d'échappement laisserait un fragment à l'écran, ou # pire, une couleur qui ne se referme jamais et déteint sur tout ce qui suit. # Perdre la couleur d'une ligne trop longue est le moindre mal. # # ⚠ Et elle DIT qu'elle coupe. Une ligne tronquée en silence fait lire un chemin # faux — c'est la même règle que `LISTE_MAX` et que la liste des présents. _ui_couper() { local t="$1" max="$2" vis vis=$(_ui_vlen "$t") (( vis <= max )) && { printf '%s' "$t"; return 0; } (( max < 1 )) && return 0 local nu="${t//$'\033'\[*([0-9;])[a-zA-Z]/}" printf '%s…' "${nu:0:max-1}" } # Ligne de contenu dans un cadre. _ui_row() { local t t="$(_ui_couper "$1" $(( UI_W - 4 )))" printf "${BLUE}│${RESET} %b%s ${BLUE}│${RESET}\n" "$t" "$(_ui_pad "$t" $(( UI_W - 4 )))" } # Intertitre à l'intérieur d'un cadre. _ui_head() { _ui_mid; _ui_row "${BOLD}$1${RESET}"; _ui_mid; } # Bandeau de titre. Le sous-titre porte le contexte (qui, où) : sans lui, deux # panels de machines différentes sont impossibles à distinguer sur une capture. _ui_title() { local txt sub # ⚠ Le sous-titre est le PREMIER à déborder : il porte le chemin # d'installation, qui n'a aucune longueur prévisible. txt="$(_ui_couper "$1" $(( UI_W - 4 )))" sub="$(_ui_couper "${2:-}" $(( UI_W - 4 )))" printf "\n${BLUE}╔%s╗${RESET}\n" "${UI_DL:0:UI_W-2}" printf "${BLUE}║${RESET} ${BOLD}${WHITE}%b${RESET}%s ${BLUE}║${RESET}\n" \ "$txt" "$(_ui_pad "$txt" $(( UI_W - 4 )))" [[ -n "$sub" ]] && printf "${BLUE}║${RESET} ${DIM}%b${RESET}%s ${BLUE}║${RESET}\n" \ "$sub" "$(_ui_pad "$sub" $(( UI_W - 4 )))" printf "${BLUE}╚%s╝${RESET}\n" "${UI_DL:0:UI_W-2}" } # Pastille d'état. Cinq états seulement, et un symbole distinct pour chacun : # la couleur seule ne suffit pas — un terminal monochrome, une capture en noir # et blanc ou un daltonisme rendraient « actif » et « en erreur » identiques. _ui_badge() { local c s t="${2:-}" case "$1" in ok) c="$GREEN"; s="●"; t="${t:-actif}" ;; run) c="$GREEN"; s="▶"; t="${t:-en marche}" ;; warn) c="$ORANGE"; s="◐"; t="${t:-partiel}" ;; err) c="$RED"; s="✖"; t="${t:-en erreur}" ;; off) c="$DIM"; s="○"; t="${t:-absent}" ;; *) c="$DIM"; s="·"; t="${t:-?}" ;; esac printf '%s' "${c}${s} ${t}${RESET}" } # Jauge de progression. Le compte chiffré reste affiché à côté : une barre # seule ne dit pas si « à moitié pleine » signifie 2/4 ou 500/1000. _ui_bar() { local n="$1" tot="$2" w="${3:-20}" f c pct (( tot <= 0 )) && tot=1 (( n < 0 )) && n=0 (( n > tot )) && n=tot f=$(( n * w / tot )); pct=$(( n * 100 / tot )) if (( pct >= 100 )); then c="$GREEN" elif (( pct >= 50 )); then c="$ORANGE" else c="$RED"; fi local plein="${UI_SP:0:f}" vide="${UI_SP:0:w-f}" printf '%s' "${c}${plein// /█}${RESET}${DIM}${vide// /░}${RESET} ${BOLD}${n}/${tot}${RESET}" } # Couple clé/valeur aligné dans un cadre. _ui_kv() { _ui_row "${DIM}${1}${RESET}$(_ui_pad "$1" 26)${BOLD}${2}${RESET}"; } # Entrée de menu. Une entrée verrouillée reste VISIBLE, en grisé, avec la raison # du verrou en dessous : la faire disparaître laissait l'utilisateur chercher # une option qu'il avait vue la veille sans comprendre ce qui l'avait retirée. _ui_item() { if [[ -n "${3:-}" ]]; then _ui_row "${DIM}[${1}]${RESET} ${DIM}${2}${RESET}" _ui_row " ${ORANGE}↳${RESET} ${DIM}${3}${RESET}" else _ui_row "${CYAN}${BOLD}[${1}]${RESET} ${2}" fi } # Invite de saisie, uniforme dans tout le panel. _ui_prompt() { printf "\n ${BOLD}${CYAN}▸${RESET} "; } # ----------------------------------------------------------------------------- # _logo — écran d'accueil # # C'est une FONCTION, appelée depuis main(), et non un bloc exécuté à la # première ligne du fichier. L'ancienne version s'affichait avant même que # VERSION soit lu, ce qui l'obligeait à annoncer un numéro en dur : elle # proclamait « V3.X.X » pendant que le fichier VERSION disait 4.6.0 — le # défaut que l'en-tête de ce script interdit explicitement. # # Le `clear` est conditionné au terminal : appliqué sans condition, il purgeait # l'écran de qui redirigeait la sortie vers un fichier ou lisait `--help` dans # un tube, et brouillait la sortie des tests automatisés. # ----------------------------------------------------------------------------- # Ligne centrée dans un cadre : _ui_center [couleur] _ui_center() { local t="$1" col="${2:-}" vis g d vis=$(_ui_vlen "$t") g=$(( (UI_W - 2 - vis) / 2 )); (( g < 0 )) && g=0 d=$(( UI_W - 2 - vis - g )); (( d < 0 )) && d=0 printf "${BLUE}║${RESET}%s%b%s${BLUE}║${RESET}\n" \ "${UI_SP:0:g}" "${col}${t}${RESET}" "${UI_SP:0:d}" } _logo() { [[ -t 1 ]] || return 0 clear _ui_width printf "\n${BLUE}╔%s╗${RESET}\n" "${UI_DL:0:UI_W-2}" _ui_center "SERVICE OVERTCHAT" "${BOLD}${WHITE}" _ui_center "New Generation" "${DIM}" printf "${BLUE}║${RESET}%s${BLUE}║${RESET}\n" "${UI_SP:0:UI_W-2}" _ui_center "version ${VERSION}" "${CYAN}${BOLD}" printf "${BLUE}╠%s╣${RESET}\n" "${UI_DL:0:UI_W-2}" _ui_center "Copyright @SerVuS@" "${DIM}" _ui_center "support.overtchat@free.fr" "${DIM}" printf "${BLUE}╚%s╝${RESET}\n" "${UI_DL:0:UI_W-2}" } # ----------------------------------------------------------------------------- # Compatibilité : les anciennes primitives restent, redirigées vers le nouveau # rendu. Une centaine d'appels à _title/_kv/_sep existent dans ce fichier — # les réécrire tous d'un coup aurait mélangé la refonte visuelle et le risque # de casser un panel qui marchait. # ----------------------------------------------------------------------------- # Le reste de ligne est borné à zéro : sur un terminal étroit, un titre long # rendait la longueur négative, et bash abandonne sur « substring expression < 0 ». _section() { local n=$(( UI_W - 5 - $(_ui_vlen "$*") )) (( n < 0 )) && n=0 printf "\n${BOLD}${BLUE}══ %s ${RESET}${BLUE}%s${RESET}\n" "$*" "${UI_LN:0:n}" } _title() { _ui_width; _ui_title "$*"; } _kv() { printf " ${DIM}%s${RESET}%s ${BOLD}%b${RESET}\n" "$1" "$(_ui_pad "$1" 30)" "$2"; } _sep() { printf "${DIM}%s${RESET}\n" "${UI_LN:0:UI_W}"; } _pause() { # ⚠ En AUTO, ce `read` ne trouverait personne : il rendrait immédiatement # sur EOF si l'entrée est fermée, ou attendrait sans fin si elle ne l'est # pas — un blocage muet, au milieu d'une installation. On saute la pause, # et on le DIT : une pause sautée en silence ferait croire à une pause # honorée. if [[ "${MODE_AUTO:-0}" == "1" ]]; then printf '\n %s\n' "${DIM}[auto — on continue sans attendre]${RESET}" return 0 fi read -rp $'\n '"${DIM}[Entrée pour continuer]${RESET}" _ || true } # ============================================================================= # LANGUE # ============================================================================= # LANG_CODE sert encore : il est écrit dans le JSON de configuration et relu # par le site. En revanche la fonction msg(), qui devait choisir entre une # chaîne française et une anglaise, n'a jamais été appelée nulle part — les # 5 600 lignes de ce script sont écrites en français en dur. Elle a été # retirée le 29/07/2026 : une traduction qui n'existe pas ne doit pas laisser # croire, à la lecture, que le script est bilingue. _detect_lang() { case "${LANG:-fr}" in fr*|FR*) echo "fr";; *) echo "en";; esac; } LANG_CODE="$(_detect_lang)" [[ -f "$INIT_BASE" ]] && LANG_CODE=$(jq -r '.language // "fr"' "$INIT_BASE" 2>/dev/null || echo "$LANG_CODE") # ----------------------------------------------------------------------------- # LA TRADUCTION — posée le 06/09/2026, à la demande de SerVuS # ----------------------------------------------------------------------------- # # « si site = Fr alors tout en Fr et pareil pour overtchat-setup.sh sinon par # défaut en anglais … gère au mieux » # # ── ⚠⚠ LE FRANÇAIS EST LA SOURCE, PAS UNE TRADUCTION PARMI D'AUTRES ── # # `_t` prend le TEXTE FRANÇAIS et rend sa traduction si elle existe. Il n'y a # donc **aucune clé à inventer**, aucun fichier `fr` à tenir, et surtout : # **une traduction manquante rend le français**, jamais une chaîne vide ni un # identifiant technique. C'est ce qui permet de traduire par petits lots sans # jamais casser l'écran entre deux. # # 📌 Et le gain tient en quelques lignes : les messages passent déjà tous par # une poignée de helpers. En traduisant DANS les helpers, les ~1 000 sites # d'appel n'ont pas une virgule à changer. # # ── ⚠ LE JOURNAL RESTE EN FRANÇAIS, ET C'EST DÉLIBÉRÉ ── # # `_log` reçoit le texte SOURCE, jamais le traduit. Un journal écrit dans la # langue de l'exploitant du jour serait illisible pour quiconque l'aide ensuite, # et deux installations ne se compareraient plus. L'écran s'adresse à l'humain # présent ; le journal, à celui qui viendra après. # Un catalogue qu'on peut SOURCER sans danger (audit #6, 29/09/2026) : # · ni lui ni son dossier ne sont des liens ; # · ils appartiennent à root, à qui lance, ou — sous sudo — à SUDO_USER, qui # pourrait de toute façon lancer n'importe quoi en root ; # · personne d'AUTRE ne peut les modifier : jamais d'écriture pour « les # autres » (un dossier sticky comme /tmp en est : refusé) ; l'écriture de # GROUPE n'est admise que pour le groupe PRIVÉ du propriétaire (même nom, # aucun autre membre) — le `umask 002` d'Ubuntu, sans quoi un clone # ordinaire y perdrait sa traduction. _catalogue_sur() { local f="$1" d x uid gid mode moi sudo_uid="" nom_p nom_g membres moi="${EUID:-$(id -u)}" if [[ "$moi" -eq 0 && -n "${SUDO_USER:-}" ]]; then sudo_uid="$(id -u -- "$SUDO_USER" 2>/dev/null || true)" fi [[ -f "$f" && ! -L "$f" ]] || return 1 d="$(dirname -- "$f")" [[ -d "$d" && ! -L "$d" ]] || return 1 for x in "$f" "$d"; do read -r uid gid mode < <(stat -c '%u %g %a' -- "$x" 2>/dev/null) || return 1 [[ "$uid" == 0 || "$uid" == "$moi" || ( -n "$sudo_uid" && "$uid" == "$sudo_uid" ) ]] || return 1 [[ "$mode" =~ ^[0-7]+$ ]] || return 1 (( (8#$mode & 8#002) == 0 )) || return 1 if (( (8#$mode & 8#020) != 0 )); then nom_p="$(getent passwd "$uid" 2>/dev/null | cut -d: -f1)" IFS=: read -r nom_g _ _ membres < <(getent group "$gid" 2>/dev/null) || return 1 [[ -n "$nom_p" && "$nom_g" == "$nom_p" && -z "$membres" ]] || return 1 fi done return 0 } # Charge le catalogue de la langue courante, s'il existe. Un catalogue absent # n'est pas une erreur : c'est le cas du français, qui n'en a pas besoin. _charger_langue() { [[ "$_TRAD_DISPO" -eq 1 ]] || return 0 [[ "$LANG_CODE" == "fr" ]] && return 0 local f="${SCRIPT_DIR:-$(dirname "${BASH_SOURCE[0]}")}/langues/${LANG_CODE}.sh" # ⚠ On ne SOURCE que ce qui existe et n'est pas vide : un `source` d'un # fichier absent ferait rougir `set -u` bien plus loin, sur une ligne sans # rapport. if [[ -s "$f" ]]; then # 🔴 ET SEULEMENT S'IL EST SÛR — audit du 29/09/2026, constat #6. # Lancé depuis /tmp (le Lanceur y déposait l'installateur), le # catalogue était `/tmp/langues/en.sh` : n'importe quel compte local # pouvait le poser, et root l'EXÉCUTAIT. On le SAUTE donc, en le # disant, s'il n'appartient ni à root ni à qui lance, ou si lui ou # son dossier sont modifiables par d'autres. if ! _catalogue_sur "$f"; then _log "TRAD catalogue IGNORÉ (propriétaire ou droits non sûrs) : $f" # ⚠ En ANGLAIS, comme le message d'absence plus bas : le catalogue # n'est pas chargé, `_t` ne traduirait rien. printf ' %s\n' "Language catalogue IGNORED — it is not owned by root or by you, or it (or its folder) is writable by others. Continuing in French." >&2 printf ' %s\n' " file: $f" >&2 return 0 fi source "$f" return 0 fi # ⚠⚠ ET ON LE DIT. Un exploitant qui télécharge le seul script n'a pas le # dossier `langues/` : tout resterait en français, proprement, et il # n'aurait AUCUN moyen de savoir pourquoi. Le repli silencieux est bon # pour une phrase manquante, pas pour un catalogue entier. _log "TRAD catalogue introuvable pour la langue $LANG_CODE : $f" # ⚠ En ANGLAIS : celui qui a choisi une autre langue ne lit peut-être pas # le français, et ce message-ci est justement celui qu'il doit comprendre. printf ' %s\n' "Language catalogue not found for ${LANG_CODE} — continuing in French." >&2 printf ' %s\n' " expected: $f" >&2 return 0 } _charger_langue # ============================================================================= # DÉPENDANCES # ============================================================================= # ----------------------------------------------------------------------------- # COUCHE PRIVILÈGES # # Le script s'utilise en utilisateur simple : tout est installé sous $HOME et # rien ne doit appartenir à root. Seule l'installation de paquets système exige # une élévation. Trois modes possibles : # # user — utilisateur simple, aucune élévation disponible (ni root, ni sudo) # → les paquets manquants sont listés, pas installés # sudo — utilisateur simple avec sudo utilisable # → élévation ponctuelle pour les paquets uniquement # root — script lancé en root # → gestion automatisée ; les fichiers de $HOME sont réattribués à # l'utilisateur d'origine via $SUDO_USER pour ne pas créer de # fichiers root dans un home utilisateur # ----------------------------------------------------------------------------- PRIV_MODE="user" PRIV_USER="" PRIV_HOME="" _priv_detect() { if [[ "${EUID:-$(id -u)}" -eq 0 ]]; then PRIV_MODE="root" # Sous sudo, on retient le compte appelant pour ne pas semer du root # dans son $HOME. if [[ -n "${SUDO_USER:-}" && "$SUDO_USER" != "root" ]]; then PRIV_USER="$SUDO_USER" PRIV_HOME=$(getent passwd "$SUDO_USER" 2>/dev/null | cut -d: -f6 || true) [[ -z "$PRIV_HOME" ]] && PRIV_HOME="/home/$SUDO_USER" elif PRIV_USER="$(_compte_designe)"; then # OVERTCHAT_COMPTE (audit #8) : traité comme SUDO_USER — les # fichiers de son foyer lui sont rendus (`_priv_fix_owner`). PRIV_HOME=$(getent passwd "$PRIV_USER" 2>/dev/null | cut -d: -f6 || true) [[ -z "$PRIV_HOME" ]] && PRIV_HOME="/home/$PRIV_USER" else PRIV_USER="root" PRIV_HOME="${HOME:-/root}" fi else PRIV_USER="$(id -un)" PRIV_HOME="${HOME:-$(getent passwd "$PRIV_USER" | cut -d: -f6)}" if command -v sudo &>/dev/null && sudo -n true 2>/dev/null; then PRIV_MODE="sudo" elif command -v sudo &>/dev/null; then # sudo présent mais demandera un mot de passe : utilisable, à # confirmer au moment de l'appel. PRIV_MODE="sudo" else PRIV_MODE="user" fi fi export PRIV_MODE PRIV_USER PRIV_HOME } # Exécute une commande avec les privilèges nécessaires. Retourne 1 si aucune # élévation n'est possible — l'appelant doit gérer le cas, jamais l'ignorer. _as_root() { case "$PRIV_MODE" in root) "$@" ;; sudo) # ⚠⚠ `sudo` sans `-n` ouvre une invite de mot de passe. Devant un # humain c'est ce qu'il faut ; en AUTO, personne ne la remplira et # le script attendrait là, sans fin et sans message — la panne la # plus pénible à diagnostiquer, parce qu'elle ne dit rien. `-n` # échoue tout de suite, et l'échec se lit. # ⚠ `_auto_prevol` a déjà exigé que `sudo -n` passe : arriver ici # en échec signifie que le droit a été retiré en cours de route. if [[ "${MODE_AUTO:-0}" == "1" ]]; then sudo -n "$@" else sudo "$@" fi ;; *) _err "Élévation impossible (ni root ni sudo) : $*"; return 1 ;; esac } _priv_can_elevate() { [[ "$PRIV_MODE" == "root" || "$PRIV_MODE" == "sudo" ]]; } # Réattribue un chemin à l'utilisateur d'origine quand on tourne en root. _priv_fix_owner() { local path="${1:-}" [[ -n "$path" && -e "$path" ]] || return 0 [[ "$PRIV_MODE" == "root" && "$PRIV_USER" != "root" ]] || return 0 chown -R "$PRIV_USER":"$(id -gn "$PRIV_USER" 2>/dev/null || echo "$PRIV_USER")" "$path" 2>/dev/null || true } _priv_label() { case "$PRIV_MODE" in root) echo "root (gestion automatisée)" ;; sudo) echo "$PRIV_USER + sudo" ;; *) echo "$PRIV_USER (sans élévation)" ;; esac } # ----------------------------------------------------------------------------- # COUCHE PAQUETS — détection de distribution et correspondance des noms # ----------------------------------------------------------------------------- PKG_FAMILY="" PKG_MGR="" _pkg_detect() { if command -v apt-get &>/dev/null; then PKG_FAMILY="debian"; PKG_MGR="apt-get" elif command -v dnf &>/dev/null; then PKG_FAMILY="rhel"; PKG_MGR="dnf" elif command -v yum &>/dev/null; then PKG_FAMILY="rhel"; PKG_MGR="yum" elif command -v pacman &>/dev/null; then PKG_FAMILY="arch"; PKG_MGR="pacman" elif command -v zypper &>/dev/null; then PKG_FAMILY="suse"; PKG_MGR="zypper" elif command -v apk &>/dev/null; then PKG_FAMILY="alpine"; PKG_MGR="apk" else PKG_FAMILY="inconnu"; PKG_MGR="" fi export PKG_FAMILY PKG_MGR } # Chemin par défaut du socket MariaDB, selon la distribution. Debian/Ubuntu # posent le socket sous /var/run/mysqld/, les autres (Fedora, RHEL, Arch, SUSE) # sous /var/lib/mysql/. ⚠ Mesuré sur Fedora 44 : un chemin Debian codé en dur y # désigne un socket inexistant → le site retombe en TCP et, en WSL mirrored, # tombe sur la MariaDB de la prod (mauvais compte). Le défaut inconnu reste # Debian, pour ne rien changer à une installation existante. _mariadb_sock_defaut() { case "${PKG_FAMILY:-}" in rhel|arch|suse|alpine) echo "/var/lib/mysql/mysql.sock" ;; *) echo "/var/run/mysqld/mysqld.sock" ;; esac } # _pkg_name — traduit vers le nom réel du paquet. # Une chaîne vide signifie « fourni par la base du système », donc rien à faire. _pkg_name() { local g="$1" # ⚠ awk est présumé présent (Debian/Ubuntu le préinstallent) mais MANQUE sur # une Fedora WSL nue — d'où « awk: command not found » à l'init des services. # Le paquet s'appelle « gawk » sur toutes les familles. [[ "$g" == "awk" ]] && { echo "gawk"; return; } case "$PKG_FAMILY" in debian) case "$g" in build) echo "build-essential" ;; gcc) echo "gcc" ;; make) echo "make" ;; cmake) echo "cmake" ;; git) echo "git" ;; curl) echo "curl" ;; jq) echo "jq" ;; openssl) echo "openssl" ;; tcl) echo "tcl" ;; tcl-dev) echo "tcl-dev" ;; ssl-dev) echo "libssl-dev" ;; zlib-dev) echo "zlib1g-dev" ;; bison) echo "bison" ;; flex) echo "flex" ;; # ⚠⚠ « mariadb-client » ET NON « default-mysql-client » — 24/08/2026. # Ce métapaquet CHANGE DE SENS selon la distribution : sur Debian il # mène à MariaDB, sur Ubuntu il tire MySQL 8 — qui entre en conflit # avec mariadb-server et rend « held broken packages ». Or la famille # `debian` couvre les deux : `_pkg_family` rend « debian » pour Ubuntu # aussi, par ID_LIKE. Un exploitant Ubuntu qui suivait l'installateur # obtenait donc un client MySQL et ne pouvait plus poser le serveur que # tout le reste du projet suppose — l'écran de configuration demande # littéralement « Hôte MariaDB ». # # ⚠ Les quatre autres familles nommaient DÉJÀ MariaDB explicitement # (`mariadb`, `mariadb-clients`, `mariadb-client`). `debian` était la # seule à passer par un métapaquet ambigu : ceci l'aligne. # # ⚠ Mesuré sur les deux : le paquet est installé en production (Debian # 13, 1:11.8.6) et disponible sur Ubuntu 24.04 (1:10.11.14). Rien ne # régresse ici. pkgconfig) echo "pkg-config" ;; mysql-client) echo "mariadb-client" ;; tcl-mysql) echo "mysqltcl" ;; tcllib) echo "tcllib" ;; tcl-tls) echo "tcl-tls" ;; curl-dev) echo "libcurl4-openssl-dev" ;; pcre2-dev) echo "libpcre2-dev" ;; argon2-dev) echo "libargon2-dev" ;; sodium-dev) echo "libsodium-dev" ;; jansson-dev) echo "libjansson-dev" ;; tar) echo "tar" ;; php) echo "php-cli" ;; php-mysql) echo "php-mysql" ;; php-mbstring) echo "php-mbstring" ;; # « php-gd » : le MÉTAPAQUET, comme php-mysql et php-mbstring — il # tire php8.3-gd sur Ubuntu 24.04, php8.4-gd sur Debian 13. Nommer # « php8.x-gd » lierait l'installateur à une version de PHP. php-gd) echo "php-gd" ;; # Le métapaquet aussi (php8.4-fpm sur Debian 13) : pour servir # phpMyAdmin sans mod_php, et libérer le MPM event (05/10/2026). php-fpm) echo "php-fpm" ;; mysql-server) echo "mariadb-server" ;; postfix) echo "postfix" ;; autoconf) echo "autoconf" ;; automake) echo "automake" ;; libtool) echo "libtool" ;; patch) echo "patch" ;; python-venv) echo "python3-venv" ;; python-pip) echo "python3-pip" ;; # 17/10/2026 (lot J2) : Node.js pour OverCore — le paquet de la distribution, # JAMAIS un dépôt tiers (NodeSource : décision du 17/10). Mesuré : Debian 13 # rend 20.19.2 ; une distribution qui rend moins que le plancher (voir # `_overcore_node_pret`) garde Eggdrop + IriX, et le DIT. nodejs) echo "nodejs" ;; *) echo "$g" ;; esac ;; rhel) case "$g" in build) echo "gcc" ;; gcc) echo "gcc" ;; make) echo "make" ;; cmake) echo "cmake" ;; git) echo "git" ;; curl) echo "curl" ;; jq) echo "jq" ;; openssl) echo "openssl" ;; tcl) echo "tcl" ;; tcl-dev) echo "tcl-devel" ;; ssl-dev) echo "openssl-devel" ;; # ⚠ Fedora 40+ est passé à zlib-ng : « zlib-devel » n'y existe plus # (remplacé par zlib-ng-compat-devel). RHEL/Alma/Oracle gardent le nom # classique — d'où la détection, la famille « rhel » couvrant les deux. zlib-dev) if grep -qs '^ID=fedora' /etc/os-release; then echo "zlib-ng-compat-devel" else echo "zlib-devel"; fi ;; bison) echo "bison" ;; flex) echo "flex" ;; pkgconfig) echo "pkgconf-pkg-config" ;; mysql-client) echo "mariadb" ;; tcl-mysql) echo "tcl-mysqltcl" ;; tcllib) echo "tcllib" ;; # ⚠ Fedora n'empaquette PAS tcl-tls (absent des dépôts). Le nommer # ferait échouer TOUTE la transaction dnf (groupée) — donc rien ne # s'installerait. On le déclare indisponible sous Fedora (générique # vide => _pkg_install avertit et continue) : IriX perd le TLS Tcl # là-bas, mais le reste s'installe. RHEL/Alma le fournissent. tcl-tls) if grep -qs '^ID=fedora' /etc/os-release; then echo "" else echo "tcl-tls"; fi ;; curl-dev) echo "libcurl-devel" ;; pcre2-dev) echo "pcre2-devel" ;; argon2-dev) echo "libargon2-devel" ;; sodium-dev) echo "libsodium-devel" ;; jansson-dev) echo "jansson-devel" ;; tar) echo "tar" ;; php) echo "php-cli" ;; php-mysql) echo "php-mysqlnd" ;; php-mbstring) echo "php-mbstring" ;; php-gd) echo "php-gd" ;; php-fpm) echo "php-fpm" ;; mysql-server) echo "mariadb-server" ;; postfix) echo "postfix" ;; autoconf) echo "autoconf" ;; automake) echo "automake" ;; libtool) echo "libtool" ;; patch) echo "patch" ;; # ⚠ venv est fourni par la base python3 sur Fedora/RHEL (générique # vide = rien à installer) ; seul pip est un paquet séparé. python-venv) echo "" ;; python-pip) echo "python3-pip" ;; nodejs) echo "nodejs" ;; # 17/10/2026 : nom probable, non mesuré *) echo "$g" ;; esac ;; arch) case "$g" in build) echo "base-devel" ;; gcc) echo "gcc" ;; make) echo "make" ;; cmake) echo "cmake" ;; git) echo "git" ;; curl) echo "curl" ;; jq) echo "jq" ;; openssl) echo "openssl" ;; tcl) echo "tcl" ;; tcl-dev) echo "tcl" ;; ssl-dev) echo "openssl" ;; zlib-dev) echo "zlib" ;; bison) echo "bison" ;; flex) echo "flex" ;; pkgconfig) echo "pkgconf" ;; mysql-client) echo "mariadb-clients" ;; tcl-mysql) echo "" ;; tcllib) echo "tcllib" ;; tcl-tls) echo "tcltls" ;; curl-dev) echo "curl" ;; pcre2-dev) echo "pcre2" ;; argon2-dev) echo "argon2" ;; sodium-dev) echo "libsodium" ;; jansson-dev) echo "jansson" ;; tar) echo "tar" ;; php) echo "php" ;; php-mysql) echo "php" ;; php-mbstring) echo "php" ;; # ⚠ GD est un paquet À PART sur Arch (pas dans « php »), et son # extension reste à décommenter dans php.ini — non mesuré ici. php-gd) echo "php-gd" ;; php-fpm) echo "php-fpm" ;; mysql-server) echo "mariadb" ;; postfix) echo "postfix" ;; autoconf) echo "autoconf" ;; automake) echo "automake" ;; libtool) echo "libtool" ;; patch) echo "patch" ;; python-venv) echo "" ;; python-pip) echo "" ;; nodejs) echo "nodejs" ;; # 17/10/2026 : nom probable, non mesuré *) echo "$g" ;; esac ;; suse) case "$g" in build) echo "patterns-devel-base-devel_basis" ;; gcc) echo "gcc" ;; make) echo "make" ;; cmake) echo "cmake" ;; git) echo "git" ;; curl) echo "curl" ;; jq) echo "jq" ;; openssl) echo "openssl" ;; tcl) echo "tcl" ;; tcl-dev) echo "tcl-devel" ;; ssl-dev) echo "libopenssl-devel" ;; zlib-dev) echo "zlib-devel" ;; bison) echo "bison" ;; flex) echo "flex" ;; pkgconfig) echo "pkg-config" ;; mysql-client) echo "mariadb-client" ;; tcl-mysql) echo "" ;; tcllib) echo "tcllib" ;; tcl-tls) echo "tcl-tls" ;; curl-dev) echo "libcurl-devel" ;; pcre2-dev) echo "pcre2-devel" ;; argon2-dev) echo "libargon2-devel" ;; sodium-dev) echo "libsodium-devel" ;; jansson-dev) echo "libjansson-devel" ;; tar) echo "tar" ;; php) echo "php8-cli" ;; php-mysql) echo "php8-mysql" ;; php-mbstring) echo "php8-mbstring" ;; php-gd) echo "php8-gd" ;; php-fpm) echo "php8-fpm" ;; mysql-server) echo "mariadb" ;; postfix) echo "postfix" ;; autoconf) echo "autoconf" ;; automake) echo "automake" ;; libtool) echo "libtool" ;; patch) echo "patch" ;; python-venv) echo "" ;; python-pip) echo "python3-pip" ;; nodejs) echo "nodejs" ;; # 17/10/2026 : non mesuré (zypper résout la capacité « nodejs ») *) echo "$g" ;; esac ;; alpine) case "$g" in build) echo "build-base" ;; gcc) echo "gcc" ;; make) echo "make" ;; cmake) echo "cmake" ;; git) echo "git" ;; curl) echo "curl" ;; jq) echo "jq" ;; openssl) echo "openssl" ;; tcl) echo "tcl" ;; tcl-dev) echo "tcl-dev" ;; ssl-dev) echo "openssl-dev" ;; zlib-dev) echo "zlib-dev" ;; bison) echo "bison" ;; flex) echo "flex" ;; pkgconfig) echo "pkgconf" ;; mysql-client) echo "mariadb-client" ;; tcl-mysql) echo "" ;; tcllib) echo "tcllib" ;; tcl-tls) echo "tcl-tls" ;; curl-dev) echo "curl-dev" ;; pcre2-dev) echo "pcre2-dev" ;; argon2-dev) echo "argon2-dev" ;; sodium-dev) echo "libsodium-dev" ;; jansson-dev) echo "jansson-dev" ;; tar) echo "tar" ;; php) echo "php83-cli" ;; php-mysql) echo "php83-pdo_mysql" ;; php-mbstring) echo "php83-mbstring" ;; php-gd) echo "php83-gd" ;; php-fpm) echo "php83-fpm" ;; mysql-server) echo "mariadb" ;; postfix) echo "postfix" ;; autoconf) echo "autoconf" ;; automake) echo "automake" ;; libtool) echo "libtool" ;; patch) echo "patch" ;; python-venv) echo "" ;; python-pip) echo "py3-pip" ;; nodejs) echo "nodejs" ;; # 17/10/2026 : nom probable, non mesuré *) echo "$g" ;; esac ;; *) echo "$g" ;; esac } # _pkg_installed — 0 si présent _pkg_installed() { local p="${1:-}" [[ -n "$p" ]] || return 0 case "$PKG_FAMILY" in debian) dpkg-query -W -f='${Status}' "$p" 2>/dev/null | grep -q "install ok installed" ;; rhel) rpm -q "$p" &>/dev/null ;; arch) pacman -Qi "$p" &>/dev/null ;; suse) rpm -q "$p" &>/dev/null ;; alpine) apk info -e "$p" &>/dev/null ;; *) return 1 ;; esac } # Repli quand le gestionnaire est inconnu : on teste la commande elle-même. # ----------------------------------------------------------------------------- # _mysqltcl_build — compile le lien Tcl↔MySQL là où il n'est pas empaqueté # # mysqltcl existe en paquet sur Debian, Arch et RHEL (« tcl-mysqltcl »), mais # nulle part sur SUSE ni Alpine — recherche faite sur opensuse/leap 15.5 et # alpine 3.19. Sans lui, IriX démarre sans accès à la base : le bot vit, et # rien ne fonctionne. # # L'archive vient du miroir Debian, seule source encore servie : SourceForge # et le dépôt GitHub d'origine répondent 404. # # ── Les deux chemins que configure ne devine pas ──────────── # # Sur SUSE, il cherche libmysqlclient.so dans /usr/lib/mysql, où elle n'est # pas — et il ÉCHOUE EN RENVOYANT 0, sans produire de Makefile. Le make # suivant meurt alors sur « no targets specified », à mille lieues de la # cause. On lui passe donc explicitement la bibliothèque et les en-têtes, # détectés au préalable. Alpine, lui, s'en sort sans rien. # ----------------------------------------------------------------------------- _mysqltcl_build() { local url="https://deb.debian.org/debian/pool/main/m/mysqltcl/mysqltcl_3.052.orig.tar.gz" local tmp dir tclcfg lib inc _info "Compilation de mysqltcl (absent des dépôts de cette distribution)…" for o in gcc make curl tar tclsh; do command -v "$o" >/dev/null 2>&1 || { _err "Outil requis absent : $o"; return 1; } done tclcfg=$(find /usr/lib /usr/lib64 /usr/local/lib -maxdepth 3 -name tclConfig.sh 2>/dev/null | head -1) [[ -n "$tclcfg" ]] || { _err "tclConfig.sh introuvable — installe les en-têtes de Tcl."; return 1; } lib=$(find /usr/lib64 /usr/lib -maxdepth 3 \ \( -name "libmysqlclient*.so*" -o -name "libmariadb.so*" \) 2>/dev/null | head -1) inc=$(find /usr/include -maxdepth 3 -name mysql.h 2>/dev/null | head -1) [[ -n "$lib" && -n "$inc" ]] || { _err "En-têtes ou bibliothèque MySQL introuvables — installe le paquet de développement." return 1; } tmp=$(mktemp -d) || return 1 if ! curl -fsSL --retry 3 "$url" -o "${tmp}/m.tar.gz"; then rm -rf "$tmp"; _err "Téléchargement de mysqltcl impossible."; return 1 fi # Empreinte épinglée (23/09/2026) : rien n'était vérifié ici, pas même gzip. if ! _verifier_empreinte "${tmp}/m.tar.gz" "$url" "mysqltcl" "$SHA256_MYSQLTCL"; then rm -rf "$tmp"; return 1 fi tar xzf "${tmp}/m.tar.gz" -C "$tmp" || { rm -rf "$tmp"; _err "Archive illisible."; return 1; } dir=$(find "$tmp" -maxdepth 1 -type d -name "mysqltcl*" | head -1) [[ -n "$dir" ]] || { rm -rf "$tmp"; _err "Sources mysqltcl introuvables."; return 1; } local sudo_cmd="" [[ "$PRIV_MODE" == "sudo" ]] && sudo_cmd="sudo" ( cd "$dir" || exit 1 ./configure --prefix=/usr \ --with-tcl="$(dirname "$tclcfg")" \ --with-mysql-lib="$(dirname "$lib")" \ --with-mysql-include="$(dirname "$inc")" >/dev/null 2>&1 # configure d'un vieux TEA renvoie 0 même quand il abandonne : c'est la # présence du Makefile qui fait foi, pas son code de sortie. [[ -f Makefile ]] || exit 1 make >/dev/null 2>&1 && $sudo_cmd make install >/dev/null 2>&1 ) || { rm -rf "$tmp"; _err "Compilation de mysqltcl échouée."; return 1; } rm -rf "$tmp" if _tcl_a_paquet mysqltcl; then _ok "mysqltcl compilé et installé." return 0 fi _err "mysqltcl installé mais introuvable par Tcl — vérifie ton auto_path." return 1 } # tcltls (le « package require tls ») compilé depuis les sources, pour les # distributions qui ne l'empaquettent PAS — mesuré sur Fedora 44, qui n'a pas # tcl-tls et n'a QUE Tcl 9. ⚠ La release publiée (1.7.22) ne compile pas sur # Tcl 9 (API Tcl_Size) : on prend le TRONC fossil, qui porte les correctifs Tcl 9. # ⚠ Deux pièges de distribution attrapés ici : les libs OpenSSL sont dans # /usr/lib64 (pas /usr/lib) sur Fedora, et le paquet doit atterrir dans le # dossier des paquets Tcl (…/tcl) pour être sur l'auto_path. _tcltls_build() { # ⚠ Révision FIGÉE du tronc (225266f7674091df, 05/09/2026) et non plus # « trunk » : le tronc bouge sans prévenir, et une empreinte ne peut pas # garder une cible mobile. C'était la tête du tronc le 23/09/2026, donc ce # que l'installateur prenait déjà. Pour la monter : nouvelle révision ici, # nouvelle empreinte en tête du script (SHA256_TCLTLS). local url="https://core.tcl-lang.org/tcltls/tarball/225266f7674091df/tcltls.tar.gz" local tmp tclcfg libdir tclver pkgdir ssllib _info "Compilation de tcltls (absent des dépôts de cette distribution)…" for o in gcc make curl tar tclsh; do command -v "$o" >/dev/null 2>&1 || { _err "Outil requis absent : $o"; return 1; } done tclcfg=$(find /usr/lib /usr/lib64 /usr/local/lib -maxdepth 3 -name tclConfig.sh 2>/dev/null | head -1) [[ -n "$tclcfg" ]] || { _err "tclConfig.sh introuvable — installe les en-têtes de Tcl."; return 1; } libdir=$(dirname "$tclcfg") tclver=$(. "$tclcfg"; echo "$TCL_VERSION") pkgdir="${libdir}/tcl${tclver}" # sur l'auto_path de Tcl # En-têtes + bibliothèque OpenSSL : le -devel doit être là (ssl.h + libssl.so). ssllib=$(find /usr/lib64 /usr/lib -maxdepth 4 -name 'libssl.so' 2>/dev/null | head -1) [[ -n "$ssllib" && -f /usr/include/openssl/ssl.h ]] || { _err "OpenSSL de développement absent (libssl.so / openssl/ssl.h) — installe openssl-devel." return 1; } tmp=$(mktemp -d) || return 1 if ! curl -fsSL --retry 3 --max-time 60 "$url" -o "${tmp}/t.tar.gz"; then rm -rf "$tmp"; _err "Téléchargement de tcltls impossible."; return 1 fi if ! _verifier_empreinte "${tmp}/t.tar.gz" "$url" "tcltls" "$SHA256_TCLTLS"; then rm -rf "$tmp"; return 1 fi tar xzf "${tmp}/t.tar.gz" -C "$tmp" || { rm -rf "$tmp"; _err "Archive tcltls illisible."; return 1; } local dir; dir=$(find "$tmp" -maxdepth 1 -type d -name 'tcltls*' | head -1) [[ -n "$dir" ]] || { rm -rf "$tmp"; _err "Sources tcltls introuvables."; return 1; } local sudo_cmd="" [[ "$PRIV_MODE" == "sudo" ]] && sudo_cmd="sudo" ( cd "$dir" || exit 1 ./configure --prefix=/usr --exec-prefix=/usr --libdir="$pkgdir" \ --with-tcl="$libdir" --with-ssl=openssl \ --with-openssl-dir=/usr --with-openssl-libdir="$(dirname "$ssllib")" \ >/dev/null 2>&1 [[ -f Makefile ]] || exit 1 make >/dev/null 2>&1 && $sudo_cmd make install >/dev/null 2>&1 ) || { rm -rf "$tmp"; _err "Compilation de tcltls échouée."; return 1; } rm -rf "$tmp" if _tcl_a_paquet tls; then _ok "tcltls compilé et installé (package require tls)." return 0 fi _err "tcltls installé mais introuvable par Tcl — vérifie ton auto_path." return 1 } # Ce Tcl dispose-t-il du paquet demandé ? # # Passe par un FICHIER, et non par un pipe. « echo … | tclsh » renvoie # toujours 0, même quand le paquet manque : le code de sortie est celui du # pipe, pas celui de l'interpréteur. Vérifié dans les deux sens sur une Debian # nue — avec le pipe, un paquet absent était rapporté présent. _tcl_a_paquet() { command -v tclsh >/dev/null 2>&1 || return 1 local f; f=$(mktemp) || return 1 printf 'exit [catch {package require %s}]\n' "$1" > "$f" tclsh "$f" >/dev/null 2>&1 local rc=$? rm -f "$f" return $rc } _pkg_present() { local generic="$1" real real=$(_pkg_name "$generic") # Aucun paquet connu pour cette famille : on ne peut pas conclure par le # gestionnaire, mais répondre « présent » — ce que faisait ce code — est le # pire des choix. Sur SUSE et Alpine, où mysqltcl n'est empaqueté nulle # part, le panel annonçait « complet » et IriX démarrait ensuite sans son # lien MySQL, sans un mot. # # On teste donc la CAPACITÉ plutôt que le nom du paquet : c'est ce qui # compte, et cela vaut quelle que soit la façon dont elle a été obtenue — # dépôt, compilation manuelle ou autre. if [[ -z "$real" ]]; then case "$generic" in tcl-mysql) _tcl_a_paquet mysqltcl ;; tcllib) _tcl_a_paquet cmdline ;; # ⚠ Seul le nom Debian/Ubuntu a été MESURÉ ; les quatre autres sont # probables. Si l'un est faux, ce repli répond quand même juste : # il demande à Tcl s'il sait charger `tls`, ce qui est la seule # question qui compte. tcl-tls) _tcl_a_paquet tls ;; *) return 1 ;; # inconnu et non testable : manquant, pas présent esac return fi if [[ "$PKG_FAMILY" == "inconnu" ]]; then case "$generic" in build|ssl-dev|zlib-dev|tcl-dev) return 1 ;; tcl-mysql|tcllib|tcl-tls) return 1 ;; pkgconfig) command -v pkg-config &>/dev/null ;; mysql-client) command -v mysql &>/dev/null ;; *) command -v "$generic" &>/dev/null ;; esac return fi _pkg_installed "$real" } # _pkg_install_cmd — affiche la commande d'installation pour les noms donnés _pkg_install_cmd() { case "$PKG_FAMILY" in debian) echo "apt-get install -y $*" ;; rhel) echo "$PKG_MGR install -y $*" ;; arch) echo "pacman -S --needed --noconfirm $*" ;; suse) echo "zypper install -y $*" ;; alpine) echo "apk add $*" ;; *) echo "(gestionnaire de paquets non reconnu) $*" ;; esac } # _pkg_install — installe ce qui manque. 0 si tout est présent # à l'arrivée, 1 sinon (y compris quand l'élévation est impossible). _pkg_install() { local generics=( "$@" ) missing_real=() g real for g in ${generics[@]+"${generics[@]}"}; do real=$(_pkg_name "$g") # Générique sans paquet sur cette distribution. Il était ignoré en # silence — d'où un IriX installé sans lien MySQL sur SUSE et Alpine, # que rien ne signalait. Ce qui se compile se compile ; le reste est # nommé, pour ne pas disparaître entre deux lignes. if [[ -z "$real" ]]; then _pkg_present "$g" && continue case "$g" in tcl-mysql) _mysqltcl_build || return 1 ;; tcl-tls) _tcltls_build || return 1 ;; *) _warn "Pas de paquet « $g » pour ${PKG_FAMILY} — à installer à la main." ;; esac continue fi _pkg_present "$g" || missing_real+=("$real") done [[ ${#missing_real[@]} -eq 0 ]] && return 0 _info "Paquets manquants : ${missing_real[*]}" if ! _priv_can_elevate; then _warn "Aucune élévation disponible — installe-les manuellement :" printf " %b\n" "${BOLD}$(_pkg_install_cmd "${missing_real[@]}")${RESET}" _warn "Relance ensuite ce panel, ou redémarre-le en root." return 1 fi case "$PKG_FAMILY" in debian) _as_root apt-get update -y -qq || true _as_root apt-get install -y "${missing_real[@]}" || return 1 ;; rhel) _as_root "$PKG_MGR" install -y "${missing_real[@]}" || return 1 ;; arch) _as_root pacman -Sy --needed --noconfirm "${missing_real[@]}" || return 1 ;; suse) _as_root zypper --non-interactive install "${missing_real[@]}" || return 1 ;; alpine) _as_root apk add "${missing_real[@]}" || return 1 ;; *) _err "Gestionnaire de paquets non reconnu — installation manuelle requise." printf " %s\n" "$(_pkg_install_cmd "${missing_real[@]}")" return 1 ;; esac # Re-vérification : un gestionnaire peut sortir 0 sans avoir tout posé. local still=() for g in ${generics[@]+"${generics[@]}"}; do _pkg_present "$g" || still+=("$(_pkg_name "$g")") done if [[ ${#still[@]} -gt 0 ]]; then _err "Toujours manquants après installation : ${still[*]}" return 1 fi return 0 } # ----------------------------------------------------------------------------- # EXIGENCES PAR COMPOSANT # ----------------------------------------------------------------------------- # Dépendances de base du panel lui-même readonly REQ_CORE=(jq curl git openssl) _req_for() { case "$1" in # Les sources arrivent par `git clone` pour la plupart des composants, # et un dépôt ne contient pas de `configure` — il faut le générer. # autoconf/automake/libtool étaient bien installés, mais EN DUR au # moment de compiler (voir _install_hybrid) : le panel des dépendances # les ignorait, affichait « complet », et l'installation posait les # paquets en silence — ou échouait sans élévation, après le # téléchargement des sources. eggdrop) echo "build gcc make tcl-dev ssl-dev zlib-dev autoconf automake libtool patch" ;; # ⚠⚠ `tcl-tls` A MANQUÉ À CETTE LISTE JUSQU'AU 24/08/2026, et IriX ne # démarrait donc sur AUCUNE installation neuve : `IriX-sql.tcl` fait # `package require tls` à sa dixième ligne, et le chargement mourait sur # « can't find package tls » — « FICHIER DE CONFIGURATION NON CHARGÉ ». # La production ne pouvait pas le voir : le paquet y avait été posé à la # main. Constaté en montant une Ubuntu 24.04 vierge. Point 45. irix) echo "tcl tcllib tcl-mysql tcl-tls mysql-client" ;; # Un OverOp n'a besoin de RIEN de plus qu'Eggdrop : il ne parle pas à # MySQL (§3), et son Tcl est celui qu'Eggdrop embarque. `tcl` figure # ici pour le banc `Robots/overop/test-overop.tcl`, qui tourne sous # tclsh, sans bot ni réseau. overop) echo "tcl" ;; anope) echo "build gcc make cmake ssl-dev" ;; lea) echo "build gcc make autoconf automake libtool" ;; unrealircd) echo "build gcc make ssl-dev zlib-dev pkgconfig curl-dev pcre2-dev argon2-dev sodium-dev" ;; hybrid) echo "build gcc make ssl-dev zlib-dev bison flex jansson-dev autoconf automake libtool" ;; # pkgconfig n'est pas décoratif ici : ircu n'a pas de `configure` dans # son dépôt, et l'autogen.sh qui le génère utilise la macro # PKG_PROG_PKG_CONFIG. Sans le fichier pkg.m4 que fournit pkg-config, # le configure produit est invalide et meurt sur # « PKG_PROG_PKG_CONFIG: command not found », puis sur une erreur de # syntaxe — constaté en compilant. ircu) echo "build gcc make autoconf automake libtool pkgconfig" ;; # Le `configure` d'InspIRCd est un script PERL, pas un produit d'autotools : # perl n'est donc pas une commodité ici, rien ne se configure sans lui. # pcre2 et argon2 ne sont pas exigés — ils activent des modules # supplémentaires quand ils sont là, et leur absence ne fait rien échouer. inspircd) echo "build gcc make perl pkgconfig ssl-dev" ;; # `openssl` en plus du reste : Bahamut REFUSE de démarrer sans # certificat, même sans port TLS déclaré — « Can't open ircd.crt! ssl # failed! », et aucun port n'est ouvert. Le binaire de génération fait # donc partie des dépendances, pas des agréments. bahamut) echo "build gcc make openssl ssl-dev zlib-dev" ;; overtchat_ircd) echo "build gcc make ssl-dev zlib-dev autoconf automake libtool" ;; # Le serveur COMPILÉ que sert le site (29/09/2026) : rien à construire, # donc ni gcc ni en-têtes. Il ne dépend que de libc, libssl.so.3 et # libcrypto.so.3 (contrôlé par Tools/faire-binaire-hybrid.sh) ; le # paquet `openssl` les tire, et il est déjà du socle (REQ_CORE). # ⚠ Pseudo-composant : il n'a pas d'entrée dans servers.json, seul # `_overtchat_binaire` le demande. overtchat_ircd_bin) echo "openssl" ;; # Le site et son panel. Ce composant n'existait pas : l'installateur # ne posait pas le site, il n'avait donc rien à en déclarer. Chacune # de ces entrées correspond à un usage constaté dans le code — # php Web/start.sh, Tools/panel-account.php # php-mysql inc/db.php (PDO) # php-mbstring mb_substr / mb_strimwidth, partout # php-gd inc/image.php (`image_reencoder` : photo de profil, # captures des rapports OverScript) # mysql-client Web/sql/apply.sh # tar, curl téléchargement et extraction de l'archive # `postfix` en fait partie : sans relais local, le formulaire de # contact et les demandes de salon n'envoient rien — c'est le défaut # qui a motivé l'onglet Courriel. # ⚠ `php-gd` MANQUAIT jusqu'au 03/10/2026 (lot 9-A) : mesuré sur une # installation tierce (Ubuntu 24.04, `--auto`), GD absent → toute photo # de profil REFUSÉE (`image_reencoder` : « traitement d'image # indisponible sur ce serveur (GD) », sans rien décoder). # La prod l'avait, posé à la main : elle ne pouvait pas le voir. site) echo "php php-mysql php-mbstring php-gd mysql-client tar curl postfix" ;; # 17/10/2026 (lot J2, décision ① de SerVuS) : OverCore, le successeur # d'IriX, n'a AUCUNE dépendance npm (pas de package.json) — rien que # `node`. La présence du paquet ne suffit pas : `_overcore_node_pret` # mesure le PLANCHER, et c'est elle qui décide du chemin de `--auto`. overcore) echo "nodejs" ;; *) echo "" ;; esac } # ----------------------------------------------------------------------------- # _overcore_node_pret — 0 si le `node` de la machine peut faire tourner OverCore. # # 17/10/2026 (lot J2). Le plancher est MESURÉ dans le code d'OverCore, pas # supposé (Robots/overcore, overcore.js + lib/*.js, relevé ce jour) : # · 123 `??` (Node 14.0) et aucun `?.` ni `??=` / `||=` (15) ; # · `fs.rmSync` (Node 14.14) dans lib/base.js : c'est lui qui EFFACE le # dossier privé où vit le fichier d'identifiants de la base. Sous 14.14 il # n'existe pas, l'appel lève dans un `catch` muet, et le fichier qui porte # le mot de passe RESTE — d'où un plancher à 14.14 et non à 14 ; # · `crypto.X509Certificate` (Node 15.6) : seulement `--certificat` (la # console, fermée par défaut) — hors du plancher, dit ici pour ne pas # l'oublier. # ⚠ On ne lit pas `node --version` pour le comparer : on demande à `node` # lui-même d'évaluer un `??` et de trouver `rmSync`. Un Node trop vieux rend # une SyntaxError (code ≠ 0) — la capacité, pas son étiquette. # ⚠ `OVERTCHAT_NODE` désigne un autre binaire (banc : Bootstrap/tests/ # test-deps-overcore.sh) ; sinon le `node` du PATH. # ----------------------------------------------------------------------------- _overcore_node_pret() { local node="${OVERTCHAT_NODE:-}" [[ -n "$node" ]] || node="$(command -v node 2>/dev/null)" || node="" [[ -n "$node" && -x "$node" ]] || return 1 "$node" -e 'process.exit(typeof require("fs").rmSync === "function" ? (0 ?? 1) : 1)' >/dev/null 2>&1 } _req_label() { case "$1" in eggdrop) echo "Eggdrop" ;; irix) echo "IriX" ;; overop) echo "OverOp" ;; anope) echo "Anope" ;; lea) echo "Lea" ;; unrealircd) echo "UnrealIRCd" ;; hybrid) echo "ircd-Hybrid" ;; ircu) echo "ircu" ;; overtchat_ircd) echo "Overtchat-ircd" ;; inspircd) echo "InspIRCd" ;; bahamut) echo "Bahamut" ;; site) echo "Site et panel" ;; overcore) echo "OverCore (Node.js)" ;; *) echo "$1" ;; esac } # 0 si toutes les dépendances système du composant sont satisfaites _req_satisfied() { local comp="$1" g for g in $(_req_for "$comp"); do _pkg_present "$g" || return 1 done return 0 } _req_missing_list() { local comp="$1" g out=() for g in $(_req_for "$comp"); do _pkg_present "$g" || out+=("$(_pkg_name "$g")") done printf '%s' "${out[*]:-}" } # ----------------------------------------------------------------------------- # _check_deps — dépendances minimales du panel # ----------------------------------------------------------------------------- _check_deps() { # Détection seulement si main ne l'a pas déjà faite : la rappeler ici # écrasait le forçage de --user (PRIV_MODE repassait à "sudo"), et le # panel proposait une élévation que l'utilisateur venait de refuser. [[ -n "${PKG_FAMILY:-}" ]] || _pkg_detect [[ -n "${PRIV_USER:-}" ]] || _priv_detect # `tar` et `sha256sum` s'ajoutent à la liste d'origine : le panel extrait # l'archive du site et vérifie les empreintes. Ils manquaient à la # déclaration alors qu'ils étaient déjà utilisés — sur une Debian nue, # l'installation s'arrêtait une fois de plus que nécessaire, et sur un # message qui ne nommait que la dépendance suivante. local missing=() for dep in jq curl git openssl tar sha256sum awk; do command -v "$dep" &>/dev/null || missing+=("$dep") done [[ ${#missing[@]} -eq 0 ]] && return 0 _err "Dépendances manquantes : ${missing[*]}" local real=() m for m in "${missing[@]}"; do real+=("$(_pkg_name "$m")"); done if _priv_can_elevate; then _info "Installation automatique…" if _pkg_install "${missing[@]}"; then _ok "Dépendances de base installées." return 0 fi _die "Installation des dépendances de base échouée." fi _info "Installe-les puis relance :" printf " %b\n\n" "${BOLD}$(_pkg_install_cmd "${real[@]}")${RESET}" exit 1 } # ----------------------------------------------------------------------------- # _panel_deps — scan des paquets requis, par composant # ----------------------------------------------------------------------------- _panel_deps() { while true; do local comp missing lbl prets=0 total=0 # Comptés d'abord : la jauge doit résumer l'écran avant de le détailler. for comp in eggdrop irix anope lea unrealircd hybrid ircu inspircd bahamut overtchat_ircd site; do total=$(( total + 1 )) [[ -z "$(_req_missing_list "$comp")" ]] && prets=$(( prets + 1 )) done _ui_width _ui_title "Dépendances système" "paquets requis par chaque composant" _ui_top _ui_kv "Distribution" "${PKG_FAMILY} ${DIM}(${PKG_MGR:-aucun gestionnaire})${RESET}" _ui_kv "Privilèges" "$(_priv_label)" _ui_kv "Composants prêts" "$(_ui_bar "$prets" "$total")" _ui_head "Détail" for comp in eggdrop irix anope lea unrealircd hybrid ircu inspircd bahamut overtchat_ircd site; do missing=$(_req_missing_list "$comp") lbl=$(_req_label "$comp") if [[ -z "$missing" ]]; then _ui_row " ${lbl}$(_ui_pad "$lbl" 20)$(_ui_badge ok 'complet')" else _ui_row " ${lbl}$(_ui_pad "$lbl" 20)$(_ui_badge warn 'incomplet')" _ui_row " ${ORANGE}↳${RESET} ${DIM}${missing}${RESET}" fi done _ui_head "Actions" if _priv_can_elevate; then _ui_item 1 "Installer toutes les dépendances manquantes" else _ui_item 1 "Installer toutes les dépendances manquantes" "aucune élévation disponible" fi _ui_item 2 "Afficher les commandes d'installation" _ui_item 0 "Retour" _ui_bot local c; _ui_prompt; read -r c || c=0 case "$c" in 1) if _priv_can_elevate; then local all=() for comp in eggdrop irix anope lea unrealircd hybrid ircu inspircd bahamut overtchat_ircd site; do # shellcheck disable=SC2206 all+=( $(_req_for "$comp") ) done _pkg_install "${all[@]}" && _ok "Dépendances installées." || _warn "Installation incomplète." else _warn "Relance le panel en root, ou installe manuellement (choix 2)." fi _pause ;; 2) local all=() g for comp in eggdrop irix anope lea unrealircd hybrid ircu inspircd bahamut overtchat_ircd site; do for g in $(_req_for "$comp"); do _pkg_present "$g" || all+=("$(_pkg_name "$g")") done done if [[ ${#all[@]} -eq 0 ]]; then _ok "Rien à installer." else printf "\n %b\n" "${BOLD}$(_pkg_install_cmd "${all[@]}")${RESET}" fi _pause ;; 0) return ;; *) _warn "Choix invalide" || true ;; esac done } # ----------------------------------------------------------------------------- # ÉTAT D'INSTALLATION # # Source de vérité : les JSON de Config/. Ces fonctions ne parlent jamais au # système de fichiers directement pour décider — sauf pour les dossiers, qui # sont la seule chose que `.install` garantissait auparavant. # ----------------------------------------------------------------------------- _st_json_flag() { local file="$1" filter="$2" [[ -f "$file" ]] || return 1 [[ "$(jq -r "$filter" "$file" 2>/dev/null || echo false)" == "true" ]] } # Les variantes _st_svc_enabled / _st_srv_enabled ont été retirées le # 29/07/2026 : jamais appelées. L'état « activé » se lit là où il sert # réellement, dans _service_status_icon et _server_status_icon, qui ont besoin # de le croiser avec « installé » et « en cours » pour choisir leur pastille. _st_svc_installed() { _st_json_flag "$SERVICES_FILE" ".services.\"$1\".installed"; } _st_srv_installed() { _st_json_flag "$SERVERS_FILE" ".servers.\"$1\".installed"; } _st_irix_installed() { [[ -f "$IRIX_FILE" ]] || return 1 local d d=$(jq -r '.irix.install_dir // empty' "$IRIX_FILE" 2>/dev/null || true) [[ -n "$d" && -d "$d" ]] } _st_folders_ready() { [[ -d "$BASE_DIR/Config" ]]; } _st_any_server_installed() { local s for s in unrealircd hybrid ircu inspircd bahamut overtchat_ircd; do _st_srv_installed "$s" && return 0 done return 1 } _st_count_servers() { [[ -f "$SERVERS_FILE" ]] || { echo 0; return; } jq -r '[.servers|to_entries[]|select(.value.installed==true)]|length' "$SERVERS_FILE" 2>/dev/null || echo 0 } _st_count_services() { [[ -f "$SERVICES_FILE" ]] || { echo 0; return; } jq -r '[.services|to_entries[]|select(.value.installed==true)]|length' "$SERVICES_FILE" 2>/dev/null || echo 0 } # Prérequis LOGIQUES entre composants (indépendants des paquets système). # Retourne 0 si le composant peut être installé, 1 sinon + raison sur stdout. _st_blocker() { case "$1" in irix) _st_svc_installed eggdrop || { echo "Eggdrop doit être installé d'abord — IriX est un module Tcl qu'Eggdrop héberge"; return 1; } ;; # Un OverOp est un Eggdrop de plus, pas un module : il lui faut le même # binaire, les mêmes modules compilés (*.so) et les mêmes répertoires # de messages. Sans Eggdrop, il n'y a rien à lancer. overop) _st_svc_installed eggdrop || { echo "Eggdrop doit être installé d'abord — un OverOp est un Eggdrop de plus"; return 1; } ;; anope|lea) _st_any_server_installed || { echo "aucun serveur IRC installé"; return 1; } ;; esac return 0 } # ----------------------------------------------------------------------------- # RÉCONCILIATION ÉTAT JSON <-> DISQUE # # Les JSON de Config/ sont la source de vérité du verrouillage, mais ils ne # décrivent que ce que CE panel a installé. Sur un déploiement où Eggdrop, # UnrealIRCd ou IriX ont été posés autrement (installirix.sh, compilation à la # main, paquet système), tout restait à installed=false : le panel verrouillait # IriX en réclamant Eggdrop alors qu'Eggdrop tournait déjà. # # On sonde donc le disque et on corrige le JSON avant d'afficher un menu. # Sens unique : on ne passe jamais installed de true à false ici — l'absence # d'un binaire à un endroit attendu peut venir d'un chemin personnalisé, et ce # n'est pas à un scan d'affichage de désinstaller quoi que ce soit. # ----------------------------------------------------------------------------- # Cherche un binaire exécutable parmi plusieurs emplacements candidats. _st_find_bin() { local c for c in "$@"; do [[ -n "$c" && -x "$c" && ! -d "$c" ]] && { printf '%s' "$c"; return 0; } done return 1 } # Emplacements candidats d'un composant. On ne se limite PAS à install_dir : # il vaut souvent null (JSON jamais initialisé) ou pointe vers l'arborescence # que le panel *aurait* utilisée, alors que le composant a été posé ailleurs. _st_candidates() { local comp="$1" dir="${2:-}" c=() case "$comp" in eggdrop) c=( "$dir/eggdrop" "$TARGET_HOME/IriX/eggdrop" "$BASE_DIR/Components/Service/eggdrop/eggdrop" "$(command -v eggdrop 2>/dev/null || true)" ) ;; # « bin/anope » d'abord : c'est le nom de la 2.1, la branche installée # ici. Ne chercher que « bin/services » laissait start/stop/status sans # binaire sur une installation pourtant réussie. anope) c=( "$dir/bin/anope" "$dir/src/build/bin/anope" "$BASE_DIR/Components/Service/anope/bin/anope" "$dir/bin/services" "$dir/src/build/bin/services" "$BASE_DIR/Components/Service/anope/bin/services" ) ;; lea) c=( "$dir/lea" "$dir/bin/lea" "$BASE_DIR/Components/Service/lea/lea" ) ;; unrealircd) c=( "$dir/bin/unrealircd" "$dir/unrealircd" "$BASE_DIR/Components/Serveur/bin/unrealircd/bin/unrealircd" "$TARGET_HOME/unrealircd/bin/unrealircd" ) ;; hybrid) c=( "$dir/bin/ircd" "$dir/ircd" "$BASE_DIR/Components/Serveur/bin/hybrid/bin/ircd" ) ;; ircu) c=( "$dir/bin/ircd" "$dir/ircd" "$BASE_DIR/Components/Serveur/bin/ircu/bin/ircd" ) ;; inspircd) c=( "$dir/bin/inspircd" "$BASE_DIR/Components/Serveur/bin/inspircd/bin/inspircd" ) ;; # Bahamut ne range pas son binaire dans `bin/` : `make install` le # dépose à la racine du répertoire d'installation. bahamut) c=( "$dir/ircd" "$dir/bin/ircd" "$BASE_DIR/Components/Serveur/bin/bahamut/ircd" ) ;; overtchat_ircd) c=( "$dir/bin/overtchat" "$dir/overtchat" "$BASE_DIR/Components/Serveur/bin/overtchat-ircd/bin/overtchat" ) ;; esac printf '%s\n' ${c[@]+"${c[@]}"} } # Enregistre une découverte : met à jour install_dir ET binary, de sorte que # start/stop/status retrouvent le composant là où il est réellement. _st_record_found() { local kind="$1" comp="$2" found="$3" root rel # On remonte au dossier racine plausible : /bin/ ou / root=$(dirname "$found") [[ "$(basename "$root")" == "bin" ]] && root=$(dirname "$root") rel="${found#"$root"/}" if [[ "$kind" == "svc" ]]; then _svc_set "$comp" \ '.services[$s].installed = true | .services[$s].binary = $b | .services[$s].install_dir = $d' \ --arg b "$rel" --arg d "$root" else _srv_set "$comp" \ '.servers[$s].installed = true | .servers[$s].binary = $b | .servers[$s].install_dir = $d' \ --arg b "$rel" --arg d "$root" fi _info "Détecté hors panel : $(_req_label "$comp") → $found" } _st_reconcile_services() { [[ -f "$SERVICES_FILE" ]] || return 0 local svc dir found for svc in eggdrop anope lea; do _st_svc_installed "$svc" && continue dir=$(_svc_get "$svc" "install_dir" 2>/dev/null || true) [[ "$dir" == "null" ]] && dir="" # shellcheck disable=SC2046 found=$(_st_find_bin $(_st_candidates "$svc" "$dir")) || continue _st_record_found svc "$svc" "$found" done } _st_reconcile_servers() { [[ -f "$SERVERS_FILE" ]] || return 0 local srv dir found for srv in unrealircd hybrid ircu inspircd bahamut overtchat_ircd; do _st_srv_installed "$srv" && continue dir=$(_srv_get "$srv" "install_dir" 2>/dev/null || true) [[ "$dir" == "null" ]] && dir="" # shellcheck disable=SC2046 found=$(_st_find_bin $(_st_candidates "$srv" "$dir")) || continue _st_record_found srv "$srv" "$found" done } # Passe complète, silencieuse si rien à corriger. _st_reconcile() { _st_reconcile_servers || true _st_reconcile_services || true } # ----------------------------------------------------------------------------- # MENUS À OPTIONS VERROUILLABLES # # _menu_reset puis _menu_add / _menu_lock pour construire, _menu_has pour # valider la saisie. Une option verrouillée s'affiche grisée avec sa raison : # l'utilisateur voit ce qui existe et ce qui lui manque pour y accéder, au lieu # d'une option qui échoue après coup. # ----------------------------------------------------------------------------- MENU_KEYS=() _menu_reset() { MENU_KEYS=(); } # Les entrées de menu s'affichent DANS un cadre : tout appelant doit avoir # ouvert un _ui_top et le refermer par _ui_bot. _menu_add() { MENU_KEYS+=("$1") _ui_item "$1" "$2" } _menu_lock() { _ui_item "$1" "$2" "$3"; } # _menu_gate # raison vide => option disponible _menu_gate() { if [[ -z "${3:-}" ]]; then _menu_add "$1" "$2"; else _menu_lock "$1" "$2" "$3"; fi } _menu_has() { local k for k in ${MENU_KEYS[@]+"${MENU_KEYS[@]}"}; do [[ "$k" == "$1" ]] && return 0 done return 1 } # Raison de verrouillage d'un composant : prérequis logique, puis paquets. _menu_reason() { local comp="$1" blocker missing blocker=$(_st_blocker "$comp") || { printf '%s' "$blocker"; return; } missing=$(_req_missing_list "$comp") if [[ -n "$missing" ]]; then if _priv_can_elevate; then printf 'paquets manquants — installables depuis le menu Dépendances' else printf 'paquets manquants : %s' "$missing" fi return fi printf '' } # ============================================================================= # SHA256 — INTÉGRITÉ # ============================================================================= _sha256() { local file="$1" [[ -f "$file" ]] || { _err "Fichier absent pour hash : $file"; return 1; } if command -v sha256sum &>/dev/null; then sha256sum "$file" | awk '{print $1}' elif command -v openssl &>/dev/null; then openssl dgst -sha256 "$file" | awk '{print $2}' else _die "Aucun outil SHA256 (sha256sum / openssl)" fi } # ════════════════════════════════════════════════════════════════ # CE QU'ON HACHE N'EST PAS TOUJOURS LE FICHIER ENTIER — 25/08/2026. # # ⚠⚠ `access.json` porte `last_login`, écrit à CHAQUE connexion au panel — et # c'est la seule de ses six écritures qui ne recalculait pas l'empreinte. La # référence devenait donc fausse après chaque ouverture de session, et la # vérification annonçait « HASH INVALIDE — fichier corrompu ! » sur une # installation parfaitement saine. Trouvé par SerVuS en posant les références. # # ⚠ Une alarme toujours rouge est une alarme que plus personne ne lit. C'est le # pire des deux mondes : elle coûte l'attention et ne protège rien. # # ⚠⚠ ON N'A PAS RECALCULÉ L'EMPREINTE APRÈS `last_login`, et le choix est # délibéré : cela aurait ouvert un chemin de BLANCHIMENT. Qui parviendrait à # s'ajouter un compte n'aurait eu qu'à se connecter pour que son altération # devienne la nouvelle référence. On retire donc l'horodatage de ce qu'on # hache : l'empreinte continue de protéger ce qu'elle doit — utilisateurs, # grades, permissions, empreintes de mots de passe — et cesse de réagir à une # date. # # ⚠ La projection est la MÊME à la pose et à la vérification, parce que toutes # deux passent par ici. Deux projections différentes, et le contrôle rougirait # à tous les coups. # # ⚠ Les autres fichiers gardent `_sha256` sur le fichier brut : leurs # empreintes déjà posées restent valides. Seule celle d'`access` doit être # reposée une fois. _integrity_hash() { local file="$1" if [[ "$file" == "$ACCESS_FILE" ]] && command -v jq &>/dev/null; then local proj # ⚠ `del` sur un chemin absent ne lève pas : un fichier sans # `last_login` — celui d'une première pose — donne le même résultat. proj=$(jq -S 'del(.users[]?.last_login)' "$file" 2>/dev/null) || proj="" if [[ -n "$proj" ]]; then printf '%s' "$proj" | sha256sum | awk '{print $1}' return 0 fi # ⚠ Repli délibéré : si `jq` échoue, on hache le fichier ENTIER plutôt # que de rendre une empreinte vide. Une empreinte fausse se voit ; une # empreinte vide passerait pour un contrôle réussi. fi _sha256 "$file" } _sha256_store() { local file="$1" json_file="${2:-$INIT_BASE}" key="${3:-bootstrap}" local hash ts hash=$(_integrity_hash "$file") || return 1 ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" _jq_update "$json_file" \ --arg h "$hash" --arg ts "$ts" --arg f "$file" --arg k "$key" \ '.[$k] = {"hash_algo":"sha256","expected_hash":$h,"file":$f,"last_verified":$ts,"verified":true}' # _log et non _ok : _sha256_store est appelée à chaque écriture JSON, ce # qui noyait la sortie du panel sous une ligne de hash par changement d'état. _log "SHA256 [$key] : $hash" } _sha256_verify() { local file="$1" json_file="${2:-$INIT_BASE}" key="${3:-bootstrap}" local stored current stored=$(jq -r --arg k "$key" '.[$k].expected_hash // empty' "$json_file" 2>/dev/null || true) # ⚠⚠ ELLE ENREGISTRAIT L'ÉTAT EN PLACE — point 39, corrigé le 20/08/2026. # # Quand la référence manquait, cette fonction appelait `_sha256_store` et # adoptait le fichier tel qu'il était, quel qu'il soit. Le passage suivant # le déclarait alors sain. **Une détection qui ne détecte pas est pire que # pas de détection : elle rassure.** # # Et ce n'était pas théorique : la référence vivait dans `/tmp`, elle avait # déjà disparu, et le panel aurait ré-enregistré les cinq fichiers sans que # rien ne le distingue d'un contrôle réussi. # # ⚠ On REFUSE désormais, et on le dit. L'enregistrement légitime — celui du # premier lancement — passe par `_sha256_store`, appelée à chaque écriture # de configuration : il n'y a donc rien à rattraper ici. if [[ -z "$stored" || "$stored" == "null" ]]; then _err_f "AUCUNE RÉFÉRENCE [%s] — impossible de vérifier quoi que ce soit." "$key" printf " ${DIM}%s${RESET}\n" \ "L'empreinte de référence est absente. Elle n'est PAS ré-enregistrée :" \ "adopter l'état en place reviendrait à valider une éventuelle altération." \ "Fichier concerné : $file" \ "Reposer une référence : régler ce fichier depuis le panel, ou « --reset »." return 1 fi # ⚠ La MÊME projection qu'à la pose — voir `_integrity_hash`. Hacher ici le # fichier entier ferait rougir `access` à chaque connexion. current=$(_integrity_hash "$file") || return 2 if [[ "$stored" == "$current" ]]; then _ok_f "SHA256 OK [%s]" "$key" _jq_update "$json_file" \ --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" --arg k "$key" \ '.[$k].last_verified = $ts | .[$k].verified = true' return 0 else _err_f "HASH INVALIDE [%s] — fichier corrompu !" "$key" printf "Attendu : ${GREEN}%s${RESET}\n" "$stored" printf "Obtenu : ${RED}%s${RESET}\n" "$current" _jq_update "$json_file" --arg k "$key" '.[$k].verified = false' return 2 fi } # safe_encrypt — SUPPRIMÉE le 29/07/2026. # # Elle n'avait qu'un appelant, _run_bootstrap, elle-même retirée le même jour : # le flux qui téléchargeait ce script depuis GitHub puis faisait `exec` dessus # a été abandonné parce qu'il n'atteignait jamais le panel au premier # lancement, et que son « contrôle d'intégrité » enregistrait le hash du # fichier qu'il venait lui-même de télécharger — il ne validait donc rien. # # Ses deux modes utiles survivent ailleurs : _sha256_store et _sha256_verify # sont appelées directement, et la mise à jour des fichiers passe désormais # par le module _upd_* et son menu dédié. # ============================================================================= # JSON — UTILITAIRES # ============================================================================= _jq_update() { local file="$1"; shift local tmp; tmp=$(mktemp) if jq "$@" "$file" > "$tmp" 2>/dev/null; then mv "$tmp" "$file" else rm -f "$tmp"; _die "Erreur jq sur : $file" fi } _jq_read() { jq -r "${1}" "${2:-$INIT_BASE}" 2>/dev/null || echo "${3:-}"; } # ----------------------------------------------------------------------------- # _version_installee — LA VERSION SE LIT, ELLE NE SE RECOPIE PAS. # # Elle a longtemps ete FIGEE dans `state.json` a sa premiere ecriture, et # `_merge_configs` ne remplace jamais une chaine deja posee : l'ecran d'accueil # annoncait donc la version du JOUR DE L'INSTALLATION, pour toujours. # Mesure le 26/08/2026 sur la production : 4.19.30 affiche face a un VERSION a # 4.23.2 — perime de quatre versions, et personne ne pouvait le voir. # # ⚠⚠ ELLE LIT `$BASE_DIR/VERSION`, PAS `$VERSION`. # # `$VERSION` est derive du chemin du SCRIPT (`_read_version`, plus haut). Chez un # tiers, l'installateur se telecharge SEUL : il n'a aucun `VERSION` a cote de lui # et retombe sur le repli `4.0.0`. Afficher `$VERSION` ici remplacerait donc un # mensonge par un autre — celui-la meme plus difficile a voir, puisqu'il serait # juste sur le poste de developpement. C'est `$BASE_DIR/VERSION`, celui de # l'INSTALLATION, qui dit la verite partout. # # ⚠ « N/A » tant qu'il n'y a rien a lire : avant la pose de l'arborescence, il # n'y a pas de version installee, et l'ecrire serait encore une invention. _version_installee() { local f="$BASE_DIR/VERSION" v [ -r "$f" ] || { printf 'N/A'; return; } v="$(tr -d '[:space:]' < "$f" 2>/dev/null)" case "$v" in [0-9]*.[0-9]*) printf '%s' "$v" ;; *) printf 'N/A' ;; esac } # ----------------------------------------------------------------------------- # _write_default_config — gabarit de la configuration initiale. # # ATTENTION : le programme jq ci-dessous est écrit entre quotes SIMPLES. Toute # apostrophe ajoutée à l'intérieur — y compris dans un commentaire jq — referme # la chaîne, et bash tente alors d'exécuter le JSON comme du code shell. Les # remarques sur ce bloc se placent donc ici, au-dessus de la fonction. # # Builder/, Builder/Anope, Builder/Overhub et Installer/ ont été retirés du # gabarit le 29/07/2026, en même temps que les dossiers correspondants du # dépôt. Ils ne contenaient rien : chaque installation les créait, ils # restaient vides, et le rapport les affichait « présents » — des dossiers de # décor que personne ne remplissait. # # Les modules Tcl sont désormais réclamés sous IriX/cmds/, leur emplacement # réel, et non sous Components/Service/lib/Tcl/Stable/ où dormait une copie # incomplète. Seul IriX-std.tcl garde son ancien chemin : c'est le seul module # qui n'ait aucun homologue dans IriX/cmds/. # # « Bootstrap/installirix » a quitté la liste `import` le 29/07/2026. Ce champ # alimente les fichiers surveillés par la mise à jour, et ce fichier n'existait # NULLE PART : ni dans le dépôt, ni dans une arborescence installée. Chaque # vérification demandait donc une URL inexistante et rapportait une erreur # réseau — un rapport rouge en permanence, où les vraies pannes se noyaient. # # L'installateur qu'il désignait est de toute façon périmé : il génère une # configuration Eggdrop qui charge un unique « cmds/irix.tcl », alors qu'IriX # est modulaire depuis longtemps — la conf réelle charge IriX-sql.tcl, qui # source à son tour dix-sept fichiers voisins. # ----------------------------------------------------------------------------- _write_default_config() { # `--arg home` reçoit $TARGET_HOME et non $HOME. Sous sudo, $HOME vaut # /root : toute l'arborescence décrite ci-dessous partait donc dans /root — # invisible pour l'exploitant, inutilisable une fois repassé en compte # normal. C'est le piège que `_resolve_base_home` documente avoir corrigé # pour $BASE_DIR ; ce bloc-ci l'avait gardé, si bien que les deux racines # divergeaient dès qu'on lançait avec sudo — et c'est celle-ci que # `_create_folders` suit. jq -n \ --arg lang "$LANG_CODE" \ --arg home "$TARGET_HOME" \ --arg init "$INIT_BASE" \ --arg base "$BASE_DIR" \ \ --arg path0 "${BASH_SOURCE[0]:-$0}" \ --arg projet "$PROJET_NOM" \ ' # Racine de linstallation, batie sur le nom du projet et non sur une # constante : deux installations sur la meme machine doivent pouvoir # coexister sans se marcher dessus. Le nom est valide bien plus haut, # dans _resolve_project_name, avant que quoi que ce soit nen derive. # (Sans apostrophe dans ce commentaire : voir plus bas, elles referment # la chaine qui porte tout ce bloc.) { # La cle `version` a ete RETIREE le 26/08/2026 : un fichier detat # qui recopie le numero du projet se perime, et cest ce quil a fait # pendant des semaines. Lecran daccueil le derive desormais de # `$BASE_DIR/VERSION`. Mesure avant de retirer : aucun lecteur sur # state.default.json, un seul sur state.json, len-tete du menu. # (Sans apostrophe ici non plus : elles refermeraient la chaine.) install: false, language: $lang, projet: $projet, folders: { overtchat: { path: ($home+"/"+$projet), created: false }, bootstrap: { path: ($home+"/"+$projet+"/Bootstrap"), created: false }, irix: { path: ($home+"/"+$projet+"/IriX"), created: false }, components: { home: { path: ($home+"/"+$projet+"/Components"), created: false }, service: { home: { path: ($home+"/"+$projet+"/Components/Service"), created: false }, bin: { path: ($home+"/"+$projet+"/Components/Service/bin"), created: false }, conf: { path: ($home+"/"+$projet+"/Components/Service/conf"), created: false }, lib: { path: ($home+"/"+$projet+"/Components/Service/lib"), created: false } }, serveur: { home: { path: ($home+"/"+$projet+"/Components/Serveur"), created: false }, bin: { path: ($home+"/"+$projet+"/Components/Serveur/bin"), created: false }, conf: { path: ($home+"/"+$projet+"/Components/Serveur/conf"), created: false }, lib: { path: ($home+"/"+$projet+"/Components/Serveur/lib"), created: false } } }, config: { path: ($home+"/"+$projet+"/Config"), created: false }, servers: { path: ($home+"/"+$projet+"/Servers"), created: false }, runtime: { home: { path: ($home+"/"+$projet+"/Runtime"), created: false }, logs: { path: ($home+"/"+$projet+"/Runtime/Logs"), created: false } } }, git: { repo: "SerVuS033/Overtchat", branch: "main", brutegit: "https://service-overtchat.hd.free.fr/dl", # le dépôt GitHub est privé : 404 sur chaque fichier api: "https://api.github.com/repos/SerVuS033/Overtchat/contents", setup: "Bootstrap/overtchat-setup.sh", crypt: "shc -sha256 > +sha512", compile: "gcc -o overtchat-setup overtchat-setup.c -lssl -lcrypto -D_LARGEFILE64_SOURCE -DVERSION=\\\"$VERSION\\\"", irix: { default_mode: "sql", # Alleger les modules au deploiement : retirer commentaires et # lignes vides des .tcl installes. Le depot, lui, garde tout — # les commentaires portent la memoire des incidents, pas la # description du code. 40 % de lignes en moins sur la machine. # Mettre a false pour installer les fichiers complets ; la # variable OVERTCHAT_SANS_DEPOUILLE=1 fait de meme sans toucher # a la configuration. # (Sans apostrophe : voir plus haut, elles referment la chaine.) depouiller: true, files: [ { repo: "IriX/cmds/IriX-src.conf", local: "IriX-src.conf", role: "module_sql" }, # console-tls.conf est source par irix.conf (point 127), AVEC garde : # absent, IriX demarre sans console TLS. Il se deploie quand meme. { repo: "IriX/cmds/console-tls.conf", local: "console-tls.conf", role: "module_sql" }, { repo: "IriX/cmds/ecoute-sure.conf", local: "ecoute-sure.conf", role: "module_sql" }, { repo: "IriX/cmds/IriX-sql.tcl", local: "IriX-sql.tcl", role: "entry_sql" }, # irix-proto.tcl a manqué à cette liste du 29/07 au 30/07/2026, et # une installation neuve ne demarrait pas : IriX-sql.tcl le source # SANS GARDE a sa ligne 47, si bien que Eggdrop mourait au # chargement sur un fichier absent. Toute la composition S2S vit # dedans : le fichier le moins facultatif de la liste. # (Sans apostrophe : voir plus haut, elles referment la chaine.) { repo: "IriX/cmds/irix-proto.tcl", local: "irix-proto.tcl", role: "module_sql" }, { repo: "IriX/cmds/IriX-table.tcl", local: "IriX-table.tcl", role: "module_sql" }, { repo: "IriX/cmds/IriX-binds.tcl", local: "IriX-binds.tcl", role: "module_sql" }, { repo: "IriX/cmds/IriX-svc.tcl", local: "IriX-svc.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-partyline.tcl", local: "irix-partyline.tcl", role: "module_sql" }, { repo: "IriX/cmds/IriX-sql-IA.tcl", local: "IriX-sql-IA.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-register.tcl", local: "irix-register.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-reset-ircop.tcl", local: "irix-reset-ircop.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-oper.tcl", local: "irix-oper.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-auth.tcl", local: "irix-auth.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-nickguard.tcl", local: "irix-nickguard.tcl", role: "module_sql" }, # irix-nickexpire.tcl et irix-chatalerte.tcl ont manqué à cette liste # du 30/07 au 31/07/2026 — meme defaut que irix-proto.tcl plus haut, # et meme consequence : IriX-sql.tcl les source SANS GARDE a ses # lignes 462 et 470, donc une installation neuve mourait au # chargement. Tout module ajoute a IriX-sql.tcl doit entrer ici DANS # LE MEME COMMIT, sans quoi le depot fonctionne et pas une installation. { repo: "IriX/cmds/irix-nickexpire.tcl", local: "irix-nickexpire.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-chatalerte.tcl", local: "irix-chatalerte.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-online.tcl", local: "irix-online.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-modq.tcl", local: "irix-modq.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-operjoin.tcl", local: "irix-operjoin.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-modtrace.tcl", local: "irix-modtrace.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-chanbans.tcl", local: "irix-chanbans.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-chanq.tcl", local: "irix-chanq.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-logrot.tcl", local: "irix-logrot.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-botreg.tcl", local: "irix-botreg.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-mandat.tcl", local: "irix-mandat.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-botnet.tcl", local: "irix-botnet.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-alerte.tcl", local: "irix-alerte.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-chanaccess.tcl", local: "irix-chanaccess.tcl", role: "module_sql" }, { repo: "IriX/cmds/irix-edition.tcl", local: "irix-edition.tcl", role: "module_sql" }, { repo: "Components/Service/lib/Tcl/Stable/IriX-std.tcl", local: "IriX-std.tcl", role: "entry_std" } ], modes: { sql: { entry: "IriX-sql.tcl", modules: ["IriX-src.conf","console-tls.conf","ecoute-sure.conf","irix-proto.tcl","IriX-table.tcl","irix-partyline.tcl","IriX-binds.tcl","IriX-svc.tcl","IriX-sql-IA.tcl","irix-register.tcl","irix-reset-ircop.tcl","irix-oper.tcl","irix-auth.tcl","irix-nickguard.tcl","irix-nickexpire.tcl","irix-chatalerte.tcl","irix-online.tcl","irix-modq.tcl","irix-operjoin.tcl","irix-modtrace.tcl","irix-chanbans.tcl","irix-chanq.tcl","irix-logrot.tcl","irix-botreg.tcl","irix-mandat.tcl","irix-botnet.tcl","irix-alerte.tcl","irix-chanaccess.tcl","irix-edition.tcl"], label: "SQL (complet)" }, std: { entry: "IriX-std.tcl", modules: [], label: "Standard (sans SQL)" } } }, # Les robots de prêt — cahier Markdown/PRET-ROBOT.md, §3 et §11. # # Liste SÉPARÉE de git.irix.files, et le choix est délibéré : ces # fichiers ne sont pas des modules de IriX. Les inscrire dans la # liste ci-dessus les déploierait dans cmds/, donc chargés PAR # IriX — exactement le couplage que le §4 cherche à couper, un # robot en panne ne devant jamais remonter comme un défaut de IriX. # # Le banc test-overop.tcl reste HORS de cette liste : il vit dans # le dépôt, pas dans une installation, comme IriX/tests et # Web/tests que _upd_exclu écarte pour la même raison. # # (Sans apostrophe dans ce commentaire : voir plus haut, elles # referment la chaine qui porte tout ce bloc.) overop: { files: [ { repo: "Robots/overop/overop.tcl", local: "overop.tcl", role: "script" }, { repo: "Robots/overop/overop.conf.exemple", local: "overop.conf.exemple", role: "modele" } ] } }, import: [ "Bootstrap/overtchat-setup.sh" ], export: { INIT_BASE: $init, INIT_PATH: $path0, BASE_DIR: $base, INIT_LANG: $lang }, bootstrap: { hash_algo:"sha256", expected_hash:null, file:null, last_verified:null, verified:false } }' > "$INIT_DEFAULT" # ⚠ Le gabarit prend le MÊME mode que l'état, et pour la même raison. # Constaté le 20/08/2026 : le `chmod 600` du point 39 ne portait que sur # `INIT_BASE`, si bien que son jumeau restait en 644 — et il porte la même # structure, les mêmes chemins, la même arborescence. Deux fichiers écrits # par la même fonction n'ont aucune raison d'avoir deux protections. chmod 600 "$INIT_DEFAULT" 2>/dev/null || true } _merge_configs() { local tmp; tmp=$(mktemp) jq -s ' def deep_merge(base; patch): reduce (patch | to_entries[]) as $e (base; if .[$e.key] == null then .[$e.key] = $e.value elif (.[$e.key]|type)=="object" and ($e.value|type)=="object" then .[$e.key] = deep_merge(.[$e.key]; $e.value) else . end); deep_merge(.[0]; .[1]) # MIGRATION, 26/08/2026 : les etats poses avant cette date portent une # cle `version` figee au jour de leur PREMIERE ecriture. deep_merge ne # la remplace jamais, sa branche `else . end` conservant toute chaine # deja posee : elle ne peut donc que se perimer, et elle la fait # pendant des semaines sans que rien ne le dise. # # Cest ici quon la retire, parce que cest le seul endroit ou tout etat # DEJA EN SERVICE repasse. Une installation neuve, elle, ne la recoit # plus du tout : _write_default_config ne lecrit plus. # (Sans apostrophe : elles refermeraient la chaine qui porte ce bloc.) | del(.version) # MIGRATION, 23/09/2026 : Runtime/cmds_irix.json nest plus distribue # (decision de SerVuS, point 82 : aucun code ne le lisait). deep_merge # ne remplace JAMAIS un tableau deja pose, si bien quun etat ancien # garderait cette entree, la demanderait a chaque synchronisation, # prendrait un 404 et declarerait la synchronisation incomplete. On la # retire donc ici, au seul endroit ou tout etat en service repasse. | if (.git.irix.files | type) == "array" then .git.irix.files |= map(select(.repo != "Runtime/cmds_irix.json")) else . end ' "$INIT_BASE" "$INIT_DEFAULT" > "$tmp" && mv "$tmp" "$INIT_BASE" } # ============================================================================= # CRÉATION DOSSIERS # ============================================================================= _create_folders() { _section "Création des dossiers" local all_ok=true count=0 rel while read -r path; do [[ -z "$path" ]] && continue count=$((count + 1)) # Le chemin RELATIF, et non le seul basename : l'arborescence contient # deux « bin », deux « conf » et deux « lib », un jeu par composant. # Affichés par leur dernier segment, ils donnaient six lignes # identiques, sans moyen de savoir laquelle avait échoué. rel="${path#"$BASE_DIR"}"; rel="${rel#/}"; [[ -z "$rel" ]] && rel="${BASE_DIR##*/}" if [[ -d "$path" ]] || mkdir -p "$path" 2>/dev/null; then _ok "$rel" _jq_update "$INIT_BASE" --arg p "$path" \ '(.. | objects | select(.path? == $p)).created = true' else _err "Impossible : $path"; all_ok=false _jq_update "$INIT_BASE" --arg p "$path" \ '(.. | objects | select(.path? == $p)).created = false' fi done < <(jq -r '.. | objects | select(has("path") and (.path|type=="string")) | .path' "$INIT_BASE" | sort -u) # Un jq muet (JSON corrompu, clé .path absente) ne faisait entrer dans # aucune itération : all_ok restait true et .install passait à true sans # qu'un seul dossier existe. Au lancement suivant, le panel démarrait sur # une arborescence fantôme. if (( count == 0 )); then _err_f "Aucun chemin trouvé dans %s — arborescence non créée." "$INIT_BASE" _warn "Vérifie le fichier de configuration, ou lance « Réinitialiser configuration »." return 1 fi # Contrôle de réalité : les dossiers indispensables doivent exister. local d for d in "$BASE_DIR" "$BASE_DIR/Config" "$BASE_DIR/Runtime/Logs"; do [[ -d "$d" ]] || { _err "Dossier requis absent : $d"; all_ok=false; } done if $all_ok; then _jq_update "$INIT_BASE" '.install = true' _ok_f "Arborescence validée (%s dossiers)" "$count" return 0 fi _warn "Certains dossiers ont échoué — installation non validée." return 1 } _export_vars() { while IFS="=" read -r key value; do [[ "$key" =~ ^[A-Z_][A-Z0-9_]*$ ]] || continue case "$key" in INIT_BASE|PATH|HOME|PWD|SHELL|UID) continue;; esac printf -v "$key" '%s' "$value" && export "${key:-}" done < <(jq -r '.export // {} | to_entries[] | "\(.key)=\(.value)"' "$INIT_BASE") } # ----------------------------------------------------------------------------- # L'EMPREINTE PUBLIÉE — point 26 de Markdown/CHANTIERS.md, phase 2 # # Le site publie une empreinte SHA-256 pour tout ce qu'il distribue, à # `${brutegit}/manifeste`. Jusqu'au 16/08/2026, UNE SEULE de ces empreintes # était lue par un client : celle de l'archive du site, dans `_site_install`. # Les cinquante autres étaient calculées, servies, et consultées par personne. # # Pire, ce que faisaient `_irix_sync_source` et `_overop_sync_source` n'était # pas une vérification mais son contraire : elles ENREGISTRAIENT l'empreinte du # fichier qu'elles venaient de recevoir. C'est mot pour mot ce que les trois # commentaires-stèles de ce fichier reprochent à `safe_encrypt`, supprimée le # 29/07/2026 pour cette raison. Le précédent n'avait pas été évité : il avait # été déplacé. # # ⚠⚠ CE QUE CELA GARANTIT, ET CE QUE CELA NE GARANTIT PAS. # L'empreinte vient du même serveur que le fichier. Elle attrape donc une # coupure de transfert, un cache qui sert une version périmée, un miroir qui # répond 200 avec une page d'erreur — pas un serveur compromis, qui servirait # les deux. Seule une signature avec une clé hors serveur y répondrait, et # elle n'est pas au programme : voir le point 26, qui dit pourquoi. # ----------------------------------------------------------------------------- _brutegit() { jq -r '.git.brutegit // empty' "$INIT_BASE" 2>/dev/null; } # Le manifeste, téléchargé UNE FOIS pour toute la durée du script. # ⚠ Rend 1 sans un mot si le site est injoignable : l'absence de manifeste ne # doit jamais faire échouer une installation — voir `_download`. _manifeste_fichier() { # 🔴 Dans le dossier PRIVÉ du lancement, plus sous un nom devinable de /tmp # (audit #25, 29/09/2026) : un manifeste posé là d'avance aurait été cru. local d f d="$(_ovt_tmp)" || return 1 f="$d/manifeste.json" if [[ ! -s "$f" ]]; then local base; base=$(_brutegit) [[ -n "$base" ]] || return 1 curl -fsSL --max-time 20 "${base}/manifeste" -o "$f" 2>/dev/null || { rm -f "$f"; return 1; } fi # ⚠⚠ ON VALIDE À CHAQUE FOIS, PAS SEULEMENT APRÈS TÉLÉCHARGEMENT. # # La première version ne contrôlait le JSON qu'au moment de le récupérer, # et rendait ensuite le cache sur le seul critère « non vide ». Un fichier # corrompu — disque plein pendant l'écriture, page d'erreur servie en 200 — # était donc accepté pour toute la durée du script, et `_manifeste_sha256` # rendait une empreinte vide **avec un code de succès** : tous les # téléchargements suivants seraient passés en « SANS empreinte publiée », # sans que rien ne dise pourquoi. # # ⚠ Trouvé par `Bootstrap/tests/test-integrite.sh` le 16/08/2026, dans # l'heure qui a suivi son écriture. Un fichier non vide ne prouve rien. if ! jq -e '.fichiers' "$f" >/dev/null 2>&1; then rm -f "$f" return 1 fi printf '%s' "$f" } # L'empreinte publiée pour un chemin du dépôt, ou vide. # # ⚠ Le manifeste est indexé par CLÉ d'inventaire (`setup`, `irix/IriX-sql.tcl`), # pas par chemin — mais chaque entrée porte son `chemin`. On cherche donc sur la # valeur, jamais sur la clé : `Bootstrap/overtchat-setup.sh` vit sous la clé # `setup`, et une recherche par clé ne le trouverait pas. _manifeste_sha256() { local rel="$1" f trouve f=$(_manifeste_fichier) || return 1 trouve=$(jq -r --arg c "$rel" \ '.fichiers | to_entries[] | select(.value.chemin == $c) | .value.sha256' \ "$f" 2>/dev/null | head -1) if [[ -n "$trouve" ]]; then printf '%s' "$trouve"; return 0; fi # ⚠⚠ EN DERNIER RESSORT, PAR LE NOM DE FICHIER — parce que le site résout # ainsi, et qu'autrement la vérification serait muette là où elle sert le # plus. # # Les modules d'IriX sont posés À PLAT par `_irix_sync_source` : # `IriX/irix-alerte.tcl` sur le disque, quand le manifeste les indexe sous # `IriX/cmds/irix-alerte.tcl`. La recherche par chemin rendait donc vide # pour **tous les modules du bot** — c'est-à-dire pour l'essentiel de ce # que la mise à jour touche —, et l'on retombait sur la comparaison # circulaire avec un simple avertissement. Mesuré le 16/08/2026. # # Le téléchargement, lui, aboutit : `distrib_cle_depuis_chemin()` côté site # résout en dernier ressort par `basename`. On fait donc ici exactement ce # que le serveur a fait pour choisir quoi servir — sans quoi les deux # extrémités ne parlent pas du même fichier. # # ⚠ ET SEULEMENT SI LE NOM EST UNIQUE dans le manifeste. Deux entrées de # même nom rendraient l'empreinte ambiguë : on préfère alors ne rien # affirmer, et le repli le dira. local base n base="${rel##*/}" n=$(jq -r --arg b "$base" \ '[.fichiers[] | select((.chemin | split("/") | last) == $b)] | length' \ "$f" 2>/dev/null) [[ "$n" == "1" ]] || return 0 jq -r --arg b "$base" \ '.fichiers[] | select((.chemin | split("/") | last) == $b) | .sha256' \ "$f" 2>/dev/null | head -1 } _download() { local url="$1" dest="$2" local tmp; tmp=$(mktemp) _info "Téléchargement : $(basename "$url")" local http_code http_code=$(curl -sSL --retry 3 --retry-delay 2 \ -H "Cache-Control: no-cache" \ -w '%{http_code}' \ "${url}?nocache=$(date +%s)" -o "$tmp" 2>/dev/null) if [[ "$http_code" != "200" || ! -s "$tmp" ]]; then rm -f "$tmp" _err "Échec : $url (HTTP ${http_code:-inconnu})" return 1 fi # ── L'empreinte, AVANT de poser le fichier ──────────────────────────── # # ⚠⚠ ICI, ET NULLE PART AILLEURS. C'est le dernier instant où le fichier # est encore BRUT. Juste après, `_irix_sync_source` fait passer les `.tcl` # par le dépouilleur, qui retire commentaires et lignes vides : le fichier # posé sur le disque fait une fraction de sa taille d'origine et porte une # empreinte tout autre. Vérifier plus loin rejetterait 100 % des modules # sains. Et comme le dépouillement dépend de la présence de `tclsh`, deux # installations légitimes n'auraient même pas la même empreinte sur disque. # # ⚠ Les tailles exactes ne sont plus écrites ici : elles l'étaient, sur # `irix-alerte.tcl`, et elles annonçaient 19 261 octets pour un fichier qui # en faisait 28 996 le 19/08/2026 — la moitié de moins que la réalité. Un # chiffre écrit à la main dans un commentaire ne survit pas à la séance qui # l'écrit. `wc -c` le donne, et lui ne se périme pas. local rel base attendu obtenu base=$(_brutegit) rel="$url" [[ -n "$base" && "$url" == "$base"/* ]] && rel="${url#"$base"/}" attendu=$(_manifeste_sha256 "$rel" 2>/dev/null || true) if [[ -n "$attendu" ]]; then obtenu=$(sha256sum "$tmp" 2>/dev/null | awk '{print $1}') if [[ "$obtenu" != "$attendu" ]]; then rm -f "$tmp" _err_f "Empreinte incorrecte — fichier refusé : %s" "$rel" _err_f " attendu : %s" "$attendu" _err " obtenu : ${obtenu:-vide}" return 1 fi mv "$tmp" "$dest" _ok "$(basename "$dest") — empreinte vérifiée" return 0 fi # ⚠ AUCUNE EMPREINTE PUBLIÉE : ON POSE, ET ON LE DIT. # # Refuser ici casserait tout ce que le manifeste ne couvre pas — une # installation hors ligne, un site injoignable au mauvais moment, un # composant tiers. Le manifeste ne connaît ni `Servers/`, ni `Builder/` : # mesuré, zéro entrée. Un garde-fou qui transforme un oubli d'inventaire en # panne d'installation est pire que le défaut qu'il prétend couvrir. # # ⚠ Mais il ne se tait pas : « posé » n'est pas « vérifié », et la ligne # doit dire lequel des deux a eu lieu. C'est précisément ce que l'ancienne # coche verte laissait croire. mv "$tmp" "$dest" _warn "$(basename "$dest") — posé SANS empreinte publiée" } # _run_bootstrap — SUPPRIMÉE le 29/07/2026, avec safe_encrypt qu'elle seule # appelait. Plus rien ne l'invoquait depuis que main() entre directement dans # le panel au premier lancement ; voir le commentaire de main() pour le détail # de ce changement de flux. # ============================================================================= # RAPPORT D'ÉTAT # ============================================================================= # ----------------------------------------------------------------------------- # _status_report — tableau de bord # # L'ancienne version listait les dossiers triés par le DERNIER segment de leur # chemin. Sur cette arborescence, cela donnait « bin, bin, conf, conf, lib, # lib » : six lignes indiscernables, alors que ces dossiers appartiennent à # deux composants différents. On trie désormais sur le chemin COMPLET et on # l'affiche relatif à la racine, ce qui rétablit l'ordre hiérarchique. # # Le rapport ne se limite plus à l'arborescence : il répond aussi à « qu'est-ce # qui tourne » et « reste-t-il de la place », les deux questions qu'on se pose # avant d'installer quoi que ce soit. # ----------------------------------------------------------------------------- _status_report() { _ui_width _ui_title "Rapport d'état système" "$(date '+%d/%m/%Y %H:%M') · $(hostname 2>/dev/null || echo '?')" local n_srv n_svc n_srv=$(_st_count_servers) n_svc=$(_st_count_services) _ui_top _ui_row "${BOLD}Installation${RESET}" _ui_mid # ⚠ Derivee du fichier VERSION, plus lue dans l'etat : voir # `_version_installee`. ⚠⚠ Et le repli ne pouvait PAS venir de `_jq_read` — # il ne joue que si jq sort en code non nul, alors qu'une cle ABSENTE fait # sortir jq en 0 en imprimant « null ». Retirer la cle sans toucher cette # ligne aurait affiche « null » a l'ecran d'accueil. _ui_kv "Version" "$(_version_installee)" _ui_kv "Racine" "$BASE_DIR" _ui_kv "Arborescence" "$([[ "$(_jq_read '.install' "$INIT_BASE" "false")" == "true" ]] \ && _ui_badge ok 'prête' || _ui_badge off 'absente')" _ui_kv "Journal" "$LOG_FILE" _ui_head "Composants" _ui_kv "Serveurs IRC installés" "$(_ui_bar "$n_srv" 4)" _ui_kv "Services installés" "$(_ui_bar "$n_svc" 4)" # Les identifiants sont ceux de servers.json / services.json — « overtchat » # au lieu de « overtchat_ircd » faisait lire une entrée inexistante, dont # tous les champs valaient null : le serveur s'affichait « désactivé » alors # qu'il n'était simplement pas installé. local id nom for id in unrealircd hybrid ircu inspircd bahamut overtchat_ircd; do nom=$(_srv_get "$id" "name" 2>/dev/null || echo "$id") [[ -z "$nom" || "$nom" == "null" ]] && nom="$id" _ui_row " ${nom}$(_ui_pad "$nom" 22)$(_server_status_icon "$id" 2>/dev/null || _ui_badge off)" done for id in eggdrop anope lea; do nom=$(_svc_get "$id" "name" 2>/dev/null || echo "$id") [[ -z "$nom" || "$nom" == "null" ]] && nom="$id" _ui_row " ${nom}$(_ui_pad "$nom" 22)$(_service_status_icon "$id" 2>/dev/null || _ui_badge off)" done _ui_row " IriX$(_ui_pad 'IriX' 22)$(_irix_status_icon 2>/dev/null || _ui_badge off)" _ui_head "Système" _ui_kv "Distribution" "${PKG_FAMILY} ${DIM}(${PKG_MGR:-aucun})${RESET}" _ui_kv "Privilèges" "$(_priv_label)" local libre libre=$(df -h "$BASE_DIR" 2>/dev/null | awk 'NR==2 {print $4" libres sur "$2}') _ui_kv "Espace disque" "${libre:-inconnu}" _ui_bot # ── Arborescence, triée par chemin complet et affichée en relatif ──────── _ui_top _ui_row "${BOLD}Arborescence${RESET} ${DIM}chemins relatifs à la racine${RESET}" _ui_mid local path rel etat while IFS=$'\t' read -r path; do [[ -n "$path" ]] || continue rel="${path#"$BASE_DIR"}"; rel="${rel#/}"; [[ -z "$rel" ]] && rel="." if [[ -d "$path" ]]; then etat="$(_ui_badge ok 'présent')" else etat="$(_ui_badge err 'manquant')"; fi _ui_row " $(printf '%-44s' "$rel")${etat}" done < <(jq -r ' try(.. | objects | select(has("path") and (.path|type=="string")) | .path) catch empty ' "$INIT_BASE" | sort -u) _ui_bot } # ============================================================================= # ══════════════════════════════════════════════ # ACCESS MANAGER — users / grades / passwords # ══════════════════════════════════════════════ # ============================================================================= _hash_password() { local password="$1" local salt salt=$(openssl rand -hex 16) local hash hash=$(printf '%s' "${salt}${password}" | openssl dgst -sha256 | awk '{print $2}') printf '%s:%s' "$salt" "$hash" } _verify_password() { local password="$1" stored="$2" local salt="${stored%%:*}" hash="${stored##*:}" local check check=$(printf '%s' "${salt}${password}" | openssl dgst -sha256 | awk '{print $2}') [[ "$hash" == "$check" ]] } _access_init() { [[ -f "$ACCESS_FILE" ]] && return 0 _section "Initialisation Access Manager" local admin_pass salt_hash printf "${BOLD}Mot de passe admin :${RESET}"; read -rs admin_pass || true; echo "" salt_hash=$(_hash_password "$admin_pass") mkdir -p "$(dirname "$ACCESS_FILE")" jq -n \ --arg ts "$( date -u +%Y-%m-%dT%H:%M:%SZ)" \ --arg ph "$salt_hash" \ '{ meta: { created: $ts, version: "1.0", algo: "sha256+salt" }, users: [{ id: "admin", login: "admin", password_hash: $ph, grade: "owner", active: true, created: $ts, last_login: null, permissions: ["all"] }], grades: { owner: { level: 100, permissions: ["all"] }, admin: { level: 80, permissions: ["manage_services","manage_servers","view_logs","manage_users"] }, coadmin: { level: 60, permissions: ["manage_services","view_logs"] }, op: { level: 40, permissions: ["view_logs","service_toggle"] }, viewer: { level: 10, permissions: ["view_logs"] } }, eggdrop: { network_admins: [], channels: {} } }' > "$ACCESS_FILE" _sha256_store "$ACCESS_FILE" "$INIT_BASE" "access" _ok "Access Manager initialisé" } _access_list_users() { _section "Utilisateurs" jq -r '.users[] | " \(.login)\t[\(.grade)]\t\(if .active then "actif" else "inactif" end)\t\(.last_login // "jamais")" ' "$ACCESS_FILE" | column -t } _access_add_user() { _section "Ajouter un utilisateur" local login grade pass hash ts read -rp " Login : " login || true echo " Grades : owner / admin / coadmin / op / viewer" read -rp " Grade : " grade || true printf " Password : "; read -rs pass || true; echo "" hash=$(_hash_password "$pass") ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" _jq_update "$ACCESS_FILE" \ --arg l "$login" --arg g "$grade" --arg h "$hash" --arg ts "$ts" \ '.users += [{"id":$l,"login":$l,"password_hash":$h,"grade":$g, "active":true,"created":$ts,"last_login":null,"permissions":[]}]' _sha256_store "$ACCESS_FILE" "$INIT_BASE" "access" _ok_f "Utilisateur ajouté : %s [%s]" "$login" "$grade" } _access_change_password() { local login="${1:-}" [[ -z "$login" ]] && read -rp " Login : " login || true printf "Nouveau mot de passe : "; read -rs pass || true; echo "" local hash ts hash=$(_hash_password "$pass"); ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" _jq_update "$ACCESS_FILE" \ --arg l "$login" --arg h "$hash" --arg ts "$ts" \ '(.users[] | select(.login==$l)) |= (.password_hash=$h | .updated=$ts)' _sha256_store "$ACCESS_FILE" "$INIT_BASE" "access" _ok_f "Mot de passe mis à jour : %s" "$login" } _access_toggle_user() { read -rp " Login : " login || true local current new_state current=$(jq -r --arg l "$login" '.users[] | select(.login==$l) | .active' "$ACCESS_FILE") [[ "$current" == "true" ]] && new_state=false || new_state=true _jq_update "$ACCESS_FILE" \ --arg l "$login" --argjson s "$new_state" \ '(.users[] | select(.login==$l)).active = $s' _sha256_store "$ACCESS_FILE" "$INIT_BASE" "access" _ok_f "%s → actif=%s" "$login" "$new_state" } _access_manager_menu() { _access_init while true; do _ui_width _ui_title "Access Manager" "comptes du panel, grades et salons Eggdrop" local n_users n_actifs n_users=$(jq -r '.users | length' "$ACCESS_FILE" 2>/dev/null || echo 0) n_actifs=$(jq -r '[.users[] | select(.active)] | length' "$ACCESS_FILE" 2>/dev/null || echo 0) _ui_top _ui_kv "Comptes déclarés" "$n_users" _ui_kv "Comptes actifs" "$(_ui_bar "$n_actifs" "$(( n_users > 0 ? n_users : 1 ))")" [[ -n "${CURRENT_USER:-}" ]] && \ _ui_kv "Session en cours" "${CURRENT_USER} ${DIM}[${CURRENT_GRADE:-?}]${RESET}" _ui_head "Actions" _ui_item 1 "Lister les utilisateurs" _ui_item 2 "Ajouter un utilisateur" _ui_item 3 "Changer un mot de passe" _ui_item 4 "Activer / désactiver un compte" _ui_item 5 "Gérer Eggdrop ${DIM}(grades et salons)${RESET}" _ui_item 0 "Retour" _ui_bot _ui_prompt read -r c || c=0 case "$c" in 1) _access_list_users || true ;; 2) _access_add_user || true ;; 3) _access_change_password || true ;; 4) _access_toggle_user || true ;; 5) _eggdrop_grades_menu || true ;; 0) return ;; *) _warn "Choix invalide" || true ;; esac _pause done } # ----------------------------------------------------------------------------- # _grade_level # Retourne le niveau numérique d'un grade Access Manager (0 si inconnu). # ----------------------------------------------------------------------------- _grade_level() { local g="${1:-}" [[ -z "$g" || ! -f "$ACCESS_FILE" ]] && { echo 0; return; } jq -r --arg g "$g" '.grades[$g].level // 0' "$ACCESS_FILE" 2>/dev/null } # ----------------------------------------------------------------------------- # _require_grade [libellé] # Bloque l'action si l'utilisateur connecté n'a pas le niveau requis. # Sans session active (pas d'access.json / pas encore de login), l'accès # reste ouvert : c'est le comportement d'installation initiale. # ----------------------------------------------------------------------------- _require_grade() { local min="$1" label="${2:-Cette action}" [[ -z "${CURRENT_USER:-}" ]] && return 0 local lvl; lvl=$(_grade_level "${CURRENT_GRADE:-}") if (( lvl < min )); then _err "$label nécessite un grade ≥ ${min} (votre grade : ${CURRENT_GRADE:-aucun}, niveau ${lvl})." return 1 fi return 0 } # ----------------------------------------------------------------------------- # _access_login_gate # Authentifie l'utilisateur avant l'accès au panel principal, en s'appuyant # sur _hash_password/_verify_password et access.json. 3 tentatives max. # CURRENT_USER / CURRENT_GRADE sont exportées pour _require_grade. # ----------------------------------------------------------------------------- _access_login_gate() { [[ -f "$ACCESS_FILE" ]] || return 0 local login pass stored active tries=0 max_tries=3 _section "Authentification" while (( tries < max_tries )); do read -rp " Login : " login || { echo ""; return 1; } printf " Password : "; read -rs pass || { echo ""; return 1; }; echo "" stored=$(jq -r --arg l "$login" '.users[]? | select(.login==$l) | .password_hash // empty' "$ACCESS_FILE" 2>/dev/null) active=$(jq -r --arg l "$login" '.users[]? | select(.login==$l) | .active' "$ACCESS_FILE" 2>/dev/null) if [[ -n "$stored" && "$active" == "true" ]] && _verify_password "$pass" "$stored"; then CURRENT_USER="$login" CURRENT_GRADE=$(jq -r --arg l "$login" '.users[]? | select(.login==$l) | .grade' "$ACCESS_FILE" 2>/dev/null) _jq_update "$ACCESS_FILE" --arg l "$login" --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" \ '(.users[] | select(.login==$l)).last_login = $ts' _log_entry "access" "login" "$login" _ok_f "Bienvenue, %s [%s]" "${login}" "${CURRENT_GRADE}" return 0 fi tries=$(( tries + 1 )) _log_entry "access" "login_failed" "${login:-?}" _err_f "Identifiants invalides. (%s/%s)" "${tries}" "${max_tries}" done _err "Trop de tentatives échouées." return 1 } # ============================================================================= # ════════════════════════════════════════════════ # EGGDROP — Grades / Channels / Réseau autonome # ════════════════════════════════════════════════ # ============================================================================= _eggdrop_init() { [[ -f "$EGGDROP_FILE" ]] && return 0 mkdir -p "$(dirname "$EGGDROP_FILE")" jq -n --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" '{ meta: { created: $ts, version: "1.0" }, network: { name: "OvertChat", owner: "", admins: [], coadmins: [], xops: [] }, bots: [], channels: {} }' > "$EGGDROP_FILE" _sha256_store "$EGGDROP_FILE" "$INIT_BASE" "eggdrop" _ok "Eggdrop config initialisée" } _eggdrop_add_bot() { _eggdrop_init; _section "Ajouter un bot Eggdrop" local name nick server port ts read -rp " Nom bot : " name || true read -rp " Nickname : " nick || true read -rp " Serveur IRC : " server || true read -rp " Port : " port || true ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" _jq_update "$EGGDROP_FILE" \ --arg n "$name" --arg nick "$nick" --arg s "$server" --arg p "$port" --arg ts "$ts" \ '.bots += [{"name":$n,"nick":$nick,"server":$s,"port":$p,"active":true,"created":$ts}]' _sha256_store "$EGGDROP_FILE" "$INIT_BASE" "eggdrop" _ok_f "Bot : %s (%s) → %s:%s" "$name" "$nick" "$server" "$port" } _eggdrop_add_channel() { _eggdrop_init; _section "Ajouter un salon IRC" local chan ts read -rp " Salon (ex: #general) : " chan || true ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" _jq_update "$EGGDROP_FILE" \ --arg c "$chan" --arg ts "$ts" \ '.channels[$c] = {"created":$ts,"active":true,"ops":[],"halfops":[],"voices":[],"bans":[],"flags":"+nt"}' _sha256_store "$EGGDROP_FILE" "$INIT_BASE" "eggdrop" _ok_f "Salon ajouté : %s" "$chan" } _eggdrop_set_grade() { _eggdrop_init; _section "Grade sur un salon" local chan nick grade field read -rp " Salon : " chan || true read -rp " Nick : " nick || true echo " Grades salon : op / halfop / voice (pour owner/admin/coadmin/xop, utilisez [5] Grade réseau)" read -rp " Grade : " grade || true case "$grade" in op) field="ops" ;; halfop) field="halfops" ;; voice) field="voices" ;; *) _warn "Grade invalide. Attendu : op / halfop / voice."; return 1 ;; esac _jq_update "$EGGDROP_FILE" \ --arg c "$chan" --arg n "$nick" --arg f "$field" \ '.channels[$c][$f] = ((.channels[$c][$f] // []) + [$n] | unique)' # Sync access.json if [[ -f "$ACCESS_FILE" ]]; then _jq_update "$ACCESS_FILE" \ --arg n "$nick" --arg c "$chan" --arg g "$grade" \ '.eggdrop.channels[$c] = ((.eggdrop.channels[$c] // {}) + {($n): $g})' _sha256_store "$ACCESS_FILE" "$INIT_BASE" "access" fi _sha256_store "$EGGDROP_FILE" "$INIT_BASE" "eggdrop" _ok_f "%s → %s sur %s" "$nick" "$grade" "$chan" } _eggdrop_network_grade() { _eggdrop_init; _section "Grade réseau Eggdrop" local nick grade read -rp " Nick : " nick || true echo " Grades réseau : owner / admin / coadmin / xop" read -rp " Grade : " grade || true case "$grade" in owner) _jq_update "$EGGDROP_FILE" --arg n "$nick" '.network.owner = $n' ;; admin) _jq_update "$EGGDROP_FILE" --arg n "$nick" '.network.admins = ((.network.admins//[]) + [$n] | unique)' ;; coadmin) _jq_update "$EGGDROP_FILE" --arg n "$nick" '.network.coadmins = ((.network.coadmins//[]) + [$n] | unique)' ;; xop) _jq_update "$EGGDROP_FILE" --arg n "$nick" '.network.xops = ((.network.xops//[]) + [$n] | unique)' ;; *) _warn "Grade invalide. Attendu : owner / admin / coadmin / xop."; return 1 ;; esac _sha256_store "$EGGDROP_FILE" "$INIT_BASE" "eggdrop" _ok_f "%s → %s (réseau)" "$nick" "$grade" } _eggdrop_status() { _eggdrop_init; _section "État Eggdrop" _kv "Réseau" "$(jq -r '.network.name' "$EGGDROP_FILE")" _kv "Owner" "$(jq -r '.network.owner // "non défini"' "$EGGDROP_FILE")" _kv "Admins" "$(jq -r '.network.admins | join(", ")' "$EGGDROP_FILE")" _kv "Coadmins" "$(jq -r '.network.coadmins | join(", ")' "$EGGDROP_FILE")" _kv "Xops" "$(jq -r '.network.xops | join(", ")' "$EGGDROP_FILE")" _kv "Bots" "$(jq -r '.bots | length' "$EGGDROP_FILE")" echo "" _section "Salons configurés" jq -r ' .channels | to_entries[] | " \(.key)\tops:\(.value.ops|length)\tho:\(.value.halfops|length)\tv:\(.value.voices|length)\t\(if .value.active then "✔" else "✖" end)" ' "$EGGDROP_FILE" | column -t } _eggdrop_grades_menu() { _eggdrop_init while true; do # ⚠ Ce menu dessinait ses entrées par « cat <<-MENU », donc HORS de # tout cadre : le bandeau se fermait proprement et les six lignes # flottaient en dessous, sans bordure, sans alignement et sans # troncature. Ce n'était pas un débordement de largeur — la plus longue # entrée tient en 59 colonnes pour un cadre qui en fait au moins 64 — # mais l'absence pure et simple de cadre. Repris le 30/08/2026. _ui_width _ui_title "Eggdrop — Grades & Réseau" "bots, salons et grades du réseau" _ui_top _ui_item 1 "Vue d'ensemble réseau" _ui_item 2 "Ajouter un bot" _ui_item 3 "Ajouter un salon" _ui_item 4 "Grade sur un salon ${DIM}(op/halfop/voice)${RESET}" _ui_item 5 "Grade réseau ${DIM}(owner/admin/coadmin/xop)${RESET}" _ui_item 0 "Retour" _ui_bot _ui_prompt read -r c || c=0 case "$c" in 1) _eggdrop_status || true ;; 2) _eggdrop_add_bot || true ;; 3) _eggdrop_add_channel || true ;; 4) _eggdrop_set_grade || true ;; 5) _eggdrop_network_grade || true ;; 0) return ;; *) _warn "Choix invalide" || true ;; esac _pause done } # ============================================================================= # ════════════════════════════════════ # SERVICES — Eggdrop/IriX/Anope/Lea # ════════════════════════════════════ # ============================================================================= # ----------------------------------------------------------------------------- # _svc_repair_dirs # Repose l'install_dir des services que _services_init sait créer, quand le # fichier vient d'un schéma antérieur qui n'avait pas ce champ. # # Ce n'est pas une précaution théorique. Le services.json en service le # 30/07/2026 portait « install_dir: null » pour anope et lea : _install_anope # a donc compilé dans un répertoire littéralement nommé « null », créé # RELATIVEMENT au répertoire courant — 876 Mo de sources et d'objets déposés # hors de l'arborescence prévue, et un « binaire introuvable » pour seule # explication à l'arrivée. # # eggdrop n'est jamais touché : son install_dir pointe vers l'instance IriX, # ce qui est délibéré et n'a rien d'un champ manquant. # ----------------------------------------------------------------------------- _svc_repair_dirs() { local f="$SERVICES_FILE" svc actuel voulu n=0 [[ -f "$f" ]] || return 0 for svc in anope lea; do actuel=$(jq -r --arg s "$svc" '.services[$s].install_dir // "null"' "$f" 2>/dev/null) [[ "$actuel" != "null" && -n "$actuel" ]] && continue voulu="$BASE_DIR/Components/Service/$svc" jq --arg s "$svc" --arg d "$voulu" '.services[$s].install_dir = $d' \ "$f" > "${f}.tmp" && mv "${f}.tmp" "$f" || { rm -f "${f}.tmp"; continue; } _warn_f "install_dir manquant pour %s — reposé sur %s" "${svc}" "${voulu}" (( n++ )) done (( n > 0 )) && _info "Fichier de services issu d'un schéma antérieur : ${n} chemin(s) réparé(s)." return 0 } # ----------------------------------------------------------------------------- # _dir_exploitable <étiquette> # Un répertoire d'installation doit être ABSOLU. Vide, « null » ou relatif, il # fait travailler mkdir, tar, cmake et make dans le répertoire courant — qui # n'a aucune raison d'être le bon, et qui fut le dépôt lui-même le 30/07/2026. # La garde est ici et non dans chaque appelant : elle vaut pour les services # comme pour les serveurs. # ----------------------------------------------------------------------------- _dir_exploitable() { local quoi="$1" dir="${2:-}" if [[ -z "$dir" || "$dir" == "null" || "$dir" != /* ]]; then _err "Répertoire d'installation inexploitable pour ${quoi} : « ${dir:-vide} »." _info "Attendu : un chemin absolu. Un chemin nul ou relatif ferait compiler" _info "dans le répertoire courant, hors de l'arborescence du projet." return 1 fi return 0 } _services_init() { if [[ -f "$SERVICES_FILE" ]]; then _svc_repair_dirs _sources_sync return 0 fi mkdir -p "$(dirname "$SERVICES_FILE")" jq -n \ --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" \ --arg comp "$BASE_DIR/Components/Service" \ --arg repo "https://github.com/$(jq -r '.git.repo' "$INIT_DEFAULT" 2>/dev/null)" \ --arg ve "$VER_EGGDROP" --arg ue "$URL_EGGDROP" \ --arg va "$VER_ANOPE" --arg ua "$URL_ANOPE" \ '{ meta: { created: $ts }, services: { eggdrop: { name: "Eggdrop", enabled: false, installed: false, running: false, install_dir: ($comp+"/eggdrop"), binary: null, config: null, build: "configure_make", version: $ve, source_url: $ue, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_install: null, last_start: null, last_stop: null }, anope: { name: "Anope Services", enabled: false, installed: false, running: false, install_dir: ($comp+"/anope"), binary: null, config: null, build: "cmake", version: $va, source_url: $ua, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_install: null, last_start: null, last_stop: null }, lea: { name: "Lea Service", enabled: false, installed: false, running: false, install_dir: ($comp+"/lea"), binary: null, config: null, build: "configure_make", source_url: $repo, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_install: null, last_start: null, last_stop: null } } }' > "$SERVICES_FILE" _sha256_store "$SERVICES_FILE" "$INIT_BASE" "services" _ok "Services config initialisée" } # ----------------------------------------------------------------------------- # _svc_get / _svc_set [args...] # Mêmes conventions que _srv_get / _srv_set (module Serveurs IRC). # ----------------------------------------------------------------------------- _svc_get() { local svc="$1" field="$2" jq -r --arg s "$svc" ".services[\$s].${field}" "$SERVICES_FILE" } _svc_set() { local svc="$1"; shift local filter="$1"; shift _jq_update "$SERVICES_FILE" --arg s "$svc" "$filter" "$@" _sha256_store "$SERVICES_FILE" "$INIT_BASE" "services" } # ----------------------------------------------------------------------------- # _svc_paths # Affiche sur stdout : # ----------------------------------------------------------------------------- _svc_paths() { local svc="$1" base base=$(_svc_get "$svc" "install_dir") printf '%s/run %s/run/service.pid %s/run/service.log\n' "$base" "$base" "$base" } _service_status_icon() { local svc="$1" local installed enabled running has_error icon suffix="" installed=$(_svc_get "$svc" "installed") enabled=$(_svc_get "$svc" "enabled") running=$(_service_status "$svc") has_error=$(jq -r --arg s "$svc" '.services[$s].errors | length > 0' "$SERVICES_FILE") if [[ "$installed" != "true" ]]; then icon="$(_ui_badge off 'non installé')" elif [[ "$running" == "running" ]]; then icon="$(_ui_badge run 'en marche')" elif [[ "$enabled" == "true" ]]; then icon="$(_ui_badge warn 'arrêté')" else icon="$(_ui_badge err 'désactivé')" fi [[ "$has_error" == "true" ]] && suffix+=" ${RED}⚑${RESET}${DIM} erreurs${RESET}" printf '%s' "${icon}${suffix}" } # ============================================================================= # Cycle de vie : démarrage / arrêt / redémarrage (par PID, comme les serveurs IRC) # ============================================================================= _service_start() { local svc="$1" install_dir bin run_dir pid_file log_file pid install_dir=$(_svc_get "$svc" "install_dir") bin=$(_svc_get "$svc" "binary") read -r run_dir pid_file log_file < <(_svc_paths "$svc") [[ -z "$bin" || "$bin" == "null" ]] && { _err "Aucun binaire défini pour $svc. Installez-le d'abord ([1])."; return 1; } [[ ! -x "${install_dir}/${bin}" ]] && { _err "Binaire introuvable ou non exécutable : ${install_dir}/${bin}"; return 1; } if [[ -f "$pid_file" ]] && kill -0 "$(cat "$pid_file")" 2>/dev/null; then _warn_f "%s est déjà en cours d'exécution." "$svc" return 0 fi mkdir -p "$run_dir" _info_f "Démarrage de %s…" "$svc" # `( cd … && nohup … & echo $! )` capturait le PID du SOUS-SHELL, pas celui # du processus : le & porte sur la liste entière. Le sous-shell mourant # aussitôt, kill -0 échouait et le panel annonçait « terminé immédiatement » # alors que le service tournait — devenu orphelin et impossible à arrêter. ( cd "$install_dir" && exec nohup "./${bin}" > "$log_file" 2>&1 ) & pid=$! echo "$pid" > "$pid_file" sleep 1 if [[ -n "$pid" ]] && kill -0 "$pid" 2>/dev/null; then _svc_set "$svc" '.services[$s].running = true | .services[$s].last_start = $ts' \ --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" _log_entry "$svc" "start" "PID=$pid" _ok_f "%s démarré (PID : %s)." "$svc" "$pid" else rm -f "$pid_file" _service_report_error "$svc" "Échec du démarrage" _err_f "Le processus %s s'est terminé immédiatement (voir %s)." "$svc" "$log_file" return 1 fi } _service_stop() { local svc="$1" pid_file pid read -r _ pid_file _ < <(_svc_paths "$svc") if [[ ! -f "$pid_file" ]]; then _warn_f "%s : aucun PID trouvé, probablement déjà arrêté." "$svc" _svc_set "$svc" '.services[$s].running = false' return 0 fi pid=$(cat "$pid_file") if kill -0 "$pid" 2>/dev/null; then _info_f "Envoi de SIGTERM au PID %s…" "$pid" kill "$pid" sleep 2 if kill -0 "$pid" 2>/dev/null; then _warn "Le processus ne répond pas, envoi de SIGKILL…" kill -9 "$pid" sleep 1 fi else _warn_f "%s : PID %s introuvable dans les processus actifs." "$svc" "$pid" fi rm -f "$pid_file" _svc_set "$svc" '.services[$s].running = false | .services[$s].last_stop = $ts' \ --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" _log_entry "$svc" "stop" "PID=$pid" _ok_f "%s arrêté." "$svc" } _service_restart() { local svc="$1" _info_f "Redémarrage de %s…" "$svc" _service_stop "$svc" sleep 1 _service_start "$svc" } _service_status() { local svc="$1" pid_file read -r _ pid_file _ < <(_svc_paths "$svc") if [[ -f "$pid_file" ]] && kill -0 "$(cat "$pid_file")" 2>/dev/null; then echo "running" else echo "stopped" fi } _service_logs() { local svc="$1" log_file read -r _ _ log_file < <(_svc_paths "$svc") [[ -f "$log_file" ]] || { _warn "Aucun fichier de log trouvé pour $svc."; return 1; } _info_f "Logs de %s (Ctrl+C pour quitter) :" "$svc" tail -f "$log_file" } # ============================================================================= # Installation par compilation — configure/make (Eggdrop, Lea) / CMake (Anope) # ============================================================================= # ----------------------------------------------------------------------------- # _make_jobs — nombre de compilations parallèles. # # Appeler nproc directement dans « make -j"$(nproc)" » donne « make -j » tout # court quand nproc est absent — le cas sur une image minimale dépourvue de # coreutils complet. Et « make -j » sans # argument ne veut pas dire « un job » : il veut dire « autant de jobs que de # règles », soit une fourche massive qui met à genoux une petite machine, sans # qu'aucune erreur ne soit signalée. On borne, et on se rabat sur 1. # ----------------------------------------------------------------------------- _make_jobs() { local n n=$(nproc 2>/dev/null || getconf _NPROCESSORS_ONLN 2>/dev/null || echo 1) [[ "$n" =~ ^[0-9]+$ ]] && (( n >= 1 )) || n=1 (( n > 16 )) && n=16 printf '%s' "$n" } # ----------------------------------------------------------------------------- # _safe_rmrf # Suppression récursive avec garde-fous. `_svc_get`/`_srv_get` renvoient la # chaîne "null" ou une chaîne vide quand la clé JSON est absente : un # `rm -rf "$dir"` nu supprimait alors un dossier "null" du répertoire courant, # ou pire échouait silencieusement. On refuse aussi tout chemin hors de # l'arborescence du projet. # ----------------------------------------------------------------------------- _safe_rmrf() { local path="${1:-}" [[ -n "$path" && "$path" != "null" ]] || { _err "Suppression refusée : chemin vide"; return 1; } case "$path" in /|/home|/root|/usr|/etc|/var|/tmp|"$TARGET_HOME"|"$BASE_DIR") _err "Suppression refusée : chemin protégé ($path)"; return 1 ;; esac [[ "$path" == /* ]] || { _err "Suppression refusée : chemin relatif ($path)"; return 1; } case "$path" in "$BASE_DIR"/*|"$TARGET_HOME"/*) : ;; *) _err "Suppression refusée : hors arborescence projet ($path)"; return 1 ;; esac [[ -e "$path" ]] || return 0 rm -rf "$path" } # ----------------------------------------------------------------------------- # _service_install_fail [raison] # raison = "deps" → PAS de rollback destructif. Un échec d'installation de # paquets (sudo refusé, dépôt injoignable) n'est pas une installation # corrompue : détruire le dossier faisait perdre une install fonctionnelle. # ----------------------------------------------------------------------------- _service_install_fail() { local svc="$1" reason="${2:-build}" dir dir=$(_svc_get "$svc" "install_dir") if [[ "$reason" == "deps" ]]; then _err "Dépendances non satisfaites — installation abandonnée, rien n'a été supprimé." _service_report_error "$svc" "Dépendances système manquantes" return 0 fi # 🔴 17/10/2026 — LA RECONSTRUCTION NE DÉTRUIT RIEN (`anope-construire`, # lancée depuis le panel). Le rollback efface `$dir` ENTIER : sur une # installation en place, c'est sa configuration (anope.conf, le mot de # passe du lien) ET sa base de comptes (data/anope.json) — une compilation # ratée aurait coûté tous les comptes NickServ. Mesuré le 17/10 en prod : # conf/anope.conf et data/anope.json existent. Ce drapeau n'est posé que # par `_anope_construire_cli`. if [[ "${_SANS_ROLLBACK:-0}" == "1" ]]; then _err "Construction échouée — RIEN n'a été supprimé : l'installation en place (configuration, base de comptes) est gardée telle quelle." _service_report_error "$svc" "Reconstruction échouée" return 0 fi _err "Installation échouée → rollback." _safe_rmrf "$dir" _svc_set "$svc" '.services[$s].installed = false' _service_report_error "$svc" "Installation échouée" } _install_eggdrop() { local svc="eggdrop" dir dir=$(_svc_get "$svc" "install_dir") _dir_exploitable "Eggdrop" "$dir" || { _service_install_fail "$svc" deps; return 1; } # Le découpage en mots est VOULU : `_req_for` rend une liste de paquets # séparée par des espaces, et `_pkg_install` en attend plusieurs. # ⚠ La directive ne portait pas : elle était écrite « disable=SC2046 -- … », # et ce « -- » n'est pas une syntaxe reconnue. shellcheck ne la comprenait # pas (SC1072/SC1073), donc il n'appliquait PAS la suppression et cessait # d'analyser la suite. Un commentaire se met après un « # », pas après un # tiret. Trouvé le 13/09/2026, au premier passage de shellcheck. # shellcheck disable=SC2046 _pkg_install $(_req_for "$svc") || { _service_install_fail "$svc" deps; return 1; } mkdir -p "$(dirname "$dir")" # Épinglé par VER_EGGDROP, en tête de ce fichier. Le plancher reste 1.10.0 : # les versions 1.9.x ont un bug documenté de lecture réseau TLS qui bloque la # connexion jusqu'au timeout d'enregistrement côté serveur IRC (corrigé dans # le changelog officiel 1.10.0). Voir PROJET.md / MODULES.md. _info_f "Récupération d'Eggdrop %s…" "${VER_EGGDROP}" if [[ "$EGGDROP_EST_RC" == "oui" ]]; then _warn_f "Eggdrop %s est une VERSION CANDIDATE, retenue délibérément." "${VER_EGGDROP}" _info "La dernière version publiée est la 1.10.1. En cas de comportement" _info "inattendu d'IriX, c'est la première chose à remettre en cause." fi local rc _fetch_sources "$(_svc_get "$svc" "source_url")" "$dir" "eggdrop*.tar.gz" "$svc"; rc=$? (( rc == 2 )) && { _service_install_fail "$svc" sources; return 1; } (( rc != 0 )) && { _service_install_fail "$svc"; return 1; } # `make` seul, puis `make install` — et surtout PAS « make eggdrop ». # # Chez Eggdrop, « make eggdrop » ne construit que le binaire ; ce sont # « make modules » et « make install » qui produisent puis rassemblent les # greffons .so. L'ancienne forme « make eggdrop || make » s'arrêtait au # premier succès, donc au binaire seul : l'installation n'avait aucun # modules/, IriX ne pouvait charger ni channels, ni server, ni irc, et son # premier « bind msg » échouait sur « bad type ». Constaté sur une # installation neuve menée de bout en bout le 29/07/2026. # # « make install » place binaire, modules/, language/ et help/ dans DEST. # ⚠⚠ EGGDROP REFUSE D'INSTALLER DANS SON PROPRE RÉPERTOIRE DE SOURCES, et # c'est son Makefile qui le dit — « You are trying to install into the source # directory. That will not work. » Or `_fetch_sources` extrait justement dans # `$dir` (`tar -C "$dir" --strip-components=1`), et l'on y faisait ensuite # `make install DEST="$dir"`. La compilation réussissait — binaire et modules # produits — puis l'installation mourait sur `install-start`, et le rollback # effaçait les traces derrière lui. # # ⚠ Ce n'était NI une affaire de distribution, NI de droits : cela échouait # partout. Personne ne l'avait vu parce que la production n'a jamais repassé # par ce chemin. Constaté le 23/08/2026 sur une Ubuntu 24.04 vierge, et sans # Eggdrop l'écran IriX reste verrouillé — donc l'installateur ne pouvait poser # AUCUN produit du projet sur une machine neuve. Point 45. # # On compile donc à côté, et l'on installe dans `$dir`, que la suite attend. ( srcdir="${dir}/.src-build" rm -rf "$srcdir"; mkdir -p "$srcdir" || exit 1 shopt -s dotglob for f in "$dir"/*; do [[ "$f" == "$srcdir" ]] && continue mv "$f" "$srcdir"/ || exit 1 done shopt -u dotglob cd "$srcdir" || exit 1 ./configure || exit 1 make config || exit 1 make -j"$(_make_jobs)" || exit 1 make install DEST="$dir" || exit 1 ) || { _service_install_fail "$svc"; return 1; } [[ -x "${dir}/eggdrop" ]] || { _err "Compilation Eggdrop : binaire introuvable."; _service_install_fail "$svc"; return 1; } # Les modules sont vérifiés séparément : un binaire sans eux se lance, puis # refuse toute configuration qui utilise un bind msg, pub ou join — c'est-à-dire # celle d'IriX. if compgen -G "${dir}/modules/*.so" >/dev/null 2>&1; then _ok "Modules Eggdrop compilés : $(ls "${dir}"/modules/*.so | wc -l)" else _err_f "Eggdrop compilé, mais aucun module .so dans %s/modules/." "${dir}" _info "IriX ne pourra pas charger sans eux (bind msg, pub, join)." _service_install_fail "$svc" return 1 fi mkdir -p "${dir}/run"; touch "${dir}/.installed" _svc_set "$svc" \ '.services[$s].binary = $b | .services[$s].installed = true | .services[$s].last_install = $ts' \ --arg b "eggdrop" --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" _ok "Eggdrop compilé (configure/make) et installé." } _install_anope() { local svc="anope" dir dir=$(_svc_get "$svc" "install_dir") _dir_exploitable "Anope" "$dir" || { _service_install_fail "$svc" deps; return 1; } # shellcheck disable=SC2046 _pkg_install $(_req_for "$svc") || { _service_install_fail "$svc" deps; return 1; } # Épinglé par VER_ANOPE. La branche 2.1 est retenue plutôt que la 2.0 — # c'est elle qui a servi à l'essai de liaison du 29/07/2026, et c'est elle # qui a renommé le module de protocole (`unreal` → `unrealircd`), ce dont # le panel tient compte depuis le lot 8. Voir PROTOCOLES.md §6. local rc _info_f "Récupération d'Anope %s…" "${VER_ANOPE}" _fetch_sources "$(_svc_get "$svc" "source_url")" "${dir}/src" "anope*.tar.gz" "$svc"; rc=$? (( rc == 2 )) && { _service_install_fail "$svc" sources; return 1; } (( rc != 0 )) && { _service_install_fail "$svc"; return 1; } ( mkdir -p "${dir}/src/build" && cd "${dir}/src/build" || exit 1 cmake .. -DCMAKE_INSTALL_PREFIX="$dir" && make -j"$(_make_jobs)" && make install ) || { _service_install_fail "$svc"; return 1; } # Le binaire a changé de nom entre les deux branches : « bin/services » en # 2.0, « bin/anope » en 2.1 (son README : « Run ./bin/anope to start Anope »). # Ce nom était écrit en dur, et l'installation de la 2.1.25 échouait donc sur # « binaire introuvable » APRÈS une compilation et un make install réussis — # puis le rollback effaçait tout. Même famille de défaut que le module de # protocole renommé au §6 de PROTOCOLES.md : la 2.1 renomme, on lit. local bin="" local cand for cand in "bin/anope" "bin/services"; do [[ -x "${dir}/${cand}" ]] && { bin="$cand"; break; } done if [[ -z "$bin" ]]; then _err "Compilation Anope (CMake) : aucun binaire trouvé (cherché : bin/anope, bin/services)." _service_install_fail "$svc" return 1 fi mkdir -p "${dir}/run"; touch "${dir}/.installed" _svc_set "$svc" \ '.services[$s].binary = $b | .services[$s].installed = true | .services[$s].last_install = $ts' \ --arg b "$bin" --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" _ok_f "Anope compilé (CMake) et installé (%s)." "${bin}" # Compiler ne suffit pas : Anope refuse de démarrer sans sa configuration, # et ce fichier porte le mot de passe du lien vers le serveur IRC. Le # déposer ici évite l'installation « réussie » qui ne démarre jamais — le # même défaut que celui corrigé pour Eggdrop et pour overtchatd. # # Le nom de ce fichier dépend de la branche — conf/anope.conf en 2.1, # conf/services.conf en 2.0 —, d'où le renvoi à la fonction plutôt qu'un # nom écrit ici. _anope_configure "$dir" || { _warn "Anope est compilé, mais sa configuration reste à écrire." _info "Sans elle, il refusera de démarrer : relancer l'installation d'Anope." # 17/10/2026 : sans clavier (`anope-construire`), une configuration # refusée est un ÉCHEC de la construction — le panel doit le lire. [[ "${_ANOPE_SANS_CLAVIER:-0}" == "1" ]] && return 1 } return 0 } # ----------------------------------------------------------------------------- # _sed_escape # # Rend une valeur utilisable en PARTIE DROITE d'un « s|…|…| ». Trois caractères # y sont des instructions et non des lettres : la barre oblique inverse, le # séparateur, et « & » — qui vaut la correspondance entière. Un mot de passe # contenant « & » produisait donc silencieusement un autre mot de passe. # ----------------------------------------------------------------------------- _sed_escape() { printf '%s' "$1" | sed -e 's/[\\&|]/\\&/g'; } # Les modules de protocole des deux branches d'Anope, en une alternance ERE. # Réunis ici parce qu'ils servent à trois endroits — substituer, compter le # total, contrôler qu'il n'en reste qu'un — et que trois copies divergent. readonly _ANOPE_PROTOS='(unreal[a-z0-9]*|inspircd[0-9]*|hybrid|ngircd|plexus|ratbox|charybdis|solanum|bahamut)' # ----------------------------------------------------------------------------- # _anope_srv_conf # # Le fichier de configuration du serveur IRC, ou rien. # # ⚠ Le registre des serveurs ne suffit pas : son champ « config » vaut null, et # la configuration en service vit HORS du dépôt — l'installation d'origine la # pose dans ~/overtchatd/conf. On cherche donc, dans l'ordre, ce que le registre # dit, puis les emplacements où l'installateur et l'exploitation la posent # réellement. Le premier fichier lisible gagne. # ----------------------------------------------------------------------------- _anope_srv_conf() { local f dir f=$(_srv_get "overtchat_ircd" "config" 2>/dev/null || true) [[ -n "$f" && "$f" != "null" && -r "$f" ]] && { printf '%s' "$f"; return 0; } dir=$(_srv_get "overtchat_ircd" "install_dir" 2>/dev/null || true) if [[ -n "$dir" && "$dir" != "null" && -r "${dir}/conf/overtchat.conf" ]]; then printf '%s' "${dir}/conf/overtchat.conf"; return 0 fi [[ -r "${HOME}/overtchatd/conf/overtchat.conf" ]] && \ { printf '%s' "${HOME}/overtchatd/conf/overtchat.conf"; return 0; } return 0 } # ----------------------------------------------------------------------------- # _anope_link_noms # # Les noms de tous les blocs « link » du serveur IRC, un par ligne. # # ⚠ ILS SONT LA SEULE SOURCE DU NOM À DONNER À ANOPE. Le nom proposé se # fabriquait depuis l'identité du réseau — « services.${reseau,,} », soit # « services.service-overtchat » sur cette installation. Le bloc link, lui, # s'appelle « services.overtchat.fr ». Anope se serait annoncé sous un nom que # le serveur ne connaît pas : lien refusé, et le refus ne dit pas pourquoi. # Constaté le 11/08/2026, avant qu'Anope ait démarré une seule fois. # ----------------------------------------------------------------------------- _anope_link_noms() { local f; f=$(_anope_srv_conf) [[ -n "$f" ]] || return 0 awk '$1 == "link" && $2 != "" { gsub(/[{;]/, "", $2); if ($2 != "") print $2 }' \ "$f" 2>/dev/null } # ----------------------------------------------------------------------------- # _anope_srv_port # # Le port sur lequel le serveur IRC attend ses SERVEURS, ou rien. # # ⚠ CE PORT NE SE DEVINE PAS, ET 7000 EST UN MAUVAIS DÉFAUT ICI. C'est celui # d'UnrealIRCd, et la configuration d'Overtchat-Hybrid dit en toutes lettres # pourquoi elle ne l'emploie pas : « 6900, et non le 7000 d'UnrealIRCd — # l'outil d'essai ne sait réécrire que 6667/6697/6900 ». # # Le 11/08/2026, `anope.conf` a été écrit avec 7000 pendant que le serveur # écoutait sur 6900. Rien n'écoutait au bout : le lien n'aurait pas monté, et # **une connexion refusée ne dit pas qu'on s'est trompé de port** — elle dit # qu'elle a été refusée. Le nom et le mot de passe étaient lus dans la # configuration du serveur ; le port, lui, restait fabriqué. Une valeur sur # trois suffit à tout casser. # # ⚠ Le bloc `listen` porte son `port` AVANT ses `options` : on accumule donc le # bloc entier, et on ne décide qu'à l'accolade fermante. Lire le port dès qu'on # le voit rendrait celui du premier `listen` venu — 6667, les clients. # ----------------------------------------------------------------------------- _anope_srv_port() { local f; f=$(_anope_srv_conf) [[ -n "$f" ]] || return 0 awk ' /^[[:space:]]*listen[[:space:]]*\{/ { dans = 1; p = ""; srv = 0; next } dans && /^[[:space:]]*port[[:space:]]+[0-9]+/ { if (match($0, /[0-9]+/)) p = substr($0, RSTART, RLENGTH) } dans && /serversonly/ { srv = 1 } dans && /^[[:space:]]*\}/ { if (srv && p != "") { print p; exit } dans = 0 } ' "$f" 2>/dev/null } # ----------------------------------------------------------------------------- # _anope_srv_hote # # L'adresse du listener « serversonly » du serveur IRC, telle qu'Anope doit la # joindre, ou rien. # # 17/10/2026 : ajoutée pour la configuration SANS CLAVIER (`anope-construire`), # qui ne prend que des valeurs LUES. Mesuré en prod le 17/10 : `ip 127.0.0.1;` # sur le port 6900. Une écoute sur toutes les adresses (`*`, `0.0.0.0`, `::`) # comprend la boucle locale : on rend alors 127.0.0.1, ce que l'invite propose # déjà. Même lecture par bloc entier que `_anope_srv_port` (le `ip` précède les # `options`). # ----------------------------------------------------------------------------- _anope_srv_hote() { local f h; f=$(_anope_srv_conf) [[ -n "$f" ]] || return 0 h=$(awk ' /^[[:space:]]*listen[[:space:]]*\{/ { dans = 1; ip = ""; srv = 0; next } dans && /^[[:space:]]*ip[[:space:]]+/ { ip = $2; gsub(/[;"]/, "", ip) } dans && /serversonly/ { srv = 1 } dans && /^[[:space:]]*\}/ { if (srv) { print ip; exit } dans = 0 } ' "$f" 2>/dev/null) case "$h" in ''|'*'|0.0.0.0|'::') [[ -n "$h" ]] && printf '127.0.0.1' ;; *) [[ "$h" =~ ^[A-Za-z0-9.:-]+$ ]] && printf '%s' "$h" ;; esac return 0 } # ----------------------------------------------------------------------------- # _anope_valeur # # Une valeur de la configuration d'Anope : posée en question à l'invite, ou — # SANS CLAVIER (`_ANOPE_SANS_CLAVIER=1`, posé par `anope-construire`) — prise # dans le défaut LU. 🔴 Sans clavier, un défaut vide est un REFUS (rend 1, le # dit sur stderr) : jamais une valeur inventée pour remplir le trou. # ⚠ Appelée dans un `$( )` : seule la valeur part sur stdout. # ----------------------------------------------------------------------------- _anope_valeur() { local libelle="$1" defaut="${2:-}" if [[ "${_ANOPE_SANS_CLAVIER:-0}" == "1" ]]; then if [[ -z "$defaut" ]]; then printf ' ✗ %s : illisible dans la configuration du serveur IRC — REFUS, aucune valeur inventée.\n' "$libelle" >&2 return 1 fi printf ' %s : %s (lu)\n' "$libelle" "$defaut" >&2 printf '%s' "$defaut" return 0 fi _site_ask "$libelle" "$defaut" } # ----------------------------------------------------------------------------- # _anope_link_sid # # Le SID que le bloc « link » réserve à ce serveur, ou rien. # # ⚠ QUATRIÈME VALEUR DU MÊME BLOC, et la dernière qui manquait. Le modèle # d'Anope livre son identifiant **commenté**, avec une valeur d'exemple : # # serverinfo { … #id = "00A" … } # # Laissé tel quel, Anope se présente sans SID — ou avec celui de l'exemple — et # le serveur répond « SID does not match the configured one », puis ferme. # Constaté le 11/08/2026, juste après avoir réglé le port et le mot de passe : # **chaque valeur fabriquée donnait un refus qui ne disait pas pourquoi**, et il # a fallu trois démarrages pour les trouver une par une. # # ⚠ Ancré sur le NOM du bloc, comme le mot de passe : la configuration en porte # plusieurs, et celui d'IriX réserve un autre SID. Prendre « le premier sid # venu » donnerait à Anope l'identifiant du bot — deux serveurs pour un même # SID, ce que le réseau refuse par construction. # ----------------------------------------------------------------------------- _anope_link_sid() { local nom="$1" f [[ -n "$nom" ]] || return 0 f=$(_anope_srv_conf) [[ -n "$f" ]] || return 0 awk -v n="$nom" ' $1 == "link" && $2 == n { dans = 1; next } dans && /^[[:space:]]*}/ { exit } dans && $1 == "sid" { if (match($0, /"[^"]*"/)) { print substr($0, RSTART + 1, RLENGTH - 2); exit } }' "$f" 2>/dev/null } # Le fichier où le bloc « link » a été lu, pour pouvoir le NOMMER à l'invite. _ANOPE_LINK_SRC="" # ----------------------------------------------------------------------------- # _anope_link_pass # # Rend, sur la sortie standard, le mot de passe du bloc « link » de la # configuration du serveur IRC — vide si on ne le trouve pas. # # ⚠ POURQUOI LE LIRE PLUTÔT QUE LE DEMANDER. Ce mot de passe n'est pas un # choix : il doit être identique à celui du bloc « link », sinon le serveur # répond « no matching link » et rien d'autre. Une saisie recopiée à la main # est donc le seul endroit où une divergence peut naître, pour un réglage qui # n'avait aucune raison de varier. Tranché par SerVuS le 11/08/2026 : on le # propose par défaut, il reste remplaçable à l'invite. # # ⚠ Il n'est jamais AFFICHÉ, ni ici ni à l'invite — seul le fichier d'où il # vient est nommé. Un défaut qu'on montre est un secret qu'on publie. # # ⚠ Ancré sur le NOM du bloc, et il le faut : la configuration en porte # plusieurs, et celui d'IriX a son propre secret. Lire « le premier password # venu » aurait donné à Anope celui du bot — un lien refusé, pour une raison # que rien n'aurait laissé voir. # ----------------------------------------------------------------------------- _anope_link_pass() { local nom="$1" f pass="" _ANOPE_LINK_SRC="" [[ -n "$nom" ]] || return 0 f=$(_anope_srv_conf) [[ -n "$f" ]] || return 0 # Du « link » jusqu'à l'accolade fermante, la première ligne # « password ». Le « = » est facultatif : les deux écritures se # rencontrent, et une seule des deux aurait laissé le cas silencieux. pass=$(awk -v n="$nom" ' $1 == "link" && $2 == n { dans = 1; next } dans && /^[[:space:]]*}/ { exit } dans && $1 == "password" { if (match($0, /"[^"]*"/)) { print substr($0, RSTART + 1, RLENGTH - 2); exit } }' "$f" 2>/dev/null) if [[ -n "$pass" ]]; then _ANOPE_LINK_SRC="$f" printf '%s' "$pass" fi return 0 } # ----------------------------------------------------------------------------- # _anope_configure # # Écrit la configuration d'Anope à partir du modèle livré par la version # installée, en y injectant l'identité du réseau et le lien vers le serveur IRC. # # On PART DU MODÈLE fourni par la version installée plutôt que d'écrire une # configuration de zéro : Anope change ses directives d'une version majeure à # l'autre, et une conf écrite à la main pour la 2.0 ne se charge pas en 2.1. # Le modèle, lui, accompagne toujours la version qu'on vient de compiler. # # ⚠ Quatre choses diffèrent entre les deux branches, et les quatre étaient # fausses ici tant qu'on ne s'était pas mesuré à une 2.1 réellement installée # (constaté le 31/07/2026 sur l'Anope 2.1.25 de ce dépôt) : # # 1. le MODÈLE s'appelle conf/anope.example.conf en 2.1, conf/example.conf en # 2.0 : aucun des quatre noms cherchés ici n'existait, et la fonction # sortait en « modèle introuvable » avant d'écrire quoi que ce soit ; # 2. le FICHIER LU par le binaire est conf/anope.conf en 2.1 — la chaîne # « services.conf » n'apparaît nulle part dans bin/anope. Y déposer un # services.conf donnait une installation « configurée » qui ne démarre pas, # exactement le défaut que la détection de bin/anope corrige plus haut ; # 3. le NOM DU SERVEUR ne se pose plus dans serverinfo mais dans un # define { name = "services.host" ; value = … } dont serverinfo ET les # hôtes des pseudo-clients tirent leur valeur. Substituer ce « name » # renommait la VARIABLE, et ${services.host} ne se résolvait plus ; # 4. le MODULE DE PROTOCOLE vaut « inspircd » dans le modèle. Overtchat-Hybrid # parle le protocole d'UnrealIRCd : laissé tel quel, le lien ne monte pas. # # Le mot de passe du lien est le point sensible : c'est le même que celui du # bloc « link » du serveur IRC. Un mot de passe qui diverge donne un lien # refusé sans autre explication qu'un « no matching link » côté serveur. # # Rien n'est annoncé qui n'ait été relu DANS le fichier produit : chaque valeur # injectée y est recherchée après coup, et un écart se dit au lieu de passer # pour une configuration réussie. # ----------------------------------------------------------------------------- _anope_configure() { local dir="$1" local conf="" cible="" modele="" bin="" local c m mkdir -p "${dir}/conf" # ── Quel fichier ce binaire ouvrira-t-il ? ── # Déduit du nom du binaire — « bin/services » en 2.0, « bin/anope » en 2.1, # comme à la compilation — puis CONTRÔLÉ dans le binaire lui-même, qui porte # la chaîne qu'il ouvrira. Un désaccord vaut mieux dit qu'ignoré. for c in anope services; do [[ -x "${dir}/bin/${c}" ]] && { bin="${dir}/bin/${c}"; break; } done case "$bin" in */anope) cible="anope.conf" ;; */services) cible="services.conf" ;; *) _err "Aucun binaire Anope sous ${dir}/bin — compiler avant de configurer." return 1 ;; esac grep -aqF "$cible" "$bin" || \ _warn "« ${cible} » ne figure pas dans ${bin##*/} : nom de configuration supposé." conf="${dir}/conf/${cible}" # 17/10/2026 : SANS CLAVIER (`anope-construire`, le bouton du panel), une # configuration existante est RÉÉCRITE d'après le bloc link — mais gardée # d'abord en `.avant-`, juste avant le remplacement (plus bas), # et seulement si la nouvelle a passé sa relecture. À l'invite, rien ne change. local garder_avant=0 if [[ -f "$conf" ]]; then if [[ "${_ANOPE_SANS_CLAVIER:-0}" == "1" ]]; then garder_avant=1 _info_f "%s existe déjà — il sera gardé en %s.avant- avant d'être réécrit." "${cible}" "${cible}" else _info_f "%s existe déjà — conservé tel quel." "${cible}" return 0 fi fi for m in "${dir}/conf/anope.example.conf" "${dir}/conf/example.conf" \ "${dir}/conf/services.conf.example" "${dir}/docs/services.conf.example" \ "${dir}/src/docs/services.conf.example"; do [[ -f "$m" ]] && { modele="$m"; break; } done if [[ -z "$modele" ]]; then _err_f "Modèle de configuration Anope introuvable sous %s." "${dir}" return 1 fi _info "Modèle utilisé : ${modele#"$dir"/} → ${cible}" # ── Module de protocole ── # Anope ne devine pas le serveur d'en face. On ne propose que des modules # RÉELLEMENT compilés : un nom absent de modules/ fait échouer le démarrage # sur « unable to load module », après une configuration pourtant annoncée # réussie. La 2.1 ne livre plus bahamut — la 2.0, si. local dispo=() f for f in "${dir}/modules"/*.so; do [[ -e "$f" ]] || continue f="${f##*/}"; f="${f%.so}" case "$f" in unreal*|inspircd*|hybrid|ngircd|plexus|ratbox|charybdis|solanum|bahamut) dispo+=("$f") ;; esac done local proto proto_defaut="" for c in unrealircd unreal4 unreal; do [[ " ${dispo[*]} " == *" ${c} "* ]] && { proto_defaut="$c"; break; } done [[ -z "$proto_defaut" && ${#dispo[@]} -gt 0 ]] && proto_defaut="${dispo[0]}" if ((${#dispo[@]})); then _info "Modules de protocole compilés : ${dispo[*]}" else _warn_f "Aucun module de protocole sous %s/modules — Anope ne pourra pas se lier." "${dir}" fi proto=$(_anope_valeur "Protocole du serveur IRC (module Anope)" "$proto_defaut") || return 1 if [[ -z "$proto" ]]; then _err "Aucun module de protocole choisi — Anope refuserait de démarrer." return 1 fi if ((${#dispo[@]})) && [[ " ${dispo[*]} " != *" ${proto} "* ]]; then _err_f "« %s » n'est pas compilé ici — Anope ne saurait pas le charger." "${proto}" return 1 fi # Ce nom part dans une expression sed sans être échappé : on le tient à ce # qu'un nom de module peut réellement contenir. if [[ ! "$proto" =~ ^[A-Za-z0-9_]+$ ]]; then _err_f "« %s » n'est pas un nom de module recevable." "${proto}" return 1 fi # Valeurs reprises de l'identité du réseau, comme pour IriX : le site, le # bot et les services doivent annoncer le même réseau. local ident="${BASE_DIR}/Config/identity.json" local reseau nom_serv desc mail if [[ -f "$ident" ]]; then reseau=$(jq -r '.name // "Overtchat"' "$ident" 2>/dev/null) desc=$(jq -r '.tagline // "Services"' "$ident" 2>/dev/null) mail=$(jq -r '.mail.from // empty' "$ident" 2>/dev/null) else reseau="Overtchat"; desc="Services"; mail="" fi # ── Le nom du serveur de services ── # # ⚠ IL DOIT ÊTRE CELUI D'UN BLOC « link » DU SERVEUR, pas un nom fabriqué. # Le défaut se calculait sur l'identité du réseau et donnait ici # « services.service-overtchat » quand le bloc s'appelle # « services.overtchat.fr » : Anope se serait présenté sous un nom inconnu # du serveur, et le refus n'aurait rien expliqué. # # On propose donc le bloc qui parle de services, à défaut le seul autre que # celui d'IriX, et on ne retombe sur le nom fabriqué que si le serveur n'a # aucun bloc lisible — cas d'une installation neuve, où c'est l'exploitant # qui écrira le bloc ensuite. local nom_defaut="" n while IFS= read -r n; do [[ -n "$n" ]] || continue case "$n" in *service*|*svc*) nom_defaut="$n"; break ;; esac done < <(_anope_link_noms) # ⚠ 17/10/2026 : SANS CLAVIER, le nom fabriqué n'est PAS un défaut — c'est # précisément la valeur inventée qu'on refuse (le serveur rejetterait le # lien sans dire pourquoi). Seul un bloc link LU vaut. if [[ -z "$nom_defaut" && "${_ANOPE_SANS_CLAVIER:-0}" != "1" ]]; then nom_defaut="services.${reseau,,}" fi nom_serv=$(_anope_valeur "Nom du serveur de services" "$nom_defaut") || return 1 # ⚠ Le contrôle vaut pour TOUS les chemins, y compris un nom saisi à la # main : c'est lui qui attrape la divergence, pas le défaut proposé. if [[ -n "$(_anope_srv_conf)" ]] && ! _anope_link_noms | grep -qxF "$nom_serv"; then _warn_f "Aucun bloc « link %s » dans la configuration du serveur IRC." "${nom_serv}" _info "Blocs présents : $(_anope_link_noms | tr '\n' ' ')" _info "Sans bloc à ce nom, le serveur refusera le lien sans dire pourquoi." fi local up_host up_port up_pass # 17/10/2026 : SANS CLAVIER, l'hôte est LU sur le listener « serversonly » # (`_anope_srv_hote`) ; à l'invite, le défaut reste 127.0.0.1. local hote_defaut="127.0.0.1" [[ "${_ANOPE_SANS_CLAVIER:-0}" == "1" ]] && hote_defaut=$(_anope_srv_hote) up_host=$(_anope_valeur "Serveur IRC à rejoindre (hôte)" "$hote_defaut") || return 1 # ⚠ Le port du listener « serversonly » du serveur, et non 7000 en dur : # voir `_anope_srv_port`. Sur cette installation, le serveur écoute 6900 et # le défaut fabriqué aurait envoyé Anope sur un port où rien n'écoute. local port_defaut; port_defaut=$(_anope_srv_port) if [[ -n "$port_defaut" ]]; then _info_f "Le serveur IRC attend ses serveurs sur le port %s." "${port_defaut}" elif [[ "${_ANOPE_SANS_CLAVIER:-0}" != "1" ]]; then # ⚠ Sans clavier, pas de 7000 fabriqué : `_anope_valeur` refusera le vide. port_defaut="7000" _warn "Port du lien introuvable dans la configuration du serveur — 7000 proposé." fi up_port=$(_anope_valeur "Port du lien" "$port_defaut") || return 1 # Le mot de passe du bloc « link » du serveur, s'il est déjà posé. Proposé # par défaut, jamais affiché : l'invite ne nomme que le fichier. local pass_defaut pass_defaut=$(_anope_link_pass "$nom_serv") if [[ "${_ANOPE_SANS_CLAVIER:-0}" == "1" ]]; then # 🔴 17/10/2026 : SANS CLAVIER, aucun `read` (rien ne répondrait) et le # mot de passe n'est jamais affiché ni journalisé : seul le FICHIER où # il a été lu est nommé. Absent, c'est un refus. if [[ -z "$pass_defaut" ]]; then _err_f "Aucun mot de passe dans un bloc « link %s » du serveur IRC — REFUS, aucune valeur inventée." "${nom_serv}" return 1 fi # ⚠ `_ANOPE_LINK_SRC` est posé dans le `$( )` de `_anope_link_pass`, donc # PERDU ici (sous-shell) : le fichier se relit par `_anope_srv_conf`. _info_f "Mot de passe du lien : celui du bloc « link %s » de %s (non affiché)." "${nom_serv}" "$(_anope_srv_conf)" up_pass="$pass_defaut" else if [[ -n "$pass_defaut" ]]; then _info_f "Bloc « link %s » trouvé dans %s." "${nom_serv}" "${_ANOPE_LINK_SRC}" printf " Mot de passe du lien ${DIM}[Entrée = celui de ce bloc]${RESET} : " else _warn_f "Aucun bloc « link %s » trouvé : le serveur IRC en voudra un." "${nom_serv}" printf " Mot de passe du lien (identique au bloc link du serveur) : " fi read -rs up_pass || true; echo "" [[ -z "$up_pass" ]] && up_pass="$pass_defaut" fi if [[ -z "$up_pass" ]]; then _err "Mot de passe du lien vide — Anope ne pourrait pas se connecter." return 1 fi if [[ ! "$up_port" =~ ^[0-9]+$ ]]; then _err_f "Port « %s » : un nombre est attendu." "${up_port}" return 1 fi local tmp; tmp="$(mktemp)" || return 1 cp "$modele" "$tmp" || { rm -f "$tmp"; return 1; } local e_host e_pass e_nom e_desc e_host=$(_sed_escape "$up_host"); e_pass=$(_sed_escape "$up_pass") e_nom=$(_sed_escape "$nom_serv"); e_desc=$(_sed_escape "$desc") # Substitutions ANCRÉES SUR LEUR BLOC. « host », « port » et « password » # n'apparaissent qu'une fois chacun dans le modèle d'aujourd'hui, mais rien # ne le garantit demain : une plage /uplink/,/}/ coûte le même sed et ne # peut pas aller frapper un bloc « mail » ou « db_sql » ajouté plus tard. # Séparateur « | » : les valeurs portent des points et des barres obliques. # # 🔴 LE SCRIPT sed PASSE PAR UN FICHIER, PLUS PAR SES ARGUMENTS — 29/09/2026 # (audit, #18). L'expression porte le mot de passe du lien : en `-e`, il # était lisible par tout compte de la machine dans `ps`. `printf` est # interne à bash ; `mktemp` crée en 600. local sedf; sedf="$(mktemp)" || { rm -f "$tmp"; return 1; } printf '%s\n' \ "/^[[:space:]]*uplink[[:space:]]*\{?[[:space:]]*$/,/^[[:space:]]*\}/ { s|^([[:space:]]*host[[:space:]]*=).*|\1 \"${e_host}\"| s|^([[:space:]]*port[[:space:]]*=).*|\1 ${up_port}| s|^([[:space:]]*password[[:space:]]*=).*|\1 \"${e_pass}\"| }" \ "/^[[:space:]]*serverinfo[[:space:]]*\{?[[:space:]]*$/,/^[[:space:]]*\}/ { s|^([[:space:]]*description[[:space:]]*=).*|\1 \"${e_desc}\"| }" > "$sedf" if ! sed -Ei -f "$sedf" "$tmp"; then rm -f "$tmp" "$sedf"; _err "Substitution impossible."; return 1 fi rm -f "$sedf" # Le nom du serveur de services : dans la 2.1 il vient d'un define dont # serverinfo et les hôtes des pseudo-clients tirent leur valeur. On pose # donc sa « value », et on ne retombe sur serverinfo que si ce define # n'existe pas — c'est le cas de la 2.0. if grep -qE '^[[:space:]]*name[[:space:]]*=[[:space:]]*"services\.host"' "$tmp"; then sed -Ei "/^[[:space:]]*name[[:space:]]*=[[:space:]]*\"services\.host\"/,/^[[:space:]]*\}/ { s|^([[:space:]]*value[[:space:]]*=).*|\1 \"${e_nom}\"| }" "$tmp" else sed -Ei "/^[[:space:]]*serverinfo[[:space:]]*\{?[[:space:]]*$/,/^[[:space:]]*\}/ { s|^([[:space:]]*name[[:space:]]*=).*|\1 \"${e_nom}\"| }" "$tmp" fi # ── Le SID, quatrième valeur du bloc « link » ─────────────── # # ⚠ LE MODÈLE LE LIVRE COMMENTÉ, avec une valeur d'exemple : # « #id = "00A" ». Laissé tel quel, Anope se présente sans SID et le # serveur répond « SID does not match the configured one », puis ferme le # lien. Constaté le 11/08/2026, après avoir réglé le port et le mot de # passe : chaque valeur fabriquée donnait un refus qui ne disait pas # pourquoi, et il a fallu les trouver une par une. # # ⚠ Le motif accepte le « # » de tête — c'est tout l'objet : il faut # DÉCOMMENTER la ligne, pas seulement changer sa valeur. Un `s|^id|` aurait # laissé le modèle intact sans rien signaler. # # ⚠ Ancré sur `serverinfo` : « id » est un mot trop court pour être # cherché dans un fichier de mille lignes. # # Un bloc « link » sans `sid` ne fait pas échouer la configuration : tous # les serveurs n'en exigent pas. On le dit, et on laisse la ligne comme le # modèle l'a écrite. local sid_lien sid_lien=$(_anope_link_sid "$nom_serv") if [[ -n "$sid_lien" ]]; then if [[ ! "$sid_lien" =~ ^[0-9][0-9A-Z]{2}$ ]]; then rm -f "$tmp" _err_f "SID « %s » illisible dans le bloc link — un chiffre puis deux caractères sont attendus." "${sid_lien}" return 1 fi sed -Ei "/^[[:space:]]*serverinfo[[:space:]]*\{?[[:space:]]*$/,/^[[:space:]]*\}/ { s|^([[:space:]]*)#?[[:space:]]*id[[:space:]]*=.*|\1id = \"${sid_lien}\"| }" "$tmp" _info_f "SID %s, repris du bloc « link %s »." "${sid_lien}" "${nom_serv}" elif [[ "${_ANOPE_SANS_CLAVIER:-0}" == "1" ]]; then # 17/10/2026 : sans clavier, le SID d'exemple du modèle serait une # valeur inventée — refus, comme pour les trois autres. rm -f "$tmp" _err_f "Aucun SID dans le bloc « link %s » — REFUS, aucune valeur inventée." "${nom_serv}" return 1 else _warn_f "Aucun SID dans le bloc « link %s » — la ligne « id » du modèle est laissée telle quelle." "${nom_serv}" _info "Si le serveur en exige un, il refusera le lien sur « SID does not match »." fi # ⚠ Séparateur « ~ » et non « | » : ce motif porte une ALTERNANCE, et sed # termine la commande au premier séparateur qu'il rencontre. Écrite avec # « | », la substitution était refusée (« option inconnue pour s ») — mais # un sed en échec ne fait pas échouer la fonction, et le repli ci-dessous # ajoutait alors une SECONDE déclaration de module : Anope chargeait les # deux, rejetait la nôtre (« Service SASL::ProtocolInterface already # exists ») et gardait celle du modèle. Constaté le 31/07/2026 en faisant # lire la configuration produite par le binaire, pas en la relisant. sed -Ei "s~^([[:space:]]*module[[:space:]]*\{[[:space:]]*name[[:space:]]*=[[:space:]]*)\"${_ANOPE_PROTOS}\"~\1\"${proto}\"~" "$tmp" local n_total n_proto n_total=$(grep -cE "^[[:space:]]*module[[:space:]]*\{[[:space:]]*name[[:space:]]*=[[:space:]]*\"${_ANOPE_PROTOS}\"" "$tmp" || true) n_proto=$(grep -cE "^[[:space:]]*module[[:space:]]*\{[[:space:]]*name[[:space:]]*=[[:space:]]*\"${proto}\"" "$tmp" || true) # Le modèle de la 2.0 laisse cette ligne commentée : la substitution ne # trouve alors rien, et l'absence de module de protocole ne se voit qu'au # démarrage. On l'ajoute plutôt que de laisser le trou. if ((n_total == 0)); then printf '\n/* Module de protocole posé par l'\''installateur Overtchat. */\nmodule { name = "%s" }\n' "$proto" >> "$tmp" n_total=1; n_proto=1 fi # ── Relire ce qu'on vient d'écrire ── # Un sed qui ne trouve pas son motif ne dit rien et rend 0. Sans cette # relecture, une directive renommée par une version future donnerait une # configuration à moitié substituée, annoncée comme écrite. local manque=() grep -qF "\"${up_host}\"" "$tmp" || manque+=("hôte du lien") grep -qE "^[[:space:]]*port[[:space:]]*=[[:space:]]*${up_port}([[:space:]]|$)" "$tmp" \ || manque+=("port du lien") # ⚠ Le motif arrive par un descripteur (`printf` interne), pas en argument : # c'est le mot de passe du lien (audit #18, 29/09/2026). grep -qF -f <(printf '"%s"\n' "$up_pass") "$tmp" || manque+=("mot de passe du lien") grep -qF "\"${nom_serv}\"" "$tmp" || manque+=("nom du serveur") # ⚠ Relu DÉCOMMENTÉ : un « #id = … » substitué mais laissé commenté est # exactement le cas qu'on corrige ici, et un `grep` sur la seule valeur # l'aurait trouvé sans rien prouver. if [[ -n "$sid_lien" ]]; then grep -qE "^[[:space:]]*id[[:space:]]*=[[:space:]]*\"${sid_lien}\"" "$tmp" \ || manque+=("SID du serveur de services") fi # Un seul module de protocole, et ce doit être le nôtre : compter les deux # séparément est ce qui manquait quand la substitution laissait « inspircd » # en place et qu'on se contentait de constater la présence du bon. ((n_proto == 1 && n_total == 1)) || \ manque+=("module de protocole (${n_proto} fois ${proto}, ${n_total} au total)") if ((${#manque[@]})); then rm -f "$tmp" _err "Configuration NON écrite — introuvable dans le fichier produit : ${manque[*]}." _info "Le modèle ${modele##*/} a probablement renommé ces directives." return 1 fi grep -qF "\"${desc}\"" "$tmp" || \ _warn "Description du serveur laissée telle quelle dans le modèle." # 17/10/2026 : la configuration en place, gardée AVANT d'être remplacée — # en 600 comme elle (elle porte le mot de passe du lien). Une copie ratée # arrête tout : on ne remplace pas ce qu'on n'a pas su garder. if [[ "$garder_avant" == "1" && -f "$conf" ]]; then local avant; avant="${conf}.avant-$(date +%Y%m%d-%H%M%S)" if ! cp -p "$conf" "$avant"; then rm -f "$tmp" _err_f "Impossible de garder %s — configuration NON remplacée." "${conf}" return 1 fi chmod 600 "$avant" _ok_f "Ancienne configuration gardée : %s" "${avant}" fi mv "$tmp" "$conf" || { rm -f "$tmp"; return 1; } chmod 600 "$conf" _ok_f "Configuration écrite : %s %s(droits 600)%s" "${conf}" "${DIM}" "${RESET}" _ok_f "Protocole : %s — lien vers %s:%s, serveur %s." "${proto}" "${up_host}" "${up_port}" "${nom_serv}" _svc_set "anope" '.services[$s].config_file = $c | .services[$s].configured = true' \ --arg c "$conf" 2>/dev/null || true # Le modèle d'Anope est long et porte bien d'autres réglages. On le dit # plutôt que de laisser croire que tout est réglé. _warn_f "Le modèle a été repris tel quel pour le reste : relis %s." "${conf}" _info "À vérifier en priorité : le bloc oper, et — côté SERVEUR IRC — un bloc" _info_f "link pour %s et son inscription dans les ulines." "${nom_serv}" _log_entry "anope" "configure" "${cible} écrit pour ${nom_serv} (protocole ${proto})" } _install_lea() { local svc="lea" dir repo_dir lea_src bin dir=$(_svc_get "$svc" "install_dir") _dir_exploitable "Lea" "$dir" || { _service_install_fail "$svc" deps; return 1; } # shellcheck disable=SC2046 _pkg_install $(_req_for "$svc") || { _service_install_fail "$svc" deps; return 1; } mkdir -p "$dir" repo_dir="${dir}/src" _info "Clonage du dépôt Service-Overtchat (Lea Service)…" git clone --depth=1 "$(_svc_get "$svc" "source_url")" "$repo_dir" || { _service_install_fail "$svc"; return 1; } lea_src=$(find "$repo_dir" -maxdepth 2 -type d -iname "lea*" 2>/dev/null | head -1) if [[ -z "$lea_src" || ! -f "${lea_src}/configure" ]]; then _warn "Sources Lea introuvables ou script 'configure' absent dans le dépôt cloné." _warn "Structure minimale créée — installation manuelle requise (comme ircu)." mkdir -p "${dir}/run"; touch "${dir}/.installed" _svc_set "$svc" \ '.services[$s].installed = true | .services[$s].binary = null | .services[$s].last_install = $ts' \ --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" return 0 fi ( cd "$lea_src" || exit 1 ./configure --prefix="$dir" && make -j"$(_make_jobs)" && make install ) || { _service_install_fail "$svc"; return 1; } mkdir -p "${dir}/run"; touch "${dir}/.installed" bin=$(find "$dir" -maxdepth 2 -type f -iname "lea*" -executable 2>/dev/null | head -1) _svc_set "$svc" \ '.services[$s].binary = $b | .services[$s].installed = true | .services[$s].last_install = $ts' \ --arg b "${bin#"$dir"/}" --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" _ok "Lea Service compilé (configure/make) et installé." } _service_verify() { local svc="$1" install_dir bin install_dir=$(_svc_get "$svc" "install_dir") bin=$(_svc_get "$svc" "binary") [[ -z "$bin" || "$bin" == "null" ]] && return 1 [[ -x "${install_dir}/${bin}" ]] || return 1 return 0 } # ----------------------------------------------------------------------------- # _service_configure_si_besoin # # Rattrape le service installé mais jamais configuré. Ne fait RIEN si sa # configuration est là : on ne repasse pas sur un fichier que l'exploitant a pu # retoucher, et `_anope_configure` refuse elle-même d'écraser. # # ⚠ Anope seul pour l'instant, et par constat plutôt que par principe : c'est # le seul des trois services dont on ait vérifié qu'il refuse de démarrer sans # configuration. Eggdrop en écrit une à l'installation, Lea n'a pas été menée # jusque-là. Étendre la liste demande de le mesurer d'abord, pas de le # supposer — un service rattrapé à tort poserait des questions à l'exploitant # pour un fichier dont il n'a pas besoin. # ----------------------------------------------------------------------------- _service_configure_si_besoin() { local svc="$1" dir cible [[ "$svc" == "anope" ]] || return 0 dir=$(_svc_get "$svc" "install_dir") # Même déduction que dans `_anope_configure` : le nom du fichier dépend de # la branche. On ne le devine pas ici, on le lui laisse dire. for cible in anope.conf services.conf; do [[ -f "${dir}/conf/${cible}" ]] && return 0 done _warn "Anope est installé mais n'a pas de configuration — il ne démarrerait pas." _anope_configure "$dir" || { _warn "Configuration non écrite : Anope reste inutilisable." return 1 } } # ----------------------------------------------------------------------------- # _anope_tourne # # Anope tourne-t-il ? Par son unité, puis par un processus dont l'exécutable est # CE binaire (le chemin complet de /proc//exe, jamais un motif de nom). # ----------------------------------------------------------------------------- _anope_tourne() { local dir="$1" p e if command -v systemctl >/dev/null 2>&1 \ && [[ "$(systemctl is-active anope.service 2>/dev/null)" =~ ^(active|activating|reloading)$ ]]; then return 0 fi for p in /proc/[0-9]*; do e="$(readlink "$p/exe" 2>/dev/null)" || continue [[ "$e" == "${dir}/bin/anope" || "$e" == "${dir}/bin/services" ]] && return 0 done return 1 } # ----------------------------------------------------------------------------- # _anope_construire_cli [archive] # # « anope-construire » : récupère, compile et configure Anope SANS CLAVIER, et # NE LE DÉMARRE PAS. C'est la commande du bouton « Installer / reconstruire # Anope » du panel, lancée par l'unité oneshot `overtchat-anope-construire.service` # (Config/systemd/, User=servus) au travers de `Tools/anope-construire.sh`. # # Décision de SerVuS, 17/10/2026 — en deux temps : CONSTRUIRE (ici, rien ne # démarre) puis, à part et sous conditions, BASCULER (le panel). Ce qu'elle fait : # 1. refuse root (on compile en compte ordinaire) et refuse si Anope TOURNE — # `make install` réécrirait sous lui son binaire et ses modules chargés ; # 2. l'archive : celle donnée (`--archive=CHEMIN`), ou une archive locale # d'Anope, CONTRÔLÉES À L'EMPREINTE `SHA256_ANOPE` avant usage (refus sinon) ; # à défaut, le téléchargement de `_fetch_sources`, qui la contrôle aussi ; # 3. compile par `_install_anope` — sans élévation (les paquets manquants sont # NOMMÉS, pas installés) et SANS ROLLBACK destructif (`_SANS_ROLLBACK`) ; # 4. configure par `_anope_configure` sans clavier : valeurs LUES (bloc link, # listener serversonly, SID, protocole compilé), refus si l'une manque, mot # de passe jamais affiché ; l'ancienne configuration gardée en `.avant-` ; # 5. services.json : installed/configured posés, `enabled` INCHANGÉ. # Elle n'appelle JAMAIS `systemctl start` (Bootstrap/tests/test-anope-construire.sh). # ----------------------------------------------------------------------------- _anope_construire_cli() { local archive="${1:-}" dir obtenu enabled_avant if [[ "$(id -u)" == "0" ]]; then _err "anope-construire se lance en compte ORDINAIRE (celui de l'installation), jamais en root." return 1 fi # Pas d'élévation pendant la construction : ni apt, ni sudo. PRIV_MODE="user" dir=$(_svc_get "anope" "install_dir") _dir_exploitable "Anope" "$dir" || return 1 if _anope_tourne "$dir"; then _err "Anope TOURNE : la construction réécrirait son binaire et ses modules sous lui — REFUS." _info "Arrêtez-le d'abord (panel, « Arrêter »), puis relancez la construction." return 1 fi # ── L'archive, contrôlée à l'empreinte AVANT tout usage ── if [[ -z "$archive" ]]; then archive="$(_find_local_archive "anope*.tar.gz" 2>/dev/null || true)" fi if [[ -n "$archive" ]]; then [[ -f "$archive" ]] || { _err_f "Archive introuvable : %s" "$archive"; return 1; } obtenu="$(_sha256 "$archive")" if [[ "$obtenu" != "$SHA256_ANOPE" ]]; then _err_f "Archive %s : EMPREINTE DIFFÉRENTE de celle d'Anope %s — REFUSÉE." "$archive" "$VER_ANOPE" _info_f " attendue : %s" "$SHA256_ANOPE" _info_f " obtenue : %s" "$obtenu" return 1 fi _ok_f "Archive %s : empreinte SHA-256 d'Anope %s vérifiée." "$archive" "$VER_ANOPE" fi enabled_avant="$(_svc_get "anope" "enabled")" local rc=0 _ARCHIVE_IMPOSEE="$archive" _SANS_ROLLBACK=1 _ANOPE_SANS_CLAVIER=1 _install_anope || rc=$? # `enabled` est le choix de l'exploitant : une construction n'y touche pas. # On le RELIT pour le prouver, et on le remet s'il a bougé. if [[ "$(_svc_get "anope" "enabled")" != "$enabled_avant" ]]; then _svc_set "anope" '.services[$s].enabled = ($e == "true")' --arg e "$enabled_avant" 2>/dev/null || true fi if (( rc != 0 )); then _err "Construction d'Anope ÉCHOUÉE — Anope n'a pas été démarré." return 1 fi _ok "Construction d'Anope terminée. Anope n'a PAS été démarré : la bascule se fait au panel, à part." return 0 } _service_install() { local svc="$1" dir dir=$(_svc_get "$svc" "install_dir") _section "Installation : $(_svc_get "$svc" "name")" if [[ -f "${dir}/.installed" ]]; then _info "Déjà installé → vérification du binaire…" if _service_verify "$svc"; then _ok "Installation existante valide." # ⚠ VALIDE NE VEUT PAS DIRE CONFIGURÉ, et ce chemin-ci rendait 0 # sans jamais atteindre la configuration. Anope était compilé # depuis le 30/07/2026, son conf/ ne portait que les modèles, et # relancer l'installation ne changeait rien : le service refusait # de démarrer, et rien ne disait pourquoi. # # C'est le défaut que le commentaire d'`_install_anope` dit vouloir # éviter — « l'installation réussie qui ne démarre jamais » —, # revenu par l'autre porte. `_service_verify` ne regarde que le # binaire, et c'est très bien : un binaire absent et une # configuration absente ne se réparent pas de la même façon. # Constaté le 11/08/2026. _service_configure_si_besoin "$svc" return 0 fi _warn "Installation corrompue → réinstallation." _safe_rmrf "$dir" fi case "$svc" in eggdrop) _install_eggdrop ;; anope) _install_anope ;; lea) _install_lea ;; *) _err "Service inconnu : $svc"; return 1 ;; esac } _service_uninstall() { local svc="$1" dir name rep name=$(_svc_get "$svc" "name") dir=$(_svc_get "$svc" "install_dir") [[ -d "$dir" ]] || { _warn "$name n'est pas installé."; return 0; } read -rp " Désinstaller ${name} (${dir}) ? [y/N] : " rep || true [[ "$rep" =~ ^[YyOo]$ ]] || { _info "Annulé."; return 0; } [[ "$(_service_status "$svc")" == "running" ]] && _service_stop "$svc" _safe_rmrf "$dir" _svc_set "$svc" \ '.services[$s].installed=false | .services[$s].enabled=false | .services[$s].running=false | .services[$s].binary=null | .services[$s].sha256={verified:false,expected_hash:null,last_checked:null}' _log_entry "$svc" "uninstall" "$name désinstallé" _ok_f "%s désinstallé." "$name" } _service_verify_sha256() { local svc="$1" install_dir bin path stored current ts install_dir=$(_svc_get "$svc" "install_dir") bin=$(_svc_get "$svc" "binary") [[ -z "$bin" || "$bin" == "null" ]] && { _warn "Aucun binaire défini pour $svc."; return 1; } path="${install_dir}/${bin}" [[ -f "$path" ]] || { _warn "Binaire introuvable : $path"; return 1; } stored=$(_svc_get "$svc" "sha256.expected_hash") current=$(_sha256 "$path") ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" if [[ -z "$stored" || "$stored" == "null" ]]; then _svc_set "$svc" \ '.services[$s].sha256.expected_hash = $h | .services[$s].sha256.verified = true | .services[$s].sha256.last_checked = $ts' \ --arg h "$current" --arg ts "$ts" _ok "SHA-256 enregistré comme référence (première vérification)." return 0 fi if [[ "$stored" == "$current" ]]; then _svc_set "$svc" '.services[$s].sha256.verified = true | .services[$s].sha256.last_checked = $ts' --arg ts "$ts" _ok "SHA-256 valide." else _svc_set "$svc" '.services[$s].sha256.verified = false | .services[$s].sha256.last_checked = $ts' --arg ts "$ts" _err "SHA-256 INVALIDE !" printf " Attendu : ${GREEN}%s${RESET}\n" "$stored" printf " Obtenu : ${RED}%s${RESET}\n" "$current" _service_report_error "$svc" "SHA-256 invalide" return 1 fi } # ============================================================================= # NOTE — sémantique du bouton [2] Activer / Désactiver (_service_toggle) : # Même principe que pour IriX : "enabled" est l'intention. Activer installe # (si besoin) puis démarre le processus ; désactiver l'arrête. Les options # dédiées Démarrer/Arrêter/Redémarrer restent disponibles pour un contrôle # ponctuel sans changer cette intention. # ============================================================================= _service_toggle() { local svc="$1" current new_state ts name name=$(_svc_get "$svc" "name") current=$(_svc_get "$svc" "enabled") ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" if [[ "$current" == "true" ]]; then new_state=false [[ "$(_service_status "$svc")" == "running" ]] && _service_stop "$svc" _svc_set "$svc" '.services[$s].enabled = false | .services[$s].last_stop = $ts' --arg ts "$ts" _ok_f "%s désactivé (processus arrêté)." "$name" else new_state=true if [[ "$(_svc_get "$svc" "installed")" != "true" ]]; then _info "Non installé → installation automatique." _service_install "$svc" || { _err "Activation annulée : installation échouée."; return 1; } fi _svc_set "$svc" '.services[$s].enabled = true | .services[$s].last_start = $ts' --arg ts "$ts" _service_start "$svc" _ok_f "%s activé (processus démarré)." "$name" fi _log_entry "$svc" "toggle" "enabled=${new_state}" } _service_log_toggle() { local svc="$1" current new_state current=$(jq -r --arg s "$svc" '.services[$s].log.enabled' "$SERVICES_FILE") [[ "$current" == "true" ]] && new_state=false || new_state=true _jq_update "$SERVICES_FILE" --arg s "$svc" --argjson v "$new_state" '.services[$s].log.enabled = $v' _sha256_store "$SERVICES_FILE" "$INIT_BASE" "services" _ok_f "%s logs → %s" "$svc" "$new_state" } _service_report_error() { local svc="$1" errmsg="$2" ts ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" _jq_update "$SERVICES_FILE" \ --arg s "$svc" --arg m "$errmsg" --arg ts "$ts" \ '.services[$s].errors += [{"ts":$ts,"msg":$m}]' _sha256_store "$SERVICES_FILE" "$INIT_BASE" "services" _log_entry "$svc" "error" "$errmsg" } _service_clear_errors() { local svc="$1" _jq_update "$SERVICES_FILE" --arg s "$svc" '.services[$s].errors = []' _sha256_store "$SERVICES_FILE" "$INIT_BASE" "services" _ok_f "%s : erreurs effacées" "$svc" } _service_show_errors() { local svc="$1" _section "Erreurs — $svc" local count; count=$(jq -r --arg s "$svc" '.services[$s].errors | length' "$SERVICES_FILE") if [[ "$count" -eq 0 ]]; then _ok "Aucune erreur" else jq -r --arg s "$svc" '.services[$s].errors[] | " [\(.ts)] \(.msg)"' "$SERVICES_FILE" fi } _service_set_binary() { local svc="$1" bin _info "Pointe manuellement vers un binaire déjà compilé/installé (n'exécute aucune compilation)." read -rp " Chemin binaire $svc : " bin || true [[ -f "$bin" ]] || { _warn "Fichier absent : $bin"; return 1; } _jq_update "$SERVICES_FILE" \ --arg s "$svc" --arg b "$bin" \ '.services[$s].binary = $b | .services[$s].installed = true' _sha256_store "$SERVICES_FILE" "$INIT_BASE" "services" _ok_f "%s binary : %s" "$svc" "$bin" } # S'affiche DANS un cadre déjà ouvert par l'appelant. _services_overview() { local svc name icon for svc in eggdrop anope lea; do name=$(_svc_get "$svc" "name") [[ -z "$name" || "$name" == "null" ]] && name="$svc" icon=$(_service_status_icon "$svc") _ui_row " ${BOLD}${name}${RESET}$(_ui_pad "$name" 22)${icon}" done _irix_init _ui_row " ${BOLD}IriX Services${RESET}$(_ui_pad 'IriX Services' 22)$(_irix_status_icon)" # Les robots de prêt tiennent sur une ligne : ils sont plusieurs, et un # aperçu qui en listerait trois pousserait Eggdrop et Anope hors du cadre. # Le détail est dans leur propre panel. _overop_init _ui_row " ${BOLD}OverOp (prêt)${RESET}$(_ui_pad 'OverOp (prêt)' 22)$(_overop_apercu_court)" } _panel_service_detail() { local svc="$1" name choice while true; do name=$(_svc_get "$svc" "name") # ⚠⚠ CET ÉCRAN EMPILAIT TROIS DIALECTES, et c'est ce qui le rendait # illisible bien plus que la largeur : un bandeau fermé, puis les cinq # `_ui_row` de `_services_overview` — dont le contrat écrit exige un # cadre DÉJÀ OUVERT — qui sortaient donc en bordures « │ … │ » sans # toit ni plancher, puis des `_kv` hérités sans aucune bordure, puis # les entrées en texte brut. Repris le 30/08/2026. _ui_width _ui_title "Service : $name" "état, actions et journaux" _ui_top _services_overview _ui_mid _ui_kv "Installé" "$(_svc_get "$svc" "installed")" _ui_kv "Activé" "$(_svc_get "$svc" "enabled")" _ui_kv "En cours" "$(_service_status "$svc")" _ui_kv "Compilation" "$(_svc_get "$svc" "build")" _ui_kv "SHA-256 OK" "$(_svc_get "$svc" "sha256.verified")" _ui_kv "Erreurs" "$(jq -r --arg s "$svc" '.services[$s].errors | length' "$SERVICES_FILE")" _ui_head "Actions" _ui_item 1 "Installer ${DIM}(compile depuis les sources)${RESET}" _ui_item 2 "Activer / Désactiver ${DIM}(installe+démarre / arrête)${RESET}" _ui_item 3 "Démarrer" _ui_item 4 "Arrêter" _ui_item 5 "Redémarrer" _ui_item 6 "Logs en direct" _ui_item 7 "Activer / Désactiver les logs" _ui_item 8 "Vérifier SHA-256 du binaire" _ui_item 9 "Voir les erreurs" _ui_item 10 "Effacer les erreurs" _ui_item 11 "Définir un binaire existant ${DIM}(sans compiler)${RESET}" _ui_item 12 "Désinstaller" _ui_item 13 "Gérer Eggdrop ${DIM}(grades/salons — Eggdrop seul)${RESET}" _ui_item 0 "Retour" _ui_bot _ui_prompt read -r choice || choice=0 case "$choice" in 1) _service_install "$svc" || true ;; 2) _service_toggle "$svc" || true ;; 3) _service_start "$svc" || true ;; 4) _service_stop "$svc" || true ;; 5) _service_restart "$svc" || true ;; 6) _service_logs "$svc" || true ;; 7) _service_log_toggle "$svc" || true ;; 8) _service_verify_sha256 "$svc" || true ;; 9) _service_show_errors "$svc" || true ;; 10) _service_clear_errors "$svc" || true ;; 11) _service_set_binary "$svc" || true ;; 12) _service_uninstall "$svc" || true ;; 13) if [[ "$svc" == "eggdrop" ]]; then _eggdrop_grades_menu else _warn "Uniquement pour Eggdrop." fi ;; 0) return ;; *) _warn "Choix invalide." || true ;; esac _pause done } _panel_services() { _services_init _st_reconcile local c while true; do _ui_width _ui_title "Panel Services" "Eggdrop · IriX · Anope · Lea · OverOp" _ui_top _ui_row "${BOLD}État des services${RESET}" _ui_mid _services_overview _menu_reset _ui_head "Gérer" # Eggdrop est le socle : toujours accessible dès que ses paquets sont là. _menu_gate 1 "Eggdrop ${DIM}(bot hôte)${RESET}" "$(_menu_reason eggdrop)" _menu_gate 2 "IriX Services ${DIM}(module Tcl d'Eggdrop)${RESET}" "$(_menu_reason irix)" _menu_gate 3 "Anope Services" "$(_menu_reason anope)" _menu_gate 4 "Lea Service" "$(_menu_reason lea)" # Les robots de prêt : des Eggdrop de plus, pas des modules d'IriX. # Ils ont donc leur propre panel, et le même verrou qu'IriX — sans le # binaire Eggdrop, il n'y a rien à poser. _menu_gate 5 "OverOp ${DIM}(robots de prêt — un par lot de salons)${RESET}" "$(_menu_reason overop)" _menu_add 0 "Retour" _ui_bot _ui_prompt read -r c || c=0 _menu_has "$c" || { _warn "Choix indisponible ou verrouillé."; continue; } case "$c" in 1) _panel_service_detail "eggdrop" || true ;; 2) _panel_irix || true ;; 3) _panel_service_detail "anope" || true ;; 4) _panel_service_detail "lea" || true ;; 5) _panel_overop || true ;; 0) return ;; esac done } # ============================================================================= # ════════════════════════════════════════════════════ # SERVERS — UnrealIRCd / Hybrid / ircu / Overtchat # ════════════════════════════════════════════════════ # ============================================================================= # ----------------------------------------------------------------------------- # _srv_file # Retourne le chemin du fichier JSON des serveurs. # ----------------------------------------------------------------------------- _srv_file() { echo "${SERVERS_FILE}" } # ----------------------------------------------------------------------------- # _srv_get # Lecture d'un champ JSON pour un serveur donné. # ----------------------------------------------------------------------------- _srv_get() { local srv="$1" field="$2" jq -r --arg s "$srv" ".servers[\$s].${field}" "$(_srv_file)" } # ----------------------------------------------------------------------------- # _srv_set [args jq...] # Mise à jour atomique du fichier JSON via _jq_update. # ----------------------------------------------------------------------------- _srv_set() { local srv="$1"; shift local filter="$1"; shift _jq_update "$(_srv_file)" --arg s "$srv" "$filter" "$@" _sha256_store "$(_srv_file)" "$INIT_BASE" "$SERVERS_KEY" } # ----------------------------------------------------------------------------- # _srv_paths # Affiche sur stdout : # ----------------------------------------------------------------------------- _srv_paths() { local srv="$1" local base base=$(_srv_get "$srv" "install_dir") printf '%s/run %s/run/server.pid %s/run/server.log\n' "$base" "$base" "$base" } # ============================================================================= # Initialisation # ============================================================================= # ----------------------------------------------------------------------------- # _sources_sync # Aligne les source_url et versions des JSON DÉJÀ ÉCRITS sur les constantes # épinglées en tête de ce script. # # Sans ça, l'épinglage ne vaudrait que pour une installation neuve : les deux # _init ci-dessous ne réécrivent jamais un fichier existant, et ces fichiers # ne sont pas suivis par git. Une installation en service serait donc restée # sur ses anciennes URL — dont deux ne fonctionnaient plus le 30/07/2026 # (une page HTML pour ircu, un compte GitHub abandonné pour Overtchat-Hybrid), # pendant que le dépôt affirmerait le contraire. # # Ce que la fonction NE fait pas : toucher à l'état d'installation. Elle ne # change que la provenance des sources et le numéro annoncé. Un composant # installé le reste, avec son binaire — c'est à la réinstallation que la # nouvelle version sera prise. # ----------------------------------------------------------------------------- _sources_sync() { local f cle url ver actuel n=0 f="$(_srv_file)" if [[ -f "$f" ]]; then while read -r cle url ver; do actuel=$(jq -r --arg s "$cle" '.servers[$s].source_url // ""' "$f" 2>/dev/null) [[ "$actuel" == "$url" ]] && continue jq --arg s "$cle" --arg u "$url" --arg v "$ver" \ '.servers[$s].source_url = $u | .servers[$s].version = $v' \ "$f" > "${f}.tmp" && mv "${f}.tmp" "$f" || { rm -f "${f}.tmp"; continue; } _info_f "Source mise à jour : %s → %s" "${cle}" "${ver}" (( n++ )) done <<-LISTE unrealircd $URL_UNREALIRCD $VER_UNREALIRCD hybrid $URL_HYBRID $VER_HYBRID ircu $URL_IRCU $VER_IRCU inspircd $URL_INSPIRCD $VER_INSPIRCD bahamut $URL_BAHAMUT $VER_BAHAMUT LISTE # Overtchat-Hybrid n'a pas de `source_url` : ses sources sont dans le # projet, et, depuis le 28/09/2026, le SITE d'où vient l'installateur # sert son archive — adresse DÉRIVÉE à l'exécution (`_brutegit`), avec # l'empreinte du manifeste (voir `_install_overtchat`). Le source_url # qui traînait pointait vers un compte GitHub abandonné : un champ faux # reste un champ qu'on finira par croire. # Le test porte sur le TYPE, pas sur le texte : `jq -r … // ""` rend la # chaîne vide pour un null JSON, ce qui faisait réécrire le fichier à # chaque passage — une non-idempotence invisible, attrapée au banc. if ! jq -e '.servers.overtchat_ircd.source_url == null and .servers.overtchat_ircd.sources_locales == "Servers/overtchat-hybrid"' \ "$f" >/dev/null 2>&1; then jq '.servers.overtchat_ircd.source_url = null | .servers.overtchat_ircd.sources_locales = "Servers/overtchat-hybrid" | .servers.overtchat_ircd.name = "Overtchat-Hybrid"' \ "$f" > "${f}.tmp" && mv "${f}.tmp" "$f" || rm -f "${f}.tmp" _info "Source mise à jour : overtchat_ircd → sources du projet" (( n++ )) fi fi f="$SERVICES_FILE" if [[ -f "$f" ]]; then while read -r cle url ver; do actuel=$(jq -r --arg s "$cle" '.services[$s].source_url // ""' "$f" 2>/dev/null) [[ "$actuel" == "$url" ]] && continue jq --arg s "$cle" --arg u "$url" --arg v "$ver" \ '.services[$s].source_url = $u | .services[$s].version = $v' \ "$f" > "${f}.tmp" && mv "${f}.tmp" "$f" || { rm -f "${f}.tmp"; continue; } _info_f "Source mise à jour : %s → %s" "${cle}" "${ver}" (( n++ )) done <<-LISTE eggdrop $URL_EGGDROP $VER_EGGDROP anope $URL_ANOPE $VER_ANOPE LISTE fi (( n > 0 )) && _ok "${n} source(s) alignée(s) sur les versions épinglées." return 0 } # ----------------------------------------------------------------------------- # _servers_migrate # # Ajoute au servers.json EXISTANT les serveurs qu'il ne connaît pas encore. # # _servers_init n'écrit qu'un fichier NEUF : une installation en service ne # verrait jamais un serveur ajouté après elle — celui de production, au # 31/07/2026, n'en déclare que quatre. _sources_sync, lui, aurait bien créé # l'entrée, mais réduite à `source_url` et `version` : jq crée le chemin qu'on # lui donne. Or une entrée sans `install_dir` est pire que pas d'entrée du # tout — un install_dir nul fait compiler dans le répertoire courant, et c'est # ce défaut qui a déposé 876 Mo dans un dossier littéralement nommé « null » # au sein du dépôt. # # Ce qui existe l'emporte sur les valeurs par défaut, sauf les champs nuls : # une entrée à moitié écrite par _sources_sync se complète sans perdre ce # qu'elle portait, et un serveur déjà installé n'est jamais rétrogradé en # « installed: false ». # ----------------------------------------------------------------------------- _servers_migrate() { local f srv nom dossier ver url ssl n=0 f="$(_srv_file)" [[ -f "$f" ]] || return 0 while read -r srv nom dossier ver url ssl; do [[ -z "$srv" ]] && continue jq -e --arg s "$srv" '(.servers[$s].install_dir // "") != ""' "$f" >/dev/null 2>&1 && continue jq --arg s "$srv" --arg n "$nom" --arg d "${SERVERS_DIR}/${dossier}" \ --arg v "$ver" --arg u "$url" --argjson ssl "$ssl" \ '.servers[$s] = ({ name: $n, version: $v, installed: false, enabled: false, running: false, install_dir: $d, binary: null, config: null, port: 6667, port_ssl: $ssl, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_start: null, last_stop: null, source_url: $u } + ((.servers[$s] // {}) | with_entries(select(.value != null))))' \ "$f" > "${f}.tmp" && mv "${f}.tmp" "$f" || { rm -f "${f}.tmp"; continue; } _info_f "Serveur ajouté à la configuration : %s" "${nom}" (( n++ )) done < 0 )) && _ok "${n} serveur(s) ajouté(s) à servers.json." # La version du serveur maison, rattrapée à chaque passage. # # Elle était écrite « 1.0.0 » en dur à la création du fichier ; le serveur # est passé en 2.0.0 le 31/07/2026 et aucune installation ne l'a su. Ici, # contrairement aux entrées ci-dessus, on ÉCRASE ce qui existe : cette # version n'est pas une préférence d'exploitant, c'est un fait lu dans les # sources livrées. Les autres serveurs gardent la leur — la nôtre est la # seule dont le projet porte le code. local vo ancienne vo="$(_overtchat_version)" if [[ -n "$vo" ]]; then ancienne="$(jq -r '.servers.overtchat_ircd.version // ""' "$f" 2>/dev/null)" if [[ "$ancienne" != "$vo" ]]; then if jq --arg v "$vo" '.servers.overtchat_ircd.version = $v' \ "$f" > "${f}.tmp" 2>/dev/null && mv "${f}.tmp" "$f"; then _info "Overtchat-Hybrid : version corrigée (${ancienne:-vide} → ${vo})." else rm -f "${f}.tmp" fi fi fi return 0 } # ----------------------------------------------------------------------------- # _servers_init # Crée le fichier JSON de configuration si absent. # ----------------------------------------------------------------------------- # ----------------------------------------------------------------------------- # _overtchat_version — la version du serveur maison, LUE dans ses sources. # # Elle était écrite « 1.0.0 » en dur dans le fichier neuf ci-dessous, et y est # restée quand le serveur est passé en 2.0.0 le 31/07/2026 : toute installation # faite depuis déclare une version que le binaire dément. Les autres serveurs # ont leur `VER_*` épinglé — celui-ci n'en a pas besoin, ses sources sont # livrées avec le projet et `ircd_defs.h` fait autorité (ARCHITECTURE.md le dit # déjà pour le numéro que les clients IRC reçoivent en 351). # # Repli sur une chaîne vide plutôt que sur un numéro inventé : une version # absente se voit, une version fausse se croit. # # ⚠ (29/09/2026) Le serveur COMPILÉ que sert le site n'a PAS d'`ircd_defs.h` : # son archive porte un fichier `VERSION` d'une ligne (Tools/faire-binaire- # hybrid.sh), déballé à la racine du dossier installé. Sans ce repli, une # installation par le binaire déclarait une version VIDE. # ----------------------------------------------------------------------------- _overtchat_version() { local f v for f in "$BASE_DIR/Servers/overtchat-hybrid/include/ircd_defs.h" \ "$SERVERS_DIR/overtchat-ircd/include/ircd_defs.h"; do [[ -r "$f" ]] || continue v="$(sed -n 's/^#define[[:space:]]*OVERTCHAT_VERSION[[:space:]]*"\([^"]*\)".*/\1/p' "$f" | head -1)" [[ -n "$v" ]] && { printf '%s' "$v"; return 0; } done # ⚠ Le motif borne ce qu'on accepte : un fichier corrompu ou une page # d'erreur ne doit pas devenir une « version » dans servers.json. f="$SERVERS_DIR/overtchat-ircd/VERSION" if [[ -r "$f" ]]; then v="$(head -1 "$f" 2>/dev/null | tr -d '[:space:]')" [[ "$v" =~ ^[0-9][0-9A-Za-z.+-]{0,31}$ ]] && { printf '%s' "$v"; return 0; } fi return 0 } _servers_init() { if [[ -f "$(_srv_file)" ]]; then # La migration d'abord : _sources_sync poserait sinon une version et une # URL sur une entrée sans install_dir, et la croirait complète. _servers_migrate _sources_sync return 0 fi mkdir -p "$(dirname "$(_srv_file)")" jq -n \ --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" \ --arg d "$SERVERS_DIR" \ --arg vu "$VER_UNREALIRCD" --arg uu "$URL_UNREALIRCD" \ --arg vh "$VER_HYBRID" --arg uh "$URL_HYBRID" \ --arg vi "$VER_IRCU" --arg ui "$URL_IRCU" \ --arg vp "$VER_INSPIRCD" --arg up "$URL_INSPIRCD" \ --arg vb "$VER_BAHAMUT" --arg ub "$URL_BAHAMUT" \ --arg vo "$(_overtchat_version)" \ '{ meta: { created: $ts }, servers: { unrealircd: { name: "UnrealIRCd", version: $vu, installed: false, enabled: false, running: false, install_dir: ($d+"/unrealircd"), binary: null, config: null, port: 6667, port_ssl: 6697, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_start: null, last_stop: null, source_url: $uu }, hybrid: { name: "ircd-Hybrid", version: $vh, installed: false, enabled: false, running: false, install_dir: ($d+"/hybrid"), binary: null, config: null, port: 6667, port_ssl: 6697, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_start: null, last_stop: null, source_url: $uh }, ircu: { name: "ircu", version: $vi, installed: false, enabled: false, running: false, install_dir: ($d+"/ircu"), binary: null, config: null, port: 6667, port_ssl: null, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_start: null, last_stop: null, source_url: $ui }, inspircd: { name: "InspIRCd", version: $vp, installed: false, enabled: false, running: false, install_dir: ($d+"/inspircd"), binary: null, config: null, port: 6667, port_ssl: 6697, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_start: null, last_stop: null, source_url: $up }, bahamut: { name: "Bahamut", version: $vb, installed: false, enabled: false, running: false, install_dir: ($d+"/bahamut"), binary: null, config: null, port: 6667, port_ssl: 6697, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_start: null, last_stop: null, source_url: $ub }, overtchat_ircd: { name: "Overtchat-Hybrid", version: $vo, installed: false, enabled: false, running: false, install_dir: ($d+"/overtchat-ircd"), binary: null, config: null, port: 6667, port_ssl: 6697, log: { enabled: true, path: null, level: "info" }, sha256: { verified: false, expected_hash: null, last_checked: null }, errors: [], last_start: null, last_stop: null, source_url: null, sources_locales: "Servers/overtchat-hybrid" } } }' > "$(_srv_file)" _sha256_store "$(_srv_file)" "$INIT_BASE" "$SERVERS_KEY" _ok "Configuration des serveurs initialisée." } # ============================================================================= # Cycle de vie : démarrage / arrêt / redémarrage # ============================================================================= # ----------------------------------------------------------------------------- # _server_start # ----------------------------------------------------------------------------- _server_start() { local srv="$1" local install_dir bin run_dir pid_file log_file pid install_dir=$(_srv_get "$srv" "install_dir") bin=$(_srv_get "$srv" "binary") read -r run_dir pid_file log_file < <(_srv_paths "$srv") [[ -z "$bin" || "$bin" == "null" ]] && { _err "Aucun binaire défini pour $srv."; return 1; } [[ ! -x "${install_dir}/${bin}" ]] && { _err "Binaire introuvable ou non exécutable : ${install_dir}/${bin}"; return 1; } # Déjà en cours ? if [[ -f "$pid_file" ]] && kill -0 "$(cat "$pid_file")" 2>/dev/null; then _warn_f "%s est déjà en cours d'exécution." "$srv" return 0 fi mkdir -p "$run_dir" _info_f "Démarrage de %s…" "$srv" nohup "${install_dir}/${bin}" > "$log_file" 2>&1 & pid=$! echo "$pid" > "$pid_file" sleep 1 if kill -0 "$pid" 2>/dev/null; then _srv_set "$srv" \ '.servers[$s].running = true | .servers[$s].last_start = $ts' \ --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" _log_entry "$srv" "start" "PID=$pid" _ok_f "%s démarré (PID : %s)." "$srv" "$pid" else rm -f "$pid_file" _server_report_error "$srv" "Échec du démarrage" _err_f "Le processus %s s'est terminé immédiatement." "$srv" return 1 fi } # ----------------------------------------------------------------------------- # _server_stop # ----------------------------------------------------------------------------- _server_stop() { local srv="$1" local pid_file pid read -r _ pid_file _ < <(_srv_paths "$srv") if [[ ! -f "$pid_file" ]]; then _warn_f "%s : aucun PID trouvé, processus probablement déjà arrêté." "$srv" return 0 fi pid=$(cat "$pid_file") if kill -0 "$pid" 2>/dev/null; then _info_f "Envoi de SIGTERM au PID %s…" "$pid" kill "$pid" sleep 2 if kill -0 "$pid" 2>/dev/null; then _warn "Le processus ne répond pas, envoi de SIGKILL…" kill -9 "$pid" sleep 1 fi else _warn_f "%s : PID %s introuvable dans les processus actifs." "$srv" "$pid" fi rm -f "$pid_file" _srv_set "$srv" \ '.servers[$s].running = false | .servers[$s].last_stop = $ts' \ --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" _log_entry "$srv" "stop" "PID=$pid" _ok_f "%s arrêté." "$srv" } # ----------------------------------------------------------------------------- # _server_restart # ----------------------------------------------------------------------------- _server_restart() { local srv="$1" _info_f "Redémarrage de %s…" "$srv" _server_stop "$srv" sleep 1 _server_start "$srv" } # ============================================================================= # Statut # ============================================================================= # ----------------------------------------------------------------------------- # _server_status # Affiche "running" ou "stopped". # ----------------------------------------------------------------------------- _server_status() { local srv="$1" local pid_file read -r _ pid_file _ < <(_srv_paths "$srv") if [[ -f "$pid_file" ]] && kill -0 "$(cat "$pid_file")" 2>/dev/null; then echo "running" else echo "stopped" fi } # ----------------------------------------------------------------------------- # _server_status_icon # Affiche une icône colorée résumant l'état du serveur. # ----------------------------------------------------------------------------- _server_status_icon() { local srv="$1" local installed enabled running has_error sha_ok icon suffix="" installed=$(_srv_get "$srv" "installed") enabled=$(_srv_get "$srv" "enabled") running=$(_srv_get "$srv" "running") has_error=$(jq -r --arg s "$srv" '.servers[$s].errors | length > 0' "$(_srv_file)") sha_ok=$(_srv_get "$srv" "sha256.verified") if [[ "$installed" == "false" ]]; then icon="$(_ui_badge off 'non installé')" elif [[ "$running" == "true" ]]; then icon="$(_ui_badge run 'en marche')" elif [[ "$enabled" == "true" ]]; then icon="$(_ui_badge warn 'arrêté')" else icon="$(_ui_badge err 'désactivé')" fi [[ "$sha_ok" == "false" && "$installed" == "true" ]] && suffix+=" ${ORANGE}⚠${RESET}${DIM} sha256${RESET}" [[ "$has_error" == "true" ]] && suffix+=" ${RED}⚑${RESET}${DIM} erreurs${RESET}" printf '%s' "${icon}${suffix}" } # ----------------------------------------------------------------------------- # _servers_overview # Tableau récapitulatif de tous les serveurs. # ----------------------------------------------------------------------------- # Ce que chaque serveur implique — la question qu'on se pose avant d'installer, # et à laquelle cet écran ne répondait pas : il n'affichait que des noms. # # Le point décisif n'est pas la performance, c'est la COMPATIBILITÉ. IriX parle # à son serveur par un lien ULine et lui adresse SVSNICK, SVSJOIN, SVS2MODE ; # le chat du site, lui, passe par le module websocket d'UnrealIRCd. Choisir # autre chose, c'est renoncer à une partie de l'ensemble — autant le savoir # avant, plutôt que de le découvrir une fois le serveur compilé. _srv_resume() { case "$1" in unrealircd) echo "tout fonctionne : services IriX, chat du site, modération" ;; hybrid) echo "léger et robuste — pas de chat sur le site (aucun websocket)" ;; ircu) echo "conçu pour les très grands réseaux — austère, services limités" ;; inspircd) echo "modulaire, très répandu — SVSNICK, SVSJOIN et SVSPART présents" ;; overtchat_ircd) echo "variante maison d'UnrealIRCd" ;; *) echo "" ;; esac } # S'affiche DANS un cadre déjà ouvert par l'appelant. _servers_overview() { local servers=( unrealircd hybrid ircu inspircd bahamut overtchat_ircd ) local srv name icon resume for srv in "${servers[@]}"; do name=$(_srv_get "$srv" "name") [[ -z "$name" || "$name" == "null" ]] && name="$srv" icon=$(_server_status_icon "$srv") resume=$(_srv_resume "$srv") _ui_row " ${BOLD}${name}${RESET}$(_ui_pad "$name" 24)${icon}" [[ -n "$resume" ]] && _ui_row " ${DIM}${resume}${RESET}" done _ui_mid _ui_row "${DIM}Un seul serveur suffit. IriX et le chat du site sont écrits pour${RESET}" _ui_row "${DIM}UnrealIRCd : les autres s'installent, mais n'en offrent qu'une partie.${RESET}" } # ============================================================================= # Logs # ============================================================================= # ----------------------------------------------------------------------------- # _server_logs # Suit le fichier de log en temps réel. # ----------------------------------------------------------------------------- _server_logs() { local srv="$1" local log_file read -r _ _ log_file < <(_srv_paths "$srv") if [[ ! -f "$log_file" ]]; then _warn_f "Aucun fichier de log trouvé pour %s." "$srv" return 1 fi _info_f "Logs de %s (Ctrl+C pour quitter) :" "$srv" tail -f "$log_file" } # ============================================================================= # Toggle # ============================================================================= # ----------------------------------------------------------------------------- # _server_toggle # Active ou désactive un serveur (champ enabled). # ----------------------------------------------------------------------------- _server_toggle() { local srv="$1" local current new_state ts current=$(_srv_get "$srv" "enabled") ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" if [[ "$current" == "true" ]]; then new_state=false _srv_set "$srv" \ '.servers[$s].enabled = false | .servers[$s].running = false | .servers[$s].last_stop = $ts' \ --arg ts "$ts" else new_state=true _srv_set "$srv" \ '.servers[$s].enabled = true | .servers[$s].last_start = $ts' \ --arg ts "$ts" fi _log_entry "$srv" "toggle" "enabled=${new_state}" _ok_f "%s → enabled=%s" "$srv" "${new_state}" } # ----------------------------------------------------------------------------- # _server_log_toggle # Active ou désactive la journalisation d'un serveur. # ----------------------------------------------------------------------------- _server_log_toggle() { local srv="$1" local current new_state current=$(_srv_get "$srv" "log.enabled") [[ "$current" == "true" ]] && new_state=false || new_state=true _srv_set "$srv" '.servers[$s].log.enabled = $v' --argjson v "$new_state" _ok_f "%s : logs → %s" "$srv" "${new_state}" } # ============================================================================= # Ports # ============================================================================= # ----------------------------------------------------------------------------- # _server_set_port # Modifie les ports IRC et SSL d'un serveur. # ----------------------------------------------------------------------------- _server_set_port() { local srv="$1" local cur_port cur_ssl port ssl_port cur_port=$(_srv_get "$srv" "port") cur_ssl=$(_srv_get "$srv" "port_ssl") [[ "$cur_ssl" == "null" ]] && cur_ssl="aucun" read -rp " Port IRC [actuel : ${cur_port}] : " port || true read -rp " Port SSL [actuel : ${cur_ssl}] : " ssl_port || true # --argjson injecte la saisie telle quelle dans jq : une frappe comme # "6667a" produisait un JSON invalide → jq en erreur → _die → fermeture du # panel. On valide avant, et on refuse proprement. _valid_port() { [[ "$1" =~ ^[0-9]+$ ]] && (( $1 >= 1 && $1 <= 65535 )) } local changed=0 if [[ -n "$port" ]]; then if _valid_port "$port"; then _srv_set "$srv" '.servers[$s].port = $p' --argjson p "$port"; changed=1 else _err_f "Port IRC invalide : « %s » (attendu : 1-65535). Inchangé." "$port" fi fi if [[ -n "$ssl_port" ]]; then if _valid_port "$ssl_port"; then _srv_set "$srv" '.servers[$s].port_ssl = $p' --argjson p "$ssl_port"; changed=1 else _err_f "Port SSL invalide : « %s » (attendu : 1-65535). Inchangé." "$ssl_port" fi fi (( changed )) && _ok "$srv : ports mis à jour." || _info "Aucun changement." return 0 } # ============================================================================= # Gestion des erreurs # ============================================================================= # ----------------------------------------------------------------------------- # _server_report_error # ----------------------------------------------------------------------------- _server_report_error() { local srv="$1" msg="$2" ts ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" _srv_set "$srv" \ '.servers[$s].errors += [{ ts: $ts, msg: $msg }]' \ --arg ts "$ts" --arg msg "$msg" _log_entry "$srv" "error" "$msg" } # ----------------------------------------------------------------------------- # _server_show_errors # ----------------------------------------------------------------------------- _server_show_errors() { local srv="$1" local count _section "Erreurs — $(_srv_get "$srv" "name")" count=$(jq -r --arg s "$srv" '.servers[$s].errors | length' "$(_srv_file)") if [[ "$count" -eq 0 ]]; then _ok "Aucune erreur enregistrée." else jq -r --arg s "$srv" \ '.servers[$s].errors[] | " [\(.ts)] \(.msg)"' \ "$(_srv_file)" fi } # ----------------------------------------------------------------------------- # _server_clear_errors # ----------------------------------------------------------------------------- _server_clear_errors() { local srv="$1" _srv_set "$srv" '.servers[$s].errors = []' _ok_f "%s : historique des erreurs effacé." "$srv" } # ============================================================================= # SHA-256 # ============================================================================= # ----------------------------------------------------------------------------- # _server_verify_sha256 # ----------------------------------------------------------------------------- _server_verify_sha256() { local srv="$1" local install_dir archive stored current ts install_dir=$(_srv_get "$srv" "install_dir") archive=$(find "$install_dir" -maxdepth 1 \( -name "*.tar.gz" -o -name "*.tgz" \) 2>/dev/null | head -1) if [[ -z "$archive" ]]; then _warn_f "Aucune archive source trouvée dans %s." "${install_dir}" return 2 # 2 = archive absente (distinct d'un hash invalide, qui rend 1) fi stored=$(_srv_get "$srv" "sha256.expected_hash") current=$(_sha256 "$archive") ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" # Première vérification : on ENREGISTRE la référence au lieu de la comparer. # # Cette branche manquait — elle existe pourtant dans le jumeau # _service_verify_sha256, dont cette fonction est la copie côté serveurs. # `expected_hash` est initialisé à null par _servers_init et n'était écrit # nulle part : _srv_get rendait donc la chaîne "null", jamais égale à un # hash. Résultat, « Vérifier SHA-256 » répondait INVALIDE à tous les coups, # empilait une erreur dans servers.json et marquait le serveur en défaut # de façon permanente — sur une installation parfaitement saine. if [[ -z "$stored" || "$stored" == "null" ]]; then _srv_set "$srv" \ '.servers[$s].sha256.expected_hash = $h | .servers[$s].sha256.verified = true | .servers[$s].sha256.last_checked = $ts' \ --arg h "$current" --arg ts "$ts" _ok "SHA-256 enregistré comme référence (première vérification)." return 0 fi if [[ "$stored" == "$current" ]]; then _srv_set "$srv" \ '.servers[$s].sha256.verified = true | .servers[$s].sha256.last_checked = $ts' \ --arg ts "$ts" _ok "SHA-256 valide." else _srv_set "$srv" \ '.servers[$s].sha256.verified = false | .servers[$s].sha256.last_checked = $ts' \ --arg ts "$ts" _err "SHA-256 INVALIDE !" printf " Attendu : ${GREEN}%s${RESET}\n" "$stored" printf " Obtenu : ${RED}%s${RESET}\n" "$current" _server_report_error "$srv" "SHA-256 invalide" return 1 fi } # ============================================================================= # Installation # ============================================================================= # ----------------------------------------------------------------------------- # _install_deps — SUPPRIMÉE le 19/07/2026, remplacée par _pkg_install. # # L'ancienne version était liée à Debian (`dpkg -s`, `sudo apt-get`) : sur # RHEL/Arch/SUSE/Alpine, `dpkg -s` étant absent, TOUS les paquets étaient jugés # manquants, puis `apt-get` introuvable faisait retourner 1 — ce qui déclenchait # `_install_fail` et donc un `rm -rf` du dossier d'installation. Une simple # erreur de distribution détruisait une installation valide. # # `_pkg_install` gère apt/dnf/yum/pacman/zypper/apk, traduit les noms de paquets # par famille, et n'élève les privilèges que si c'est possible. # ----------------------------------------------------------------------------- # ----------------------------------------------------------------------------- # _server_verify # Vérifie que le binaire du serveur est présent et exécutable. # ----------------------------------------------------------------------------- _server_verify() { local srv="$1" local install_dir bin install_dir=$(_srv_get "$srv" "install_dir") bin=$(_srv_get "$srv" "binary") [[ -z "$bin" || "$bin" == "null" ]] && return 1 [[ -x "${install_dir}/${bin}" ]] || return 1 return 0 } # ----------------------------------------------------------------------------- # _install_fail # Rollback après une installation échouée. # ----------------------------------------------------------------------------- _install_fail() { local srv="$1" local dir local reason="${2:-build}" dir=$(_srv_get "$srv" "install_dir") # Un échec de dépendances ou de sources n'est pas une installation # corrompue : parler de « rollback » et supprimer le dossier induisait en # erreur, et détruisait une installation valide sur simple sudo refusé. case "$reason" in deps) _err "Dépendances non satisfaites — installation abandonnée, rien n'a été supprimé." _server_report_error "$srv" "Dépendances système manquantes" return 0 ;; sources) _err "Sources introuvables — installation abandonnée, rien n'a été supprimé." _info "Dépose l'archive dans Components/Serveur/lib/ ou renseigne source_url." _server_report_error "$srv" "Archive source manquante" return 0 ;; # ⚠ Overtchat-Hybrid hors clone, depuis le 29/09/2026 : il ne vient QUE # du serveur compilé que sert le site (ses sources ne sont plus # servies). Rien n'a été déballé dans : rien à défaire. binaire) _err "Serveur compilé indisponible ou refusé — installation abandonnée, rien n'a été supprimé." _server_report_error "$srv" "Serveur compilé indisponible" return 0 ;; machine) _err "Cette machine ne peut pas faire tourner le serveur compilé — installation abandonnée, rien n'a été supprimé." _server_report_error "$srv" "Machine incompatible avec le serveur compilé" return 0 ;; esac _err "Installation échouée → rollback." _safe_rmrf "$dir" _srv_set "$srv" '.servers[$s].installed = false' _server_report_error "$srv" "Installation échouée" } # ----------------------------------------------------------------------------- # _install_unrealircd # ----------------------------------------------------------------------------- # ----------------------------------------------------------------------------- # _find_local_archive # Cherche une archive fournie avec le projet, la plus récente d'abord. # Permet une installation hors ligne et évite de dépendre d'une URL amont. # ----------------------------------------------------------------------------- _find_local_archive() { local pattern="${1:-*.tar.gz}" d f for d in "$BASE_DIR/Components/Serveur/lib" \ "$BASE_DIR/Components/Service/lib" \ "$BASE_DIR/Servers/lib"; do [[ -d "$d" ]] || continue f=$(find "$d" -maxdepth 1 -name "$pattern" -type f -printf '%T@ %p\n' 2>/dev/null \ | sort -rn | head -1 | cut -d' ' -f2-) [[ -n "$f" ]] && { printf '%s' "$f"; return 0; } done return 1 } # ----------------------------------------------------------------------------- # _srv_fetch_sources # Récupère et déballe les sources dans : archive locale d'abord, # téléchargement en repli, dépôt git si source_url pointe vers un dépôt. # Retour : 0 = sources prêtes, 2 = sources introuvables (pas un échec de build) # ----------------------------------------------------------------------------- _srv_fetch_sources() { _fetch_sources "$(_srv_get "$1" "source_url")" "$2" "$3" "$1" } # ----------------------------------------------------------------------------- # _fetch_sources <étiquette> # Le même geste, mais pour une URL quelconque — les SERVICES (Eggdrop, Anope) # n'y avaient pas droit : ils clonaient en dur, ce qui interdisait d'épingler # une version par archive et rendait l'installation hors ligne impossible pour # eux seuls. Une seule récupération pour les deux familles. # ----------------------------------------------------------------------------- _fetch_sources() { # ⚠ 5ᵉ argument (28/09/2026) : l'empreinte ATTENDUE, quand elle ne vient pas # des constantes par adresse — celle que le MANIFESTE du site publie pour # l'archive d'Overtchat-Hybrid. Vide : la règle par adresse s'applique. local url="$1" dir="$2" pattern="$3" srv="${4:-composant}" attendu="${5:-}" local archive local_archive mkdir -p "$dir" # 17/10/2026 : une archive IMPOSÉE par l'appelant (`anope-construire # --archive=…`), qui l'a VÉRIFIÉE à l'empreinte avant de la poser ici — une # archive locale trouvée par `_find_local_archive`, elle, n'est contrôlée # que sur sa signature gzip. if [[ -n "${_ARCHIVE_IMPOSEE:-}" ]]; then local_archive="$_ARCHIVE_IMPOSEE" else local_archive=$(_find_local_archive "$pattern") fi if [[ -n "$local_archive" ]]; then _ok "Archive locale : $(basename "$local_archive")" archive="${dir}/src.tar.gz" cp "$local_archive" "$archive" _verify_gzip "$archive" || return 2 tar -xzf "$archive" -C "$dir" --strip-components=1 || return 1 return 0 fi if [[ -z "$url" || "$url" == "null" ]]; then _err_f "Aucune archive locale et aucun source_url défini pour %s." "$srv" _info_f "Dépose une archive dans Components/Serveur/lib/ (motif : %s)" "$pattern" return 2 fi # Dépôt git : on clone dans un temporaire puis on déplace, car $dir existe # déjà (git clone refuse un dossier non vide). if [[ "$url" == *.git || "$url" == https://github.com/* && "$url" != *.tar.gz ]]; then local tmpc tmpc=$(mktemp -d) _info_f "Clonage depuis %s…" "$url" if ! git clone --depth=1 "$url" "$tmpc/src" 2>/dev/null; then rm -rf "$tmpc" _err_f "Clonage impossible : %s" "$url" return 2 fi # Contenu déplacé dans $dir sans écraser ce qui s'y trouve déjà (shopt -s dotglob; mv "$tmpc"/src/* "$dir"/ 2>/dev/null) || true rm -rf "$tmpc" return 0 fi _info_f "Téléchargement depuis %s…" "$url" archive="${dir}/src.tar.gz" curl -fsSL --retry 3 --connect-timeout 10 "$url" -o "$archive" || return 2 _verify_gzip "$archive" || return 2 # ⚠ AVANT tar : une archive refusée ne doit rien avoir déposé. if ! _verifier_empreinte "$archive" "$url" "$srv" "$attendu"; then rm -f "$archive" return 2 fi tar -xzf "$archive" -C "$dir" --strip-components=1 || return 1 return 0 } # L'empreinte SHA-256 attendue pour une adresse, ou rien. # # ⚠ Par l'adresse EXACTE : une empreinte ne vaut que pour les octets qu'on a # mesurés. Une `source_url` changée à la main dans servers.json/services.json # n'a pas d'empreinte connue — voir `_verifier_empreinte`. _empreinte_attendue() { case "$1" in "$URL_UNREALIRCD") printf '%s' "$SHA256_UNREALIRCD" ;; "$URL_EGGDROP") printf '%s' "$SHA256_EGGDROP" ;; "$URL_ANOPE") printf '%s' "$SHA256_ANOPE" ;; "$URL_HYBRID") printf '%s' "$SHA256_HYBRID" ;; "$URL_IRCU") printf '%s' "$SHA256_IRCU" ;; "$URL_INSPIRCD") printf '%s' "$SHA256_INSPIRCD" ;; "$URL_BAHAMUT") printf '%s' "$SHA256_BAHAMUT" ;; *) printf '' ;; esac } # Compare l'empreinte d'une archive téléchargée à celle attendue. # <étiquette> [empreinte attendue, sinon lue par l'adresse] # Rend 0 si elle concorde, 1 si elle DIFFÈRE (l'archive est à refuser). # # ⚠⚠ Une adresse SANS empreinte connue (source changée par l'exploitant) # passe, mais en le DISANT, avec l'empreinte obtenue : refuser casserait un # choix délibéré, se taire ferait croire à une vérification qui n'a pas eu lieu. _verifier_empreinte() { local fichier="$1" url="$2" etiquette="${3:-composant}" attendu="${4:-}" obtenu [[ -n "$attendu" ]] || attendu=$(_empreinte_attendue "$url") obtenu=$(_sha256 "$fichier") if [[ -z "$attendu" ]]; then _warn_f "%s : adresse sans empreinte connue (%s) — seule la signature gzip est contrôlée. Empreinte obtenue : %s" \ "$etiquette" "$url" "$obtenu" return 0 fi if [[ "$obtenu" != "$attendu" ]]; then _err_f "%s : EMPREINTE DIFFÉRENTE — l'archive téléchargée n'est pas celle qui a été vérifiée. REFUSÉE." "$etiquette" _info_f " adresse : %s" "$url" _info_f " attendue : %s" "$attendu" _info_f " obtenue : %s" "$obtenu" _info " Si la version vient d'être montée, remesurez son empreinte en tête du script." return 1 fi _ok_f "%s : empreinte SHA-256 vérifiée." "$etiquette" return 0 } # ----------------------------------------------------------------------------- # _srv_finalize # Ne déclare installed=true QUE si un binaire exécutable existe réellement. # L'ancien code posait installed=true avec binary=null, ce que _server_verify # contredisait aussitôt : le panel affichait « installé » et refusait de # démarrer. # ----------------------------------------------------------------------------- _srv_finalize() { local srv="$1" dir="$2"; shift 2 local cand found="" for cand in "$@"; do [[ -x "${dir}/${cand}" ]] && { found="$cand"; break; } done if [[ -z "$found" ]]; then _err "Compilation terminée mais aucun binaire trouvé (cherché : $*)." _install_fail "$srv" return 1 fi mkdir -p "${dir}/run" touch "${dir}/.installed" _srv_set "$srv" \ '.servers[$s].binary = $b | .servers[$s].installed = true | .servers[$s].last_install = $ts' \ --arg b "$found" --arg ts "$(date -Iseconds)" _ok "$(_req_label "$srv") installé ($found)." return 0 } # ----------------------------------------------------------------------------- # _verify_gzip # `curl -f` n'échoue que sur un code HTTP >= 400. Un miroir qui répond 200 # avec une page d'erreur HTML, un portail captif ou une redirection vers une # page de téléchargement produisent donc un fichier « valide » que tar # recrache ensuite en "gzip: stdin: not in gzip format" — message illisible, # suivi d'un faux « rollback ». On contrôle la signature avant d'extraire. # ----------------------------------------------------------------------------- _verify_gzip() { local f="${1:-}" [[ -s "$f" ]] || { _err "Archive vide ou absente : $f"; return 1; } # Signature gzip : 1f 8b local magic magic=$(head -c2 "$f" | od -An -tx1 2>/dev/null | tr -d ' \n') if [[ "$magic" == "1f8b" ]]; then return 0; fi _err "Le fichier téléchargé n'est pas une archive gzip (signature: ${magic:-vide})." if head -c200 "$f" | grep -qiE "/source, installation dans . # # Tout mettre au même endroit provoquait une collision : l'archive contient # déjà un doc/, et DOCDIR pointant sur ce même doc/ faisait échouer # `make install` sur « identifient le même fichier » — après une # compilation pourtant réussie et un binaire correctement posé. # Nom volontairement distinct de "source" : UnrealIRCd crée lui-même un # lien de ce nom dans son scriptdir pendant `make install`, ce qui faisait # échouer l'installation sur « rm: ... source : est un dossier ». local src_dir="${dir}/_build-src" rc _srv_fetch_sources "$srv" "$src_dir" "unrealircd*.tar.gz"; rc=$? (( rc == 2 )) && { _install_fail "$srv" sources; return 1; } (( rc != 0 )) && { _install_fail "$srv"; return 1; } # './Config -quick' réutilise un config.settings existant et ÉCHOUE s'il # n'y en a pas — ce qui est toujours le cas sur une installation neuve # ("cannot be used because your 'config.settings' file either does not # exist..."). Sans ce fichier, la seule voie est le questionnaire # interactif, impossible depuis un panel. On génère donc des réponses par # défaut cohérentes avec l'arborescence du projet. if [[ ! -f "${src_dir}/config.settings" ]]; then _info "Génération de config.settings (installation non interactive)…" cat > "${src_dir}/config.settings" <<-SETTINGS BASEPATH="${dir}" BINDIR="${dir}/bin" DATADIR="${dir}/data" CONFDIR="${dir}/conf" MODULESDIR="${dir}/modules" LOGDIR="${dir}/logs" CACHEDIR="${dir}/cache" DOCDIR="${dir}/doc" TMPDIR="${dir}/tmp" PRIVATELIBDIR="${dir}/lib" SSLDIR="" REMOTEINC="1" MAXCONNECTIONS_REQUEST="auto" NICKNAMEHISTORYLENGTH="2000" DEFPERM="0600" SSLDIR="" EXTRAPARA="" SETTINGS_VERSION="1" SETTINGS_MAJOR_VERSION="6" SETTINGS_MINOR_VERSION="0" SETTINGS_PATCH_VERSION="0" SETTINGS fi ( cd "$src_dir" || exit 1 ./Config -quick && make -j"$(_make_jobs)" && make install ) || { _install_fail "$srv"; return 1; } # 'make install' place le binaire dans BINDIR ; source/src/ircd est le repli # si l'installation ne s'est pas faite. _srv_finalize crée run/ et la # sentinelle .installed, mais uniquement si un binaire existe réellement. _srv_finalize "$srv" "$dir" "bin/unrealircd" "_build-src/src/ircd" } # ----------------------------------------------------------------------------- # _install_hybrid # ----------------------------------------------------------------------------- _install_hybrid() { local srv="hybrid" dir rc dir=$(_srv_get "$srv" "install_dir") # shellcheck disable=SC2046 _pkg_install $(_req_for "$srv") || { _install_fail "$srv" deps; return 1; } # ⚠ « ircd-hybrid* » ET NON « *hybrid* », resserré le 12/08/2026. # # Le motif large captait `overtchat-hybrid-.tar.gz` — l'archive de # NOTRE serveur, que Tools/faire-archive-hybrid.sh déposait dans le même # dossier (outil retiré le 29/09/2026, avec les sources servies ; le # serveur COMPILÉ, `overtchat-hybrid-bin-*`, porte toujours « hybrid »). `_find_local_archive` rendant la plus RÉCENTE, ircd-Hybrid se # serait installé à partir des sources d'Overtchat-Hybrid, en annonçant # simplement « Archive locale : overtchat-hybrid-2.0.0.tar.gz ». # # Deux serveurs différents portent « hybrid » dans leur nom : le motif doit # donc nommer celui-ci, pas une famille. Un dépôt manuel s'appelle # `ircd-hybrid-8.2.47.tar.gz` — le seul cas que ce motif ait à couvrir, # puisqu'un téléchargement passe par `src.tar.gz` et ne le consulte pas. _srv_fetch_sources "$srv" "$dir" "ircd-hybrid*.tar.gz"; rc=$? (( rc == 2 )) && { _install_fail "$srv" sources; return 1; } (( rc != 0 )) && { _install_fail "$srv"; return 1; } # autoconf/automake/libtool n'étaient réclamés QUE parce qu'on l'a supposé. # L'archive du tag 8.2.47 porte un `configure` déjà généré (vérifié le # 30/07/2026) : exiger ces trois paquets faisait échouer l'installation sur # « dépendances non satisfaites » là où rien n'en avait besoin — et sur une # machine sans élévation, l'échec était définitif. On ne les demande donc # que si le `configure` manque vraiment. if [[ ! -x "${dir}/configure" ]]; then _info "Aucun ./configure dans les sources — génération par autotools." # shellcheck disable=SC2046 _pkg_install autoconf automake libtool || { _install_fail "$srv" deps; return 1; } fi # --prefix="$dir" : sans lui, configure vise /usr/local, donc root — alors # que tout le projet s'installe dans le home. Et `make` seul ne pose aucun # binaire dans bin/ : il faut `make install`, sinon on déclarait bin/ircd # sans qu'il existe jamais. ( cd "$dir" || exit 1 [[ -x ./autogen.sh && ! -f ./configure ]] && ./autogen.sh ./configure --prefix="$dir" && make -j"$(_make_jobs)" && make install ) || { _install_fail "$srv"; return 1; } _srv_finalize "$srv" "$dir" "bin/ircd" "src/ircd" } # ----------------------------------------------------------------------------- # _install_ircu # ----------------------------------------------------------------------------- _install_ircu() { local srv="ircu" dir rc dir=$(_srv_get "$srv" "install_dir") # L'ancienne version ne compilait RIEN : elle créait deux dossiers et # posait installed=true avec binary=null. _server_verify contredisait # aussitôt cet état — le panel affichait « installé » puis refusait de # démarrer, sans expliquer pourquoi. On tente une vraie compilation, et # on refuse honnêtement si les sources manquent. # # shellcheck disable=SC2046 _pkg_install $(_req_for "$srv") || { _install_fail "$srv" deps; return 1; } # Le source_url valait « https://coder-com.undernet.org/ » — une page, jamais # une archive : l'installation ne pouvait pas réussir, et le message ci-dessous # renvoyait l'exploitant vers cette même page. Depuis le 30/07/2026 elle vise # le tag u2.10.12.19 d'undernetirc/ircu2, dernier publié (2019) et vérifié. _srv_fetch_sources "$srv" "$dir" "*ircu*.tar.gz"; rc=$? if (( rc == 2 )); then _warn_f "Sources d'ircu2 indisponibles (réseau, ou tag %s retiré)." "${VER_IRCU}" _info "Repli : récupère l'archive sur https://github.com/undernetirc/ircu2/tags" _info "et dépose-la dans Components/Serveur/lib/ (motif : *ircu*.tar.gz)." _install_fail "$srv" sources return 1 fi (( rc != 0 )) && { _install_fail "$srv"; return 1; } # L'archive du tag u2.10.12.19 porte un `configure` déjà généré, ainsi que # configure.in et Makefile.in (vérifié le 30/07/2026). Le repli autotools # ci-dessous n'est donc PAS le chemin normal : c'est un filet pour le jour # où l'on partirait d'un clone du dépôt, qui lui n'a pas de configure. # --with-maxcon est INDISPENSABLE, et son absence ne se voit qu'au # démarrage. Sans lui, configure retient la limite DURE de descripteurs du # système — 1 048 576 sous WSL — et compile un binaire qui refuse ensuite de # se lancer : « MAXCLIENTS (or MAXCONNECTIONS) is (at least) 786432 too # large ». L'installation paraissait pourtant réussie, binaire posé compris. # # 4096 est très au-dessous de la borne du protocole lui-même : un numérique # P10 n'adresse que 262 144 clients par serveur (NN_MAX_CLIENT), et rien ne # sert de compiler au-delà de ce qu'on peut nommer. ( cd "$dir" || exit 1 [[ -x ./configure ]] || { autoreconf -i 2>/dev/null || autoconf 2>/dev/null; } [[ -x ./configure ]] || { echo "Aucun ./configure, et autoconf n'a pas pu le générer." >&2; exit 1; } ./configure --prefix="$dir" --with-maxcon=4096 \ && make -j"$(_make_jobs)" && make install ) || { _install_fail "$srv"; return 1; } _srv_finalize "$srv" "$dir" "bin/ircd" "ircd" } # ----------------------------------------------------------------------------- # _install_inspircd # # InspIRCd 4.11.0, compilé ici le 31/07/2026 — une minute sur cette machine, # sans un avertissement, avec les modules argon2, ldap, pcre2, gnutls et # openssl activés d'eux-mêmes parce que leurs bibliothèques étaient là. # # Trois écarts avec les autres serveurs du projet, tous constatés en compilant : # # 1. le `configure` est un script PERL, pas un produit d'autotools : ni # autoreconf ni autogen.sh n'ont de sens ici, et son absence ne se # rattrape pas ; # 2. il n'est PAS interactif tant qu'on lui passe des options, mais il le # devient sans — d'où le `/dev/null; then if openssl req -new -x509 -days 1825 -nodes -batch \ -subj "/CN=$(hostname -f 2>/dev/null || echo bahamut.local)" \ -out "${dir}/ircd.crt" -keyout "${dir}/ircd.key" >/dev/null 2>&1; then chmod 600 "${dir}/ircd.key" 2>/dev/null || true _ok "Certificat auto-signé généré (ircd.crt) — sans lui, aucun port n'écoute." else _warn "Certificat non généré : le serveur refusera d'ouvrir ses ports." _info "À faire à la main : openssl req -new -x509 -days 1825 -nodes -batch \\" _info_f " -subj '/CN=votre.serveur' -out %s/ircd.crt -keyout %s/ircd.key" "${dir}" "${dir}" fi else _warn "openssl absent : pas de certificat, donc aucun port ouvert au démarrage." fi fi _srv_finalize "$srv" "$dir" "ircd" } # ----------------------------------------------------------------------------- # _overtchat_bin_compatible [avant] # 0 si cette machine peut faire tourner le serveur COMPILÉ que sert le site ; # sinon 1, en disant POURQUOI. Hors clone, il n'y a plus d'autre voie : les # sources ne sont plus servies (29/09/2026) — l'appelant refuse, ou `--auto` # se rabat sur UnrealIRCd en le disant (`_auto_serveur_choisir`). # # ⚠⚠ `avant` : le contrôle du PRÉVOL de `--auto`, avant toute écriture — donc # avant `_check_deps`, qui pose `openssl` (et avec lui libssl.so.3). Sur une # machine nue (image Debian 12 minimale), libssl.so.3 peut manquer alors # qu'OpenSSL 3 est à un paquet près : exiger la bibliothèque à ce moment # ferait écarter notre serveur d'une machine qui le porte. En `avant`, seule # une OpenSSL INSTALLÉE et plus ancienne que 3 refuse ; l'absence est notée, # et l'étape 3 refait le contrôle strict (appel sans argument). # # ⚠ Ce sont les exigences MESURÉES dans le binaire par # Tools/faire-binaire-hybrid.sh (`objdump -T`, écrites dans son ARCHIVE-INFO) : # x86_64, glibc ≥ 2.34, libssl.so.3. Contrôlées AVANT tout téléchargement : # un binaire qui ne peut pas démarrer ne doit coûter ni le transfert, ni un # faux « installé ». # ⚠ `pipefail` est actif : on ne branche JAMAIS `ldconfig -p` sur `grep -q` # (grep sort au premier résultat, ldconfig meurt de SIGPIPE, et le tube rend # un échec sur une machine conforme). La sortie est lue, puis comparée. # ⚠ `ldconfig` vit dans /sbin, que le PATH d'un compte ordinaire n'a pas sous # Debian : on le cherche aussi là. # ----------------------------------------------------------------------------- _overtchat_bin_compatible() { local moment="${1:-}" glibc_min="2.34" arch glibc ldc="" c libs vssl arch=$(uname -m 2>/dev/null) || arch="" if [[ "$arch" != "x86_64" ]]; then _warn_f "Serveur compilé : architecture %s — il n'est fabriqué que pour x86_64." "${arch:-inconnue}" return 1 fi glibc=$(getconf GNU_LIBC_VERSION 2>/dev/null) || glibc="" glibc="${glibc##* }" if [[ ! "$glibc" =~ ^[0-9]+\.[0-9]+ ]] \ || [[ "$(printf '%s\n%s\n' "$glibc_min" "$glibc" | LC_ALL=C sort -V | head -1)" != "$glibc_min" ]]; then _warn_f "Serveur compilé : glibc %s sur cette machine — il exige glibc ≥ %s." "${glibc:-introuvable}" "$glibc_min" return 1 fi for c in "$(command -v ldconfig 2>/dev/null || true)" /usr/sbin/ldconfig /sbin/ldconfig; do [[ -n "$c" && -x "$c" ]] && { ldc="$c"; break; } done libs="" [[ -n "$ldc" ]] && { libs=$("$ldc" -p 2>/dev/null) || libs=""; } if [[ "$libs" != *"libssl.so.3 "* ]]; then if [[ "$moment" == avant ]]; then vssl="" if command -v openssl >/dev/null 2>&1; then vssl=$(openssl version 2>/dev/null) || vssl="" vssl="${vssl#OpenSSL }"; vssl="${vssl%% *}" fi if [[ "$vssl" =~ ^[0-2]\. ]]; then _warn_f "Serveur compilé : OpenSSL %s sur cette machine — il exige OpenSSL 3." "$vssl" return 1 fi _info "Serveur compilé : OpenSSL 3 pas encore présent — posé avec les dépendances, contrôle refait avant la pose du serveur." return 0 fi _warn "Serveur compilé : libssl.so.3 (OpenSSL 3) introuvable sur cette machine." return 1 fi return 0 } # ----------------------------------------------------------------------------- # _overtchat_arbre_local # 0 si CETTE installation porte l'arbre des sources d'Overtchat-Hybrid (un # clone du dépôt) : il se compile alors tel quel, sans rien demander au site. # Un seul test, pour `_install_overtchat` ET le prévol de `--auto` : deux # copies divergeraient, et l'un croirait à un clone que l'autre ne voit pas. # ----------------------------------------------------------------------------- _overtchat_arbre_local() { [[ -f "${BASE_DIR}/Servers/overtchat-hybrid/Makefile" && -d "${BASE_DIR}/Servers/overtchat-hybrid/src" ]] } # ----------------------------------------------------------------------------- # _overtchat_binaire # Pose le serveur COMPILÉ (Tools/faire-binaire-hybrid.sh) : archive locale # `overtchat-hybrid-bin-*.tar.gz`, sinon celle que sert le site # (/dl/overtchat-hybrid-bin), SEULEMENT avec l'empreinte du manifeste. # Retour : 0 = installé · 1 = échec définitif, déjà rapporté (archive # absente, refusée, empreinte manquante) · # 2 = CETTE MACHINE ne peut pas le faire tourner (dit) — contrôle de # la machine, ou binaire qui ne s'annonce pas à l'essai. # # ⚠⚠ Décision de SerVuS, 28/09/2026 : le site sert un serveur compilé plutôt # que ses sources. ⚠⚠ Et depuis le 29/09 au soir (« retire les sources et # mets notre serveur par défaut ») : les sources ne sont PLUS servies — sans # clone, ce binaire est la SEULE voie. Il n'y a donc plus de « repli sur les # sources » : le code 2 dit « pas sur cette machine », et c'est l'appelant # qui décide (refus, ou `--auto` qui se rabat sur UnrealIRCd en le disant). # ⚠ Déballé dans un dossier d'ESSAI, puis recopié une fois éprouvé : un binaire # qui ne démarre pas ne laisse rien dans . # ----------------------------------------------------------------------------- _overtchat_binaire() { local srv="$1" dir="$2" rc local essai="${dir}/.binaire-essai" _overtchat_bin_compatible || return 2 # Les dépendances d'EXÉCUTION seules : pas de gcc pour un binaire. # shellcheck disable=SC2046 _pkg_install $(_req_for overtchat_ircd_bin) || { _install_fail "$srv" deps; return 1; } # 🔴 Même règle que les sources : sans empreinte valide au MANIFESTE, AUCUNE # adresse n'est formée — donc aucun téléchargement. L'adresse vient du site # d'où vient CET installateur (`_brutegit`), jamais d'une adresse en dur. local url_bin="" sha_bin="" base_bin mf_bin base_bin=$(_brutegit) if [[ -n "$base_bin" ]] && mf_bin=$(_manifeste_fichier); then sha_bin=$(jq -r '.fichiers["overtchat-hybrid-bin"].sha256 // empty' "$mf_bin" 2>/dev/null) if [[ "$sha_bin" =~ ^[0-9a-f]{64}$ ]]; then url_bin="${base_bin}/overtchat-hybrid-bin"; else sha_bin=""; fi fi rm -rf "$essai" # ⚠ Motif PROPRE au binaire (`overtchat-hybrid-bin-*`) : une archive de # SOURCES déposée à la main (`overtchat-hybrid-.tar.gz`, l'ancien # format de Tools/faire-archive-hybrid.sh) ne doit jamais être prise # pour un serveur compilé — `_find_local_archive` rendrait la plus récente. rc=0 _fetch_sources "$url_bin" "$essai" "overtchat-hybrid-bin-*.tar.gz" "$srv" "$sha_bin" || rc=$? if (( rc != 0 )); then rm -rf "$essai" _warn "Serveur compilé indisponible ou refusé (ni archive locale, ni archive servie avec l'empreinte du manifeste)." _info "Les sources d'Overtchat-Hybrid ne sont plus servies : sans clone du dépôt, ce serveur ne vient que du binaire servi par le site (/dl/overtchat-hybrid-bin)." _install_fail "$srv" binaire return 1 fi rm -f "${essai}/src.tar.gz" # L'ESSAI : le binaire doit démarrer ici et annoncer la version de son # archive. Un binaire qui ne se lance pas (bibliothèque absente malgré les # contrôles) ne doit pas être déclaré installé. local ver out="" ver=$(head -1 "${essai}/VERSION" 2>/dev/null | tr -d '[:space:]') || ver="" if [[ -x "${essai}/bin/overtchatd" && "$ver" =~ ^[0-9][0-9A-Za-z.+-]{0,31}$ ]]; then out=$(timeout 10 "${essai}/bin/overtchatd" -v 2>&1) || true fi if [[ -z "$ver" || "$out" != *"Overtchat-Hybrid ${ver}"* ]]; then _warn_f "Le serveur compilé ne s'est pas annoncé (attendu : Overtchat-Hybrid %s) — il ne démarre pas sur cette machine." "${ver:-?}" rm -rf "$essai" return 2 fi # ⚠ La première ligne dans une variable, pas dans l'appel : le banc de # traduction compte les arguments d'un gabarit, et un `printf '%s'` # imbriqué s'y lisait comme un second (mesuré le 29/09). local annonce="${out%%$'\n'*}" _ok_f "Serveur compilé éprouvé : %s" "$annonce" mkdir -p "$dir" cp -a "${essai}/." "${dir}/" || { rm -rf "$essai"; _install_fail "$srv"; return 1; } rm -rf "$essai" _srv_finalize "$srv" "$dir" "bin/overtchatd" || return 1 return 0 } # ----------------------------------------------------------------------------- # _conf_sans_commentaires # Le texte d'une conf d'Overtchat-Hybrid privé de ses trois formes de # commentaire (`/* … */` sur plusieurs lignes, `#`, `//`) — pour MESURER ce # qui est réellement actif. Grossier sur un `//` pris dans une chaîne : il # retire alors trop, jamais trop peu, ce qui convient à une vérification. # ----------------------------------------------------------------------------- _conf_sans_commentaires() { awk '{ l = $0; out = "" while (length(l)) { if (inc) { i = index(l, "*/"); if (!i) { l = ""; break }; l = substr(l, i + 2); inc = 0 } else { i = index(l, "/*"); if (!i) { out = out l; l = ""; break } out = out substr(l, 1, i - 1); l = substr(l, i + 2); inc = 1 } } sub(/(#|\/\/).*/, "", out); print out }' "$1" } # ----------------------------------------------------------------------------- # _overtchat_personnaliser # Donne à une conf FRAÎCHEMENT posée depuis le modèle l'identité de CETTE # installation (Config/identity.json, écrit par le site à l'étape 2). # # ⚠⚠ LICENSE §2b : l'identité du réseau d'origine est RÉSERVÉE — un tiers ne se # présente pas sous notre nom. Or le modèle porte la nôtre : mesuré le # 29/09/2026 sur une installation tierce, le serveur répondait # « :hybrid.overtchat.net 001 … Welcome to the Overtchat IRC Network ». # ⚠ Chaque remplacement vise la valeur EXACTE du modèle (nom de directive ET # valeur d'origine) : une ligne déjà changée n'est jamais touchée, et un # modèle qui aurait bougé se voit au compte (12 attendus), qui se DIT. # ⚠ Les trois clés de masquage du modèle sont PUBLIQUES (« changez-cette-… ») : # tirées au hasard ici, jamais affichées. Elles doivent être les mêmes sur # tous les serveurs d'un réseau — un tiers qui en ajoute un les recopie. # ⚠ Le nom du lien des services (`services.overtchat.net`) attend le pseudo du # robot, connu seulement à l'étape 5 : voir `_overtchat_lien_du_bot`. # ----------------------------------------------------------------------------- _overtchat_personnaliser() { local f="$1" ident="${BASE_DIR}/Config/identity.json" nom court domaine contact tmp n=0 reste if [[ ! -r "$ident" ]]; then _warn "Config/identity.json absent : la conf du serveur garde l'identité du MODÈLE — à changer avant toute ouverture." return 0 fi nom=$(jq -r '.name // empty' "$ident" 2>/dev/null) || nom="" court=$(jq -r '.short // empty' "$ident" 2>/dev/null) || court="" domaine=$(jq -r '.domain // empty' "$ident" 2>/dev/null) || domaine="" contact=$(jq -r '.mail.to // empty' "$ident" 2>/dev/null) || contact="" # Une valeur entre guillemets dans la conf : ni guillemet ni barre oblique # inverse. NETWORK est un jeton (ISUPPORT 005) : pas d'espace non plus. nom="${nom//[\"\\]/}"; court="${court//[\"\\ ]/}" if [[ -z "$nom" || -z "$court" || ! "$domaine" =~ ^[a-z0-9]([a-z0-9.-]*[a-z0-9])?$ ]]; then _warn "Identité incomplète dans Config/identity.json : la conf du serveur garde celle du MODÈLE." return 0 fi [[ "$contact" =~ ^[^[:space:]\"\\]+@[^[:space:]\"\\]+$ ]] || contact="contact@${domaine}" tmp="$(mktemp)" || return 0 # Les valeurs passent par l'ENVIRONNEMENT d'awk, jamais par son texte ni par # ses arguments : aucun échappement à tenir, et les clés ne sont pas dans argv. if ! NOM="$nom" COURT="$court" DOM="$domaine" MEL="$contact" \ K1="$(openssl rand -hex 24)" K2="$(openssl rand -hex 24)" K3="$(openssl rand -hex 24)" \ awk -v compte="${tmp}.n" ' function val(v, i) { i = index($0, "\""); $0 = substr($0, 1, i - 1) "\"" v "\";"; n++ } /^[[:space:]]*name[[:space:]]+"hybrid\.overtchat\.net";/ { val(ENVIRON["DOM"]) } /^[[:space:]]*info[[:space:]]+"Overtchat-Hybrid";/ { val(ENVIRON["NOM"]) } /^[[:space:]]*line1[[:space:]]+"Overtchat";/ { val(ENVIRON["NOM"]) } /^[[:space:]]*email[[:space:]]+"admin@overtchat\.net";/ { val(ENVIRON["MEL"]) } /^[[:space:]]*NETWORK[[:space:]]+"Overtchat";/ { val(ENVIRON["COURT"]) } /^[[:space:]]*NETWORK_DESC[[:space:]]+"Réseau Overtchat";/ { val(ENVIRON["NOM"]) } /^[[:space:]]*cloak-prefix[[:space:]]+"Overtchat";/ { val(ENVIRON["COURT"]) } /^[[:space:]]*"changez-cette-premiere-cle-par-du-hasard";/ { val(ENVIRON["K1"]) } /^[[:space:]]*"changez-cette-deuxieme-cle-par-du-hasard";/ { val(ENVIRON["K2"]) } /^[[:space:]]*"changez-cette-troisieme-cle-par-du-hasard";/ { val(ENVIRON["K3"]) } /^[[:space:]]*HIDDEN_HOST_SUFFIX[[:space:]]+"users\.overtchat\.net";/ { val("users." ENVIRON["DOM"]) } /^[[:space:]]*websocket-origins[[:space:]]+"chat\.exemple\.fr";/ { val(ENVIRON["DOM"]) } { print } END { print n > compte }' "$f" > "$tmp"; then rm -f "$tmp" "${tmp}.n" _warn "Identité du réseau NON écrite dans la conf du serveur (awk a échoué)." return 0 fi n=$(cat "${tmp}.n" 2>/dev/null) || n=0 cat "$tmp" > "$f" rm -f "$tmp" "${tmp}.n" # Ce qui porterait ENCORE notre nom HORS commentaire. ⚠ Les blocs `/* … */` # du modèle contiennent des lignes sans astérisque (le bloc oper # « moderateur », le second lien) : un filtre ligne à ligne les comptait. # Le lien des services est renommé plus tard (`_overtchat_lien_du_bot`). reste=$(_conf_sans_commentaires "$f" | grep -v 'services\.overtchat\.net' \ | grep -ciE 'overtchat\.net|"Overtchat"') || reste=0 if [[ "$n" == 12 && "$reste" == 0 ]]; then _ok_f "Identité du réseau écrite dans la conf du serveur : %s <%s> (clés de masquage tirées au hasard)." "$nom" "$domaine" else _warn_f "Identité du réseau : %s remplacement(s) sur 12, %s ligne(s) portent encore l'identité d'origine — à relire." "$n" "$reste" fi return 0 } # ----------------------------------------------------------------------------- # _overtchat_certificat # Un certificat AUTO-SIGNÉ propre à CETTE installation (jamais un fichier de # la production), puis les deux directives TLS du modèle décommentées. # # ⚠ Mesuré le 29/09/2026 sur une installation tierce : « listen *:6697 demande # TLS, mais aucun certificat n'est chargé — port non ouvert ». Le modèle # laisse `tls-certificate`/`tls-key` en commentaire, et rien ne posait de # certificat : le port chiffré n'ouvrait chez aucun tiers. # ⚠ Auto-signé veut dire : chiffré, mais non reconnu par les clients (qui # avertiront). L'installateur n'a AUCUN chemin Let's Encrypt/certbot (vérifié # le 29/09 : zéro occurrence) ; pour le remplacer, déposer le vôtre sous les # mêmes noms (conf/server.pem, conf/server.key) puis recharger le serveur. Un # certificat déjà présent n'est JAMAIS remplacé. # ⚠ La réécriture vise la forme EXACTE du modèle — `/* TLS.` … les deux # directives … `*/` — et ne s'écrit que si les DEUX gestes ont eu lieu : # à moitié faite, elle laisserait un commentaire ouvert, donc une conf morte. # ----------------------------------------------------------------------------- _overtchat_certificat() { local c="$1" f="$1/overtchat.conf" domaine tmp n domaine=$(jq -r '.domain // empty' "${BASE_DIR}/Config/identity.json" 2>/dev/null) || domaine="" [[ "$domaine" =~ ^[a-z0-9]([a-z0-9.-]*[a-z0-9])?$ ]] || domaine="localhost" if [[ -e "${c}/server.pem" || -e "${c}/server.key" ]]; then _info "Certificat du serveur existant conservé (conf/server.pem)." elif ! command -v openssl >/dev/null 2>&1; then _warn "openssl absent : aucun certificat, le port TLS (6697) restera fermé." return 0 elif ( umask 077; openssl req -x509 -newkey rsa:2048 -sha256 -days 825 -nodes \ -subj "/CN=${domaine}" -addext "subjectAltName=DNS:${domaine}" \ -keyout "${c}/server.key" -out "${c}/server.pem" ) >/dev/null 2>&1; then chmod 600 "${c}/server.key"; chmod 644 "${c}/server.pem" _ok_f "Certificat AUTO-SIGNÉ généré pour %s (conf/server.pem, 825 jours) — remplaçable par le vôtre, mêmes noms." "$domaine" else _warn "Certificat NON généré : le port TLS (6697) restera fermé." return 0 fi tmp="$(mktemp)" || return 0 awk -v compte="${tmp}.n" ' /\/\* TLS\./ { dans = 1 } dans && /^[[:space:]]*tls-certificate[[:space:]]+"conf\/server\.pem";/ { print " */"; n++ } dans && /^[[:space:]]*tls-key[[:space:]]+"conf\/server\.key";/ { print; attente = 1; next } attente && /^[[:space:]]*\*\/[[:space:]]*$/ { attente = 0; dans = 0; n++; next } { attente = 0; print } END { print n + 0 > compte }' "$f" > "$tmp" n=$(cat "${tmp}.n" 2>/dev/null) || n=0 if [[ "$n" == 2 ]]; then cat "$tmp" > "$f" _ok "Directives TLS activées dans la conf (tls-certificate, tls-key)." else _warn "Directives TLS NON activées (forme du modèle inattendue) : décommentez tls-certificate et tls-key à la main." fi rm -f "$tmp" "${tmp}.n" return 0 } # ----------------------------------------------------------------------------- # _overtchat_lien_du_bot # Nomme le lien des services d'après le ROBOT : `link .`, # et la même entrée dans `ulines {}`. 0 = prêt (déjà nommé ou renommé), # 1 = rien fait (dit). # # ⚠ `Tools/uline-bootstrap.sh` cherche le bloc `link .…` : le modèle # porte `services.overtchat.net`, qui ne s'appelle pas ainsi — l'amorçage ne # pouvait rien extraire (« bloc link introuvable »). Le pseudo du robot n'est # connu qu'à l'étape 5, d'où ce geste à part, fait à l'étape 6. # ⚠ Seul le nom d'ORIGINE du modèle est renommé : une conf dont l'exploitant a # nommé le lien n'est pas touchée. # ----------------------------------------------------------------------------- _overtchat_lien_du_bot() { local f="$1" ij="$2" bn domaine nouveau tmp n bn=$(jq -r '.botnick // empty' "$ij" 2>/dev/null) || bn="" domaine=$(jq -r '.domain // empty' "${BASE_DIR}/Config/identity.json" 2>/dev/null) || domaine="" [[ "$bn" =~ ^[A-Za-z][A-Za-z0-9_-]*$ ]] || { _warn "Pseudo du robot illisible dans IriX.json : lien des services non nommé."; return 1; } [[ "$domaine" =~ ^[a-z0-9]([a-z0-9.-]*[a-z0-9])?$ ]] || domaine="local" if grep -qiE "^[[:space:]]*link[[:space:]]+${bn}\." "$f"; then return 0 fi nouveau="${bn}.${domaine}" tmp="$(mktemp)" || return 1 NOUV="$nouveau" awk -v compte="${tmp}.n" ' /^[[:space:]]*link[[:space:]]+services\.overtchat\.net[[:space:]]*\{/ { sub(/services\.overtchat\.net/, ENVIRON["NOUV"]); n++ } /^[[:space:]]*services\.overtchat\.net;/ { sub(/services\.overtchat\.net/, ENVIRON["NOUV"]); n++ } { print } END { print n + 0 > compte }' "$f" > "$tmp" n=$(cat "${tmp}.n" 2>/dev/null) || n=0 if [[ "$n" == 2 ]]; then cat "$tmp" > "$f" rm -f "$tmp" "${tmp}.n" _ok_f "Lien des services nommé d'après le robot : %s (bloc link et ulines)." "$nouveau" return 0 fi rm -f "$tmp" "${tmp}.n" _warn_f "Lien des services NON nommé : aucun bloc « link %s.… » ni le lien du modèle (services.overtchat.net)." "$bn" return 1 } # ----------------------------------------------------------------------------- # _overtchat_lien_overcore # Déclare le lien d'OVERCORE dans la conf du serveur : un bloc # `link OverCore. { sid "004"; password …; uline }` et son nom dans # `ulines {}`. 0 = prêt (déjà déclaré, ou ajouté), 1 = rien fait (dit). # # 17/10/2026 (lot J2, décision ① de SerVuS : OverCore avec NOTRE serveur). Le # modèle `overtchat.conf.example` ne porte que le lien 002 (`services.…`) : # aucun bloc d'OverCore n'était écrit nulle part — la prod a le sien posé à # la main (`OverCore.overtchat.fr`, sid 004). # ⚠⚠ LE SID EST « 004 », EXACTEMENT : le serveur refuse un pair dont le SID # annoncé diffère de celui du bloc (« SID does not match » — mesuré sur une # installation neuve, fiche install-neuve-amorcage-lien-uline). Un SID déjà # pris par un autre bloc : REFUS, rien d'écrit. # 🔴 LE MOT DE PASSE est tiré au hasard ICI, jamais un défaut, jamais affiché, # jamais dans argv (awk le lit par ENVIRON). `password` (en clair) et non une # empreinte : `Tools/uline-bootstrap.sh --overcore` le LIT dans ce bloc pour # le poser en base, d'où OverCore l'envoie ; le bloc n'a pas d'« outgoing », # comme celui du modèle (voir son en-tête, « Les TROIS écritures »). # 🔴 ET LE LIEN 002 DU MODÈLE perd son mot de passe PUBLIC # (« CHANGEZ-CE-MOT-DE-PASSE », dans notre dépôt) : sur le chemin IriX, # `uline-secrets.sh` le tourne ; sans IriX, personne ne le ferait, et # n'importe quel compte de la machine pourrait se lier en ULine (masque # 127.0.0.1) — SVSNICK, SVSKILL… Il reçoit lui aussi un secret tiré au hasard. # ----------------------------------------------------------------------------- _overtchat_lien_overcore() { local f="$1" domaine nom mdp mdp2 tmp n if [[ ! -r "$f" || ! -w "$f" ]]; then _warn_f "Conf du serveur illisible : %s — lien d'OverCore NON déclaré." "$f" return 1 fi if grep -qiE '^[[:space:]]*link[[:space:]]+OverCore\.' "$f"; then _info "Lien d'OverCore déjà déclaré dans la conf du serveur — conservé tel quel." return 0 fi if grep -qE '^[[:space:]]*sid[[:space:]]+"004"[[:space:]]*;' "$f"; then _warn "Le SID 004 est déjà pris par un autre bloc de la conf du serveur : lien d'OverCore NON déclaré." return 1 fi domaine=$(jq -r '.domain // empty' "${BASE_DIR}/Config/identity.json" 2>/dev/null) || domaine="" [[ "$domaine" =~ ^[a-z0-9]([a-z0-9.-]*[a-z0-9])?$ ]] || domaine="local" nom="OverCore.${domaine}" mdp="$(openssl rand -base64 32 2>/dev/null | tr -d '/+=\n' | cut -c1-28)" || mdp="" mdp2="$(openssl rand -base64 32 2>/dev/null | tr -d '/+=\n' | cut -c1-28)" || mdp2="" if [[ ! "$mdp" =~ ^[A-Za-z0-9]{20,}$ || ! "$mdp2" =~ ^[A-Za-z0-9]{20,}$ ]]; then _warn "Mot de passe du lien d'OverCore non tiré (openssl) : lien NON déclaré — aucun défaut n'est posé à sa place." return 1 fi tmp="$(mktemp)" || return 1 NOM="$nom" MDP="$mdp" MDP2="$mdp2" DATE_POSE="$(date '+%d/%m/%Y')" awk -v compte="${tmp}.n" ' /^[[:space:]]*password[[:space:]]+"CHANGEZ-CE-MOT-DE-PASSE";/ { i = index($0, "\""); $0 = substr($0, 1, i - 1) "\"" ENVIRON["MDP2"] "\";"; d++ } /^ulines[[:space:]]*\{/ { u++ print "/* OverCore — le cœur des services (Node, SID 004), déclaré par l'"'"'installateur le " ENVIRON["DATE_POSE"] "." print " * Mot de passe tiré au hasard, jamais affiché : le même vit en base (ligne « OverCore »" print " * de _ulines_sockets), d'"'"'où OverCore le lit et l'"'"'envoie. Pas d'"'"'« outgoing » :" print " * ce lien ne se connecte jamais lui-même, c'"'"'est OverCore qui vient. */" print "link " ENVIRON["NOM"] " {" print " sid \"004\";" print " password \"" ENVIRON["MDP"] "\";" print " class servers;" print "" print " incoming {" print " mask 127.0.0.1;" print " };" print "" print " options { uline; };" print "};" print "" print print " " ENVIRON["NOM"] ";" next } { print } END { print (u + 0) " " (d + 0) > compte }' "$f" > "$tmp" n=$(cat "${tmp}.n" 2>/dev/null) || n="0 0" rm -f "${tmp}.n" # Une seule entrée `ulines {` (sinon on ne sait pas où écrire), et le secret # présent UNE fois — compté par l'entrée standard, jamais par argv. if [[ "${n%% *}" != 1 || "$(printf '"%s"\n' "$mdp" | grep -c -F -f - "$tmp")" != 1 ]]; then rm -f "$tmp" _warn "Conf du serveur de forme inattendue (bloc « ulines » absent ou multiple) : lien d'OverCore NON déclaré." return 1 fi cat "$tmp" > "$f" rm -f "$tmp" _ok_f "Lien d'OverCore déclaré : %s (SID 004, mot de passe tiré au hasard, jamais affiché)." "$nom" if [[ "${n##* }" != 0 ]]; then _ok "Le mot de passe PUBLIC du lien des services du modèle a été remplacé par un secret tiré au hasard." fi return 0 } # ----------------------------------------------------------------------------- # _overcore_configurer # Écrit Robots/overcore/overcore.json depuis son modèle, pour une installation # SANS IriX (chemin OverCore de `--auto`). N'écrase JAMAIS une configuration # existante. 0 = prête, 1 = impossible (dit). # # 17/10/2026 (lot J2). Ce que le modèle laisse à corriger chez un tiers, LU dans # overcore.js (`lireConfig`) et lib/base.js : # · `irixJson` : relatif au dossier d'OverCore (`../../IriX/cmds/IriX.json`), # soit le dépôt de la prod — chez un tiers, l'instance vit ailleurs # (`_irix_install_dir`). Écrit en ABSOLU, contrôlé ; # · `secrets` : défaut `/home/servus/.overtchat/secrets.conf` (base.js) — le # foyer de la prod. Écrit en absolu vers CE foyer (absent : OverCore garde # le mot de passe d'IriX.json, comme IriX) ; # · `robot` : le pseudo du robot = le PRÉFIXE des tables, lu dans IriX.json ; # · `console.port` 0 : la console reste FERMÉE ; # · 🔴 LES DRAPEAUX DE CESSION à vrai. Chacun dit « faux : IriX fait » — # sans IriX, faux voudrait dire « PERSONNE ne fait » : un réseau neuf dont # OverNick répondrait « pas encore servi » à REGISTER et IDENTIFY. Règle : # tout booléen des sections-objets passe à vrai (gardes, nick, hub, chan…), # y compris ceux qu'ajoutera une cession future ; SAUF `console` (fermée), # `dnsbl` et `protection` (des modes en texte, livrés « eteint » : envoyer # l'adresse des visiteurs à un tiers est une décision de l'exploitant, après # sa charte) et `commandes.orientation` (la notice des commandes abandonnées # d'IriX : rien à orienter sur un réseau qui ne l'a jamais eu). # ----------------------------------------------------------------------------- _overcore_configurer() { local ij="$1" oc="${BASE_DIR}/Robots/overcore" ex dest bn tmp sec ex="${oc}/overcore.json.exemple"; dest="${oc}/overcore.json" if [[ ! -r "${oc}/overcore.js" || ! -r "$ex" ]]; then _err_f "OverCore absent de cette installation (%s) : l'archive du site ne l'a pas apporté." "$oc" return 1 fi if [[ "$ij" != /* || ! -r "$ij" ]]; then _err_f "Accès à la base introuvable (%s) : OverCore ne peut pas être configuré." "$ij" return 1 fi mkdir -p "${oc}/logs" "${oc}/cache" "${BASE_DIR}/Runtime" || return 1 if [[ -f "$dest" ]]; then _info_f "Configuration d'OverCore existante conservée : %s" "$dest" return 0 fi bn=$(jq -r '.botnick // empty' "$ij" 2>/dev/null) || bn="" if [[ ! "$bn" =~ ^[A-Za-z][A-Za-z0-9_-]*$ ]]; then _err "Pseudo du robot illisible dans IriX.json : OverCore ne peut pas être configuré." return 1 fi sec="${TARGET_HOME}/.overtchat/secrets.conf" tmp="$(mktemp)" || return 1 if ! jq --arg ij "$ij" --arg sec "$sec" --arg bn "$bn" ' .irixJson = $ij | .secrets = $sec | .robot = $bn | .console.port = 0 | with_entries( if (((.key | IN("console", "dnsbl", "protection")) | not) and ((.value | type) == "object")) then .value |= with_entries(if (.value | type) == "boolean" then .value = true else . end) else . end) | .commandes.orientation = false' "$ex" > "$tmp" 2>/dev/null \ || ! jq -e --arg ij "$ij" '(.irixJson == $ij) and (.irixJson | startswith("/")) and (.secrets | startswith("/")) and (.console.port == 0) and (.gardes.secureops == true) and (.gardes.autoop == true) and (.nick.actions == true)' "$tmp" >/dev/null 2>&1; then rm -f "$tmp" _err "Configuration d'OverCore NON écrite (modèle illisible ou de forme inattendue)." return 1 fi if ! install -m 600 "$tmp" "$dest"; then rm -f "$tmp" _err_f "Configuration d'OverCore NON écrite : %s" "$dest" return 1 fi rm -f "$tmp" _ok_f "Configuration d'OverCore écrite : %s %s(600 ; accès base en absolu, services servis par OverCore)%s" "$dest" "${DIM}" "${RESET}" return 0 } # ----------------------------------------------------------------------------- # _overcore_etat_lien # Écrit `socket_state` de la ligne « OverCore » de _ulines_sockets (vide # si la ligne manque). 0 = la base a RÉPONDU, 1 = elle n'a pas répondu — c'est # le plancher de l'attente de `--auto` (« jamais répondu » ≠ « pas encore »). # # 17/10/2026 (lot J2). Les identifiants : ceux d'IriX.json, `dbpass=` de # secrets.conf passant devant (l'ordre de Tools/uline-bootstrap.sh et de # lib/base.js). 🔴 Le mot de passe va dans un fichier 600 (`mktemp`), lu par # `--defaults-extra-file`, jamais dans argv ; la requête par l'entrée standard. # ----------------------------------------------------------------------------- _overcore_etat_lien() { local ij="$1" bn db u p s sec cnf sortie rc=0 bn=$(jq -r '.botnick // empty' "$ij" 2>/dev/null) || return 1 db=$(jq -r '.database // empty' "$ij" 2>/dev/null) || return 1 [[ "$bn" =~ ^[A-Za-z][A-Za-z0-9_-]*$ && "$db" =~ ^[A-Za-z0-9_]+$ ]] || return 1 u=$(jq -r '.login // empty' "$ij" 2>/dev/null) p=$(jq -r '.pass // empty' "$ij" 2>/dev/null) s=$(jq -r '.sock // empty' "$ij" 2>/dev/null) sec="${OVERTCHAT_SECRETS:-${TARGET_HOME}/.overtchat/secrets.conf}" if [[ -r "$sec" ]]; then local _d; _d=$(sed -n 's/^dbpass=//p' "$sec" 2>/dev/null | head -n 1) [[ -n "$_d" ]] && p="$_d" fi cnf="$(mktemp)" || return 1 printf '[client]\nuser=%s\npassword=%s\n' "$u" "$p" > "$cnf" [[ -n "$s" && "$s" != null ]] && printf 'socket=%s\n' "$s" >> "$cnf" sortie=$(printf "SELECT socket_state FROM \`%s_ulines_sockets\` WHERE label='OverCore' LIMIT 1;\n" "$bn" \ | mysql --defaults-extra-file="$cnf" -N "$db" 2>/dev/null) || rc=1 rm -f "$cnf" (( rc == 0 )) || return 1 printf '%s' "$sortie" return 0 } # ----------------------------------------------------------------------------- # _overtchat_oper_admin # L'opérateur « admin » d'une conf FRAÎCHE reçoit un mot de passe tiré au # hasard, posé en EMPREINTE ; le mot de passe va au propriétaire dans # ~/.overtchat/oper-admin.txt (600). Jamais affiché, jamais dans argv. # # 🔴🔴 29/09/2026 : le modèle porte `password "CHANGEZ-MOI"` — tous privilèges # (`privileges { all; }`), masque *@127.0.0.1. Chez chaque tiers, n'importe # quel compte de la machine devenait donc IRCop avec un mot de passe publié # dans notre dépôt. # ⚠ La FORME : `$sha256$$$` — celle de # `passwd_hash()` (Servers/overtchat-hybrid/src/passwd.c) : état = SHA-256(sel # ‖ mot de passe), puis (itérations − 1) fois SHA-256(sel ‖ état brut), sel = # 16 hexadécimaux. `conf_warn_plaintext_passwords()` (src/conf.c) signale # tout mot de passe d'oper en clair ; l'empreinte est la forme voulue. # ⚠ Calculée par PHP (présent : le site l'exige), le mot de passe passant par # l'ENVIRONNEMENT. `overtchatd -H ` l'aurait mis dans argv, lisible par # tout compte de la machine le temps de l'appel. # ⚠ Un sel de 16 CHIFFRES décimaux est refusé par `passwd_verify` (pris pour # un nombre d'itérations) : on en retire un autre. # ----------------------------------------------------------------------------- OPER_ADMIN_FICHIER="" _overtchat_oper_admin() { local f="$1" d="${TARGET_HOME}/.overtchat" fic mdp="" emp="" tmp n fic="${d}/oper-admin.txt" if ! command -v php >/dev/null 2>&1; then _warn "php absent : l'opérateur « admin » garde le mot de passe du MODÈLE — changez-le avant toute ouverture." return 0 fi mdp="$(openssl rand -base64 32 | tr -d '/+=\n' | cut -c1-24)" || mdp="" [[ ${#mdp} -ge 20 ]] || { _warn "Mot de passe de l'opérateur « admin » non tiré — le modèle reste en place."; return 0; } emp="$(MDP="$mdp" php -r ' $p = getenv("MDP"); $it = 100000; do { $sel = bin2hex(random_bytes(8)); } while (preg_match("/^[0-9]+$/", $sel)); $e = hash("sha256", $sel . $p, true); for ($i = 1; $i < $it; $i++) { $e = hash("sha256", $sel . $e, true); } echo "\$sha256\$" . $it . "\$" . $sel . "\$" . bin2hex($e); ' 2>/dev/null)" || emp="" if [[ ! "$emp" =~ ^\$sha256\$100000\$[0-9a-f]{16}\$[0-9a-f]{64}$ ]]; then _warn "Empreinte de l'opérateur « admin » non calculée — le mot de passe du modèle reste en place." return 0 fi tmp="$(mktemp)" || return 0 EMP="$emp" awk -v compte="${tmp}.n" ' /^[[:space:]]*oper[[:space:]]+admin[[:space:]]*\{/ { dans = 1 } dans && /^[[:space:]]*password[[:space:]]+"CHANGEZ-MOI";/ { i = index($0, "\""); $0 = substr($0, 1, i - 1) "\"" ENVIRON["EMP"] "\";"; n++ } dans && /^[[:space:]]*\};/ { dans = 0 } { print } END { print n + 0 > compte }' "$f" > "$tmp" n=$(cat "${tmp}.n" 2>/dev/null) || n=0 if [[ "$n" != 1 ]]; then rm -f "$tmp" "${tmp}.n" _warn "Opérateur « admin » du modèle introuvable (password \"CHANGEZ-MOI\") : rien changé — relisez les blocs oper." return 0 fi cat "$tmp" > "$f" rm -f "$tmp" "${tmp}.n" if ! ( umask 077; mkdir -p "$d" && printf '%s\n' \ "# Opérateur IRC « admin » du serveur — tiré par l'installateur le $(date '+%d/%m/%Y %H:%M')." \ "# Depuis CETTE machine seulement (masque *@127.0.0.1) : /OPER admin " \ "# Le serveur n'en garde que l'EMPREINTE (conf/overtchat.conf) : ce fichier est le seul" \ "# endroit où il existe en clair. Pour le changer : overtchatd -H, puis recharger." \ "motdepasse=${mdp}" > "$fic" ); then _warn_f "Le mot de passe de l'opérateur « admin » n'a pas pu être écrit dans %s." "$fic" return 0 fi chmod 700 "$d"; chmod 600 "$fic" _priv_fix_owner "$d" OPER_ADMIN_FICHIER="$fic" _ok_f "Opérateur « admin » : mot de passe tiré au hasard, posé en empreinte — il est dans %s (600)." "$fic" return 0 } # ----------------------------------------------------------------------------- # _overtchat_adresse_salons # Le motif `*` du modèle renvoie vers la page de demande de salon du site # d'ORIGINE ; une liste fraîchement posée reçoit celle de CETTE installation. # ----------------------------------------------------------------------------- _overtchat_adresse_salons() { local f="$1" domaine domaine=$(jq -r '.domain // empty' "${BASE_DIR}/Config/identity.json" 2>/dev/null) || domaine="" [[ "$domaine" =~ ^[a-z0-9]([a-z0-9.-]*[a-z0-9])?$ ]] || return 0 sed -i "s#https://service-overtchat\.hd\.free\.fr/#https://${domaine}/#g" "$f" return 0 } # ----------------------------------------------------------------------------- # _overtchat_chemin_regles # Le fichier que le serveur sert à /RULES : la directive `rules "…"` de sa # conf (relative à , comme tous ses chemins), sinon `conf/charte.txt` # — la valeur du modèle, relue le 02/10/2026. # ----------------------------------------------------------------------------- _overtchat_chemin_regles() { local f="$1" dir="$2" r="" if [[ -r "$f" ]]; then r=$(sed -n 's/^[[:space:]]*rules[[:space:]]*"\([^"]*\)".*/\1/p' "$f" | head -n 1) || r="" fi [[ -n "$r" ]] || r="conf/charte.txt" if [[ "$r" == /* ]]; then printf '%s' "$r"; else printf '%s/%s' "$dir" "$r"; fi } # ----------------------------------------------------------------------------- # _overtchat_nom_dans_charte # La charte du modèle cite le serveur d'ORIGINE (`/server # service-overtchat.hd.free.fr 6697 …`, relu dans sa conf servie le # 02/10/2026). Chez un tiers, le nom de son serveur est son domaine # (`_overtchat_personnaliser` le pose dans `me { name }`). # ----------------------------------------------------------------------------- _overtchat_nom_dans_charte() { local f="$1" domaine domaine=$(jq -r '.domain // empty' "${BASE_DIR}/Config/identity.json" 2>/dev/null) || domaine="" [[ "$domaine" =~ ^[a-z0-9]([a-z0-9.-]*[a-z0-9])?$ ]] || return 0 sed -i "s#service-overtchat\.hd\.free\.fr#${domaine}#g" "$f" return 0 } # ----------------------------------------------------------------------------- # _overtchat_poser_conf # La configuration d'une installation NEUVE d'Overtchat-Hybrid, tirée des # modèles livrés avec le serveur (`conf/*.example`, dans l'archive compilée # comme dans les sources), puis l'unité systemd. N'écrase JAMAIS un fichier # existant. Toujours 0 : ce qui manque se DIT, rien n'interrompt la pose. # # ⚠⚠ Mesuré le 29/09/2026, première installation tierce COMPLÈTE avec notre # serveur (conteneur Ubuntu 24.04, `--auto`, OVERTCHAT_SERVEUR=overtchat_ircd, # installateur tiré du site) : « Overtchat-ircd installé (bin/overtchatd) », # mais AUCUN `conf/overtchat.conf`, aucune liste de politique, aucune unité # `overtchatd.service` (`LoadState=not-found`, alors que huit unités posées # la citent), `config: null` au registre. Le serveur ne pouvait pas démarrer, # et l'amorçage du lien de services cherchait sa conf dans ~/overtchatd — où # rien ne l'avait mise. Le seul à poser tout cela était # `Servers/overtchat-hybrid/contrib/install-service.sh`, que l'installateur # n'appelle pas et que l'archive compilée ne contient pas. # ⚠ Les listes de politique ne sont pas optionnelles : sans elles, `-t` rend # « FATAL Configuration inutilisable » (mesuré le même jour, 3 erreurs). # `pseudos-proteges.conf` EXIGE 600 (`nickprotect_load` refuse tout bit groupe # ou autre — mesuré : « lisible au-delà de son propriétaire (mode 0644) — # non chargé », puis FATAL) ; les autres 640, comme install-service.sh. # ⚠ Le contrôle `-t` se lance DEPUIS : la conf ne porte que des chemins # relatifs (conf/…, logs/…), comme le rappelle install-service.sh. # ----------------------------------------------------------------------------- _overtchat_poser_conf() { local srv="$1" dir="$2" c pol mode sortie="" unite tmp compte neuve=0 c="${dir}/conf" if [[ ! -f "${c}/overtchat.conf.example" ]]; then _warn "Aucun modèle conf/overtchat.conf.example : configuration du serveur NON posée." return 0 fi if [[ -f "${c}/overtchat.conf" ]]; then _info "Configuration du serveur existante conservée : ${c}/overtchat.conf" elif install -m 640 "${c}/overtchat.conf.example" "${c}/overtchat.conf"; then _ok "Configuration du serveur posée depuis le modèle : ${c}/overtchat.conf" neuve=1 else _warn "Configuration du serveur NON posée (copie du modèle refusée)." return 0 fi # ⚠ Identité et certificat SEULEMENT sur une conf qu'on vient de poser : une # conf existante est celle de l'exploitant, on n'y écrit rien. if [[ "$neuve" == 1 ]]; then _overtchat_personnaliser "${c}/overtchat.conf" _overtchat_certificat "$c" _overtchat_oper_admin "${c}/overtchat.conf" fi local dest for pol in charte pseudos-interdits pseudos-proteges salons-interdits filtre-messages; do dest="${c}/${pol}.conf" # ⚠⚠ 02/10/2026 : la charte était posée en `conf/charte.conf`, quand # la conf du serveur lit `rules "conf/charte.txt"` (modèle relu ce # jour) : /RULES ne trouvait rien chez un tiers. Le chemin est LU # dans la conf, pas supposé. if [[ "$pol" == charte ]]; then dest="$(_overtchat_chemin_regles "${c}/overtchat.conf" "$dir")"; fi [[ -f "${c}/${pol}.example" && ! -f "$dest" ]] || continue mode=640 if [[ "$pol" == pseudos-proteges ]]; then mode=600; fi if install -m "$mode" "${c}/${pol}.example" "$dest"; then # ⚠ 29/09/2026 : le refus de création de salon renvoyait les # visiteurs d'un tiers vers NOTRE site # (« voir https://service-overtchat.hd.free.fr/?p=salon »). if [[ "$pol" == salons-interdits ]]; then _overtchat_adresse_salons "$dest"; fi # ⚠ 02/10/2026 : la charte donne l'exemple `/server 6697` — # avec le nom de CE serveur, pas celui du réseau d'origine. if [[ "$pol" == charte ]]; then _overtchat_nom_dans_charte "$dest"; fi else _warn_f "Liste de politique NON posée : %s" "$dest" fi done if [[ -f "${c}/protection.conf.example" && ! -f "${c}/protection.conf" ]]; then # ⚠⚠ SANS LES NOMS DE NOS ROBOTS — 29/09/2026. Le modèle déclare IriX, # OverOp-A, OverOp-B et OverBot : ceux de la production. Chez un tiers, # le serveur avertissait « déclaré protégé, mais son pseudonyme n'est # réservé nulle part — il n'accorde AUCUNE immunité » (4 sur 4, mesuré), # et un nom déclaré NON réservé protège le NOM, pas le robot : qui le # prend et se pose +B hérite de ses immunités. On garde les réglages # (`services = …`, `robots = …`) et les commentaires ; les robots se # déclarent au panel (« Protection ») une fois leur pseudo réservé. if ( umask 027; awk '/^[[:space:]]*$/ || /^[[:space:]]*#/ || /=/ { print }' \ "${c}/protection.conf.example" > "${c}/protection.conf" ); then chmod 640 "${c}/protection.conf" else _warn "Liste de politique NON posée : conf/protection.conf" fi fi # ⚠ Le dossier du JOURNAL — 29/09/2026. La conf écrit `logfile # "logs/overtchatd.log"`, relatif à , et ni l'archive compilée ni # `make install` ne créent `logs/` : mesuré sur l'installation tierce du # 29/09, le dossier manquait (le serveur journalisait quand même par # systemd, mais son propre fichier n'existait pas). Au compte de # l'installation, comme la conf : le serveur tourne sous ce compte. if mkdir -p "${dir}/logs" 2>/dev/null; then _priv_fix_owner "${dir}/logs" else _warn_f "Dossier du journal NON créé : %s/logs" "$dir" fi _priv_fix_owner "$c" _srv_set "$srv" '.servers[$s].config = $c' --arg c "${c}/overtchat.conf" if [[ -x "${dir}/bin/overtchatd" ]]; then if sortie=$(cd "$dir" && timeout 15 "${dir}/bin/overtchatd" -t -c "${c}/overtchat.conf" 2>&1); then _ok "Configuration du serveur valide (overtchatd -t)." else _warn "La configuration du serveur n'est pas utilisable en l'état (overtchatd -t) :" # ⚠ `|| true` : sous `pipefail`, un grep sans ligne rendrait 1, et # `set -e` couperait l'installation sur un simple AVIS. printf '%s\n' "$sortie" | grep -E 'ERROR|FATAL' | head -8 | sed 's/^/ /' >&2 || true fi fi # L'unité : celle que livre le serveur (contrib/), ADAPTÉE comme le fait # install-service.sh — son préfixe `/home/servus/overtchatd` devient , # puis les substitutions communes (`_sysd_substituer`). Posée, pas activée : # même doctrine que `_sysd_activer` (« installé » n'est pas « en service »). unite="${dir}/contrib/overtchatd.service" if [[ ! -r "$unite" ]]; then _warn "Aucune unité contrib/overtchatd.service livrée : le serveur n'aura pas d'unité systemd." elif ! _priv_can_elevate; then _warn "L'unité overtchatd.service n'est PAS posée : il faut root ou sudo." else compte="$(_sysd_compte)" || { _sysd_compte_refus; _warn "L'unité overtchatd.service n'est PAS posée."; return 0; } tmp="$(mktemp)" || return 0 sed -e "s#/home/servus/overtchatd#${dir}#g" "$unite" > "${tmp}.pre" _sysd_substituer "${tmp}.pre" "$compte" > "$tmp" if _as_root install -m 644 "$tmp" /etc/systemd/system/overtchatd.service 2>/dev/null; then _as_root systemctl daemon-reload 2>/dev/null || true _ok "Unité posée : /etc/systemd/system/overtchatd.service (non activée)." else _warn "Pose refusée : /etc/systemd/system/overtchatd.service" fi rm -f "$tmp" "${tmp}.pre" fi return 0 } # ----------------------------------------------------------------------------- # _install_overtchat # Deux voies, et deux seulement (29/09/2026, décision de SerVuS : « retire # les sources ») : # · un CLONE du dépôt (l'arbre Servers/overtchat-hybrid est là) → il est # compilé tel quel ; # · sinon le serveur COMPILÉ (archive locale `overtchat-hybrid-bin-*`, puis # celle du site, sous l'empreinte du manifeste). # Retour : 0 installé · 1 échec (dit) · 2 CETTE MACHINE ne peut pas faire # tourner le serveur compilé (dit) — `_auto_installer` s'en sert pour se # rabattre sur UnrealIRCd quand le serveur n'a pas été demandé explicitement. # # ⚠⚠ Il n'y a plus de TROISIÈME voie. Jusqu'au 29/09/2026 au soir, le site # servait aussi l'archive de SOURCES (`/dl/overtchat-hybrid`, # Tools/faire-archive-hybrid.sh), compilée ici quand le binaire ne # convenait pas. Elle est retirée : le binaire a été posé, configuré et # démarré par le script seul sur une machine neuve (7 passages, CHANTIERS # du 29/09). Une archive de sources déposée à la main n'est plus lue. # ----------------------------------------------------------------------------- _install_overtchat() { local srv="overtchat_ircd" dir rc dir=$(_srv_get "$srv" "install_dir") # Les sources sont LIVRÉES AVEC LE PROJET, dans Servers/overtchat-hybrid. # C'est le serveur qui tourne en production depuis le 28/07/2026 : aller le # chercher au dehors serait aussi faux qu'inutile, et le source_url qui # traînait ici pointait vers un compte GitHub abandonné — un 404 constaté # le 30/07/2026, donc une installation qui échouait sans qu'on sache # qu'elle ne pouvait pas réussir. local locales="$BASE_DIR/Servers/overtchat-hybrid" # ── Sans clone : le serveur COMPILÉ, et lui seul ───────────────────────── # ⚠ Un clone porte les sources exactes de son commit, et les compiler reste # la vérité de ce clone : le binaire n'est demandé que SANS l'arbre. if ! _overtchat_arbre_local; then rc=0 _overtchat_binaire "$srv" "$dir" || rc=$? if (( rc == 0 )); then _overtchat_poser_conf "$srv" "$dir"; return 0; fi if (( rc == 2 )); then _warn "Overtchat-Hybrid ne peut pas être installé sur cette machine : sans clone du dépôt, il ne vient que du serveur compilé (x86_64, glibc ≥ 2.34, OpenSSL 3)." _info "Choisissez un autre serveur IRC (UnrealIRCd), ou installez depuis un clone du dépôt, qui compile ses propres sources." _install_fail "$srv" machine return 2 fi return 1 fi # L'ancienne version clonait https://github.com/SerVuS033/Overtchat — le # dépôt du PROJET, pas un serveur IRC — puis déclarait binary="overtchat" # sans rien compiler. Le binaire n'existait donc jamais. # shellcheck disable=SC2046 _pkg_install $(_req_for "$srv") || { _install_fail "$srv" deps; return 1; } # ── Un clone : l'arbre du dépôt, compilé ici ──────────────────────────── # ⚠ Plus de branche « archive de sources » (locale ou servie) depuis le # 29/09/2026 au soir : voir l'en-tête. Arrivé ici, l'arbre est là. _ok "Sources d'Overtchat-Hybrid trouvées dans le projet." mkdir -p "$dir" # On COPIE plutôt que de compiler sur place : l'arbre du dépôt reste # propre, et un `make clean` malheureux ne touche pas les sources # suivies par git. tar -C "$locales" -cf - --exclude=build --exclude=build-asan . \ | tar -C "$dir" -xf - || { _install_fail "$srv"; return 1; } # Chaîne de build inconnue à l'avance : on tente configure/make, puis un # make simple si le projet n'a pas de configure. # # L'échec de `make install` n'est plus avalé par un « || true ». Ce garde # existait pour une raison réelle — un projet sans ./configure peut n'avoir # aucune cible « install », et refuser l'installation dans ce cas serait # faux. Mais le « || true » ne distinguait pas ce cas légitime d'un échec # véritable (mauvais PREFIX, cible cassée, droits) : les deux passaient en # silence, et _srv_finalize posait ensuite installed=true en se contentant # d'un binaire trouvé dans l'ARBRE DE COMPILATION. On demande donc à make # si la cible existe, avant de juger son résultat. ( cd "$dir" || exit 1 if [[ -x ./configure ]]; then ./configure --prefix="$dir" && make -j"$(_make_jobs)" && make install elif [[ -f ./Makefile ]]; then make -j"$(_make_jobs)" || exit 1 if make -n install >/dev/null 2>&1; then make install PREFIX="$dir" || { echo "make install a échoué (cible présente mais en erreur)." >&2 exit 1 } else echo "Ce projet n'a pas de cible « install » : le binaire est pris sur place." >&2 fi else echo "Aucun configure ni Makefile à la racine des sources." >&2 exit 1 fi ) || { _install_fail "$srv"; return 1; } # `bin/overtchatd` d'abord : c'est ce que pose le `make install` du Makefile # d'Overtchat-Hybrid (cible `install`, PREFIX/bin/overtchatd). `build/overtchatd` # est l'arbre de compilation, le repli quand `make install` n'a pas tourné. # Les deux manquaient à cette liste, qui ne connaissait que des noms hérités : # la compilation réussissait et l'installation se déclarait quand même en échec. _srv_finalize "$srv" "$dir" "bin/overtchatd" "build/overtchatd" \ "bin/overtchat" "overtchat" "src/ircd" "bin/ircd" || return 1 # La conf et l'unité, sur ce chemin-ci aussi : les sources portent les # mêmes modèles (conf/*.example, contrib/overtchatd.service). _overtchat_poser_conf "$srv" "$dir" } # ----------------------------------------------------------------------------- # _server_install # Point d'entrée générique d'installation. # ----------------------------------------------------------------------------- _server_install() { local srv="$1" local dir dir=$(_srv_get "$srv" "install_dir") _section "Installation : $(_srv_get "$srv" "name")" # Même garde que côté services : un install_dir nul ou relatif ferait # compiler dans le répertoire courant. Ici plutôt que dans les quatre # _install_*, qui passent tous par ce point d'entrée. _dir_exploitable "$(_srv_get "$srv" "name")" "$dir" || return 1 # Idempotence if [[ -f "${dir}/.installed" ]]; then _info "Déjà installé → vérification du binaire…" if _server_verify "$srv"; then _ok "Installation existante valide." return 0 fi _warn "Installation corrompue → réinstallation." _safe_rmrf "$dir" fi case "$srv" in unrealircd) _install_unrealircd ;; hybrid) _install_hybrid ;; ircu) _install_ircu ;; inspircd) _install_inspircd ;; bahamut) _install_bahamut ;; overtchat_ircd) _install_overtchat ;; *) _err "Serveur inconnu : $srv"; return 1 ;; esac } # ============================================================================= # Mise à jour # ============================================================================= # ----------------------------------------------------------------------------- # _server_update # ----------------------------------------------------------------------------- _server_update() { local srv="$1" local dir backup dir=$(_srv_get "$srv" "install_dir") backup="${dir}_backup_$(date +%s)" _section "Mise à jour : $(_srv_get "$srv" "name")" if [[ ! -d "$dir" ]]; then _warn "Non installé → lancement de l'installation." _server_install "$srv" return fi # La sauvegarde est VÉRIFIÉE avant que quoi que ce soit soit détruit. # # `cp -a` n'était pas testé, et la suite détruit l'installation par un # _safe_rmrf avant de réinstaller. Disque plein, permission refusée sur un # arbre compilé, chemin devenu illisible : la copie échouait en silence, # le dossier était supprimé, la réinstallation échouait à son tour (elle a # besoin du réseau), et le `mv "$backup" "$dir"` de secours ne trouvait # rien à restaurer. Une mise à jour ratée effaçait donc l'installation ET # sa sauvegarde. _info_f "Sauvegarde vers %s…" "${backup}" if ! cp -a "$dir" "$backup"; then _err "Sauvegarde impossible — mise à jour ANNULÉE, rien n'a été modifié." _info "Vérifie l'espace disque et les droits sur $(dirname "$backup")." _safe_rmrf "$backup" return 1 fi if [[ ! -d "$backup" ]]; then _err "Sauvegarde introuvable après copie — mise à jour ANNULÉE." return 1 fi _ok_f "Sauvegarde en place : %s" "$backup" # Restaure la sauvegarde et le dit franchement si la restauration échoue : # laisser croire au retour à l'état antérieur serait pire que la panne. _server_update_restaure() { _safe_rmrf "$dir" if mv "$backup" "$dir"; then _ok "Installation précédente restaurée." else _err "RESTAURATION ÉCHOUÉE — la sauvegarde est conservée dans :" printf " ${BOLD}%s${RESET}\n" "$backup" _info_f "Remets-la en place à la main : mv '%s' '%s'" "$backup" "$dir" fi } if [[ -d "${dir}/.git" ]]; then if ! (cd "$dir" && git pull); then _err "git pull échoué → restauration de la sauvegarde." _server_update_restaure unset -f _server_update_restaure return 1 fi else _warn "Pas de dépôt git → réinstallation complète." _safe_rmrf "$dir" if ! _server_install "$srv"; then _err "Réinstallation échouée → restauration de la sauvegarde." _server_update_restaure unset -f _server_update_restaure return 1 fi fi unset -f _server_update_restaure _safe_rmrf "$backup" _ok "Mise à jour terminée." } # ============================================================================= # Interface TUI # ============================================================================= # ----------------------------------------------------------------------------- # _panel_server_detail # Sous-menu de gestion d'un serveur spécifique. # ----------------------------------------------------------------------------- _panel_server_detail() { local srv="$1" local name choice while true; do name=$(_srv_get "$srv" "name") # ⚠ Même reprise que `_panel_service_detail` — voir le commentaire qui # y est écrit. `_servers_overview` émet elle aussi des `_ui_row`, et # jusqu'ici un `_ui_mid` au milieu de nulle part, faute de cadre ouvert. _ui_width _ui_title "Serveur : ${name}" "état, ports, actions et journaux" _ui_top _servers_overview _ui_mid _ui_kv "Installé" "$(_srv_get "$srv" "installed")" _ui_kv "Activé" "$(_srv_get "$srv" "enabled")" _ui_kv "En cours" "$(_server_status "$srv")" _ui_kv "Port IRC" "$(_srv_get "$srv" "port")" _ui_kv "Port SSL" "$( local v; v=$(_srv_get "$srv" "port_ssl") [[ "$v" == "null" ]] && echo "N/A" || echo "$v" )" _ui_kv "SHA-256 OK" "$(_srv_get "$srv" "sha256.verified")" _ui_kv "Erreurs" "$(jq -r --arg s "$srv" '.servers[$s].errors | length' "$(_srv_file)")" _ui_head "Actions" _ui_item 1 "Installer" _ui_item 2 "Activer / Désactiver" _ui_item 3 "Activer / Désactiver les logs" _ui_item 4 "Vérifier SHA-256" _ui_item 5 "Voir les erreurs" _ui_item 6 "Effacer les erreurs" _ui_item 7 "Configurer les ports" _ui_item 8 "Démarrer" _ui_item 9 "Arrêter" _ui_item 10 "Redémarrer" _ui_item 11 "Logs en direct" _ui_item 12 "Mettre à jour" _ui_item 0 "Retour" _ui_bot _ui_prompt read -r choice || choice=0 case "$choice" in 1) _server_install "$srv" || true ;; 2) _server_toggle "$srv" || true ;; 3) _server_log_toggle "$srv" || true ;; 4) _server_verify_sha256 "$srv" || true ;; 5) _server_show_errors "$srv" || true ;; 6) _server_clear_errors "$srv" || true ;; 7) _server_set_port "$srv" || true ;; 8) _server_start "$srv" || true ;; 9) _server_stop "$srv" || true ;; 10) _server_restart "$srv" || true ;; 11) _server_logs "$srv" || true ;; 12) _server_update "$srv" || true ;; 0) return ;; *) _warn "Choix invalide." || true ;; esac _pause done } # ----------------------------------------------------------------------------- # _panel_servers # Menu principal du module serveurs. # ----------------------------------------------------------------------------- _panel_servers() { local choice _servers_init _st_reconcile while true; do _ui_width _ui_title "Panel Serveurs IRC" "un seul serveur à la fois — ils se disputent les mêmes ports" _ui_top _ui_row "${BOLD}Serveurs disponibles${RESET}" _ui_mid _servers_overview _menu_reset _ui_head "Gérer" # ⚠ « recommandé » a changé de ligne le 29/09/2026 (décision de SerVuS : # notre serveur par défaut, comme `--auto`). Les NUMÉROS ne bougent # pas : une habitude, un tutoriel ou un banc peut s'y fier. _menu_gate 1 "UnrealIRCd ${DIM}(serveur tiers — sources de son éditeur)${RESET}" "$(_menu_reason unrealircd)" _menu_gate 2 "ircd-Hybrid" "$(_menu_reason hybrid)" _menu_gate 3 "ircu" "$(_menu_reason ircu)" _menu_gate 4 "InspIRCd" "$(_menu_reason inspircd)" _menu_gate 5 "Bahamut ${DIM}(DALnet — sans UID ni SID)${RESET}" "$(_menu_reason bahamut)" _menu_gate 6 "Overtchat-ircd ${DIM}(recommandé — le serveur du projet)${RESET}" "$(_menu_reason overtchat_ircd)" _menu_add 0 "Retour" _ui_bot _ui_prompt read -r choice || choice=0 _menu_has "$choice" || { _warn "Choix indisponible ou verrouillé."; continue; } case "$choice" in 1) _panel_server_detail "unrealircd" || true ;; 2) _panel_server_detail "hybrid" || true ;; 3) _panel_server_detail "ircu" || true ;; 4) _panel_server_detail "inspircd" || true ;; 5) _panel_server_detail "bahamut" || true ;; 6) _panel_server_detail "overtchat_ircd" || true ;; 0) return ;; esac done } # ============================================================================= # ════════════════════════════════════════════════════════════ # IRIX — Installation façon Eggdrop (source ≠ instance) # Source (géré par Service-Overtchat) : $HOME/Service-Overtchat/IriX # Instance (là où IriX tourne) : $HOME/IriX (par défaut, modifiable) # ════════════════════════════════════════════════════════════ # ============================================================================= # ----------------------------------------------------------------------------- # _irix_file # ----------------------------------------------------------------------------- _irix_file() { echo "$IRIX_FILE"; } # ----------------------------------------------------------------------------- # _irix_resolve_entry # Retourne le fichier d'entrée (tclsh) associé à un mode moteur (sql|std), # d'après git.irix.modes dans la configuration principale. # ----------------------------------------------------------------------------- _irix_resolve_entry() { local mode="$1" jq -r --arg m "$mode" '.git.irix.modes[$m].entry // empty' "$INIT_BASE" 2>/dev/null } # ----------------------------------------------------------------------------- # _irix_init # Crée le fichier JSON de configuration IriX si absent. # ----------------------------------------------------------------------------- _irix_init() { [[ -f "$(_irix_file)" ]] && return 0 mkdir -p "$(dirname "$(_irix_file)")" mkdir -p "$IRIX_SOURCE_DIR" local mode entry mode=$(jq -r '.git.irix.default_mode // "sql"' "$INIT_BASE" 2>/dev/null) [[ -z "$mode" || "$mode" == "null" ]] && mode="sql" entry=$(_irix_resolve_entry "$mode") [[ -z "$entry" || "$entry" == "null" ]] && entry="IriX-sql.tcl" jq -n \ --arg ts "$(date -u +%Y-%m-%dT%H:%M:%SZ)" \ --arg src "$IRIX_SOURCE_DIR" \ --arg inst "$IRIX_DEFAULT_INSTANCE_DIR" \ --arg mode "$mode" \ --arg entry "$entry" \ --arg sock "$(_mariadb_sock_defaut)" \ '{ meta: { created: $ts, version: "1.0" }, source: { dir: $src, cloned: false, last_sync: null, sha256: {} }, instance: { install_dir: $inst, eggdrop_bin: null, mode: $mode, entry_script: $entry, cmds_file: "cmds_irix.json", config_file: null, port: 3333, installed: false, configured: false, enabled: false, running: false, log: { enabled: true, path: null, level: "info" }, last_deploy: null, last_start: null, last_stop: null }, irc: { botnick: "IriX", altnick: "IriX_", username: "IriX", realname: null, admin: null, email: null, network: null, host: "127.0.0.1", port: 6667, owner: null }, sql: { host: "127.0.0.1", sock: $sock, database: null, login: null, logs: 1 }, errors: [] }' > "$(_irix_file)" _sha256_store "$(_irix_file)" "$INIT_BASE" "irix" _ok "Configuration IriX initialisée." } # ----------------------------------------------------------------------------- # _irix_get (ex: "instance.install_dir", "source.cloned") # ----------------------------------------------------------------------------- _irix_get() { local field="$1" jq -r ".${field} // empty" "$(_irix_file)" 2>/dev/null } # ----------------------------------------------------------------------------- # _irix_set [args jq...] # ----------------------------------------------------------------------------- _irix_set() { local filter="$1"; shift _jq_update "$(_irix_file)" "$filter" "$@" _sha256_store "$(_irix_file)" "$INIT_BASE" "irix" } # ----------------------------------------------------------------------------- # _irix_install_dir # Retourne le dossier d'instance actif (avec valeur par défaut de secours). # ----------------------------------------------------------------------------- _irix_install_dir() { local dir; dir=$(_irix_get "instance.install_dir") [[ -z "$dir" || "$dir" == "null" ]] && dir="$IRIX_DEFAULT_INSTANCE_DIR" printf '%s\n' "$dir" } # ----------------------------------------------------------------------------- # _irix_paths # Affiche sur stdout : # ----------------------------------------------------------------------------- # Chemins de l'instance : racine, fichier PID, journal. # Le PID va dans runtime/, avec les autres fichiers d'état d'Eggdrop, et non à # la racine de l'instance — c'est là qu'irix.conf le déclare (set pidfile). _irix_paths() { local dir; dir=$(_irix_install_dir) printf '%s %s/%s/IriX.pid %s/logs/IriX.log\n' \ "$dir" "$dir" "$IRIX_RUNTIME_SUBDIR" "$dir" } # ============================================================================= # Gestion du dossier d'instance (comme le dossier d'un bot Eggdrop) # ============================================================================= # ----------------------------------------------------------------------------- # _irix_set_install_dir # Change le dossier d'instance ; propose de déplacer les données existantes. # ----------------------------------------------------------------------------- _irix_set_install_dir() { _irix_init local current new_dir rep current=$(_irix_install_dir) _section "Dossier d'instance IriX" _kv "Actuel" "$current" read -rp " Nouveau dossier [Entrée = conserver] : " new_dir || true [[ -z "$new_dir" ]] && { _info "Inchangé."; return 0; } # $TARGET_HOME et non $HOME : sous sudo, « ~/IriX » se serait développé en # « /root/IriX », alors que tout le reste du script installe dans le home # de l'utilisateur réel. C'est le piège que _resolve_base_home existe # précisément pour éviter. new_dir="${new_dir/#\~/$TARGET_HOME}" # Un chemin relatif serait interprété depuis le répertoire courant, qui # n'est pas celui qu'on croit une fois le panel relancé par « exec ». if [[ "$new_dir" != /* ]]; then _err_f "Chemin absolu attendu (commençant par /) — reçu : %s" "$new_dir" return 1 fi if [[ -d "$current" && "$current" != "$new_dir" ]]; then read -rp " Déplacer les fichiers existants vers ${new_dir} ? [o/N] : " rep || true if [[ "$rep" =~ ^[YyOo]$ ]]; then mkdir -p "$(dirname "$new_dir")" if mv "$current" "$new_dir"; then _ok_f "Instance déplacée : %s → %s" "$current" "$new_dir" else _err "Échec du déplacement — le dossier d'instance n'a pas été modifié." return 1 fi else # Refuser le déplacement laisse le nouveau dossier VIDE : l'instance # n'y est plus déployée, et le prétendre bloquait tout. _irix_toggle # ne redéploie que si installed vaut false, et _irix_start échouait # donc sur « script introuvable » sans que rien ne propose de # remettre les fichiers en place. _irix_set '.instance.installed = false' _warn_f "Fichiers laissés dans %s — le nouveau dossier est vide." "${current}" _info "L'instance est marquée « non déployée » : relance un déploiement." fi fi _irix_set '.instance.install_dir = $d' --arg d "$new_dir" _ok_f "Dossier d'instance IriX → %s" "$new_dir" } # ============================================================================= # Source — synchronisation depuis le dépôt (géré par Service-Overtchat) # ============================================================================= # ----------------------------------------------------------------------------- # _irix_sync_source # Télécharge chaque fichier listé dans git.irix.files (repo → local) # depuis brutegit vers IRIX_SOURCE_DIR. Piloté entièrement par la config, # aucun nom de fichier n'est plus figé en dur ici. # ----------------------------------------------------------------------------- # ----------------------------------------------------------------------------- # _irix_depouilleur_preparer # Prépare l'outil qui allège les modules à l'installation, et pose son chemin # dans IRIX_DEPOUILLEUR (vide si l'on ne dépouille pas). # # POURQUOI. Quarante et un pour cent des lignes des modules d'IriX sont des # commentaires ou des lignes vides. Ils ne décrivent pas le code : ils portent # la mémoire des incidents — « ce catch avale l'erreur », « ce commentaire # entre deux branches a coûté trois netsplits ». Les retirer DU DÉPÔT # effacerait la seule trace de ces raisons ; les retirer À L'INSTALLATION ne # coûte rien, puisque le dépôt reste consultable. D'où ce découpage, demandé # par SerVuS le 03/08/2026. # # ⚠ TOUT ÉCHEC EST ANNONCÉ, JAMAIS SILENCIEUX. tclsh absent, outil # introuvable, dépouillement refusé : on le DIT et l'on garde le fichier # complet. Un module lourd fonctionne ; un module tronqué, non — et sauter en # silence laisserait croire au contrôle. # ----------------------------------------------------------------------------- _irix_depouilleur_preparer() { IRIX_DEPOUILLEUR="" # ⚠ PAS de `// true` ici, et ce n'est pas un détail de style : en jq, # l'opérateur `//` rend sa partie droite quand la gauche vaut `null` MAIS # AUSSI quand elle vaut `false`. Écrit `.git.irix.depouiller // true`, un # réglage posé à `false` répondait `true` — le seul réglage qui compte était # le seul que jq ne savait pas lire. Trouvé en appelant la fonction, jamais # en la relisant. local actif actif=$(jq -r '.git.irix.depouiller' "$INIT_BASE" 2>/dev/null || echo null) if [[ -z "$actif" || "$actif" == "null" ]]; then actif="true"; fi if [[ "${OVERTCHAT_SANS_DEPOUILLE:-}" == "1" ]]; then actif="false"; fi if [[ "$actif" != "true" ]]; then _info "Allègement désactivé : les modules garderont leurs commentaires." return 0 fi # tclsh n'est pas garanti : Eggdrop se lie à la bibliothèque Tcl, pas au # binaire. Sans lui, on installe les modules tels quels. if ! command -v tclsh >/dev/null 2>&1; then _warn "tclsh absent : les modules seront installés avec leurs commentaires." return 0 fi local brutegit cible brutegit=$(jq -r '.git.brutegit' "$INIT_BASE") # 🔴 Cet outil est EXÉCUTÉ par tclsh : il ne vit plus sous un nom devinable # de /tmp (audit #25, 29/09/2026), mais dans le dossier privé du lancement. local prive if ! prive="$(_ovt_tmp)"; then _warn "Dossier temporaire privé indisponible : les modules resteront complets." return 0 fi cible="$prive/depouiller-tcl.tcl" if ! _download "${brutegit}/Tools/depouiller-tcl.tcl" "$cible"; then _warn "Outil d'allègement introuvable : les modules resteront complets." return 0 fi IRIX_DEPOUILLEUR="$cible" return 0 } # ----------------------------------------------------------------------------- # _irix_depouiller_fichier # Allège un module en place. Ne touche QUE les .tcl, et laisse le fichier # intact au moindre doute. # # ⚠ Les .conf sont exclus alors qu'ils sont eux aussi du Tcl : un fichier de # configuration est fait pour être lu et modifié à la main sur la machine. # L'alléger reviendrait à retirer sa documentation à celui qui doit l'éditer. # ----------------------------------------------------------------------------- _irix_depouiller_fichier() { local f="$1" [[ -n "$IRIX_DEPOUILLEUR" ]] || return 0 [[ "$f" == *.tcl ]] || return 0 [[ -f "$f" ]] || return 0 local avant apres avant=$(wc -l < "$f" 2>/dev/null || echo 0) # L'outil ne réécrit le fichier QUE si le résultat est équilibré # (`info complete`). En cas de refus, il sort non nul et le fichier # d'origine est encore là — c'est le comportement voulu. if ! tclsh "$IRIX_DEPOUILLEUR" "$f" "$f" >/dev/null 2>&1; then _warn "$(basename "$f") : allègement refusé, le fichier complet est conservé." return 0 fi apres=$(wc -l < "$f" 2>/dev/null || echo 0) _log "DEPOUILLE $(basename "$f") ${avant} -> ${apres}" return 0 } _irix_sync_source() { _irix_init _section "Synchronisation des sources IriX" local brutegit brutegit=$(jq -r '.git.brutegit' "$INIT_BASE") if [[ -z "$brutegit" || "$brutegit" == "null" ]]; then _err "URL du dépôt (git.brutegit) introuvable dans la configuration." return 1 fi local files_count files_count=$(jq -r '.git.irix.files | length' "$INIT_BASE" 2>/dev/null || echo 0) if [[ -z "$files_count" || "$files_count" == "0" || "$files_count" == "null" ]]; then _err "Aucun fichier source IriX défini (git.irix.files) dans la configuration." return 1 fi mkdir -p "$IRIX_SOURCE_DIR" _irix_depouilleur_preparer local ok=true i repo local_name hash local lignes_avant=0 lignes_apres=0 for (( i=0; i/dev/null || echo 0) )) _irix_depouiller_fichier "${IRIX_SOURCE_DIR}/${local_name}" lignes_apres=$(( lignes_apres + $(wc -l < "${IRIX_SOURCE_DIR}/${local_name}" 2>/dev/null || echo 0) )) fi # ⚠ LE HASH EST PRIS APRÈS L'ALLÈGEMENT, et cet ordre n'est pas # indifférent : `_irix_verify_source_sha256` compare le fichier # présent sur le disque à ce qui a été enregistré ici. Hasher avant # ferait échouer chaque vérification d'intégrité ultérieure, sur des # fichiers pourtant parfaitement sains. hash=$(_sha256 "${IRIX_SOURCE_DIR}/${local_name}" 2>/dev/null || echo "") _irix_set '.source.sha256[$k] = $h' --arg k "$local_name" --arg h "$hash" else ok=false fi done if (( lignes_avant > 0 && lignes_apres < lignes_avant )); then local gain=$(( (lignes_avant - lignes_apres) * 100 / lignes_avant )) _ok_f "Modules allégés : %s → %s lignes (%s %% de moins). La version commentée reste au dépôt." "${lignes_avant}" "${lignes_apres}" "${gain}" fi [[ -n "$IRIX_DEPOUILLEUR" ]] && rm -f "$IRIX_DEPOUILLEUR" if ! $ok; then _irix_report_error "Échec de synchronisation des sources" _err "Synchronisation incomplète." return 1 fi local ts; ts="$(date -u +%Y-%m-%dT%H:%M:%SZ)" _irix_set '.source.cloned = true | .source.last_sync = $ts' --arg ts "$ts" _log_entry "irix" "sync" "sources synchronisées" _ok_f "Sources IriX synchronisées dans %s" "${IRIX_SOURCE_DIR}" } # ----------------------------------------------------------------------------- # _irix_verify_source_sha256 # Vérifie l'intégrité des sources locales par rapport au hash enregistré. # ----------------------------------------------------------------------------- _irix_verify_source_sha256() { _irix_init _section "Vérification SHA-256 — sources IriX" local files_count files_count=$(jq -r '.git.irix.files | length' "$INIT_BASE" 2>/dev/null || echo 0) if [[ -z "$files_count" || "$files_count" == "0" || "$files_count" == "null" ]]; then _err "Aucun fichier source IriX défini (git.irix.files) dans la configuration." return 1 fi local ok=true i local_name path stored current for (( i=0; i # Change le moteur IriX actif. Refusé si l'instance tourne actuellement. # Force un redéploiement (installed=false) pour éviter de faire tourner # un mélange incohérent d'anciens fichiers déployés. # ----------------------------------------------------------------------------- _irix_set_mode() { _irix_init local mode="$1" if [[ "$mode" != "sql" && "$mode" != "std" ]]; then _err_f "Mode invalide : '%s' (attendu : sql | std)" "$mode" return 1 fi if [[ "$(_irix_status)" == "running" ]]; then _err "IriX est en cours d'exécution. Arrêtez-le avant de changer de mode." return 1 fi local entry entry=$(_irix_resolve_entry "$mode") if [[ -z "$entry" || "$entry" == "null" ]]; then _err_f "Aucune entrée définie pour le mode '%s' (git.irix.modes)." "$mode" return 1 fi _irix_set \ '.instance.mode = $m | .instance.entry_script = $e | .instance.installed = false' \ --arg m "$mode" --arg e "$entry" _log_entry "irix" "mode" "mode changé -> $mode ($entry)" _ok_f "Mode IriX -> %s (%s). Redéploiement requis avant de redémarrer." "$mode" "$entry" } # ----------------------------------------------------------------------------- # _irix_choose_mode # Prompt interactif pour le panel TUI. # ----------------------------------------------------------------------------- _irix_choose_mode() { local current label_sql label_std c current=$(_irix_get "instance.mode") label_sql=$(jq -r '.git.irix.modes.sql.label // "sql"' "$INIT_BASE") label_std=$(jq -r '.git.irix.modes.std.label // "std"' "$INIT_BASE") printf '\n' _kv "Mode actuel" "${current:-sql}" printf " [1] sql — %s\n" "$label_sql" printf " [2] std — %s\n" "$label_std" # ⚠ ÉCHAPPATOIRE AJOUTÉE le 28/08/2026. C'était le seul menu du fichier sans # sortie annoncée : pour en ressortir SANS changer de mode, il fallait taper # n'importe quoi d'invalide, ou faire Ctrl-D. Or ce menu-ci change le mode de # chargement d'IriX — c'est-à-dire quels modules le bot lira au prochain # démarrage. Sortir par erreur d'un menu pareil ne doit pas dépendre d'une # faute de frappe. printf " [0] Retour — ne rien changer\n" read -rp $'\n Mode > ' c || return 0 case "$c" in 1|sql) _irix_set_mode "sql" ;; 2|std) _irix_set_mode "std" ;; 0|'') return 0 ;; *) _warn "Choix invalide." ;; esac } # ============================================================================= # Déploiement — source → instance (comme copier un script dans un dossier Eggdrop) # ============================================================================= # ----------------------------------------------------------------------------- # _irix_deploy # ----------------------------------------------------------------------------- # ----------------------------------------------------------------------------- # _irix_eggdrop_bin — retrouve le binaire Eggdrop qui hébergera IriX. # # IriX n'est pas un programme : c'est un jeu de scripts Tcl qu'Eggdrop charge. # Sans ce binaire, il n'y a rien à démarrer — d'où la recherche explicite, et # le message qui renvoie vers le panel Services quand elle échoue. # ----------------------------------------------------------------------------- _irix_eggdrop_bin() { local b # 1. Valeur déjà enregistrée b=$(_irix_get "instance.eggdrop_bin") [[ -n "$b" && "$b" != "null" && -x "$b" ]] && { printf '%s' "$b"; return 0; } # 2. Eggdrop installé par le panel b="$(_svc_get eggdrop install_dir 2>/dev/null)/eggdrop" [[ -x "$b" ]] && { printf '%s' "$b"; return 0; } # 3. Instance IriX voisine, ou PATH for b in "$(_irix_install_dir)/eggdrop" "$TARGET_HOME/IriX/eggdrop" "$(command -v eggdrop 2>/dev/null)"; do [[ -n "$b" && -x "$b" ]] && { printf '%s' "$b"; return 0; } done return 1 } # Répertoire des traductions d'Eggdrop. `_install_eggdrop` compile sans faire # « make install » : le dossier language/ reste donc dans l'arbre de # compilation. Sans EGG_LANGDIR, addlang ne trouve rien et se tait — les # messages du bot repartent en anglais sans qu'aucune erreur ne le signale. _irix_langdir() { local d for d in "$(dirname "$(_irix_eggdrop_bin 2>/dev/null || echo /nonexistent)")/language" \ "$(_svc_get eggdrop install_dir 2>/dev/null)/language" \ "$TARGET_HOME/IriX/language"; do [[ -d "$d" ]] && { printf '%s' "$d"; return 0; } done return 1 } # ----------------------------------------------------------------------------- # _irix_moddir — répertoire des modules compilés d'Eggdrop (*.so). # # Le chemin doit être ABSOLU dans la configuration. Le défaut d'Eggdrop est # « modules/ », résolu depuis le répertoire courant : comme l'instance IriX # n'est pas le répertoire de compilation d'Eggdrop, ce défaut ne désigne rien, # tous les loadmodule échouent, et le premier « bind msg » d'IriX s'arrête sur # « bad type » — msg étant fourni par le module server. La configuration de # production porte la même remarque, apprise de la même façon. # ----------------------------------------------------------------------------- _irix_moddir() { local d for d in "$(dirname "$(_irix_eggdrop_bin 2>/dev/null || echo /nonexistent)")/modules" \ "$(_svc_get eggdrop install_dir 2>/dev/null)/modules" \ "$TARGET_HOME/IriX/modules"; do [[ -d "$d" ]] && compgen -G "$d/*.so" >/dev/null 2>&1 && { printf '%s' "${d%/}/"; return 0; } done return 1 } # ----------------------------------------------------------------------------- # _irix_handle_valide — un pseudonyme qu'Eggdrop accepte comme handle. # # Lettres, chiffres et les spéciaux IRC ; ni chiffre ni tiret en tête ; 32 au # plus (HANDLEN d'Eggdrop 1.8 et suivants). Séparée pour que # `Bootstrap/tests/test-proprietaire-irix.sh` l'éprouve seule. # ----------------------------------------------------------------------------- _irix_handle_valide() { local h="$1" local motif='^[][A-Za-z_\`^{}|\\][][A-Za-z0-9_\`^{}|\\-]{0,31}$' [[ "$h" =~ $motif ]] } # ----------------------------------------------------------------------------- # _base_acces_ecrire # # Écrit /IriX.json — l'ACCÈS À LA BASE de tout le projet — en 600. # Le mot de passe arrive par l'ENVIRONNEMENT (`OVT_JQ_SECRET`), jamais en # argument : un argument se lit dans `ps` par tout compte de la machine. # # 17/10/2026 (lot J2) : sortie de `_irix_configure`, MÊME contenu, mêmes droits. # Le nom trompe : ce fichier n'est pas qu'à IriX. Le lisent `Web/sql/apply.sh` # (les migrations), `Tools/uline-bootstrap.sh`, `Tools/uline-secrets.sh` et # OverCore (`irixJson` d'overcore.json, lib/base.js). Sur le chemin OverCore de # `--auto`, sans aucun Eggdrop, il doit donc être écrit quand même — c'est # pour ça qu'il a sa fonction. # ----------------------------------------------------------------------------- _base_acces_ecrire() { local cmds="$1" tmp mkdir -p "$cmds" || { _err_f "Dossier %s impossible à créer." "$cmds"; return 1; } tmp="$(mktemp)" || return 1 # 🔴 Le mot de passe SQL arrive à jq par l'ENVIRONNEMENT (`$ENV`, jq ≥ 1.6), # plus par `--arg p` : un argument se lit dans `ps` par tout compte de la # machine, l'environnement d'un processus seulement par lui et root # (audit #18, 29/09/2026). jq -n --arg h "$2" --arg l "$3" \ --arg s "$4" --arg d "$5" --arg ip "$6" \ --arg b "$7" --arg e "$8" --arg a "$9" \ '{host:$h, login:$l, pass:$ENV.OVT_JQ_SECRET, sock:$s, database:$d, "ip-server":$ip, botnick:$b, email:$e, admin:$a, logs:1}' > "$tmp" \ || { rm -f "$tmp"; _err "Écriture de IriX.json impossible."; return 1; } # ⚠ Le 600 AVANT le déplacement : `mktemp` le donne déjà, on ne le suppose pas. chmod 600 "$tmp" && mv "$tmp" "${cmds}/IriX.json" && chmod 600 "${cmds}/IriX.json" \ || { rm -f "$tmp"; _err "Écriture de IriX.json impossible."; return 1; } _ok_f "Accès à la base écrit : %s/IriX.json %s(droits 600)%s" "${cmds}" "${DIM}" "${RESET}" } # ----------------------------------------------------------------------------- # _irix_configure — identité du bot et accès à la base. # # Les valeurs sont REPRISES de Config/identity.json quand il existe : c'est le # fichier que le panel du site renseigne, et le bot doit annoncer le même # réseau que le site. Les redemander une seconde fois, c'est prendre le risque # de deux réponses différentes — et un realname de bot qui contredit le nom du # réseau affiché sur le site. # ----------------------------------------------------------------------------- _irix_configure() { _irix_init _ui_width if [[ "${_OVT_SANS_EGGDROP:-0}" == "1" ]]; then _ui_title "Accès à la base et identité des services" "sans Eggdrop : IriX.json est lu par le site, les migrations et OverCore" else _ui_title "Configuration d'IriX" "identité du bot, serveur IRC et base de données" fi local ident="${BASE_DIR}/Config/identity.json" local d_nom d_real d_mail d_dom if [[ -f "$ident" ]]; then d_nom=$(jq -r '.name // empty' "$ident" 2>/dev/null) d_real=$(jq -r '.irc.bot_realname // empty' "$ident" 2>/dev/null) d_mail=$(jq -r '.mail.from // empty' "$ident" 2>/dev/null) d_dom=$(jq -r '.domain // empty' "$ident" 2>/dev/null) _info "Identité reprise de Config/identity.json — le bot annoncera le même réseau que le site." else _warn "Config/identity.json absent : installe le site d'abord (menu 12) pour lier les deux." fi # Le repli est le nom de CETTE installation, pas celui du réseau d'origine. # Proposé tel quel à un exploitant tiers, « Service-Overtchat » se serait # retrouvé dans le realname de son bot — c'est-à-dire dans un /WHOIS lu par # tous ses membres. [[ -z "${d_real:-}" ]] && d_real="${d_nom:-$PROJET_NOM}" local nick alt user real admin mail net host port owner d_owner nick=$(_site_ask "Pseudonyme du bot" "$(_irix_get 'irc.botnick')") alt=$(_site_ask "Pseudonyme de repli" "${nick}_") user=$(_site_ask "Identifiant (username)" "$nick") real=$(_site_ask "Nom réel affiché" "$d_real") # ── 🔴 LE PROPRIÉTAIRE DU ROBOT (« set owner ») — une PERSONNE ────────── # # Jusqu'au 26/09/2026, aucune question ne le demandait : `_irix_ecrire_conf` # reprenait l'« Administrateur », dont le défaut était le NOM DU RÉSEAU. Le # robot avait donc pour propriétaire permanent « Service-Overtchat », un # handle que personne ne porte — et, avec `must-be-owner 1`, les commandes # réservées (.tcl, .set) étaient fermées à tous. # # Le site désigne bien le propriétaire (irix-partyline.tcl, point 127) ; mais # `set owner` reste le repli quand la base se tait, et la seule liste # qu'Eggdrop consulte pour `must-be-owner`. Il doit nommer quelqu'un. # # Ordre des défauts : le choix explicite (OVERTCHAT_PROPRIETAIRE), ce qui # est déjà enregistré, puis le premier compte owner du site — qui n'existe # que sur une RECONFIGURATION : à la première installation, il est créé # après, et doit être vérifié sur IRC. d_owner="${OVERTCHAT_PROPRIETAIRE:-}" # 17/10/2026 (lot J2) : SANS EGGDROP (`_OVT_SANS_EGGDROP=1`, chemin OverCore ou # Anope de `--auto`), « set owner » n'a pas de lecteur : la question et sa # règle de handle Eggdrop sont SAUTÉES — elles refusaient sinon un nom # valable pour une contrainte d'un programme qui n'est pas installé. Le # propriétaire donné reste noté (irix.json), sans contrôle Eggdrop. if [[ "${_OVT_SANS_EGGDROP:-0}" == "1" ]]; then owner="$d_owner" else if [[ -z "$d_owner" ]]; then d_owner=$(_irix_get 'irc.owner') [[ "$d_owner" == "null" ]] && d_owner="" fi if [[ -z "$d_owner" ]] && command -v php >/dev/null 2>&1 \ && [[ -f "${BASE_DIR}/Tools/salons-proprietaire.php" ]]; then d_owner=$(php "${BASE_DIR}/Tools/salons-proprietaire.php" --responsable 2>/dev/null | head -1) fi owner=$(_site_ask "Propriétaire du robot (votre pseudonyme IRC)" "$d_owner") if [[ -n "$owner" ]] && ! _irix_handle_valide "$owner"; then _err "« ${owner} » n'est pas un pseudonyme utilisable par Eggdrop (lettres, chiffres, - _ [ ] { } | ^ \`, 32 au plus, pas de chiffre ni de tiret en tête) — rien n'a été écrit." return 1 fi if [[ -z "$owner" ]]; then if [[ "${MODE_AUTO:-0}" == "1" ]]; then _warn "Aucun propriétaire du robot (OVERTCHAT_PROPRIETAIRE) : il démarrera, mais personne n'aura les commandes réservées (.tcl, .set) tant que « set owner » d'irix.conf ne nomme pas une personne." else _err "Un propriétaire est indispensable : c'est lui qui tient le robot (« set owner »). Rien n'a été écrit." return 1 fi fi fi # fin du « sans Eggdrop » (17/10/2026) — le corps garde son retrait d'avant # L'administrateur n'est qu'un texte affiché (« set admin ») ; son défaut # est désormais le propriétaire, plus le nom du réseau. admin=$(_site_ask "Administrateur" "${owner:-${d_nom:-$PROJET_NOM}}") mail=$(_site_ask "Courriel de contact" "${d_mail:-contact@${d_dom:-localhost}}") net=$(_site_ask "Nom du réseau" "${d_nom:-Overtchat}") host=$(_site_ask "Serveur IRC (hôte)" "$(_irix_get 'irc.host')") port=$(_site_ask "Serveur IRC (port)" "$(_irix_get 'irc.port')") _section "Base de données" printf " ${DIM}IriX et le site partagent la MÊME base : le bot y écrit ce que le site\n" printf " affiche. Une base distincte donnerait un site qui ne voit rien.${RESET}\n\n" # La base du site fait référence : c'est elle que les migrations ont créée. local d_base d_user # ── ⚠⚠ NE RIEN « DÉTECTER » DANS UNE COPIE DU MODÈLE ──────────────────── # # 🔴 Sur une installation neuve, `config.php` vient d'être copié depuis # `config.example.php` : il ne porte donc que des REPLIS — `'database' => # 'IriX'`, `'login' => 'overtchat'` — qui ne décrivent aucune installation # réelle. Les lire et annoncer « détecté » présente une valeur inventée # comme un fait mesuré, et l'installation part avec une base et un compte # qui n'existent nulle part. # # 📌 Constaté le 05/09/2026, et par ma faute : en réparant le motif de # détection du compte — il visait une clé `'user'` qui n'existe pas — j'ai # rendu la détection efficace... sur le fichier de repli. *Un `grep` qui ne # trouvait jamais rien protégeait par accident ; le réparer a révélé que la # SOURCE était mauvaise.* # # On compare donc au modèle : identiques, c'est une copie fraîche et il n'y # a rien à détecter. local _copie_du_modele=0 if [[ -f "${BASE_DIR}/Web/inc/config.php" && -f "${BASE_DIR}/Web/inc/config.example.php" ]] \ && cmp -s "${BASE_DIR}/Web/inc/config.php" "${BASE_DIR}/Web/inc/config.example.php"; then _copie_du_modele=1 _info "config.php est une copie du modèle — rien à détecter, on part des valeurs par défaut." fi if [[ "$_copie_du_modele" == "0" && -f "${BASE_DIR}/Web/inc/config.php" ]]; then d_base=$(grep -oP "'database'\s*=>\s*'\K[^']+" "${BASE_DIR}/Web/inc/config.php" 2>/dev/null | head -1) # ⚠⚠ `'login'`, PAS `'user'` — et cette lettre a coûté cher. # # `config.php` n'écrit nulle part de clé `'user'` : son tableau de repli # porte `'login' => …`. Le motif ne trouvait donc JAMAIS rien, `$d_user` # restait vide, et le défaut `irix` de la ligne plus bas tenait lieu de # réponse. Mesuré sur une installation tierce le 05/09/2026 : ce que # l'écran présentait comme « détecté » était en fait un repli. # # 📌 D'où l'asymétrie qu'on voyait sans la comprendre : la base était # bien détectée — son motif, lui, vise la bonne clé — et l'utilisateur # jamais. *Deux `grep` côte à côte, un seul juste, et rien ne le disait.* d_user=$(grep -oP "'login'\s*=>\s*'\K[^']+" "${BASE_DIR}/Web/inc/config.php" 2>/dev/null | head -1) [[ -n "$d_base" ]] && _info "Base du site détectée : ${BOLD}${d_base}${RESET}" [[ -n "$d_user" ]] && _info "Utilisateur du site détecté : ${BOLD}${d_user}${RESET}" fi local sql_host sql_base sql_user sql_pass sql_sock sql_host=$(_site_ask "Hôte MariaDB" "$(_irix_get 'sql.host')") sql_base=$(_site_ask "Base de données" "${d_base:-Service_Overtchat}") sql_user=$(_site_ask "Utilisateur SQL" "${d_user:-irix}") sql_sock=$(_site_ask "Socket MariaDB" "$(_irix_get 'sql.sock')") # ⚠⚠ LE SEUL SECRET DE TOUTE L'INSTALLATION QUI N'A AUCUN DÉFAUT, et le # trou par lequel un mode AUTO naïf écrirait un IriX.json avec `pass:""` : # le bot serait installé, l'écran dirait « configuré », et il ne joindrait # jamais la base. `_auto_prevol` exige donc OVERTCHAT_SQL_PASS avant que # quoi que ce soit ne soit écrit — ici on ne fait que le reprendre. if [[ "${MODE_AUTO:-0}" == "1" ]]; then sql_pass="${OVERTCHAT_SQL_PASS:-}" printf " Mot de passe SQL : %s\n" "${DIM}(auto — repris de OVERTCHAT_SQL_PASS)${RESET}" else printf " Mot de passe SQL : "; read -rs sql_pass || true; echo "" fi if [[ -z "$nick" || -z "$sql_base" || -z "$sql_user" ]]; then _err "Pseudonyme, base et utilisateur SQL sont indispensables — rien n'a été écrit." return 1 fi _irix_set '.irc.botnick=$n | .irc.altnick=$a | .irc.username=$u | .irc.realname=$r | .irc.admin=$ad | .irc.owner=$ow | .irc.email=$m | .irc.network=$net | .irc.host=$h | .irc.port=($p|tonumber? // 6667) | .sql.host=$sh | .sql.database=$sb | .sql.login=$su | .sql.sock=$ss | .instance.configured=true' \ --arg n "$nick" --arg a "$alt" --arg u "$user" --arg r "$real" \ --arg ad "$admin" --arg ow "$owner" --arg m "$mail" --arg net "$net" \ --arg h "$host" --arg p "$port" \ --arg sh "$sql_host" --arg sb "$sql_base" --arg su "$sql_user" --arg ss "$sql_sock" # Le mot de passe ne va PAS dans irix.json (Config/, lisible) mais dans le # IriX.json de l'instance, écrit en 600 — c'est le fichier que les modules # Tcl lisent, et lui seul a besoin du secret. local dir cmds dir=$(_irix_install_dir); cmds="${dir}/${IRIX_CMDS_SUBDIR}" # 17/10/2026 (lot J2) : l'écriture vit dans `_base_acces_ecrire`, appelée # aussi sans Eggdrop. Le secret y voyage par l'ENVIRONNEMENT, comme avant. OVT_JQ_SECRET="$sql_pass" \ _base_acces_ecrire "$cmds" "$sql_host" "$sql_user" "$sql_sock" "$sql_base" \ "$host" "$nick" "$mail" "$admin" || return 1 # Paire RSA de la file d'identification web (web_authq, défaut B1) : le site # CHIFFRE le mot de passe avec la clé PUBLIQUE, le bot le DÉCHIFFRE avec la # PRIVÉE. Générée ici si absente (idempotent). Privée à côté de IriX.json # (cmds/, 400) — irix-auth.tcl la cherche là en premier ; publique dans # Config/ où le site la lit (ROOT/Config/authq_pub.pem). local authq_priv="${cmds}/authq_priv.pem" authq_pub="${BASE_DIR}/Config/authq_pub.pem" if [ ! -f "$authq_priv" ]; then mkdir -p "${BASE_DIR}/Config" if ( umask 077; openssl genpkey -algorithm RSA -pkeyopt rsa_keygen_bits:2048 \ -out "$authq_priv" 2>/dev/null ) \ && openssl rsa -in "$authq_priv" -pubout -out "$authq_pub" 2>/dev/null; then chmod 400 "$authq_priv"; chmod 444 "$authq_pub" _ok_f "Clés d'identification web générées : %s %s(privée 400)%s + Config/authq_pub.pem" \ "$authq_priv" "${DIM}" "${RESET}" else _warn_f "Génération des clés web_authq impossible (openssl) — l'identification depuis le site restera indisponible tant qu'elles manquent." fi fi _log_entry "irix" "configure" "botnick=$nick base=$sql_base" if [[ "${_OVT_SANS_EGGDROP:-0}" == "1" ]]; then _ok "Accès à la base et identité enregistrés (aucun Eggdrop à déployer)." else _ok "Configuration enregistrée. Déploie l'instance pour l'appliquer." fi } # ----------------------------------------------------------------------------- # _irix_ecrire_conf