from __future__ import annotations

from typing import TYPE_CHECKING, Any

from app.features.conditions.migration import Migration
from app.library.Singleton import Singleton

if TYPE_CHECKING:
    from collections.abc import AsyncGenerator, Iterable

    from sqlalchemy.engine.result import Result
    from sqlalchemy.ext.asyncio import AsyncSession
    from sqlalchemy.sql.elements import ColumnElement
    from sqlalchemy.sql.selectable import Select

from sqlalchemy import delete, func, or_, select

from app.features.conditions.models import ConditionModel
from app.features.core.deps import get_session
from app.library.log import get_logger

LOG = get_logger()


class ConditionsRepository(metaclass=Singleton):
    def __init__(self, session: AsyncGenerator[AsyncSession] | None = None) -> None:
        self._migrated = False
        self.session: AsyncGenerator[AsyncSession] = session or get_session

    async def run_migrations(self) -> None:
        if self._migrated:
            return

        self._migrated = True
        await Migration(repo=self, config=None).run()

    @staticmethod
    def get_instance() -> ConditionsRepository:
        return ConditionsRepository()

    async def list(self) -> list[ConditionModel]:
        async with self.session() as session:
            result: Result[tuple[ConditionModel]] = await session.execute(
                select(ConditionModel).order_by(ConditionModel.priority.desc(), ConditionModel.name.asc())
            )
            return list(result.scalars().all())

    async def list_paginated(self, page: int, per_page: int) -> tuple[list[ConditionModel], int, int, int]:
        async with self.session() as session:
            total: int = await self.count()
            total_pages: int = (total + per_page - 1) // per_page if total > 0 else 1

            if page > total_pages and total > 0:
                page = total_pages

            query: Select[tuple[ConditionModel]] = (
                select(ConditionModel)
                .order_by(ConditionModel.priority.desc(), ConditionModel.name.asc())
                .limit(per_page)
                .offset((page - 1) * per_page)
            )
            result: Result[tuple[ConditionModel]] = await session.execute(query)
            return list(result.scalars().all()), total, page, total_pages

    async def count(self) -> int:
        async with self.session() as session:
            result: Result[tuple[int]] = await session.execute(select(func.count()).select_from(ConditionModel))
            return int(result.scalar_one())

    async def get(self, identifier: int | str) -> ConditionModel | None:
        async with self.session() as session:
            if not identifier:
                return None

            if isinstance(identifier, int):
                clause: ColumnElement[bool] = ConditionModel.id == identifier
            elif isinstance(identifier, str) and identifier.isdigit():
                clause: ColumnElement[bool] = or_(
                    ConditionModel.id == int(identifier), ConditionModel.name == identifier
                )
            else:
                clause: ColumnElement[bool] = ConditionModel.name == identifier

            result: Result[tuple[ConditionModel]] = await session.execute(select(ConditionModel).where(clause).limit(1))
            return result.scalar_one_or_none()

    async def get_by_name(self, name: str, exclude_id: int | None = None) -> ConditionModel | None:
        async with self.session() as session:
            query: Select[tuple[ConditionModel]] = select(ConditionModel).where(ConditionModel.name == name)
            if exclude_id is not None:
                query = query.where(ConditionModel.id != exclude_id)

            result: Result[tuple[ConditionModel]] = await session.execute(query.limit(1))
            return result.scalar_one_or_none()

    async def create(self, payload: ConditionModel | dict) -> ConditionModel:
        async with self.session() as session:
            model: ConditionModel = ConditionModel(**payload) if isinstance(payload, dict) else payload
            if model.id is not None:
                model.id = None

            if await self.get_by_name(name=model.name) is not None:
                msg: str = f"Condition with name '{model.name}' already exists."
                raise ValueError(msg)

            session.add(model)
            await session.commit()
            await session.refresh(model)
            return model

    async def update(self, identifier: int | str, payload: dict[str, Any]) -> ConditionModel:
        async with self.session() as session:
            if isinstance(identifier, int):
                clause: ColumnElement[bool] = ConditionModel.id == identifier
            elif isinstance(identifier, str) and identifier.isdigit():
                clause: ColumnElement[bool] = or_(
                    ConditionModel.id == int(identifier), ConditionModel.name == identifier
                )
            else:
                clause: ColumnElement[bool] = ConditionModel.name == identifier

            result: Result[tuple[ConditionModel]] = await session.execute(select(ConditionModel).where(clause).limit(1))
            if not (model := result.scalar_one_or_none()):
                msg: str = f"Condition '{identifier}' not found."
                raise KeyError(msg)

            payload.pop("id", None)
            payload.pop("created_at", None)
            payload.pop("updated_at", None)

            if "name" in payload and await self.get_by_name(name=payload["name"], exclude_id=model.id) is not None:
                msg: str = f"Condition with name '{payload['name']}' already exists."
                raise ValueError(msg)

            for key, value in payload.items():
                if hasattr(model, key):
                    setattr(model, key, value)

            await session.commit()
            await session.refresh(model)
            return model

    async def delete(self, identifier: int | str) -> ConditionModel:
        async with self.session() as session:
            if isinstance(identifier, int):
                clause: ColumnElement[bool] = ConditionModel.id == identifier
            elif isinstance(identifier, str) and identifier.isdigit():
                clause: ColumnElement[bool] = or_(
                    ConditionModel.id == int(identifier), ConditionModel.name == identifier
                )
            else:
                clause: ColumnElement[bool] = ConditionModel.name == identifier

            result: Result[tuple[ConditionModel]] = await session.execute(select(ConditionModel).where(clause).limit(1))
            if not (model := result.scalar_one_or_none()):
                msg: str = f"Condition '{identifier}' not found."
                raise KeyError(msg)

            await session.delete(model)
            await session.commit()
            return model

    async def replace_all(self, items: Iterable[dict | ConditionModel]) -> list[ConditionModel]:
        async with self.session() as session:
            try:
                await session.execute(delete(ConditionModel))
                models: list[ConditionModel] = [
                    ConditionModel(**item) if isinstance(item, dict) else item for item in items
                ]
                session.add_all(models)
                await session.commit()
            except Exception:
                await session.rollback()
                raise
            return models