#!/usr/bin/env python3
# © 2021-2026 TechnoLibre (http://www.technolibre.ca)
# License AGPL-3.0 or later (http://www.gnu.org/licenses/agpl)

"""Les commentaires d'un fichier disent-ils le fonctionnement, ou son contexte ?

La convention est dans `.claude/rules/04-code-conventions.md` : un commentaire
dit COMMENT le code marche, il ne porte aucune donnée identifiante et il ne
raconte pas l'enquête. Cet outil en vérifie la part mécanique.

Trois familles, de sûreté très différente :

- `identifiant` — adresse IP, courriel, chemin de compte. Une
  correspondance est une trouvaille : ces formes n'ont aucune raison d'être
  dans un commentaire.
- `récit` — marqueur de témoignage (« vécu sur », « mesuré le »), date
  absolue, première personne. Une correspondance est un SIGNAL À RELIRE : la
  même phrase peut énoncer un fait durable. L'outil ne trie pas à la place
  du lecteur.
- `nom` — un nom de machine pleinement qualifié. Aussi un signal à relire,
  et pour une raison plus dure : un nom d'hôte NU ne se distingue
  mécaniquement ni d'un mot ordinaire ni du nom d'un logiciel, donc cette
  famille ne voit que la forme qualifiée. Les miroirs de paquets nommés dans
  un commentaire y répondent, et c'est le prix d'un signal mécanique — le
  lecteur confirme en deux secondes, là où la classe entière était invisible.

Il lit les commentaires `#` et, en Python, les docstrings de module, de classe
et de fonction. Le reste du code ne l'intéresse pas.

Il se signale lui-même : ce fichier CITE les marqueurs qu'il cherche, et ses
citations sont des correspondances comme les autres. Ces trouvailles-là sont
la définition de l'outil, pas un défaut à corriger.

Codes de sortie, convention partagée des outils du dépôt : 0 rien à signaler,
1 des trouvailles, 2 l'outil a échoué.
"""

from __future__ import annotations

import argparse
import ast
import io
import json
import os
import re
import subprocess
import sys
import tokenize

RACINE = os.path.normpath(os.path.join(os.path.dirname(__file__), "..", ".."))

sys.path.append(RACINE)
sys.path.append(os.path.join(RACINE, "script"))

# Réexportés pour que ce module reste le seul point d'entrée de l'outil.
from lib_identifiant import (  # noqa: E402,F401
    NOMS_INTERDITS,
    adresse_de_machine,
    identifiants,
    termes_interdits,
)

try:
    from script.todo.todo_i18n import t
except Exception:  # pragma: no cover - repli si i18n indisponible

    def t(key: str) -> str:
        return key


SUFFIXES = (".py", ".sh", ".bash", ".go")

# Ce qui vient d'ailleurs ou n'est pas du source : le dépôt ne le réécrit pas.
EXCLUS = (
    "/OCA_",
    "/addons/",
    "/.venv",
    "/node_modules/",
    "/.git/",
)


def a_balayer(chemin):
    """Un chemin du dépôt, et non du code tiers ou un environnement."""
    normalise = chemin.replace(os.sep, "/")
    while normalise.startswith("./"):
        normalise = normalise[2:]
    return not any(exclu in "/" + normalise for exclu in EXCLUS)


# Le témoignage : la phrase prend un événement pour sujet au lieu du code.
# L'accent porte la distinction : « mesuré sur » témoigne, « mesure le »
# décrit ce que le code fait. Sans lui, le motif prend le présent pour du passé.
# « le relevé » est un NOM et prend les mêmes prépositions : un déterminant
# devant le participe désigne la chose relevée, pas l'acte de relever.
RECIT = re.compile(
    r"(?<!\w)(?<!(?:le|du|au|un|ce)\s)(?<!(?:son|des|les|aux|mon|ton)\s)"
    r"(?:vécu|mesuré|relevé|rapporté|constaté|observé|signalé)e?s?"
    r"(?:[,]?\s+(?:sur|le|la|les|dans|chez|par|au|aux|en|à|ce|deux|trois)\b"
    r"|\s*[:—])",
    re.IGNORECASE,
)

# Une date absolue date le commentaire : le fonctionnement, lui, n'a pas de date.
DATE = re.compile(
    r"\b\d{4}-\d{2}-\d{2}\b"
    r"|\b\d{1,2}\s+(?:janvier|février|mars|avril|mai|juin|juillet|août"
    r"|septembre|octobre|novembre|décembre)\s+\d{4}\b",
    re.IGNORECASE,
)

# Le rédacteur pris pour sujet : « ma conclusion était fausse », « mes essais ».
PERSONNE = re.compile(
    r"(?<![\w'])(?:j'|je|ma|mon|mes|nous\s+avons"
    r"|ce\s+matin|la\s+veille|ce\s+jour-là|hier)\b",
    re.IGNORECASE,
)

MOTIFS_RECIT = (
    ("témoignage", RECIT),
    ("date", DATE),
    ("personne", PERSONNE),
)

# Le nom de machine est la SEULE classe interdite qu'aucun motif ne tranche :
# un nom d'hôte ne se distingue mécaniquement ni d'un mot pointé ordinaire, ni
# du nom d'un logiciel. Seule sa forme pleinement qualifiée se reconnaît, et
# encore : « chemin.home » et « logging.info » ont la même forme. D'où un
# signal à relire et non une trouvaille.
#
# Le suffixe est comparé à une liste FERMÉE. Sans elle, tout attribut pointé
# du code correspondrait. Les suffixes de service — local, lan, internal —
# y sont exprès : c'est sous eux qu'une machine du parc se nomme.
SUFFIXES_DHOTE = (
    "com",
    "ca",
    "net",
    "org",
    "io",
    "dev",
    "fr",
    "be",
    "ch",
    "eu",
    "us",
    "uk",
    "biz",
    "cloud",
    "app",
    "tech",
    "quebec",
    "local",
    "lan",
    "internal",
    "intra",
    "corp",
)

# Le point qui SUIT décide de deux choses opposées : suivi d'un caractère de
# nom, il prolonge l'adresse et la correspondance n'est qu'un préfixe ; seul,
# c'est le point d'une phrase, et l'adresse s'arrête là. Les confondre rendait
# invisible toute adresse en fin de phrase.
NOM_DHOTE = re.compile(
    r"(?<![\w.@-])((?:[a-z0-9](?:[a-z0-9-]{0,61}[a-z0-9])?\.)+"
    r"(?:%s))(?![\w-])(?!\.[\w-])" % "|".join(SUFFIXES_DHOTE),
    re.IGNORECASE,
)

# Ce que la convention autorise nommément. Le dépôt nomme son PROPRIÉTAIRE et
# sa licence dans l'en-tête de chaque fichier : les signaler reviendrait à
# signaler l'en-tête obligatoire partout.
DOMAINES_PERMIS = re.compile(
    r"^(?:www\.)?(?:technolibre\.ca|gnu\.org)$"
    r"|^(?:[a-z0-9-]+\.)*(?:example|exemple)\.(?:com|net|org)$",
    re.IGNORECASE,
)

# Une adresse portée par une URL désigne une ressource publique — un miroir de
# paquets, une page de documentation — et non une machine du parc. La machine
# qui fuite dans un commentaire s'y écrit nue.
DANS_UNE_URL = re.compile(r"[a-z][a-z0-9+.-]*://\S*$", re.IGNORECASE)


def _bloc(sous_lignes):
    """Un bloc : son texte recollé, et les lignes physiques qui le portent.

    Le texte recollé sert à CHERCHER — une phrase coupée en trois lignes reste
    une phrase. Chaque sous-ligne garde en plus son OFFSET dans ce texte : une
    occurrence trouvée à la position n se convertit alors en numéro de ligne
    sans jamais rechercher l'extrait, qui se retrouverait dans un autre mot.
    """
    debuts, position = [], 0
    for numero, texte in sous_lignes:
        debuts.append((position, numero))
        position += len(texte) + 1
    return {
        "line": sous_lignes[0][0],
        "text": " ".join(texte for _, texte in sous_lignes),
        "lines": sous_lignes,
        "offsets": debuts,
    }


def _regroupe(lignes_commentees):
    """Les lignes consécutives forment un bloc ; un trou en ouvre un autre."""
    blocs, courant = [], []
    for numero, texte in lignes_commentees:
        if courant and numero == courant[-1][0] + 1:
            courant.append((numero, texte))
        else:
            if courant:
                blocs.append(_bloc(courant))
            courant = [(numero, texte)]
    if courant:
        blocs.append(_bloc(courant))
    return blocs


def blocs_python(source):
    """Les commentaires et docstrings d'un source Python.

    Une docstring garde ses lignes PHYSIQUES, relues dans le source : le
    littéral de l'AST a perdu son indentation et ses numéros.
    """
    lignes_source = source.split("\n")

    commentaires = []
    lisible = True
    try:
        for jeton in tokenize.generate_tokens(io.StringIO(source).readline):
            if jeton.type == tokenize.COMMENT:
                commentaires.append(
                    (jeton.start[0], jeton.string.lstrip("#").strip())
                )
    except (tokenize.TokenError, IndentationError, SyntaxError):
        # Un source que Python refuse reste du texte : le balayage ligne à
        # ligne voit encore les « # », là où rendre un rapport vide dirait
        # « propre » d'un fichier qu'on n'a pas lu.
        lisible = False
    trouves = _regroupe(commentaires) if lisible else blocs_shell(source)

    try:
        arbre = ast.parse(source)
    except SyntaxError:
        return sorted(trouves, key=lambda b: b["line"])

    portees = [arbre] + [
        noeud
        for noeud in ast.walk(arbre)
        if isinstance(
            noeud, (ast.FunctionDef, ast.AsyncFunctionDef, ast.ClassDef)
        )
    ]
    for noeud in portees:
        corps = getattr(noeud, "body", None)
        if not corps or not isinstance(corps[0], ast.Expr):
            continue
        valeur = corps[0].value
        if not (
            isinstance(valeur, ast.Constant) and isinstance(valeur.value, str)
        ):
            continue
        debut = corps[0].lineno
        fin = getattr(corps[0], "end_lineno", debut) or debut
        sous_lignes = [
            (numero, lignes_source[numero - 1].strip())
            for numero in range(debut, min(fin, len(lignes_source)) + 1)
        ]
        if sous_lignes:
            trouves.append(_bloc(sous_lignes))

    return sorted(trouves, key=lambda b: b["line"])


def commentaire_shell(ligne):
    """Ce que dit le commentaire de cette ligne shell, ou None.

    Le « # » qui ouvre un commentaire est celui qui n'est ni protégé par des
    guillemets, ni échappé, ni collé à un mot — `${VAR#préfixe}` et une URL
    `…/#ancre` n'ouvrent rien. Le shebang n'est pas un commentaire.
    """
    if ligne.lstrip().startswith("#!"):
        return None
    quote = None
    precedent = ""
    for index, caractere in enumerate(ligne):
        if precedent == "\\":
            precedent = ""
            continue
        if quote:
            if caractere == quote:
                quote = None
        elif caractere in "\"'":
            quote = caractere
        elif caractere == "#" and (index == 0 or ligne[index - 1].isspace()):
            return ligne[index:].lstrip("#").strip()
        precedent = caractere
    return None


def blocs_shell(source):
    """Les commentaires d'un script shell, les consécutifs regroupés."""
    commentaires = []
    for numero, ligne in enumerate(source.split("\n"), start=1):
        texte = commentaire_shell(ligne)
        if texte is not None:
            commentaires.append((numero, texte))
    return _regroupe(commentaires)


def blocs_go(source):
    """Les commentaires d'un fichier Go, les consécutifs regroupés.

    Trois pièges, et le premier est celui qui compte : « // » ouvre un
    commentaire SAUF dans une chaîne — et « https:// » en porte deux. Go a
    trois formes de chaîne, dont la brute entre accents graves, où la barre
    oblique inverse n'échappe rien. Les commentaires de bloc « /* … */ »
    couvrent plusieurs lignes, chacune comptant pour ce qu'elle dit.
    """
    commentaires = []
    en_bloc = False
    for numero, ligne in enumerate(source.split("\n"), start=1):
        if en_bloc:
            fin = ligne.find("*/")
            texte = (ligne if fin < 0 else ligne[:fin]).strip()
            if texte:
                commentaires.append((numero, texte.lstrip("*").strip()))
            if fin >= 0:
                en_bloc = False
            continue
        quote = None
        precedent = ""
        index = 0
        while index < len(ligne):
            caractere = ligne[index]
            if precedent == "\\" and quote in ('"', "'"):
                # La chaîne brute ignore l'échappement : seules les deux
                # autres formes le connaissent.
                precedent = ""
                index += 1
                continue
            if quote:
                if caractere == quote:
                    quote = None
            elif caractere in "\"'`":
                quote = caractere
            elif caractere == "/" and ligne[index : index + 2] == "//":
                texte = ligne[index:].lstrip("/").strip()
                if texte:
                    commentaires.append((numero, texte))
                break
            elif caractere == "/" and ligne[index : index + 2] == "/*":
                reste = ligne[index + 2 :]
                fin = reste.find("*/")
                texte = (reste if fin < 0 else reste[:fin]).strip()
                if texte:
                    commentaires.append((numero, texte))
                if fin < 0:
                    en_bloc = True
                    break
                index += 2 + fin + 2
                precedent = ""
                continue
            precedent = caractere
            index += 1
    return _regroupe(commentaires)


def blocs(chemin, source):
    """Les commentaires d'un fichier, selon son suffixe."""
    if chemin.endswith(".py"):
        return blocs_python(source)
    if chemin.endswith(".go"):
        return blocs_go(source)
    return blocs_shell(source)


def recits(texte):
    """Les marqueurs de récit d'un texte : (motif, extrait, position).

    Toutes les occurrences, et non la première : un bloc de vingt lignes en
    porte souvent plusieurs, et n'en montrer qu'une cache le reste du travail.
    """
    trouves = []
    for nom, motif in MOTIFS_RECIT:
        for trouve in motif.finditer(texte):
            trouves.append((nom, trouve.group(0).strip(), trouve.start()))
    return sorted(trouves, key=lambda t: t[2])


def noms_dhote(texte):
    """Les noms de machine pleinement qualifiés d'un texte.

    Rend (motif, extrait, position), comme `recits` et `identifiants`, pour
    que les trois familles se traitent de la même façon.

    Trois formes sortent : le domaine du propriétaire et celui de la licence,
    que l'en-tête de chaque fichier porte ; les domaines réservés à la
    documentation par la RFC 2606 ; et toute adresse portée par une URL, qui
    désigne une ressource publique.
    """
    trouves = []
    for trouve in NOM_DHOTE.finditer(texte):
        nom = trouve.group(1)
        if DOMAINES_PERMIS.match(nom):
            continue
        if DANS_UNE_URL.search(texte[: trouve.start()]):
            continue
        trouves.append(("nom d'hôte", nom, trouve.start()))
    return trouves


def ligne_a(bloc, position):
    """La ligne physique qui porte cette position du texte recollé."""
    numero = bloc["line"]
    for debut, ligne in bloc["offsets"]:
        if debut > position:
            break
        numero = ligne
    return numero


def inspect(chemin, source=None, termes=None):
    """Les trouvailles d'un fichier, dans l'ordre des lignes."""
    if termes is None:
        termes = termes_interdits()
    if source is None:
        with io.open(chemin, encoding="utf-8", errors="replace") as fh:
            source = fh.read()

    trouvailles = []
    for bloc in blocs(chemin, source):
        familles = (
            ("identifiant", identifiants(bloc["text"], termes)),
            ("récit", recits(bloc["text"])),
            ("nom", noms_dhote(bloc["text"])),
        )
        for genre, trouves in familles:
            for motif, extrait, position in trouves:
                trouvailles.append(
                    {
                        "file": chemin,
                        "line": ligne_a(bloc, position),
                        "kind": genre,
                        "pattern": motif,
                        "excerpt": extrait,
                    }
                )
    return sorted(trouvailles, key=lambda f: (f["line"], f["kind"]))


def fichiers_indexes():
    """Les fichiers ajoutés à l'index git, filtrés sur les suffixes lisibles."""
    sortie = subprocess.run(
        ["git", "diff", "--cached", "--name-only", "--diff-filter=ACMR"],
        capture_output=True,
        text=True,
        cwd=RACINE,
    )
    chemins = []
    for nom in sortie.stdout.split("\n"):
        nom = nom.strip()
        if (
            nom.endswith(SUFFIXES)
            and a_balayer(nom)
            and os.path.isfile(os.path.join(RACINE, nom))
        ):
            chemins.append(nom)
    return chemins


def etend(chemins):
    """Les fichiers lisibles d'une liste de chemins, répertoires parcourus."""
    trouves = []
    for chemin in chemins:
        if os.path.isdir(chemin):
            for base, _, noms in os.walk(chemin):
                if not a_balayer(base + "/"):
                    continue
                for nom in sorted(noms):
                    complet = os.path.join(base, nom)
                    if nom.endswith(SUFFIXES) and a_balayer(complet):
                        trouves.append(complet)
        elif chemin.endswith(SUFFIXES) and a_balayer(chemin):
            trouves.append(chemin)
    return trouves


def render(trouvailles, colour=True):
    """Le rapport, groupé par fichier."""
    if not trouvailles:
        return ""

    def peindre(texte, code):
        return f"\033[{code}m{texte}\033[0m" if colour else texte

    lignes = []
    fichier = None
    for f in trouvailles:
        if f["file"] != fichier:
            fichier = f["file"]
            lignes.append(peindre(fichier, "1"))
        icone = "🔴" if f["kind"] == "identifiant" else "🟡"
        lignes.append(
            f"  {icone} {f['line']:>5}  {f['pattern']:<11} {f['excerpt']}"
        )

    durs = sum(1 for f in trouvailles if f["kind"] == "identifiant")
    mous = len(trouvailles) - durs
    lignes.append("")
    lignes.append(
        t(
            "%s identifying, %s to re-read — see .claude/rules/04-code-conventions.md"
        )
        % (peindre(durs, "31"), peindre(mous, "33"))
    )
    return "\n".join(lignes)


def main(argv=None):
    parser = argparse.ArgumentParser(
        description=t(
            "do the comments say how the code works, or where it came from"
        )
    )
    parser.add_argument("paths", nargs="*", default=[])
    parser.add_argument(
        "--staged",
        action="store_true",
        help=t("only the files added to the git index"),
    )
    parser.add_argument(
        "--identifying-only",
        action="store_true",
        help=t("drop the narrative signals, keep the certain findings"),
    )
    parser.add_argument("--json", action="store_true")
    parser.add_argument("--no-color", action="store_true")
    args = parser.parse_args(argv)

    if args.staged:
        chemins = fichiers_indexes()
    elif args.paths:
        chemins = etend(args.paths)
    else:
        parser.error(t("give a path, or --staged"))
        return 2

    termes = termes_interdits()
    trouvailles = []
    for chemin in chemins:
        try:
            trouvailles.extend(inspect(chemin, termes=termes))
        except OSError as exc:
            print(f"❌ {chemin} : {exc}", file=sys.stderr)
            return 2

    if args.identifying_only:
        trouvailles = [f for f in trouvailles if f["kind"] == "identifiant"]

    if args.json:
        print(
            json.dumps(
                {"scanned": len(chemins), "findings": trouvailles},
                indent=2,
                ensure_ascii=False,
            )
        )
    else:
        colour = sys.stdout.isatty() and not args.no_color
        rapport = render(trouvailles, colour)
        if rapport:
            print(rapport)

    return 1 if trouvailles else 0


if __name__ == "__main__":
    sys.exit(main())