<?php

/**
 * Autoload-Analyse: wie viel WordPress bei jedem Seitenaufruf aus wp_options
 * in den Speicher laedt und welche Optionen den groessten Anteil haben.
 * Nur lesend. Zwei Abfragen, egal wie viele Optionen es gibt.
 */
if ( ! defined( 'ABSPATH' ) ) {
	exit;
}

class Wp360_Database_Cleaner_Autoload_Scanner {

	/** So viele der groessten Optionen zeigt die Analyse. */
	const TOP = 50;

	/**
	 * Warnschwelle in Byte: dieselbe wie in der WordPress-Website-Zustandspruefung
	 * (Standard 800.000), samt dem Filter, mit dem man sie dort anpasst.
	 *
	 * @return int
	 */
	public static function threshold() {

		return (int) apply_filters( 'site_status_autoloaded_options_size_limit', 800000 ); // phpcs:ignore WordPress.NamingConventions.PrefixAllGlobals.NonPrefixedHooknameFound -- WordPress-Core-Filter.
	}

	/**
	 * Anzahl und Gesamtgroesse der Optionen, die bei jedem Aufruf geladen werden.
	 *
	 * @return array{count: int, bytes: int}
	 */
	public static function total() {
		global $wpdb;

		$values       = wp_autoload_values_to_autoload();
		$placeholders = implode( ',', array_fill( 0, count( $values ), '%s' ) );

		// phpcs:ignore WordPress.DB.DirectDatabaseQuery.DirectQuery, WordPress.DB.DirectDatabaseQuery.NoCaching, WordPress.DB.PreparedSQL.InterpolatedNotPrepared, WordPress.DB.PreparedSQLPlaceholders.UnfinishedPrepare -- Zaehlen, den Spaltenfilter liefert WordPress selbst; ein Cache wuerde die Analyse verfaelschen.
		$row = $wpdb->get_row( $wpdb->prepare( "SELECT COUNT(*) AS item_count, COALESCE( SUM( LENGTH( option_value ) ), 0 ) AS bytes FROM {$wpdb->options} WHERE autoload IN ( $placeholders )", $values ) );

		return array(
			'count' => $row ? (int) $row->item_count : 0,
			'bytes' => $row ? (int) $row->bytes : 0,
		);
	}

	/**
	 * Gesamtbild plus die groessten Optionen.
	 *
	 * @return array{count: int, bytes: int, threshold: int, over: bool, items: array<int, array<string, mixed>>}
	 */
	public static function analyze() {
		global $wpdb;

		$total        = self::total();
		$values       = wp_autoload_values_to_autoload();
		$placeholders = implode( ',', array_fill( 0, count( $values ), '%s' ) );
		$args         = array_merge( $values, array( self::TOP ) );

		// phpcs:ignore WordPress.DB.DirectDatabaseQuery.DirectQuery, WordPress.DB.DirectDatabaseQuery.NoCaching, WordPress.DB.PreparedSQL.InterpolatedNotPrepared, WordPress.DB.PreparedSQLPlaceholders.UnfinishedPrepare -- Auflisten der groessten Optionen; ein Cache wuerde die Analyse verfaelschen.
		$rows = $wpdb->get_results( $wpdb->prepare( "SELECT option_name, autoload, LENGTH( option_value ) AS size FROM {$wpdb->options} WHERE autoload IN ( $placeholders ) ORDER BY size DESC, option_name ASC LIMIT %d", $args ) );

		$plugins = self::installed_plugins();
		$slugs   = array_keys( $plugins );
		$items   = array();

		foreach ( (array) $rows as $row ) {
			$size  = (int) $row->size;
			$owner = Wp360_Database_Cleaner_Autoload_Classifier::guess_owner( $row->option_name, $slugs );

			$items[] = array(
				'name'        => $row->option_name,
				'size'        => $size,
				'raw'         => $row->autoload,
				'loads'       => Wp360_Database_Cleaner_Autoload_Classifier::loads( $row->autoload ),
				'lock_reason' => Wp360_Database_Cleaner_Autoload_Guard::lock_reason( $row->option_name ),
				'risk'        => Wp360_Database_Cleaner_Autoload_Classifier::risk_level( $size ),
				'owner'       => null === $owner ? null : $plugins[ $owner ],
			);
		}

		$threshold = self::threshold();

		return array(
			'count'     => $total['count'],
			'bytes'     => $total['bytes'],
			'threshold' => $threshold,
			'over'      => $total['bytes'] >= $threshold,
			'items'     => $items,
		);
	}

	/**
	 * Installierte Plugins als Slug => Anzeigename. Slug ist der Ordnername, bei
	 * Einzeldateien der Dateiname ohne ".php".
	 *
	 * @return array<string, string>
	 */
	private static function installed_plugins() {
		if ( ! function_exists( 'get_plugins' ) ) {
			require_once ABSPATH . 'wp-admin/includes/plugin.php';
		}

		$out = array();
		foreach ( get_plugins() as $file => $data ) {
			$dir          = dirname( $file );
			$slug         = '.' === $dir ? basename( $file, '.php' ) : $dir;
			$out[ $slug ] = '' !== $data['Name'] ? $data['Name'] : $slug;
		}

		return $out;
	}
}