import os
import time
import random
import numpy as np
import torch
from PIL import Image
import folder_paths
from . import register_node

global_session_image = None

def tensor_to_temp_image(tensor_image, prefix="session_img"):
    temp_dir = folder_paths.get_temp_directory()
    filename = f"{prefix}_{random.randint(10000, 99999)}.png"
    filepath = os.path.join(temp_dir, filename)
    img_array = 255. * tensor_image[0].cpu().numpy()
    img = Image.fromarray(np.clip(img_array, 0, 255).astype(np.uint8))
    img.save(filepath)
    return {"filename": filename, "subfolder": "", "type": "temp"}

@register_node
class SessionImageReceiver:
    @classmethod
    def INPUT_TYPES(s):
        return {
            "required": {
                "initial_image": ("IMAGE",),
                "current_loop_index": ("INT", {"default": 0, "min": 0, "max": 10000}),
            },
        }

    RETURN_TYPES = ("IMAGE",)
    RETURN_NAMES = ("current_image",)
    OUTPUT_NODE = True
    FUNCTION = "get_image"
    CATEGORY = "🔁 Sequential Batcher/Image"

    @classmethod
    def IS_CHANGED(cls, **kwargs):
        return time.time()

    def get_image(self, initial_image, current_loop_index):
        from . import loop
        global global_session_image

        loop_idx = current_loop_index[0] if isinstance(current_loop_index, list) else current_loop_index
        is_first = (loop_idx == 0)

        # Usamos getattr para evitar errores si el bucle aún no ha inicializado las variables
        accumulated = getattr(loop, 'global_accumulated_frames', 0)
        source_total = getattr(loop, 'global_source_frame_count', 1)

        print(f"\n{'='*50}")
        print(f"📥 [DEBUG] NODO: Image Receiver")
        print(f"   -> Ciclo actual: {loop_idx} | Progreso global: {accumulated} / {source_total} frames")

        if is_first or global_session_image is None:
            global_session_image = initial_image.clone().cpu()
            print(f"   -> 🆕 Iniciando sesión con la imagen ORIGINAL.")
            selected = initial_image
        else:
            print(f"   -> ♻️ Usando el Keyframe validado y rescatado de la RAM.")
            selected = global_session_image

        print(f"   -> 🖼️ Tensor shape: {selected.shape}")
        print(f"{'='*50}\n")

        ui_image = tensor_to_temp_image(selected, "receiver")
        return {"ui": {"images": [ui_image]}, "result": (selected, )}

@register_node
class SessionImageSender:
    @classmethod
    def INPUT_TYPES(s):
        return {
            "required": {
                "generated_images": ("IMAGE",),
                "current_loop_index": ("INT", {"default": 0, "min": 0, "max": 10000}),
                "validate_face": ("BOOLEAN", {"default": True}),
            },
        }

    RETURN_TYPES = ("IMAGE",)
    RETURN_NAMES = ("VALIDATED_IMAGES",)
    OUTPUT_NODE = True
    FUNCTION = "set_image"
    CATEGORY = "🔁 Sequential Batcher/Image"

    @classmethod
    def IS_CHANGED(cls, **kwargs):
        return time.time()

    def set_image(self, generated_images, current_loop_index, validate_face):
        from . import loop
        import cv2
        import numpy as np
        import os, folder_paths, torch
        from PIL import Image

        if generated_images is None:
            raise ValueError("❌ ERROR CRÍTICO: No se recibieron imágenes en el Sender.")

        global global_session_image
        loop_idx = current_loop_index[0] if isinstance(current_loop_index, list) else current_loop_index
        batch_size = generated_images.shape[0]
        best_idx = batch_size - 1

        print(f"\n{'='*50}")
        print(f"📤 [DEBUG] NODO: Image Sender (Filtro Dinámico)")
        print(f"   -> Frames recibidos de la IA: {batch_size}")

        if validate_face:
            try:
                cascade_path = cv2.data.haarcascades + 'haarcascade_frontalface_default.xml'
                face_cascade = cv2.CascadeClassifier(cascade_path)

                print(f"   -> 🕵️ Buscando el último rostro frontal en reversa (Desde frame {batch_size - 1} hasta 0)...")

                found = False
                for i in range(batch_size - 1, -1, -1):
                    img_np = (generated_images[i].cpu().numpy() * 255.0).astype(np.uint8)
                    gray = cv2.cvtColor(img_np, cv2.COLOR_RGB2GRAY)
                    faces = face_cascade.detectMultiScale(gray, scaleFactor=1.1, minNeighbors=4, minSize=(30, 30))

                    if len(faces) > 0:
                        best_idx = i
                        found = True
                        print(f"   -> ✅ Rostro detectado en el frame [{i}].")
                        break

                if not found:
                    print(f"   -> ⚠️ ALERTA: No se detectó rostro frontal en NINGÚN frame. Salvando el ciclo usando el frame 0 por defecto.")
                    best_idx = 0
            except Exception as e:
                print(f"   -> ⚠️ Error en OpenCV al validar: {e}")

        # 1. TRUNCAR EL TENSOR
        valid_images = generated_images[:best_idx + 1]
        frames_accepted = best_idx + 1

        # 2. AVANZAR LA MÁQUINA
        stride = getattr(loop, 'global_select_every_nth', 1)
        advanced_original_frames = frames_accepted * stride

        if not hasattr(loop, 'global_accumulated_frames'):
            loop.global_accumulated_frames = 0

        loop.global_accumulated_frames += advanced_original_frames

        source_total = getattr(loop, 'global_source_frame_count', 1)
        print(f"   -> ✂️ Tensor truncado a {frames_accepted} frames válidos.")
        print(f"   -> 📈 Timeline avanzado a {loop.global_accumulated_frames} / {source_total}")

        last_frame = valid_images[-1:].clone().cpu()
        global_session_image = last_frame

        out_dir = folder_paths.get_output_directory()
        filename = f"keyframe_{loop_idx:03d}.png"
        filepath = os.path.join(out_dir, filename)

        img_array = 255. * last_frame[0].numpy()
        img = Image.fromarray(np.clip(img_array, 0, 255).astype(np.uint8))
        img.save(filepath)

        print(f"   -> 💾 Keyframe seguro guardado: {filename}")
        print(f"{'='*50}\n")

        ui_image = tensor_to_temp_image(last_frame, "sender")
        return {"ui": {"images": [ui_image]}, "result": (valid_images, )}