<?php
/**
 * Het antwoord op "ik zie niets gebeuren", in de adminbalk.
 *
 * Draait alleen voor een ingelogde gebruiker die mag uploaden, en alleen als de
 * adminbalk toch al getoond wordt. Een bezoeker merkt hier niets van en krijgt
 * geen byte extra.
 *
 * ── De tijdreis-truc ────────────────────────────────────────────────────────
 *
 * Sinds WordPress 5.4 rendert de adminbalk op de frontend BOVENAAN de pagina
 * (`wp_body_open`) — vóórdat er ook maar één afbeelding gerenderd is. Een
 * rapport over deze pagina kan daar per definitie nog niet in staan.
 *
 * Daarom rendert het menu SLEUVEN (`data-yf-slot`), en vult `finalize()` ze in
 * via de outputbuffer van de paginascan — de enige plek die als allerlaatste de
 * complete pagina in handen heeft, adminbalk incluis. De balk staat bovenaan,
 * de kennis komt onderaan, de buffer brengt ze bij elkaar.
 *
 * @package Yinga\Focus
 */

declare( strict_types = 1 );

namespace Yinga\Focus\Frontend;

use Yinga\Focus\Elementor\Integration;
use Yinga\Focus\Support\Naming;

defined( 'ABSPATH' ) || exit;

final class AdminBar {

	/** Zoveel afbeeldingen noemen we bij naam; daarna wordt het een muur tekst. */
	private const MAX_ITEMS = 15;

	private ApplyPolicy $policy;

	private ?Integration $elementor;

	private ?BackgroundFilters $scan;

	/**
	 * Het niveau van onze outputbuffer, of 0 als er geen open is. Zie
	 * maybe_buffer() en close_buffer(): wie een buffer opent, sluit hem ook.
	 */
	private int $buffer_level = 0;

	/**
	 * @param ApplyPolicy            $policy    De policy.
	 * @param Integration|null       $elementor De Elementor-integratie, als die er is.
	 * @param BackgroundFilters|null $scan      De paginascan, als die er is.
	 */
	public function __construct( ApplyPolicy $policy, ?Integration $elementor = null, ?BackgroundFilters $scan = null ) {
		$this->policy    = $policy;
		$this->elementor = $elementor;
		$this->scan      = $scan;
	}

	/**
	 * Haakt aan.
	 */
	public function register(): void {
		add_action( 'template_redirect', array( $this, 'maybe_activate' ), 0 );

		// Zonder de paginascan (Pro) is er niemand die de pagina aan het einde
		// van het request door het page_output-filter haalt — en dat filter is
		// wat de sleuven in de balk invult. Dan doen we het zelf, minimaal.
		if ( null === $this->scan ) {
			add_action( 'template_redirect', array( $this, 'maybe_buffer' ), 2 );
		}
		add_action( 'admin_bar_menu', array( $this, 'menu' ), 100 );

		// Het rapport als állerlaatste regel, ná de bewerkknop van EditorMode
		// (prioriteit 101): eerst de acties, dan de uitleg.
		add_action( 'admin_bar_menu', array( $this, 'rapport_node' ), 102 );

		// De vaste opmaak van het paneel gaat mee met de stylesheet van de
		// adminbalk zelf, via de enqueue-keten. De kleur van het stipje kan
		// daar niet bij — die is pas na het renderen bekend — en wordt door
		// finalize() als attribuut gezet, in dezelfde ronde als het rapport.
		add_action( 'wp_enqueue_scripts', array( $this, 'styles' ), 20 );

		// De invulronde: de paginascan geeft aan het einde van het request de
		// complete pagina door dit filter, en dan pas bestaan alle tellingen.
		add_filter( 'yinga_focus/page_output', array( $this, 'finalize' ) );
	}

	/**
	 * De minimale outputbuffer voor de invulronde, alleen als de paginascan
	 * er niet is om dat werk te doen.
	 *
	 * ── Waarom er een buffer nodig is ──────────────────────────────────────
	 *
	 * De adminbalk wordt bovenaan de pagina gerenderd, vóór de afbeeldingen.
	 * Wat er met die afbeeldingen gebeurt, weten we pas als de pagina klaar
	 * is. Daarom schrijft menu() sleuven en vult finalize() ze aan het einde
	 * in — en daarvoor moet de hele pagina even door onze handen.
	 *
	 * ── Waarom hij expliciet dicht gaat ────────────────────────────────────
	 *
	 * Een buffer die open blijft tot PHP hem bij het afsluiten opruimt, werkt
	 * meestal, maar in een gedeelde omgeving als WordPress is "meestal" niet
	 * goed genoeg: opent of sluit een ander onderdeel een buffer die niet met
	 * de onze spoort, dan raakt de stapel scheef. Dus onthouden we op welk
	 * niveau we openden en sluiten we precies die buffer zelf, op `shutdown`,
	 * vóór WordPress zijn eigen opruimronde (wp_ob_end_flush_all, prioriteit 1)
	 * draait.
	 *
	 * De nettere route — de template-outputbuffer die WordPress 6.9 biedt —
	 * kan hier nog niet: de plugin ondersteunt 6.5. Zodra het minimum omhoog
	 * gaat, hoort dit daarheen.
	 */
	public function maybe_buffer(): void {
		if ( ! $this->showing() || $this->buffer_level > 0 ) {
			return;
		}

		$started = ob_start(
			static function ( string $html ): string {
				try {
					return (string) apply_filters( 'yinga_focus/page_output', $html );
				} catch ( \Throwable $error ) {
					unset( $error );
					return $html;
				}
			}
		);

		if ( ! $started ) {
			return;
		}

		$this->buffer_level = ob_get_level();

		add_action( 'shutdown', array( $this, 'close_buffer' ), 0 );
	}

	/**
	 * Sluit de buffer die maybe_buffer() opende — en alleen die.
	 *
	 * Buffers sluiten van buiten naar binnen, dus eerst gaat alles weg wat
	 * ná ons is geopend en nog open staat; dat zou PHP bij het afsluiten toch
	 * doen, alleen nu gebeurt het op een voorspelbaar moment. Ligt onze
	 * buffer er niet meer (iemand anders heeft hem al gesloten), dan doen we
	 * niets: een buffer van een ander sluiten is precies de fout die we hier
	 * willen voorkomen.
	 */
	public function close_buffer(): void {
		if ( $this->buffer_level <= 0 ) {
			return;
		}

		while ( ob_get_level() >= $this->buffer_level ) {
			if ( ! ob_end_flush() ) {
				break;
			}
		}

		$this->buffer_level = 0;
	}

	/**
	 * Zet het journaal aan zodra er iemand meekijkt die er iets aan heeft.
	 *
	 * Dit gebeurt vóór het renderen, want daarna is het te laat: de beslissingen
	 * die we willen vastleggen worden tijdens het renderen genomen.
	 */
	public function maybe_activate(): void {
		if ( $this->showing() ) {
			$this->policy->journal()->activate();
		}
	}

	/**
	 * Mag deze bezoeker het rapport zien?
	 *
	 * @return bool
	 */
	private function showing(): bool {
		return ! is_admin()
			&& is_user_logged_in()
			&& current_user_can( 'upload_files' )
			&& is_admin_bar_showing();
	}

	/**
	 * Bouwt het menu.
	 *
	 * @param mixed $bar De WP_Admin_Bar.
	 */
	public function menu( $bar = null ): void {
		if ( ! is_object( $bar ) || ! method_exists( $bar, 'add_node' ) || ! $this->showing() ) {
			return;
		}

		// Sleuven, geen cijfers: de balk rendert bovenaan de pagina, vóór de
		// afbeeldingen. finalize() vult ze aan het einde van het request in.
		$bar->add_node(
			array(
				'id'    => 'yinga-focus',
				'title' => '<span class="yf-bar-dot" data-yf-slot="stip" aria-hidden="true"></span>'
					. '<span class="ab-label" data-yf-slot="titel">' . esc_html( Naming::product() ) . '</span>',
				'href'  => admin_url( 'options-media.php#yinga_focus' ),
				'meta'  => array( 'title' => Naming::product() ),
			)
		);

		// De vergelijkingsknop staat er altijd, en is puur request-afhankelijk —
		// die kan dus wél meteen. Twee tabbladen naast elkaar, één met en één
		// zonder: het enige echte bewijs.
		$this->compare_link( $bar );
	}

	/**
	 * Het rapport-item, als laatste regel in het submenu.
	 *
	 * @param mixed $bar De WP_Admin_Bar.
	 */
	public function rapport_node( $bar = null ): void {
		if ( ! is_object( $bar ) || ! method_exists( $bar, 'add_node' ) || ! $this->showing() ) {
			return;
		}

		$bar->add_node(
			array(
				'id'     => 'yinga-focus-rapport',
				'parent' => 'yinga-focus',
				'title'  => '<span data-yf-slot="rapport">' . esc_html__( 'Building report…', 'yinga-focus' ) . '</span>',
			)
		);
	}

	/**
	 * Vult de sleuven in de al gerenderde adminbalk met het echte rapport.
	 *
	 * Draait aan het einde van het request, in de outputbuffer van de
	 * paginascan, wanneer alle routes hun werk hebben gedaan en het journaal
	 * compleet is.
	 *
	 * @param mixed $html De complete pagina.
	 * @return mixed
	 */
	public function finalize( $html ) {
		if ( ! is_string( $html ) || ! $this->showing() ) {
			return $html;
		}

		if ( false === strpos( $html, 'data-yf-slot=' ) ) {
			return $html;
		}

		$totals = $this->policy->journal()->totals();

		// Eerst het stipje: een style-attribuut op de sleuf, geen <style>-blok.
		$html = (string) preg_replace(
			'/<span class="yf-bar-dot" data-yf-slot="stip"/',
			'<span class="yf-bar-dot" data-yf-slot="stip" style="background:' . esc_attr( $this->dot_colour( $totals ) ) . '"',
			$html,
			1
		);

		$html = (string) preg_replace(
			'/(<span class="ab-label" data-yf-slot="titel">).*?(<\/span>)/s',
			'$1' . self::voor_replace( esc_html( Naming::product() . ' — ' . $this->summary( $totals ) ) ) . '$2',
			$html,
			1
		);

		$report = implode( '<br>', array_map( 'esc_html', $this->report_lines() ) );

		return (string) preg_replace(
			'/(<span data-yf-slot="rapport">).*?(<\/span>)/s',
			'$1' . self::voor_replace( $report ) . '$2',
			$html,
			1
		);
	}

	/**
	 * Maakt tekst veilig om als vervanging aan preg_replace te geven.
	 *
	 * In het vervangargument zijn `$1` en `\1` terugverwijzingen, geen tekst.
	 * `esc_html()` doet daar niets aan, want voor HTML is een dollarteken
	 * onschuldig. Een afbeelding met de titel `$1` leverde daardoor een
	 * verminkt rapport op.
	 *
	 * @param string $tekst De al geëscapete tekst.
	 * @return string
	 */
	private static function voor_replace( string $tekst ): string {
		return str_replace( array( '\\', '$' ), array( '\\\\', '\\$' ), $tekst );
	}

	/**
	 * De samenvatting voor in de balk zelf.
	 *
	 * @param array{seen: int, applied: int, skipped: int} $totals De telling.
	 * @return string
	 */
	private function summary( array $totals ): string {
		return 0 === $totals['seen']
			? __( 'no image seen', 'yinga-focus' )
			: sprintf(
				/* translators: 1: number applied, 2: number seen */
				__( '%1$d of %2$d', 'yinga-focus' ),
				$totals['applied'],
				$totals['seen']
			);
	}

	/**
	 * Alle rapportregels, in leesvolgorde.
	 *
	 * @return string[]
	 */
	private function report_lines(): array {
		$journal = $this->policy->journal();
		$totals  = $journal->totals();
		$mode    = $this->policy->mode();
		$out     = array();

		if ( $this->policy->comparing() ) {
			$out[] = __( 'You are looking at the page as it is without this plugin.', 'yinga-focus' );
		}

		if ( 0 === $totals['seen'] ) {
			$out[] = __( 'Not a single image passed through this plugin’s filters.', 'yinga-focus' );
			$out[] = null !== $this->scan
				? __( 'That usually means: the theme writes the <img> by hand, or it is a CSS background. The page scanner (Settings → Media) catches both.', 'yinga-focus' )
				: __( 'That usually means: the theme writes the <img> by hand, or it is a CSS background. Neither passes through the WordPress image functions, so a page scanner is needed to reach them.', 'yinga-focus' );
		} else {
			foreach ( $this->lines( $journal ) as $line ) {
				$out[] = $line;
			}
		}

		$waiting = $journal->backgrounds_waiting();

		if ( $waiting > 0 ) {
			$out[] = sprintf(
				/* translators: %d: number of images found */
				_n(
					'%d image is waiting for the page scanner. Switch it on under Settings → Media.',
					'%d images are waiting for the page scanner. Switch it on under Settings → Media.',
					$waiting,
					'yinga-focus'
				),
				$waiting
			);
		}

		foreach ( $this->census_lines() as $line ) {
			$out[] = $line;
		}

		foreach ( $this->elementor_lines() as $line ) {
			$out[] = $line;
		}

		if ( ApplyPolicy::MODE_AUTO !== $mode && ! $this->policy->comparing() ) {
			$out[] = sprintf(
				/* translators: %s: the selected mode */
				__( 'Mode: %s', 'yinga-focus' ),
				ApplyPolicy::MODE_OFF === $mode
					? __( 'off', 'yinga-focus' )
					: __( 'make available only', 'yinga-focus' )
			);
		}

		return $out;
	}

	/**
	 * Wat de paginascan heeft geteld: alle afbeeldingen op de pagina, hoeveel
	 * daarvan naar de mediabibliotheek te herleiden zijn, en welke paginabouwer
	 * er herkend is. Dit is het antwoord op "waarom ziet de plugin niets".
	 *
	 * @return string[]
	 */
	private function census_lines(): array {
		if ( null === $this->scan ) {
			return array();
		}

		$census = $this->scan->census();

		if ( 0 === $census['images'] && 0 === $census['backgrounds'] && array() === $census['builders'] ) {
			return array();
		}

		$parts = array(
			sprintf(
				/* translators: 1: total number of images, 2: number traced back to the media library */
				__( '%1$d images on the page, %2$d traced back to the media library', 'yinga-focus' ),
				$census['images'],
				$census['linked']
			),
		);

		if ( $census['backgrounds'] > 0 ) {
			$parts[] = sprintf(
				/* translators: %d: number of inline CSS backgrounds */
				__( '%d CSS background(s)', 'yinga-focus' ),
				$census['backgrounds']
			);
		}

		if ( array() !== $census['builders'] ) {
			$parts[] = sprintf(
				/* translators: %s: recognised page builders */
				__( 'builder recognised: %s', 'yinga-focus' ),
				implode( ', ', array_keys( $census['builders'] ) )
			);
		}

		return array( __( 'Page scanner: ', 'yinga-focus' ) . implode( ' · ', $parts ) );
	}

	/**
	 * De heen-en-weerknop tussen "met focus" en "zonder focus".
	 *
	 * Het bewijs waar iedereen om vraagt en dat geen enkel rapport kan leveren:
	 * dezelfde pagina, één keer met en één keer zonder, en je ziet het beeld
	 * verschuiven. Alleen voor wie mag uploaden; een bezoeker kan hier niets mee.
	 *
	 * @param object $bar De WP_Admin_Bar.
	 */
	private function compare_link( $bar ): void {
		$comparing = $this->policy->comparing();
		$current   = $this->current_url();

		$url = $comparing
			? remove_query_arg( ApplyPolicy::COMPARE_ARG, $current )
			: add_query_arg( ApplyPolicy::COMPARE_ARG, '1', $current );

		$bar->add_node(
			array(
				'id'     => 'yinga-focus-vergelijk',
				'parent' => 'yinga-focus',
				'title'  => $comparing
					? esc_html__( '← Back to with focal points', 'yinga-focus' )
					: esc_html__( 'View this page without focal points →', 'yinga-focus' ),
				'href'   => esc_url( $url ),
			)
		);

	}

	/**
	 * Wat Elementor deze pagina heeft laten zien.
	 *
	 * Blijft dit op "actief, 0 elementen" staan, dan vuurt de renderhook niet en
	 * weet je dat meteen in plaats van na een middag zoeken.
	 *
	 * @return string[]
	 */
	private function elementor_lines(): array {
		if ( null === $this->elementor ) {
			return array();
		}

		$stats = $this->elementor->stats();

		// Ook "niet actief" wordt gemeld. Een regel die alleen verschijnt als
		// alles klopt, is geen diagnose — juist de afwezigheid van Elementor is
		// vaak het antwoord op "waarom gebeurt er niets met mijn hero".
		if ( ! $stats['available'] ) {
			return array( __( 'Elementor: not active on this site.', 'yinga-focus' ) );
		}

		if ( false === $stats['has_data'] ) {
			// Elementor draait, maar déze pagina is er niet mee gebouwd — of de
			// hero staat in een Theme Builder-template in plaats van op de
			// pagina zelf. Dat verschil is precies wat je wilt weten.
			return array( __( 'Elementor: active, but this page has no Elementor data. Is the hero in a template?', 'yinga-focus' ) );
		}

		return array(
			sprintf(
				/* translators: 1: number of elements searched, 2: number with a background image */
				__( 'Elementor: active · %1$d elements searched · %2$d with a background image', 'yinga-focus' ),
				max( $stats['nodes'], $stats['rendered'] ),
				$stats['backgrounds']
			),
		);
	}

	/**
	 * De huidige URL, zonder erop te vertrouwen dat iemand hem netjes doorgeeft.
	 *
	 * @return string
	 */
	private function current_url(): string {
		$path = isset( $_SERVER['REQUEST_URI'] ) ? esc_url_raw( wp_unslash( $_SERVER['REQUEST_URI'] ) ) : '/';

		return home_url( $path );
	}

	/**
	 * Eén regel per afbeelding.
	 *
	 * @param Journal $journal Het journaal.
	 * @return string[]
	 */
	private function lines( Journal $journal ): array {
		$lines     = array();
		$count     = 0;
		$comparing = $this->policy->comparing();

		foreach ( $journal->entries() as $id => $verdicts ) {
			if ( $count >= self::MAX_ITEMS ) {
				$lines[] = sprintf(
					/* translators: %d: number of images not shown */
					__( '… and %d more.', 'yinga-focus' ),
					count( $journal->entries() ) - self::MAX_ITEMS
				);
				break;
			}

			++$count;

			$labels = array();

			foreach ( array_keys( $verdicts ) as $verdict ) {
				// In de vergelijkweergave is "instelling staat uit" misleidend:
				// de instelling staat gewoon aan, wíj hebben hem voor deze ene
				// weergave uitgezet.
				$labels[] = $comparing && Journal::OFF === (string) $verdict
					? __( 'switched off for this comparison', 'yinga-focus' )
					: Journal::label( (string) $verdict );
			}

			$detail = $journal->detail( (int) $id );
			$line   = sprintf( '#%d %s — %s', $id, $this->name( (int) $id ), implode( ', ', $labels ) );

			// De gezette waarde erbij. "Toegepast" is een bewering; "toegepast
			// (62% 28%)" kun je in de inspector terugvinden.
			$lines[] = '' === $detail ? $line : $line . ' (' . $detail . ')';
		}

		return $lines;
	}

	/**
	 * Een herkenbare naam voor een attachment.
	 *
	 * @param int $attachment_id Attachment-ID.
	 * @return string
	 */
	private function name( int $attachment_id ): string {
		$file = get_attached_file( $attachment_id );

		if ( is_string( $file ) && '' !== $file ) {
			return wp_basename( $file );
		}

		return (string) get_the_title( $attachment_id );
	}

	/**
	 * Voegt een regel toe onder het hoofditem.
	 *
	 * @param object $bar  De WP_Admin_Bar.
	 * @param string $id   Uniek achtervoegsel.
	 * @param string $text De regel.
	 */
	private function note( $bar, string $id, string $text ): void {
		$bar->add_node(
			array(
				'id'     => 'yinga-focus-' . $id,
				'parent' => 'yinga-focus',
				'title'  => esc_html( $text ),
			)
		);
	}

	/**
	 * Een stipje in de balk. Groen als er iets is toegepast, rood als er niets
	 * gezien is, oranje als er wel afbeeldingen langskwamen maar geen enkele
	 * behandeld is.
	 *
	 * Krap tweehonderd bytes, en alleen voor wie de adminbalk toch al ziet.
	 */
	public function styles(): void {
		if ( ! $this->showing() ) {
			return;
		}

		// Naast het stipje: het submenu. WordPress geeft elk submenu-item een
		// vaste hoogte van één regel; ons rapport is een alinea. Zonder deze
		// regels loopt de tekst over de rand van het donkere paneel heen en
		// over het volgende item — vandaar height:auto, wrappen en een
		// vaste breedte voor het paneel.
		//
		// Het stipje begint grijs. Zijn echte kleur — rood, geel of groen —
		// hangt af van wat er tijdens het renderen met de afbeeldingen gebeurt,
		// en die kennis is er nu nog niet. finalize() zet hem als attribuut.
		$css = '.yf-bar-dot{display:inline-block;width:8px;height:8px;margin-right:6px;border-radius:50%;vertical-align:baseline;background:#8c8f94}'
			. '#wpadminbar #wp-admin-bar-yinga-focus .ab-sub-wrapper{min-width:480px;max-width:640px}'
			. '#wpadminbar #wp-admin-bar-yinga-focus-default{padding:6px 0}'
			. '#wpadminbar #wp-admin-bar-yinga-focus-default li{height:auto;float:none}'
			. '#wpadminbar #wp-admin-bar-yinga-focus-default .ab-item{height:auto;line-height:1.9;white-space:normal}'
			. '#wpadminbar #wp-admin-bar-yinga-focus-rapport .ab-item{color:#c3c4c7;margin-top:6px;padding-top:8px;padding-bottom:6px;border-top:1px solid rgba(255,255,255,.14)}';

		// 'admin-bar' is de stylesheet die WordPress zelf inlaadt zodra de
		// balk zichtbaar is; daar haken we op aan in plaats van een eigen
		// bestand te registreren voor zes regels.
		wp_add_inline_style( 'admin-bar', $css );
	}

	/**
	 * De kleur van het stipje: rood als er niets langs ons kwam, geel als er
	 * wel iets langskwam maar niets is toegepast, groen als het werkt.
	 *
	 * @param array{seen: int, applied: int, skipped: int} $totals De telling.
	 * @return string
	 */
	private function dot_colour( array $totals ): string {
		if ( 0 === $totals['seen'] ) {
			return '#d63638';
		}

		if ( 0 === $totals['applied'] ) {
			return '#dba617';
		}

		return '#00a32a';
	}
}