# services/pattern_service.py
#
# Copyright 2025 revisto
#
# 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/>.
#
# SPDX-License-Identifier: GPL-3.0-or-later

import mido
import itertools
import logging
from typing import Dict, Tuple
from ..config.constants import DEFAULT_BPM


class PatternService:
    def __init__(self, window) -> None:
        self.window = window

    def _get_midi_note_for_part(self, part_id: str) -> int:
        """Get MIDI note ID for a drum part"""
        drum_part = self.window.sound_service.drum_part_manager.get_part_by_id(part_id)
        if drum_part and drum_part.midi_note_id is not None:
            return drum_part.midi_note_id
        return 0

    def _get_part_id_for_midi_note(self, note: int) -> str:
        """Get drum part ID for a MIDI note, creating a temporary part if needed"""
        manager = self.window.sound_service.drum_part_manager
        drum_part = manager.get_or_create_part_for_midi_note(note)
        return drum_part.id

    def save_pattern(
        self, file_path: str, drum_parts: Dict[str, Dict[int, bool]], bpm: float
    ) -> None:
        try:
            mid = mido.MidiFile()
            track = mido.MidiTrack()
            mid.tracks.append(track)

            track.append(mido.MetaMessage("set_tempo", tempo=mido.bpm2tempo(bpm)))

            # 1. Collect all active notes from all pages into a list
            events = []
            for part, notes in drum_parts.items():
                for beat_index, is_active in notes.items():
                    if is_active:
                        note = self._get_midi_note_for_part(part)
                        if note != 0:
                            # Store the note and its absolute beat index
                            events.append({"note": note, "beat": beat_index})

            # 2. Sort events by beat to process them in chronological order
            events.sort(key=lambda e: e["beat"])

            ticks_per_beat = mid.ticks_per_beat
            last_time_in_ticks = 0
            note_duration_ticks = ticks_per_beat // 4  # 16th note duration

            # 3. Group events by beat to handle chords correctly
            for beat, group in itertools.groupby(events, key=lambda e: e["beat"]):
                notes_in_chord = [event["note"] for event in group]

                # Calculate time for this beat/chord
                absolute_time_in_ticks = int(beat * ticks_per_beat / 4)
                delta_time = absolute_time_in_ticks - last_time_in_ticks

                # Add all note_on messages for the chord
                # The first note carries the delta_time, subsequent notes have time=0
                is_first_note = True
                for note in notes_in_chord:
                    d_time = delta_time if is_first_note else 0
                    track.append(
                        mido.Message("note_on", note=note, velocity=100, time=d_time)
                    )
                    is_first_note = False

                # Add all note_off messages for the chord
                # The first note_off has the duration, subsequent ones have time=0
                is_first_note = True
                for note in notes_in_chord:
                    d_time = note_duration_ticks if is_first_note else 0
                    track.append(
                        mido.Message("note_off", note=note, velocity=0, time=d_time)
                    )
                    is_first_note = False

                # Update the time of the last event
                last_time_in_ticks = absolute_time_in_ticks + note_duration_ticks

            mid.save(file_path)
            logging.info(f"Pattern saved successfully to {file_path}")
        except Exception as e:
            logging.error(f"Failed to save pattern to {file_path}: {e}")
            raise

    def load_pattern(self, file_path: str) -> Tuple[Dict[str, Dict[int, bool]], float]:
        try:
            mid = mido.MidiFile(file_path)
            drum_parts_state = (
                self.window.drum_machine_service.create_empty_drum_parts_state()
            )
            bpm = DEFAULT_BPM

            ticks_per_beat = mid.ticks_per_beat
            if ticks_per_beat is None:
                ticks_per_beat = 480  # A common default

            for track in mid.tracks:
                absolute_time_in_ticks = 0
                for msg in track:
                    # Keep a running total of the absolute time
                    # by adding the delta times
                    absolute_time_in_ticks += msg.time
                    if msg.type == "set_tempo":
                        bpm = mido.tempo2bpm(msg.tempo)
                    elif msg.type == "note_on" and msg.velocity > 0:
                        part_id = self._get_part_id_for_midi_note(msg.note)

                        # Initialize part in state if not already present
                        if part_id not in drum_parts_state:
                            drum_parts_state[part_id] = {}

                        # Convert absolute time in ticks back to a beat index
                        # assuming 16th notes
                        ticks_per_16th_note = ticks_per_beat / 4.0
                        beat_index = int(
                            round(absolute_time_in_ticks / ticks_per_16th_note)
                        )
                        drum_parts_state[part_id][beat_index] = True

            logging.info(f"Pattern loaded successfully from {file_path}")
            return drum_parts_state, bpm
        except Exception as e:
            logging.error(f"Failed to load pattern from {file_path}: {e}")
            raise