# encoding: utf-8
"""
Internal utility functions. They're intended to be used only by the methods within nodes,
so they might expect the input arguments to already be pre-validated.
"""

import typing as _t

from math import sqrt as _sqrt

from .enums import *
from .return_tuples import *


_t_number = _t.Union[int, float]


try:
	from server import PromptServer as _PromptServer

	def _show_text_on_node(text: str = None, node_id: str = None):
		if not text:
			# TODO: Planned for the future - currently, there's no point removing the text since it's box is shown anyway
			# An odd workaround since `send_progress_text()` doesn't want to update text when '' passed
			text = '<span></span>'
		# print(f"{unique_id} text: {text!r}")

		# Snatched from: https://github.com/comfyanonymous/ComfyUI/blob/27870ec3c30e56be9707d89a120eb7f0e2836be1/comfy_extras/nodes_images.py#L581-L582
		_PromptServer.instance.send_progress_text(text, node_id)
except ImportError:
	def _show_text_on_node(text: str = None, node_id: str = None):
		pass


def aspect_ratios_sorted(aspect_a: float, aspect_b: float, min_clamp: float = 1.0):
	"""Return aspect ratio in a standard form: 2 floats, both 1+, in descending order (16:9, not 9:16)."""
	aspect_a = float(max(abs(aspect_a), min_clamp))
	aspect_b = float(max(abs(aspect_b), min_clamp))
	return (aspect_b, aspect_a) if aspect_b > aspect_a else (aspect_a, aspect_b)


def number_to_int(value: _t_number, min: int = 1) -> int:
	if not isinstance(value, int):
		if isinstance(value, float):
			sign = -1 if value < 0.0 else 1
			value = int(value * sign + 0.5) * sign
		else:
			value = int(value)
	return max(value, min)


def round_pos_int(value: float) -> int:
	"""Assuming a positive float is provided, rounds it to the nearest integer."""
	return int(value + 0.5)


def round_abs_to_step(abs_value: _t_number, step: int):
	"""
	Assuming both args are positive and ``step`` is already an int, detect the closest positive (non-zero) value
	which is also divisible by step.
	"""
	n_steps = round_pos_int(float(abs_value) / step)
	n_steps = max(n_steps, 1)
	return step * n_steps, n_steps


def round_width_and_height_closest_to_the_ratio(width_f: _t_number, height_f: _t_number, step: int):
	"""3-pass detection of the best rounded resolution. Best = closest to the desired ratio."""
	desired_width_to_height_ratio = float(width_f) / height_f

	# First pass: directly from width_f and height_f
	width, n_steps_x = round_abs_to_step(width_f, step)
	height, n_steps_y = round_abs_to_step(height_f, step)

	# Second pass: try calculating one side from already rounded another one:
	height_from_width, n_steps_y_from_x = round_abs_to_step(float(width) / desired_width_to_height_ratio, step)
	width_from_height, n_steps_x_from_y = round_abs_to_step(float(height) * desired_width_to_height_ratio, step)

	# ... and select one of three options, closest to the perfect ratio:
	closest_delta = abs((float(width) / height) - desired_width_to_height_ratio)
	for w, n_x, h, n_y in [
		(width, n_steps_x, height_from_width, n_steps_y_from_x),
		(width_from_height, n_steps_x_from_y, height, n_steps_y),
	]:
		cur_delta = abs((float(w) / h) - desired_width_to_height_ratio)
		if cur_delta < closest_delta:
			closest_delta = cur_delta
			width, n_steps_x = w, n_x
			height, n_steps_y = h, n_y

	return width, n_steps_x, height, n_steps_y


def float_width_height_from_area(square_size: _t_number, landscape: bool, aspect_a: float, aspect_b: float):
	"""The main function for the regular (non-upscale) ``area``-subtype node."""
	# square_size = 1024; step = 48; landscape = True; aspect_a = 9.0; aspect_b = 16.0
	aspect_big, aspect_small = aspect_ratios_sorted(aspect_a, aspect_b)
	aspect_x, aspect_y = (aspect_big, aspect_small) if landscape else (aspect_small, aspect_big)

	aspect_area = aspect_x * aspect_y
	aspect_norm_scale = 1.0 / _sqrt(aspect_area)
	aspect_x *= aspect_norm_scale
	aspect_y *= aspect_norm_scale
	# Now the two aspects produce a normalized rectangle - i.e., it's area is 1

	width_f: float = aspect_x * square_size
	height_f: float = aspect_y * square_size
	return width_f, height_f


def _format_report_square_part(
	width_f: float, height_f: _t_number,
	width: int, height: int,
	target_square_size: _t_number = None
) -> str:
	area_output = width * height
	if target_square_size is not None:
		target_square_size = max(abs(target_square_size), 1)
		target_square_size_i = round_pos_int(target_square_size)
		if target_square_size_i * target_square_size_i == area_output:
			return f"=👑{target_square_size_i}🔳"
			# return f"=💯{target_square_size_i}🔳"
			# return f"=✨{target_square_size_i}🔳"
		if round_pos_int(target_square_size * target_square_size) == area_output:
			return f"=✨{target_square_size:.2f}🔳"
			# return f"=🌟{target_square_size:.2f}🔳"

	desired_square_area_f = float(width_f) * height_f
	desired_square_side_f = _sqrt(desired_square_area_f)
	desired_square_side_i = round_pos_int(desired_square_side_f)
	if desired_square_side_i * desired_square_side_i == area_output:
		return f"=✅{desired_square_side_i}🔳"

	actual_square_side_f = _sqrt(float(area_output))
	actual_square_side_i = round_pos_int(actual_square_side_f)
	if abs(actual_square_side_f - actual_square_side_i) < 0.005:
		return f"~={actual_square_side_i}🔳"
	return f"~={actual_square_side_f:.2f}🔳"


def format_report_simple(
	width_f: float, height_f: _t_number, step: int,
	width: int, n_steps_x: int, height: int, n_steps_y: int,
	target_square_size: _t_number = None, prefix: str = '', suffix: str = '',
) -> str:
	square_side_text = _format_report_square_part(width_f, height_f, width, height, target_square_size)

	ar_desired = width_f / height_f
	ar_real = float(width) / height
	ar_text = (
		f"AR: ✅ {ar_real:.3f}"
		if abs(ar_desired - ar_real) < 0.0005
		else f"AR real/goal: {ar_real:.3f}/{ar_desired:.3f}"
	)

	return (
		f"{prefix}"
		f"{width}/{height}{square_side_text}\n"
		f"{n_steps_x} * {step} / {n_steps_y} * {step}\n"
		f"{ar_text}"
		f"{suffix}"
	)


def simple_result_from_approx_wh(
	width_f: float, height_f: _t_number, step: int,
	show: bool = True,
	unique_id: str = None, target_square_size: _t_number = None, status_prefix: str = '', status_suffix: str = ''
) -> ResultSimple:
	"""Final part of the main func for simple (non-upscale) nodes - when desired width/height are already calculated."""
	step = number_to_int(step)
	width, n_steps_x, height, n_steps_y = round_width_and_height_closest_to_the_ratio(width_f, height_f, step)

	result = ResultSimple(width, height)

	if not unique_id:
		return result

	text = None
	if show:
		text = format_report_simple(
			width_f, height_f, step,
			width, n_steps_x, height, n_steps_y,
			target_square_size, status_prefix, status_suffix
		)
	_show_text_on_node(text, unique_id)
	return result


def _need_post_resize(width: int, height: int, hd_width: int, hd_height: int):
	"""
	Detect whether the final init-res CAN NOT be uniformly scaled to the higher res,
	and thus would require cropping/out-painting.
	"""
	real_upscale_x: float = float(hd_width) / width
	real_upscale_y: float = float(hd_height) / height
	real_upscale_avg: float = (real_upscale_x + real_upscale_y) * 0.5

	needs_resize: bool = (
		round_pos_int(real_upscale_avg * width) != hd_width or
		round_pos_int(real_upscale_avg * height) != hd_height
	)
	return needs_resize, real_upscale_avg, real_upscale_x, real_upscale_y


def upscale_result_from_approx_wh(
	width_f: float, height_f: _t_number, step: int,
	priority: _t.Union[RoundingPriority, str], upscale: float, hd_step:int,
	show: bool = True,
	unique_id: str = None, target_square_size: _t_number = None
) -> ResultUpscaled:
	"""Primary part of the main func for nodes with upscaling - when desired initial-width/height are already calculated."""
	upscale = max(float(upscale), 1.0)
	hd_width_f: float = upscale * width_f
	hd_height_f: float = upscale * height_f
	width_f = float(width_f)

	step = number_to_int(step)
	hd_step = number_to_int(hd_step)

	if priority == RoundingPriority.DESIRED:
		width, n_steps_x, height, n_steps_y = round_width_and_height_closest_to_the_ratio(width_f, height_f, step)
		hd_width, hd_steps_x, hd_height, hd_steps_y = round_width_and_height_closest_to_the_ratio(
			hd_width_f, hd_height_f, hd_step
		)
	elif priority == RoundingPriority.ORIGINAL:
		width, n_steps_x, height, n_steps_y = round_width_and_height_closest_to_the_ratio(width_f, height_f, step)
		hd_width, hd_steps_x, hd_height, hd_steps_y = round_width_and_height_closest_to_the_ratio(
			upscale * width, upscale * height, hd_step
		)
	else:
		hd_width, hd_steps_x, hd_height, hd_steps_y = round_width_and_height_closest_to_the_ratio(
			hd_width_f, hd_height_f, hd_step
		)
		width, n_steps_x, height, n_steps_y = round_width_and_height_closest_to_the_ratio(
			float(hd_width) / upscale, float(hd_height) / upscale, step
		)

	needs_resize, real_upscale_avg, real_upscale_x, real_upscale_y = _need_post_resize(width, height, hd_width, hd_height)

	result = ResultUpscaled(upscale if needs_resize else real_upscale_avg, width, height, hd_width, hd_height)

	if not unique_id:
		return result

	if not show:
		_show_text_on_node(None, unique_id)
		return result

	report_parts: _t.List[str] = list()
	for prefix, w_f, h_f, s, w, n_x, h, n_y, trg_sq in [
		('◻️ ', width_f, height_f, step, width, n_steps_x, height, n_steps_y, target_square_size),
		('🔲 ', hd_width_f, hd_height_f, hd_step, hd_width, hd_steps_x, hd_height, hd_steps_y, _sqrt(hd_width_f * hd_height_f))
	]:
		cur_report = format_report_simple(w_f, h_f, s, w, n_x, h, n_y, trg_sq)
		report_parts.append('\n'.join(
			f"{prefix}{x}" for x in cur_report.split('\n')
		))

	separator_line: str = (
		# Real upscale factor in X and Y differ enough so we can't get the up-res from init-res with ANY uniform value:
		f"\n--- ⚠️ x{real_upscale_x:.3f} / x{real_upscale_y:.3f} ---\n"
		if needs_resize
		# The upscale is uniform:
		else f"\n--- x{real_upscale_avg:.3f}✅ ---\n"
	)
	text = separator_line.join(report_parts)

	_show_text_on_node(text, unique_id)
	return result