#!/usr/bin/env bash
set -Eeuo pipefail
umask 022

# STEP005 - SERVER ATTESO: 215.6 / ax-accessi
# Verifica le dipendenze del ciclo/turno 1 di Silvelox prima di copiarlo in presenze_distribuite.
# Nessuna modifica a file o database.

START_DIR="$PWD"
STAMP="$(date '+%Y%m%d_%H%M%S')"
BASE="STEP005_2156_DISTRIBUITE_SILVELOX_TURN_DEPENDENCIES_AUDIT_ONLY_${STAMP}"
WORKDIR="${START_DIR}/.${BASE}_work_$$"
OUTZIP="${START_DIR}/${BASE}.zip"
LOGFILE="${WORKDIR}/run.log"
REPORT="${WORKDIR}/report.txt"
PACKAGED=0
FAILURES=0
WARNINGS=0

EXPECTED_HOST="${STEP_EXPECTED_HOST:-ax-accessi}"
EXPECTED_IP="${STEP_EXPECTED_IP:-192.168.215.6}"
SKIP_SERVER_CHECK="${STEP_SKIP_SERVER_CHECK:-0}"
SOURCE_DB="${STEP_SOURCE_DB:-presenze_silvelox}"
TARGET_DB="${STEP_TARGET_DB:-presenze_distribuite}"
TURN_ID="${STEP_TURN_ID:-1}"
CYCLE_ID="${STEP_CYCLE_ID:-1}"

mkdir -p "$WORKDIR"
: > "$LOGFILE"
: > "$REPORT"

log() { printf '%s\n' "$*" | tee -a "$LOGFILE"; }
report() { printf '%s\n' "$*" >> "$REPORT"; }
fail() { FAILURES=$((FAILURES + 1)); log "ERRORE: $*"; report "ERRORE: $*"; }
warn() { WARNINGS=$((WARNINGS + 1)); log "ATTENZIONE: $*"; report "ATTENZIONE: $*"; }

package_results() {
    local rc="${1:-0}"
    local zip_rc=0
    [[ "$PACKAGED" -eq 1 ]] && return 0
    PACKAGED=1

    report ""
    report "Esito finale: errori=${FAILURES}, avvisi=${WARNINGS}, exit_code=${rc}"

    rm -f -- "$OUTZIP"
    if command -v zip >/dev/null 2>&1; then
        (cd "$WORKDIR" && zip -qr "$OUTZIP" .) || zip_rc=$?
        if [[ "$zip_rc" -eq 0 ]]; then
            zip -T "$OUTZIP" >>"$LOGFILE" 2>&1 || zip_rc=$?
        fi
    else
        zip_rc=127
    fi

    rm -rf -- "$WORKDIR"

    if [[ "$zip_rc" -ne 0 ]]; then
        rm -f -- "$OUTZIP"
        printf '%s\n' "ERRORE: creazione/verifica ZIP fallita (rc=${zip_rc})." >&2
        return "$zip_rc"
    fi
    printf '%s\n' "ZIP CREATO E VERIFICATO: $OUTZIP"
}

on_exit() {
    local rc=$?
    trap - EXIT INT TERM HUP
    package_results "$rc" || rc=$?
    exit "$rc"
}
trap on_exit EXIT
trap 'exit 130' INT
trap 'exit 143' TERM HUP

log "$BASE"
log "SERVER ATTESO: 215.6 / ax-accessi"
log "MODALITA': AUDIT ONLY - NESSUNA MODIFICA"
log "Avvio: $(date --iso-8601=seconds)"

ACTUAL_HOST="$(hostname -s 2>/dev/null || hostname)"
ACTUAL_IPS="$(hostname -I 2>/dev/null | xargs || true)"

{
    echo "STEP: $BASE"
    echo "Server atteso: 215.6 / ax-accessi"
    echo "Modalita': AUDIT ONLY"
    echo "Data: $(date --iso-8601=seconds)"
    echo "Hostname: $ACTUAL_HOST"
    echo "IP: $ACTUAL_IPS"
    echo "Sorgente: $SOURCE_DB"
    echo "Destinazione: $TARGET_DB"
    echo "Ciclo: $CYCLE_ID"
    echo "Turno: $TURN_ID"
    echo
} >>"$REPORT"

for cmd in grep sed awk wc sort zip hostname xargs tr cut head; do
    command -v "$cmd" >/dev/null 2>&1 || fail "comando richiesto non disponibile: $cmd"
done
[[ "$FAILURES" -eq 0 ]] || exit 20

if [[ ! "$TURN_ID" =~ ^[0-9]+$ || ! "$CYCLE_ID" =~ ^[0-9]+$ ]]; then
    fail "ID ciclo/turno non numerico"
    exit 21
fi

if [[ "$SKIP_SERVER_CHECK" != "1" ]]; then
    [[ "$ACTUAL_HOST" == "$EXPECTED_HOST" ]] || fail "hostname ${ACTUAL_HOST}; previsto ${EXPECTED_HOST}"
    if [[ -n "$EXPECTED_IP" ]] && ! grep -qw -- "$EXPECTED_IP" <<<"$ACTUAL_IPS"; then
        fail "IP ${EXPECTED_IP} non presente tra: ${ACTUAL_IPS}"
    fi
fi
[[ "$FAILURES" -eq 0 ]] || exit 22

MYSQL_BIN="${STEP_MYSQL_BIN:-}"
if [[ -z "$MYSQL_BIN" ]]; then
    if command -v mysql >/dev/null 2>&1; then
        MYSQL_BIN="$(command -v mysql)"
    elif command -v mariadb >/dev/null 2>&1; then
        MYSQL_BIN="$(command -v mariadb)"
    else
        fail "client mysql/mariadb non trovato"
        exit 23
    fi
fi

MYSQL=("$MYSQL_BIN" --batch --raw --default-character-set=utf8mb4)
if ! "${MYSQL[@]}" --skip-column-names -e 'SELECT 1' >/dev/null 2>&1; then
    fail "accesso MySQL locale non riuscito"
    exit 24
fi

sql_scalar() {
    "${MYSQL[@]}" --skip-column-names -e "$1" 2>>"$LOGFILE"
}

table_exists() {
    sql_scalar "SELECT COUNT(*) FROM information_schema.TABLES WHERE TABLE_SCHEMA='$1' AND TABLE_NAME='$2';"
}

primary_key() {
    sql_scalar "
SELECT COLUMN_NAME
FROM information_schema.COLUMNS
WHERE TABLE_SCHEMA='$1'
  AND TABLE_NAME='$2'
  AND COLUMN_KEY='PRI'
ORDER BY ORDINAL_POSITION
LIMIT 1;"
}

for db in "$SOURCE_DB" "$TARGET_DB"; do
    db_exists="$(sql_scalar "SELECT COUNT(*) FROM information_schema.SCHEMATA WHERE SCHEMA_NAME='${db}';")"
    [[ "$db_exists" == "1" ]] || fail "database assente: $db"
done
[[ "$FAILURES" -eq 0 ]] || exit 25

for table in ax_turns_cycle ax_turns_new; do
    [[ "$(table_exists "$SOURCE_DB" "$table")" == "1" ]] || fail "tabella sorgente assente: ${SOURCE_DB}.${table}"
    [[ "$(table_exists "$TARGET_DB" "$table")" == "1" ]] || fail "tabella destinazione assente: ${TARGET_DB}.${table}"
done
[[ "$FAILURES" -eq 0 ]] || exit 26

SOURCE_CYCLE_COUNT="$(sql_scalar "SELECT COUNT(*) FROM \`${SOURCE_DB}\`.ax_turns_cycle WHERE trn_cycle_id=${CYCLE_ID};")"
SOURCE_TURN_COUNT="$(sql_scalar "SELECT COUNT(*) FROM \`${SOURCE_DB}\`.ax_turns_new WHERE trn_id=${TURN_ID};")"
TARGET_CYCLE_COUNT="$(sql_scalar "SELECT COUNT(*) FROM \`${TARGET_DB}\`.ax_turns_cycle WHERE trn_cycle_id=${CYCLE_ID};")"
TARGET_TURN_COUNT="$(sql_scalar "SELECT COUNT(*) FROM \`${TARGET_DB}\`.ax_turns_new WHERE trn_id=${TURN_ID};")"

report "Ciclo sorgente ${CYCLE_ID}: ${SOURCE_CYCLE_COUNT}"
report "Turno sorgente ${TURN_ID}: ${SOURCE_TURN_COUNT}"
report "Ciclo destinazione ${CYCLE_ID}: ${TARGET_CYCLE_COUNT}"
report "Turno destinazione ${TURN_ID}: ${TARGET_TURN_COUNT}"

[[ "$SOURCE_CYCLE_COUNT" == "1" ]] || fail "ciclo sorgente non univoco"
[[ "$SOURCE_TURN_COUNT" == "1" ]] || fail "turno sorgente non univoco"
[[ "$FAILURES" -eq 0 ]] || exit 27

"${MYSQL[@]}" -e "
SELECT *
FROM \`${SOURCE_DB}\`.ax_turns_cycle
WHERE trn_cycle_id=${CYCLE_ID};" >"${WORKDIR}/01_SOURCE_CYCLE.tsv" 2>>"$LOGFILE"

"${MYSQL[@]}" -e "
SELECT *
FROM \`${SOURCE_DB}\`.ax_turns_new
WHERE trn_id=${TURN_ID};" >"${WORKDIR}/02_SOURCE_TURN.tsv" 2>>"$LOGFILE"

"${MYSQL[@]}" -e "
SELECT TABLE_NAME,
       TABLE_ROWS
FROM information_schema.TABLES
WHERE TABLE_SCHEMA='${TARGET_DB}'
  AND (
       TABLE_NAME LIKE 'ax_turn%'
       OR TABLE_NAME LIKE 'ax_band%'
       OR TABLE_NAME LIKE 'ax_service%'
       OR TABLE_NAME LIKE '%magg%'
  )
ORDER BY TABLE_NAME;" >"${WORKDIR}/03_TARGET_RELATED_TABLES.tsv" 2>>"$LOGFILE"

WORK_DAYS="$(sql_scalar "SELECT trn_work_days FROM \`${SOURCE_DB}\`.ax_turns_new WHERE trn_id=${TURN_ID};")"
printf '%s\n' "$WORK_DAYS" >"${WORKDIR}/04_SOURCE_TRN_WORK_DAYS.json"

printf 'chiave\tvalori_sorgente\n' >"${WORKDIR}/05_REFERENCES.tsv"
for key in model bands adjust access constraints service magg; do
    values="$(printf '%s\n' "$WORK_DAYS" \
        | grep -oE "\"${key}\"[[:space:]]*:[[:space:]]*\"?[0-9]+\"?" \
        | grep -oE '[0-9]+' \
        | sort -n -u \
        | tr '\n' ',' \
        | sed 's/,$//' || true)"
    printf '%s\t%s\n' "$key" "$values" >>"${WORKDIR}/05_REFERENCES.tsv"
done

check_reference() {
    local label="$1"
    local table="$2"
    local wanted="$3"
    local result_file="${WORKDIR}/REF_${label}.tsv"

    if [[ -z "$wanted" ]]; then
        printf 'tabella\tpk\tid_richiesti\trighe_destinazione\n%s\t\t\t0\n' "$table" >"$result_file"
        return 0
    fi

    if [[ "$(table_exists "$TARGET_DB" "$table")" != "1" ]]; then
        printf 'tabella\tpk\tid_richiesti\trighe_destinazione\n%s\tASSENTE\t%s\t0\n' "$table" "$wanted" >"$result_file"
        warn "tabella dipendenza assente: ${TARGET_DB}.${table}"
        return 0
    fi

    local pk
    pk="$(primary_key "$TARGET_DB" "$table")"
    if [[ -z "$pk" ]]; then
        printf 'tabella\tpk\tid_richiesti\trighe_destinazione\n%s\tNESSUNA_PK\t%s\t0\n' "$table" "$wanted" >"$result_file"
        warn "chiave primaria non rilevata: ${TARGET_DB}.${table}"
        return 0
    fi

    local ids_sql
    ids_sql="$(printf '%s' "$wanted" | awk -F, '{
        for (i=1;i<=NF;i++) {
            if ($i ~ /^[0-9]+$/) {
                if (out!="") out=out",";
                out=out sprintf("%d",$i)
            }
        }
        print out
    }')"

    if [[ -z "$ids_sql" ]]; then
        printf 'tabella\tpk\tid_richiesti\trighe_destinazione\n%s\t%s\t%s\t0\n' "$table" "$pk" "$wanted" >"$result_file"
        return 0
    fi

    local found
    found="$(sql_scalar "SELECT COUNT(*) FROM \`${TARGET_DB}\`.\`${table}\` WHERE \`${pk}\` IN (${ids_sql});")"
    printf 'tabella\tpk\tid_richiesti\trighe_destinazione\n%s\t%s\t%s\t%s\n' "$table" "$pk" "$wanted" "$found" >"$result_file"

    "${MYSQL[@]}" -e "
SELECT *
FROM \`${TARGET_DB}\`.\`${table}\`
WHERE \`${pk}\` IN (${ids_sql})
ORDER BY \`${pk}\`;" >>"$result_file" 2>>"$LOGFILE" || true

    local requested
    requested="$(printf '%s' "$ids_sql" | awk -F, '{print NF}')"
    if [[ "$found" -lt "$requested" ]]; then
        warn "${table}: presenti ${found}/${requested} riferimenti richiesti (${wanted})"
    fi
}

get_ref_values() {
    awk -F'\t' -v k="$1" '$1==k {print $2}' "${WORKDIR}/05_REFERENCES.tsv"
}

check_reference "MODEL"       "ax_turn_model"           "$(get_ref_values model)"
check_reference "BANDS"       "ax_bands"                "$(get_ref_values bands)"
check_reference "ADJUST"      "ax_turn_adjust"          "$(get_ref_values adjust)"
check_reference "CONSTRAINTS" "ax_turn_constraints_new" "$(get_ref_values constraints)"
check_reference "SERVICE"     "ax_service"              "$(get_ref_values service)"
check_reference "ACCESS"      "ax_turn_tipo_accesso"    "$(get_ref_values access)"

"${MYSQL[@]}" -e "
SELECT TABLE_NAME,
       COLUMN_NAME,
       COLUMN_KEY
FROM information_schema.COLUMNS
WHERE TABLE_SCHEMA='${TARGET_DB}'
  AND TABLE_NAME LIKE '%magg%'
ORDER BY TABLE_NAME,ORDINAL_POSITION;" >"${WORKDIR}/06_TARGET_MAGG_TABLES.tsv" 2>>"$LOGFILE" || true

BANDS="$(get_ref_values bands)"
if [[ -n "$BANDS" ]] && ! grep -q $'\t'"$BANDS"$'\t' "${WORKDIR}/REF_BANDS.tsv" 2>/dev/null; then
    :
fi

if [[ "$WARNINGS" -eq 0 ]]; then
    report "Dipendenze principali presenti: il clone diretto puo' essere preparato."
else
    report "Dipendenze incomplete: non copiare ancora ciclo/turno senza riallineare i riferimenti."
fi

{
    echo "AUDIT COMPLETATO"
    echo "Errori: $FAILURES"
    echo "Avvisi: $WARNINGS"
    echo "Sorgente: ${SOURCE_DB}, ciclo ${CYCLE_ID}, turno ${TURN_ID}"
    echo "Destinazione: ${TARGET_DB}"
    echo "Nessuna modifica eseguita."
} >"${WORKDIR}/99_SUMMARY.txt"

log "Audit completato: errori=${FAILURES}, avvisi=${WARNINGS}"