# Table.py -- Pamhyr
# Copyright (C) 2023-2025  INRAE
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <https://www.gnu.org/licenses/>.

# -*- coding: utf-8 -*-

import logging
import traceback
from tools import trace, timer

from PyQt5.QtCore import (
    Qt, QVariant, QAbstractTableModel,
    QCoreApplication, QModelIndex, pyqtSlot,
    QRect,
)

from PyQt5.QtWidgets import (
    QDialogButtonBox, QPushButton, QLineEdit,
    QFileDialog, QTableView, QAbstractItemView,
    QUndoStack, QShortcut, QAction, QItemDelegate,
    QComboBox, QMessageBox,
)

from View.Tools.PamhyrTable import PamhyrTableModel

from View.InitialConditionsTemperature.UndoCommand import (
    AddCommand, SetCommandSpec,
    DelCommand,
)

logger = logging.getLogger()

_translate = QCoreApplication.translate


class ComboBoxDelegate(QItemDelegate):
    def __init__(self, data=None, ic_spec_lst=None,
                 trad=None, parent=None, mode="reaches"):
        super(ComboBoxDelegate, self).__init__(parent)

        self._data = data
        self._mode = mode
        self._trad = trad
        self._ic_spec_lst = ic_spec_lst

    def createEditor(self, parent, option, index):
        self.editor = QComboBox(parent)

        val = []
        if self._mode == "rk":
            reach_id = self._ic_spec_lst[index.row()].reach

            reach = next(filter(lambda edge: edge.id == reach_id,
                                self._data.edges()), None)

            if reach is not None:
                val = list(
                    map(
                        lambda profile: profile.display_name(),
                        reach.reach.profiles
                    )
                )
        else:
            val = list(
                map(
                    lambda n: n.name, self._data.enable_edges()
                )
            )

        self.editor.addItems(
            [self._trad['not_associated']] +
            val
        )

        self.editor.setCurrentText(str(index.data(Qt.DisplayRole)))
        return self.editor

    def setEditorData(self, editor, index):
        value = index.data(Qt.DisplayRole)
        self.editor.currentTextChanged.connect(self.currentItemChanged)

    def setModelData(self, editor, model, index):
        text = str(editor.currentText())
        value = text

        if self._mode == "rk":
            reach_id = self._ic_spec_lst[index.row()].reach
            reach = next(
                (
                    edge for edge in self._data.edges()
                    if edge.id == reach_id
                ),
                None
            )
            if reach is not None:
                profile = next(
                    (
                        profile for profile in reach.reach.profiles
                        if profile.display_name() == text
                    ),
                    None
                )
                if profile is not None:
                    value = profile.rk

        model.setData(index, value)
        editor.close()
        editor.deleteLater()

    def updateEditorGeometry(self, editor, option, index):
        r = QRect(option.rect)
        if self.editor.windowFlags() & Qt.Popup:
            if editor.parent() is not None:
                r.setTopLeft(self.editor.parent().mapToGlobal(r.topLeft()))
        editor.setGeometry(r)

    @pyqtSlot()
    def currentItemChanged(self):
        self.commitData.emit(self.sender())


class InitialConditionTableModel(PamhyrTableModel):
    def __init__(self, river=None, data=None, **kwargs):
        self._river = river

        super(InitialConditionTableModel, self).__init__(data=data, **kwargs)

        self._data = data

    def _setup_lst(self):
        enabled_reach_ids = {
            reach.id
            for reach in self._river.enable_edges()
        }
        self._lst = list(
            filter(
                lambda ica: (
                    ica._deleted is False and
                    (
                        ica.reach in (None, -1) or
                        ica.reach in enabled_reach_ids
                    )
                ),
                self._data._data
            )
        )

    def refresh(self):
        self.beginResetModel()
        try:
            self._setup_lst()
        finally:
            self.endResetModel()

    def rowCount(self, parent):
        return len(self._lst)

    def data(self, index, role):
        if role != Qt.ItemDataRole.DisplayRole:
            return QVariant()

        row = index.row()
        column = index.column()

        if self._headers[column] == "name":
            n = self._lst[row].name
            if n is None or n == "":
                return self._trad['not_defined']
            return n
        elif self._headers[column] == "reach":
            n = self._lst[row].reach
            if n is None:
                return self._trad['not_associated']
            return next(filter(
                lambda edge: edge.id == n, self._river.edges()
            )).name
        elif self._headers[column] == "rk":
            n = self._lst[row].start_rk
            if n is None:
                return self._trad['not_associated']
            return self._rk_display_name(row, n)
        elif self._headers[column] == "temperature":
            n = self._lst[row].temperature
            if n is None:
                return self._trad['not_defined']
            return n

        return QVariant()

    def _rk_display_name(self, row, rk):
        reach_id = self._lst[row].reach
        reach = next(
            (
                edge for edge in self._river.edges()
                if edge.id == reach_id
            ),
            None
        )
        if reach is None:
            return str(rk)

        profile = next(
            (
                profile for profile in reach.reach.profiles
                if profile.rk == rk
            ),
            None
        )
        return profile.display_name() if profile is not None else str(rk)

    def setData(self, index, value, role=Qt.EditRole):
        if not index.isValid() or role != Qt.EditRole:
            return False

        if self.is_same_data(index, value):
            return False

        row = index.row()
        column = index.column()
        column_name = self._headers[column]

        try:
            new_value = (
                self._river.edge(value).id
                if column_name == "reach"
                else value
            )
            if (column_name in ("reach", "rk")
                    and self._overlaps_existing_rk(
                        row, column_name, new_value
                    )):
                QMessageBox.warning(
                    self._table_view,
                    self._trad["msg_rk_overlap_title"],
                    self._trad["msg_rk_overlap_text"]
                )
            else:
                new_value = value
                if self._headers[column] == "reach":
                    reach = self._river.edge(value)
                    rks = reach.reach.get_rk()
                    if not rks:
                        return False
                    new_value = (reach.id, min(rks))

                self._undo.push(
                    SetCommandSpec(
                        self._lst, row, self._headers[column],
                        new_value
                    )
                )
        except Exception as e:
            logger.info(e)
            logger.debug(traceback.format_exc())

        if self._headers[column] == "reach":
            rk_index = self.index(
                row, self._headers.index("rk")
            )
            self.dataChanged.emit(index, rk_index)
        else:
            self.dataChanged.emit(index, index)
        return True

    def _overlaps_existing_rk(self, row, column, value):
        current = self._lst[row]
        reach = value if column == "reach" else current.reach
        rk = value if column == "rk" else current.start_rk
        if reach in (None, -1) or rk is None:
            return False

        rk = float(rk)
        return any(
            other is not current
            and not other.is_deleted()
            and other.reach == reach
            and other.start_rk is not None
            and other.end_rk is not None
            and min(other.start_rk, other.end_rk) <= rk
            <= max(other.start_rk, other.end_rk)
            for other in self._data._data
        )

    def add(self, row, parent=QModelIndex()):
        self.beginInsertRows(parent, row, row - 1)

        self._undo.push(
            AddCommand(
                self._data, self._lst, row
            )
        )

        self._setup_lst()
        self.endInsertRows()
        self.layoutChanged.emit()

    def delete(self, rows, parent=QModelIndex()):
        self.beginRemoveRows(parent, rows[0], rows[-1])

        data_rows = {
            id(ica): i for i, ica in enumerate(self._data._data)
        }
        self._undo.push(
            DelCommand(
                self._data,
                self._data._data,
                [data_rows[id(self._lst[row])] for row in rows]
            )
        )

        self._setup_lst()
        self.endRemoveRows()
        self.layoutChanged.emit()

    def undo(self):
        self._undo.undo()
        self._setup_lst()
        self.layoutChanged.emit()

    def redo(self):
        self._undo.redo()
        self._setup_lst()
        self.layoutChanged.emit()