<?php

declare(strict_types=1);

namespace DoctrineMigrations;

use Doctrine\DBAL\Schema\Schema;
use Doctrine\Migrations\AbstractMigration;

/**
 * Repair migration for Version20260528090000_FixPieceCascadeFKs.
 *
 * On some environments (prod included) that migration was recorded as executed
 * but two of its six FKs to `pieces.id` never took effect:
 *   - machine_piece_links.pieceid   (fk_mpl_piece)
 *   - custom_field_values.pieceid   (fk_cfv_piece)
 * Without them, deleting a Piece leaves orphan rows behind (a stale pieceid
 * pointing to a non-existent piece), which surfaces as a "Catégorie sans item"
 * ghost on the machine detail page and a 404 on /documents/piece/{id}.
 *
 * This migration re-applies ONLY those two missing pieces of the original one:
 * snapshot orphans to audit_logs, delete them, then (re)add the FK with the
 * correct ON DELETE CASCADE. Fully idempotent — safe where the FKs already exist.
 */
final class Version20260529150000_AddMissingPieceCascadeFKs extends AbstractMigration
{
    public function getDescription(): string
    {
        return 'Repair missing CASCADE FKs to pieces on machine_piece_links and custom_field_values (orphan cleanup + fk_mpl_piece / fk_cfv_piece)';
    }

    public function up(Schema $schema): void
    {
        // =========================================================================
        // 1. Audit log : snapshot des rows orphelines avant suppression.
        // =========================================================================
        $this->addSql(<<<'SQL'
            INSERT INTO audit_logs (id, entitytype, entityid, action, snapshot, actorprofileid, createdat)
            SELECT
              'cl' || substring(md5(random()::text || clock_timestamp()::text), 1, 24),
              'machine_piece_link',
              l.id,
              'delete',
              json_build_object(
                'id', l.id,
                'machineId', l.machineid,
                'pieceId', l.pieceid,
                'note', 'Cleaned by FK cascade repair migration (Version20260529150000) - referenced piece no longer existed'
              ),
              NULL,
              NOW()
            FROM machine_piece_links l
            WHERE l.pieceid IS NOT NULL
              AND l.pieceid NOT IN (SELECT id FROM pieces)
            SQL);

        $this->addSql(<<<'SQL'
            INSERT INTO audit_logs (id, entitytype, entityid, action, snapshot, actorprofileid, createdat)
            SELECT
              'cl' || substring(md5(random()::text || clock_timestamp()::text), 1, 24),
              'custom_field_value',
              v.id,
              'delete',
              json_build_object(
                'id', v.id,
                'pieceId', v.pieceid,
                'note', 'Cleaned by FK cascade repair migration (Version20260529150000) - referenced piece no longer existed'
              ),
              NULL,
              NOW()
            FROM custom_field_values v
            WHERE v.pieceid IS NOT NULL
              AND v.pieceid NOT IN (SELECT id FROM pieces)
            SQL);

        // =========================================================================
        // 2. Nettoyage des orphelins (avant ADD CONSTRAINT, sinon PG rejette).
        // =========================================================================
        $this->addSql(<<<'SQL'
            DELETE FROM machine_piece_links
            WHERE pieceid IS NOT NULL
              AND pieceid NOT IN (SELECT id FROM pieces)
            SQL);

        $this->addSql(<<<'SQL'
            DELETE FROM custom_field_values
            WHERE pieceid IS NOT NULL
              AND pieceid NOT IN (SELECT id FROM pieces)
            SQL);

        // =========================================================================
        // 3. Drop des éventuelles FK existantes vers `pieces` (quel que soit leur
        //    nom historique), puis ADD CONSTRAINT avec le bon ON DELETE.
        // =========================================================================
        $this->dropFksReferencingPieces('machine_piece_links', 'pieceid');
        $this->addSql(<<<'SQL'
            ALTER TABLE machine_piece_links ADD CONSTRAINT fk_mpl_piece
              FOREIGN KEY (pieceid) REFERENCES pieces(id) ON DELETE CASCADE
            SQL);

        $this->dropFksReferencingPieces('custom_field_values', 'pieceid');
        $this->addSql(<<<'SQL'
            ALTER TABLE custom_field_values ADD CONSTRAINT fk_cfv_piece
              FOREIGN KEY (pieceid) REFERENCES pieces(id) ON DELETE CASCADE
            SQL);
    }

    public function down(Schema $schema): void
    {
        $this->addSql('ALTER TABLE machine_piece_links DROP CONSTRAINT IF EXISTS fk_mpl_piece');
        $this->addSql('ALTER TABLE custom_field_values DROP CONSTRAINT IF EXISTS fk_cfv_piece');
    }

    /**
     * Drop every FK on $table.$column that references the `pieces` table,
     * regardless of its historic name. Idempotent.
     */
    private function dropFksReferencingPieces(string $table, string $column): void
    {
        $sql = <<<SQL
            DO \$\$
            DECLARE
              fk_name TEXT;
            BEGIN
              FOR fk_name IN
                SELECT tc.constraint_name
                FROM information_schema.table_constraints tc
                JOIN information_schema.key_column_usage kcu
                  ON kcu.constraint_name = tc.constraint_name
                 AND kcu.table_schema    = tc.table_schema
                JOIN information_schema.constraint_column_usage ccu
                  ON ccu.constraint_name = tc.constraint_name
                 AND ccu.table_schema    = tc.table_schema
                WHERE tc.table_name      = '{$table}'
                  AND tc.constraint_type = 'FOREIGN KEY'
                  AND kcu.column_name    = '{$column}'
                  AND ccu.table_name     = 'pieces'
              LOOP
                EXECUTE format('ALTER TABLE {$table} DROP CONSTRAINT %I', fk_name);
              END LOOP;
            END \$\$;
            SQL;
        $this->addSql($sql);
    }
}