# SPDX-FileCopyrightText: 2022-present deepset GmbH <info@deepset.ai>
#
# SPDX-License-Identifier: Apache-2.0

import logging
import warnings

import pytest

from haystack.components.builders.prompt_builder import PromptBuilder
from haystack.components.generators.chat.openai import OpenAIChatGenerator
from haystack.core.pipeline.utils import (
    FIFOPriorityQueue,
    _deepcopy_with_exceptions,
    args_deprecated,
    parse_connect_string,
)
from haystack.tools import ComponentTool, Tool


def get_weather_report(city: str) -> str:
    return f"Weather report for {city}: 20°C, sunny"


def test_parse_connection():
    assert parse_connect_string("foobar") == ("foobar", None)
    assert parse_connect_string("foo.bar") == ("foo", "bar")


@pytest.fixture
def empty_queue():
    """Fixture providing a fresh empty queue for each test."""
    return FIFOPriorityQueue()


def test_empty_queue_initialization(empty_queue):
    """Test that a new queue is empty."""
    assert len(empty_queue) == 0
    assert not bool(empty_queue)


def test_push_single_item(empty_queue):
    """Test pushing a single item."""
    empty_queue.push("item1", 1)
    assert len(empty_queue) == 1
    assert bool(empty_queue)
    assert empty_queue.peek() == (1, "item1")


def test_push_multiple_items_different_priorities(empty_queue):
    """Test pushing multiple items with different priorities."""
    items = [("item3", 3), ("item1", 1), ("item2", 2)]
    for item, priority in items:
        empty_queue.push(item, priority)

    # Items should come out in priority order
    assert empty_queue.pop() == (1, "item1")
    assert empty_queue.pop() == (2, "item2")
    assert empty_queue.pop() == (3, "item3")


def test_push_multiple_items_same_priority(empty_queue):
    """Test FIFO behavior for items with equal priority."""
    items = [("first", 1), ("second", 1), ("third", 1)]
    for item, priority in items:
        empty_queue.push(item, priority)

    # Items should come out in insertion order
    assert empty_queue.pop() == (1, "first")
    assert empty_queue.pop() == (1, "second")
    assert empty_queue.pop() == (1, "third")


def test_mixed_priority_and_fifo(empty_queue):
    """Test mixed priority levels with some equal priorities."""
    empty_queue.push("medium1", 2)
    empty_queue.push("high", 1)
    empty_queue.push("medium2", 2)
    empty_queue.push("low", 3)

    # Check extraction order
    assert empty_queue.pop() == (1, "high")
    assert empty_queue.pop() == (2, "medium1")
    assert empty_queue.pop() == (2, "medium2")
    assert empty_queue.pop() == (3, "low")


def test_peek_behavior(empty_queue):
    """Test that peek returns items without removing them."""
    empty_queue.push("item1", 1)
    empty_queue.push("item2", 2)

    # Peek multiple times
    for _ in range(3):
        assert empty_queue.peek() == (1, "item1")
        assert len(empty_queue) == 2


def test_get_behavior(empty_queue):
    """Test the get method with both empty and non-empty queues."""
    # Test on empty queue
    assert empty_queue.get() is None

    # Test with items
    empty_queue.push("item1", 1)
    assert empty_queue.get() == (1, "item1")
    assert empty_queue.get() is None  # Queue should be empty again


def test_pop_empty_queue(empty_queue):
    """Test that pop raises IndexError on empty queue."""
    with pytest.raises(IndexError, match="pop from empty queue"):
        empty_queue.pop()


def test_peek_empty_queue(empty_queue):
    """Test that peek raises IndexError on empty queue."""
    with pytest.raises(IndexError, match="peek at empty queue"):
        empty_queue.peek()


def test_length_updates(empty_queue):
    """Test that length updates correctly with pushes and pops."""
    initial_len = len(empty_queue)
    assert initial_len == 0

    # Test length increases
    empty_queue.push("item1", 1)
    assert len(empty_queue) == 1
    empty_queue.push("item2", 2)
    assert len(empty_queue) == 2

    # Test length decreases
    empty_queue.pop()
    assert len(empty_queue) == 1
    empty_queue.pop()
    assert len(empty_queue) == 0


def test_bool_conversion(empty_queue):
    """Test boolean conversion in various states."""
    # Empty queue should be False
    assert not bool(empty_queue)

    # Queue with items should be True
    empty_queue.push("item", 1)
    assert bool(empty_queue)

    # Queue should be False again after removing item
    empty_queue.pop()
    assert not bool(empty_queue)


def test_large_number_of_items(empty_queue):
    """Test handling of a large number of items with mixed priorities."""
    # Add 1000 items with 10 different priority levels
    for i in range(1000):
        priority = i % 10
        empty_queue.push(f"item{i}", priority)

    # Verify FIFO order within same priority
    last_priority = -1
    last_index = -1
    for _ in range(1000):
        priority, item = empty_queue.pop()
        current_index = int(item[4:])  # Extract index from "itemX"

        if priority == last_priority:
            assert current_index > last_index, "FIFO order violated within same priority"
        else:
            assert priority > last_priority, "Priority order violated"

        last_priority = priority
        last_index = current_index


@pytest.mark.parametrize(
    "items",
    [
        [(1, "A"), (1, "B"), (1, "C")],  # Same priority
        [(3, "A"), (2, "B"), (1, "C")],  # Different priorities
        [(2, "A"), (1, "B"), (2, "C")],  # Mixed priorities
    ],
)
def test_queue_ordering_parametrized(empty_queue, items):
    """Parametrized test for different ordering scenarios."""
    for priority, item in items:
        empty_queue.push(item, priority)

    sorted_items = sorted(items, key=lambda x: (x[0], items.index(x)))
    for priority, item in sorted_items:
        assert empty_queue.pop() == (priority, item)


class Copyable:
    def __init__(self, name="copyable"):
        self.name = name


class NotCopyable:
    def __init__(self, name="not_copyable"):
        self.name = name

    def __deepcopy__(self, memo):
        raise TypeError("This object cannot be deepcopied.")


class TestDeepcopyWithFallback:
    def test_deepcopy_with_fallback_copyable(self, caplog):
        original = {"class": Copyable()}
        with caplog.at_level(logging.INFO):
            copy = _deepcopy_with_exceptions(original)
            assert "Deepcopy failed for object of type" not in caplog.text
        assert copy["class"] is not original["class"]

    def test_deepcopy_with_fallback_not_copyable_error(self, caplog):
        original = {"class": NotCopyable()}
        with caplog.at_level(logging.INFO):
            copy = _deepcopy_with_exceptions(original)
            assert "Deepcopy failed for object of type 'NotCopyable'" in caplog.text
        assert copy["class"] is original["class"]

    def test_deepcopy_with_fallback_mixed_copyable_list(self, caplog):
        obj1 = Copyable()
        obj2 = NotCopyable()
        original = {"objects": [obj1, obj2]}
        with caplog.at_level(logging.INFO):
            copy = _deepcopy_with_exceptions(original)
            assert "Deepcopy failed for object of type 'NotCopyable'" in caplog.text
        assert copy["objects"][0] is not original["objects"][0]
        assert copy["objects"][1] is original["objects"][1]

    def test_deepcopy_with_fallback_mixed_copyable_tuple(self, caplog):
        obj1 = Copyable()
        obj2 = NotCopyable()
        original = {"objects": (obj1, obj2)}
        with caplog.at_level(logging.INFO):
            copy = _deepcopy_with_exceptions(original)
            assert "Deepcopy failed for object of type 'NotCopyable'" in caplog.text
        assert copy["objects"][0] is not original["objects"][0]
        assert copy["objects"][1] is original["objects"][1]

    def test_deepcopy_with_fallback_tool(self):
        tool = ComponentTool(
            name="problematic_tool", description="This is a problematic tool.", component=PromptBuilder("{{query}}")
        )
        original = {"tools": tool}
        copy = _deepcopy_with_exceptions(original)
        assert copy["tools"] is original["tools"]

    def test_deepcopy_with_fallback_component(self, monkeypatch):
        monkeypatch.setenv("OPENAI_API_KEY", "test")
        comp = OpenAIChatGenerator()
        original = {"component": comp}
        res = _deepcopy_with_exceptions(original)
        assert res["component"] is original["component"]


class TestArgsDeprecated:
    @pytest.fixture
    def sample_function(self):
        @args_deprecated
        def sample_func(param1: str = "default1", param2: int = 42):
            return f"{param1}-{param2}"

        return sample_func

    def test_warning_with_positional_args(self, sample_function):
        # using positional arguments only
        with warnings.catch_warnings(record=True) as w:
            result = sample_function("test", 123)
            assert result == "test-123"
            assert len(w) == 1
            assert issubclass(w[0].category, DeprecationWarning)
            assert (
                "Warning: In an upcoming release, this method will require keyword arguments for all parameters"
                in str(w[0].message)
            )

    def test_warning_with_mixed_args(self, sample_function):
        # mixing positional and keyword arguments
        with warnings.catch_warnings(record=True) as w:
            result = sample_function("test", 123)
            assert result == "test-123"
            assert len(w) == 1
            assert issubclass(w[0].category, DeprecationWarning)
            assert (
                "Warning: In an upcoming release, this method will require keyword arguments for all parameters"
                in str(w[0].message)
            )

    def test_no_warning_with_default_args(self, sample_function):
        # using default arguments
        with warnings.catch_warnings(record=True) as w:
            result = sample_function()
            assert result == "default1-42"
            assert len(w) == 0

    def test_no_warning_with_keyword_args(self, sample_function):
        # using keyword arguments
        with warnings.catch_warnings(record=True) as w:
            result = sample_function(param1="test", param2=123)
            assert result == "test-123"
            assert len(w) == 0