from __future__ import annotations

import contextlib
import functools
from typing import Callable, Literal
import weakref

from prettyqt import widgets
from prettyqt.prettyqtest.wait_signal import (
    CallbackBlocker,
    CallbackCalledTwiceError,
    MultiSignalBlocker,
    SignalBlocker,
    SignalEmittedError,
    SignalEmittedSpy,
)
import prettyqt.qt
from prettyqt.qt import QtTest, QtWidgets


OrderStr = Literal["none", "simple", "strict"]


def _parse_ini_boolean(value) -> bool:
    if value in (True, False):
        return value
    try:
        return {"true": True, "false": False}[value.lower()]
    except KeyError:
        raise ValueError("unknown string for bool: %r" % value)


class QtBot:
    """Responsible for sending events to `Qt` objects, simulating user input.

    .. important:: Instances of this class should be accessed only by using a
                    ``qtbot`` fixture, never instantiated directly.

    **Widgets**

    .. automethod:: add_widget
    .. automethod:: capture_exceptions
    .. automethod:: wait_active
    .. automethod:: wait_exposed
    .. automethod:: wait_for_window_shown
    .. automethod:: stop_for_interaction
    .. automethod:: wait

    **Signals and Events**

    .. automethod:: wait_signal
    .. automethod:: wait_signals
    .. automethod:: assert_not_emitted
    .. automethod:: wait_until

    **Raw QTest API**

    Methods below provide very low level functions,
    as sending a single mouse click or a key event.
    Those methods are just forwarded directly to the `QTest API`_.
    Consult the documentation for more information.

    ---

    Below are methods used to simulate sending key events to widgets:

      keyClick (widget, key[, modifier=Qt.NoModifier[, delay=-1]])
      keyClicks (widget, key sequence[, modifier=Qt.NoModifier[, delay=-1]])
      keyEvent (action, widget, key[, modifier=Qt.NoModifier[, delay=-1]])
      keyPress (widget, key[, modifier=Qt.NoModifier[, delay=-1]])
      keyRelease (widget, key[, modifier=Qt.NoModifier[, delay=-1]])

        Sends one or more keyboard events to a widget.

        :param QWidget widget: the widget that will receive the event

        :param str|int key: key to send, it can be either a Qt.Key constant or
        a single character string.

        .. _keyboard modifiers:

        :param Qt.KeyboardModifier modifier: flags OR'ed together representing other
            modifier keys also pressed. Possible flags are:

            * ``NoModifier``: No modifier key.
            * ``ShiftModifier``: A Shift key on the keyboard.
            * ``ControlModifier``: A Ctrl key on the keyboard.
            * ``AltModifier``: An Alt key on the keyboard.
            * ``MetaModifier``: A Meta key on the keyboard.
            * ``KeypadModifier``: A keypad button.
            * ``GroupSwitchModifier``: X11 only. A Mode_switch key on the keyboard.

        :param int delay: after the event, delay the test for this miliseconds (if > 0).


      keyToAscii (key)

        Auxilliary method that converts the given constant ot its equivalent ascii.

        :param Qt.Key.Key_* key: one of the constants for keys in the Qt namespace.

        :return type: str
        :returns: the equivalent character string.

        .. note:: This method is not available in PyQt.

    ---

    Below are methods used to simulate sending mouse events to widgets.

      mouseClick (widget, button[, stateKey=0[, pos=QPoint()[, delay=-1]]])
      mouseDClick (widget, button[, stateKey=0[, pos=QPoint()[, delay=-1]]])
      mouseMove (widget[, pos=QPoint()[, delay=-1]])
      mousePress (widget, button[, stateKey=0[, pos=QPoint()[, delay=-1]]])
      mouseRelease (widget, button[, stateKey=0[, pos=QPoint()[, delay=-1]]])

        Sends a mouse moves and clicks to a widget.

        :param QWidget widget: the widget that will receive the event

        :param Qt.MouseButton button: OR'ed flags representing the button pressed.
            Possible flags are:

            * ``Qt.NoButton``: The button state does not refer to any button
              (see QMouseEvent.button()).
            * ``Qt.LeftButton``: The left button, or an event refers to the left button.
              (The left button may be the right button on left-handed mice.)
            * ``Qt.RightButton``: The right button.
            * ``Qt.MidButton``: The middle button.
            * ``Qt.MiddleButton``: The middle button.
            * ``Qt.XButton1``: The first X button.
            * ``Qt.XButton2``: The second X button.

        :param Qt.KeyboardModifier modifier: flags OR'ed together representing other
            modifier keys also pressed. See `keyboard modifiers`_.

        :param QPoint position: position of the mouse pointer.

        :param int delay: after the event, delay the test for this miliseconds (if > 0).


    .. _QTest API: http://doc.qt.io/qt-5/qtest.html

    """

    SignalEmittedError = SignalEmittedError
    CallbackCalledTwiceError = CallbackCalledTwiceError

    def __init__(self, request):
        self._request = request

    def _should_raise(self, raising_arg):
        ini_val = self._request.config.getini("qt_default_raising")

        if raising_arg is not None:
            return raising_arg
        elif ini_val:
            return _parse_ini_boolean(ini_val)
        else:
            return True

    def add_widget(self, widget: QtWidgets.QWidget, *, before_close_func=None):
        """Add a widget to be tracked by this bot.

        This is not required, but will ensure that the
        widget gets closed by the end of the test, so it is highly recommended.

        :param QWidget widget:
            Widget to keep track of.

        :kwparam before_close_func:
            A function that receives the widget as single parameter, which is called just
            before the ``.close()`` method gets called.

        .. note:: This method is also available as ``add_widget`` (pep-8 alias)
        """
        if not isinstance(widget, QtWidgets.QWidget):
            raise TypeError("Need to pass a QWidget to add_widget!")
        _add_widget(self._request.node, widget, before_close_func=before_close_func)

    def wait_active(self, widget: QtWidgets.QWidget, timeout=5000):
        """Context manager that waits for ``timeout`` ms or until the window is active.

        If window is not exposed within ``timeout`` milliseconds, raise ``TimeoutError``.

        This is mainly useful for asynchronous systems like X11,
        where a window will be mapped to screen
        some time after  being asked to show itself on the screen.

        .. code-block:: python

            with qtbot.wait_active(widget, timeout=500):
                show_action()

        :param QWidget widget:
            Widget to wait for.

        :param int|None timeout:
            How many milliseconds to wait for.

        .. note::
            This function is only available in PyQt5, raising a ``RuntimeError``
            if called from ``PySide2``.

        .. note:: This method is also available as ``wait_active`` (pep-8 alias)
        """
        __tracebackhide__ = True
        return _WaitWidgetContextManager(
            "qWaitForWindowActive", "activated", widget, timeout
        )

    def wait_exposed(self, widget: QtWidgets.QWidget, timeout: int = 5000):
        """Context manager that waits for ``timeout`` ms or until the window is exposed.

        If the window is not exposed within ``timeout`` ms, raise ``TimeoutError``.

        This is mainly useful for asynchronous systems like X11,
        where a window will be mapped to screen
        some time after  being asked to show itself on the screen.

        .. code-block:: python

            with qtbot.wait_exposed(splash, timeout=500):
                startup()

        :param QWidget widget:
            Widget to wait for.

        :param int|None timeout:
            How many milliseconds to wait for.

        .. note::
            This function is only available in PyQt5, raising a ``RuntimeError`` if called
            from ``PySide2``.

        .. note:: This method is also available as ``wait_exposed`` (pep-8 alias)
        """
        __tracebackhide__ = True
        return _WaitWidgetContextManager(
            "qWaitForWindowExposed", "exposed", widget, timeout
        )

    def wait_for_window_shown(
        self, widget: QtWidgets.QWidget, timeout: int = 5000
    ) -> bool:
        """Wait until the window is shown in the screen.

        This is mainly useful for asynchronous systems like X11, where a window will be
        mapped to screen some time after being asked to show itself on the screen.

        :param QWidget widget:
            Widget to wait on.

        :param int|None timeout:
            How many milliseconds to wait for.

        .. note:: In ``PyQt5`` this function is considered deprecated in favor of
        :meth:`wait_exposed`.

        .. note:: This method is also available as ``wait_for_window_shown`` (pep-8 alias)
        """
        if hasattr(QtTest.QTest, "qWaitForWindowExposed"):
            return QtTest.QTest.qWaitForWindowExposed(widget, timeout)
        else:
            return QtTest.QTest.qWaitForWindowShown(widget, timeout)

    def stop(self):
        """Stop the current test flow, letting the user interact with any visible widget.

        This is mainly useful so that you can verify the current state of the program
        while writing tests.

        Closing the windows should resume the test run, with ``qtbot`` attempting to
        restore visibility of the widgets as they were before this call.

        .. note:: As a convenience, it is also aliased as `stop`.
        """
        widget_and_visibility = []
        for weak_widget in _iter_widgets(self._request.node):
            widget = weak_widget()
            if widget is not None:
                widget_and_visibility.append((widget, widget.isVisible()))

        inst = widgets.Application.instance()
        if inst is None:
            raise RuntimeError("No Application running")
        inst.main_loop()
        for widget, visible in widget_and_visibility:
            widget.setVisible(visible)

    def wait_signal(
        self, signal, timeout: int = 5000, raising=None, check_params_cb=None
    ):
        """Stop current test until a signal is triggered.

        Used to stop the control flow of a test until a signal is emitted, or
        a number of milliseconds, specified by ``timeout``, has elapsed.

        Best used as a context manager::

           with qtbot.wait_signal(signal, timeout=1000):
               long_function_that_calls_signal()

        Also, you can use the :class:`SignalBlocker` directly if the context
        manager form is not convenient::

           blocker = qtbot.wait_signal(signal, timeout=1000)
           blocker.connect(another_signal)
           long_function_that_calls_signal()
           blocker.wait()

        Any additional signal, when triggered, will make :meth:`wait` return.

        .. versionadded:: 1.4
           The *raising* parameter.

        .. versionadded:: 2.0
           The *check_params_cb* parameter.

        :param Signal signal:
            A signal to wait for, or a tuple ``(signal, signal_name_as_str)``
            to improve the error message that is part
            of ``TimeoutError``.
        :param int timeout:
            How many milliseconds to wait before resuming control flow.
        :param bool raising:
            If :class:`QtBot.TimeoutError <pytestqt.plugin.TimeoutError>`
            should be raised if a timeout occurred.
            This defaults to ``True`` unless ``qt_default_raising = false``
            is set in the config.
        :param Callable check_params_cb:
            Optional ``callable`` that compares the provided signal parameters to
            some expected parameters.
            It has to match the signature of ``signal`` (just like a slot function would)
            and return ``True`` if parameters match, ``False`` otherwise.
        :returns:
            ``SignalBlocker`` object. Call ``SignalBlocker.wait()`` to wait.
        """
        raising = self._should_raise(raising)
        blocker = SignalBlocker(
            timeout=timeout, raising=raising, check_params_cb=check_params_cb
        )
        blocker.connect(signal)
        return blocker

    def wait_signals(
        self,
        signals,
        timeout: int = 5000,
        raising=None,
        check_params_cbs=None,
        order: OrderStr = "none",
    ):
        """Stop current test until all given signals are triggered.

        Used to stop the control flow of a test until all (and only
        all) signals are emitted or the number of milliseconds specified by
        ``timeout`` has elapsed.

        Best used as a context manager::

           with qtbot.wait_signals([signal1, signal2], timeout=1000):
               long_function_that_calls_signals()

        Also, you can use the :class:`MultiSignalBlocker` directly if the
        context manager form is not convenient::

           blocker = qtbot.wait_signals(signals, timeout=1000)
           long_function_that_calls_signal()
           blocker.wait()

        :param list signals:
            A list of :class:`Signal` objects to wait for. Alternatively: a list of
            (``Signal, str``) tuples of the form
            ``(signal, signal_name_as_str)`` to improve the error message that is part of
             ``TimeoutError``.
            Set to ``None`` to just use timeout.
        :param int timeout:
            How many milliseconds to wait before resuming control flow.
        :param bool raising:
            If :class:`QtBot.TimeoutError <pytestqt.plugin.TimeoutError>`
            should be raised if a timeout occurred.
            This defaults to ``True`` unless ``qt_default_raising = false``
            is set in the config.
        :param list check_params_cbs:
            optional list of callables that compare the provided signal parameters to
            some expected parameters.
            Each callable has to match the signature of the corresponding signal in
            ``signals`` (just like a slot
            function would) and return ``True`` if parameters match, ``False`` otherwise.
            Instead of a specific callable, ``None`` can be provided, to disable parameter
            checking for the
            corresponding signal.
            If the number of callbacks doesn't match the number of signals ``ValueError``
            will be raised.
        :param str order:
            Determines the order in which to expect signals:

            - ``"none"``: no order is enforced
            - ``"strict"``: signals have to be emitted strictly in the provided order
              (e.g. fails when expecting signals [a, b] and [a, a, b] is emitted)
            - ``"simple"``: like "strict", but signals may be emitted in-between the
            provided ones, e.g. expected
              ``signals == [a, b, c]`` and actually emitted ``signals = [a, a, b, a, c]``
              works (would fail with ``"strict"``).

        :returns:
            ``MultiSignalBlocker`` object. Call ``MultiSignalBlocker.wait()``
            to wait.
        """
        if order not in ["none", "simple", "strict"]:
            raise ValueError("order has to be set to 'none', 'simple' or 'strict'")

        raising = self._should_raise(raising)

        if check_params_cbs:
            if len(check_params_cbs) != len(signals):
                raise ValueError(
                    f"Number of callbacks ({len(check_params_cbs)}) does not "
                    f"match number of signals ({len(signals)})!"
                )
        blocker = MultiSignalBlocker(
            timeout=timeout,
            raising=raising,
            order=order,
            check_params_cbs=check_params_cbs,
        )
        blocker.add_signals(signals)
        return blocker

    def wait(self, ms: int):
        """Wait for ``ms`` milliseconds.

        While waiting, events will be processed and your test will stay
        responsive to user interface events or network communication.
        """
        blocker = MultiSignalBlocker(timeout=ms, raising=False)
        blocker.wait()

    @contextlib.contextmanager
    def assert_not_emitted(self, signal, wait: int = 0):
        """Make sure the given ``signal`` doesn't get emitted.

        :param int wait:
            How many milliseconds to wait to make sure the signal isn't emitted
            asynchronously. By default, this method returns immediately and only
            catches signals emitted inside the ``with``-block.

        This is intended to be used as a context manager.
        """
        spy = SignalEmittedSpy(signal)
        with spy, self.wait_signal(signal, timeout=wait, raising=False):
            yield
        spy.assert_not_emitted()

    def wait_until(self, callback: Callable, timeout: int = 5000):
        """Wait in a busy loop, calling the given callback periodically until timeout.

        ``callback()`` should raise ``AssertionError`` to indicate that the desired
        condition has not yet been reached, or just return ``None`` when it does.
        Useful to ``assert`` until some condition is satisfied:

        .. code-block:: python

            def view_updated():
                assert view_model.count() > 10


            qtbot.wait_until(view_updated)

        Another possibility is for ``callback()`` to return ``True`` when the desired
        condition is met, ``False`` otherwise. Useful specially with ``lambda`` for
        terser code, but keep in mind that the error message in those cases is usually
        not very useful because it is not using an ``assert`` expression.

        .. code-block:: python

            qtbot.wait_until(lambda: view_model.count() > 10)

        Note that this usage only accepts returning actual ``True`` and ``False`` values,
        so returning an empty list to express "falseness" raises a ``ValueError``.

        :param callback: callable that will be called periodically.
        :param timeout: timeout value in ms.
        :raises ValueError: if the return value from the callback is anything other than
            ``None``, ``True`` or ``False``.
        """
        __tracebackhide__ = True
        import time

        start = time.time()

        def timed_out():
            elapsed = time.time() - start
            elapsed_ms = elapsed * 1000
            return elapsed_ms > timeout

        timeout_msg = f"wait_until timed out in {timeout} miliseconds"

        while True:
            try:
                result = callback()
            except AssertionError as e:
                if timed_out():
                    raise TimeoutError(timeout_msg) from e
            else:
                if result not in (None, True, False):
                    raise ValueError(
                        "wait_until() callback must return None, "
                        f"True or False, returned {result!r}"
                    )

                # 'assert' form
                if result is None:
                    return

                # 'True/False' form
                if result:
                    return
                if timed_out():
                    raise TimeoutError(timeout_msg)
            self.wait(10)

    def wait_callback(self, timeout: int = 5000, raising=None):
        """Stop current test until a callback is called.

        Used to stop the control flow of a test until the returned callback is
        called, or a number of milliseconds, specified by ``timeout``, has
        elapsed.

        Best used as a context manager::

           with qtbot.wait_callback() as callback:
               function_taking_a_callback(callback)
           assert callback.args == [True]

        Also, you can use the :class:`CallbackBlocker` directly if the
        context manager form is not convenient::

           blocker = qtbot.wait_callback(timeout=1000)
           function_calling_a_callback(blocker)
           blocker.wait()


        :param int timeout:
            How many milliseconds to wait before resuming control flow.
        :param bool raising:
            If :class:`QtBot.TimeoutError <pytestqt.plugin.TimeoutError>`
            should be raised if a timeout occurred.
            This defaults to ``True`` unless ``qt_default_raising = false``
            is set in the config.
        :returns:
            A ``CallbackBlocker`` object which can be used directly as a
            callback as it implements ``__call__``.
        """
        raising = self._should_raise(raising)
        blocker = CallbackBlocker(timeout=timeout, raising=raising)
        return blocker

    @contextlib.contextmanager
    def capture_exceptions(self):
        """Capture Qt virtual method exceptions that happen in block inside context.

        .. code-block:: python

            with qtbot.capture_exceptions() as exceptions:
                qtbot.click(button)

            # exception is a list of sys.exc_info tuples
            assert len(exceptions) == 1
        """
        from prettyqt.prettyqtest.exceptions import capture_exceptions

        with capture_exceptions() as exceptions:
            yield exceptions

    @classmethod
    def _inject_qtest_methods(cls):
        """Inject QTest methods into the given class QtBot.

        This way the user can access them directly without having to import QTest.
        """

        def create_qtest_proxy_method(method_name):

            if hasattr(QtTest.QTest, method_name):
                qtest_method = getattr(QtTest.QTest, method_name)

                def result(*args, **kwargs):
                    return qtest_method(*args, **kwargs)

                functools.update_wrapper(result, qtest_method)
                return staticmethod(result)
            else:
                return None  # pragma: no cover

        # inject methods from QTest into QtBot
        method_names = [
            "keyPress",
            "keyClick",
            "keyClicks",
            "keyEvent",
            "keyPress",
            "keyRelease",
            "keyToAscii",
            "mouseClick",
            "mouseDClick",
            "mouseMove",
            "mousePress",
            "mouseRelease",
            "keySequence",
        ]
        for method_name in method_names:
            method = create_qtest_proxy_method(method_name)
            if method is not None:
                setattr(cls, method_name, method)


def _add_widget(
    item, widget: QtWidgets.QWidget, *, before_close_func: Callable | None = None
):
    """Register a widget into the given pytest item for later closing."""
    qt_widgets = getattr(item, "qt_widgets", [])
    qt_widgets.append((weakref.ref(widget), before_close_func))
    item.qt_widgets = qt_widgets


def _close_widgets(item):
    """Close all widgets registered in the pytest item."""
    widgets = getattr(item, "qt_widgets", None)
    if widgets:
        for w, before_close_func in item.qt_widgets:
            w = w()
            if w is not None:
                if before_close_func is not None:
                    before_close_func(w)
                w.close()
                w.deleteLater()
        del item.qt_widgets


def _iter_widgets(item):
    """Iterate over widgets registered in the given pytest item."""
    qt_widgets = getattr(item, "qt_widgets", [])
    return (w for (w, _) in qt_widgets)


class _WaitWidgetContextManager:
    """Implementation used by ``wait_active`` and ``wait_exposed`` methods."""

    def __init__(self, method_name: str, adjective_name: str, widget, timeout: int):
        self._method_name = method_name
        self._adjective_name = adjective_name
        self._widget = widget
        self._timeout = timeout

    def __enter__(self):
        __tracebackhide__ = True
        if prettyqt.qt.API != "pyqt5":
            raise RuntimeError("Available in PyQt5 only")
        return self

    def __exit__(self, exc_type, exc_val, exc_tb):
        __tracebackhide__ = True
        try:
            if exc_type is None:
                method = getattr(QtTest.QTest, self._method_name)
                r = method(self._widget, self._timeout)
                if not r:
                    msg = "widget {} not {} in {} ms.".format(
                        self._widget, self._adjective_name, self._timeout
                    )
                    raise TimeoutError(msg)
        finally:
            self._widget = None
