<?php
/**
 * For the full copyright and license information, please view the
 * docs/licenses/LICENSE.txt file that was distributed with this source code.
 */

namespace PrestaShopBundle\Command;

use Employee;
use PrestaShop\PrestaShop\Adapter\LegacyContext;
use PrestaShop\PrestaShop\Core\Hook\HookDescription;
use PrestaShop\PrestaShop\Core\Version;
use RuntimeException;
use SimpleXMLElement;
use Symfony\Component\Console\Command\Command;
use Symfony\Component\Console\Input\InputArgument;
use Symfony\Component\Console\Input\InputInterface;
use Symfony\Component\Console\Output\OutputInterface;
use Symfony\Component\Console\Style\SymfonyStyle;
use Symfony\Component\Filesystem\Exception\FileNotFoundException;
use Symfony\Component\Filesystem\Filesystem;
use Symfony\Component\HttpFoundation\Response;
use Symfony\Contracts\HttpClient\HttpClientInterface;

/**
 * Appends sql upgrade file with the sql which can be used to create new hooks.
 *
 * The command compares the current hook.xml fixture file with the previous one (you need to specify
 * the previous version to define the base to compare to).
 *
 * Thanks to the comparison we get new and obsolete hooks, then two SQL queries are generated and
 * appended in the autoupgrade file (you must specify its local path), the upgrade file matching the
 * current version will be appended with these two SQL queries.
 *
 * No check of previous request in the file is done you must check manually that there are no duplicates.
 */
class AppendHooksListForSqlUpgradeFileCommand extends Command
{
    public function __construct(
        private string $env,
        private LegacyContext $legacyContext,
        private HttpClientInterface $httpClient,
        private string $projectDir,
    ) {
        parent::__construct();
    }

    /**
     * {@inheritdoc}
     */
    protected function configure()
    {
        $this
            ->setName('prestashop:update:sql-upgrade-file-hooks-listing')
            ->setDescription(
                'Adds sql to sql upgrade file which contains hook insert operation'
            )
            ->addArgument(
                'previous-ps-version',
                InputArgument::REQUIRED,
                'The previous prestashop version based on which we know the previous existing hooks'
            )
            ->addArgument(
                'autoupgrade-path',
                InputArgument::REQUIRED,
                'The path to the autoupgrade module path which contains the upgrade scripts'
            )
        ;
    }

    protected function execute(InputInterface $input, OutputInterface $output): int
    {
        $this->initContext();

        $io = new SymfonyStyle($input, $output);

        if (!in_array($this->env, ['dev', 'test'])) {
            $io->warning('Dev or test environment is required to fully list all the hooks');

            return 1;
        }

        $currentHooks = $this->getCurrentHooks();
        $previousHooks = $this->getPreviousHooks($input->getArgument('previous-ps-version'));

        $newHooks = array_diff($currentHooks, $previousHooks);
        $removedHooks = array_diff($previousHooks, $currentHooks);

        if (empty($newHooks) && empty($removedHooks)) {
            $io->note('No hooks modification found.');

            return 0;
        }

        // Get SQL upgrade file from module for the current version
        try {
            $sqlUpgradeFile = $this->getSqlUpgradeFileByPrestaShopVersion(
                Version::VERSION,
                $input->getArgument('autoupgrade-path')
            );
        } catch (FileNotFoundException $exception) {
            $io->error($exception->getMessage());

            return 1;
        }
        if (empty($sqlUpgradeFile)) {
            return 1;
        }

        // First add new hooks to SQL file
        if (!empty($newHooks)) {
            $hookDescriptions = $this->extractHookDescriptions($newHooks);

            $sqlInsertStatement = $this->getSqlInsertStatement($hookDescriptions, Version::VERSION);
            $this->appendSqlToFile($sqlUpgradeFile, $sqlInsertStatement);
            $io->success(
                sprintf(
                    'All new %s hooks have been listed to file %s',
                    count($newHooks),
                    $sqlUpgradeFile
                )
            );
        }

        // Now delete removed hooks
        if (!empty($removedHooks)) {
            $sqlDeleteStatement = $this->getSqlDeleteStatement($removedHooks, Version::VERSION);
            $this->appendSqlToFile($sqlUpgradeFile, $sqlDeleteStatement);
            $io->success(
                sprintf(
                    'All obsolete %s hooks have been removed in file %s',
                    count($removedHooks),
                    $sqlUpgradeFile
                )
            );
        }

        return 0;
    }

    /**
     * Initialize PrestaShop Context
     */
    private function initContext()
    {
        // We need to have an employee or the listing hooks don't work
        // see LegacyHookSubscriber
        if (!$this->legacyContext->getContext()->employee) {
            // Even a non existing employee is fine
            $this->legacyContext->getContext()->employee = new Employee();
        }
    }

    /**
     * Gets sql upgrade file by PrestaShop version.
     *
     * @param string $version
     *
     * @return string
     */
    private function getSqlUpgradeFileByPrestaShopVersion($version, $autoUpgradeModulePath)
    {
        $sqlUpgradeFile = "$autoUpgradeModulePath/upgrade/sql/$version.sql";

        if (!file_exists($sqlUpgradeFile)) {
            throw new FileNotFoundException(sprintf('File %s has not been found', $sqlUpgradeFile));
        }

        return $sqlUpgradeFile;
    }

    /**
     * Gets sql insert statement.
     *
     * @param HookDescription[] $hookDescriptions
     * @param string $prestashopVersion
     *
     * @return string
     */
    private function getSqlInsertStatement(array $hookDescriptions, string $prestashopVersion): string
    {
        $valuesToInsert = [];
        foreach ($hookDescriptions as $hookDescription) {
            $valuesToInsert[] = sprintf(
                "  (NULL, '%s', '%s', '%s', '1')",
                pSQL($hookDescription->getName()),
                pSQL($hookDescription->getTitle()),
                pSQL($hookDescription->getDescription())
            );
        }

        if (empty($valuesToInsert)) {
            return '';
        }

        $insertSQL = PHP_EOL . "/* Auto generated hooks added for version $prestashopVersion */" . PHP_EOL;
        $insertSQL .= 'INSERT INTO `PREFIX_hook` (`id_hook`, `name`, `title`, `description`, `position`) VALUES' . PHP_EOL;
        $insertSQL .= implode(',' . PHP_EOL, $valuesToInsert);
        $insertSQL .= PHP_EOL . 'ON DUPLICATE KEY UPDATE `title` = VALUES(`title`), `description` = VALUES(`description`);' . PHP_EOL;

        return $insertSQL;
    }

    private function getSqlDeleteStatement(array $removedHooks, string $prestashopVersion): string
    {
        if (empty($removedHooks)) {
            return '';
        }

        $deleteSQL = PHP_EOL . "/* Auto generated hooks removed for version $prestashopVersion */" . PHP_EOL;
        $deleteSQL .= 'DELETE FROM `PREFIX_hook` WHERE `name` IN (' . PHP_EOL;
        $deleteSQL .= implode(',' . PHP_EOL, array_map(fn (string $hookName) => "  '$hookName'", $removedHooks));
        $deleteSQL .= PHP_EOL . ');' . PHP_EOL;
        $deleteSQL .= '/* Clean hook registrations related to removed hooks */' . PHP_EOL;
        $deleteSQL .= 'DELETE FROM `PREFIX_hook_module` WHERE `id_hook` NOT IN (SELECT id_hook FROM `PREFIX_hook`);' . PHP_EOL;
        $deleteSQL .= 'DELETE FROM `PREFIX_hook_module_exceptions` WHERE `id_hook` NOT IN (SELECT id_hook FROM `PREFIX_hook`);' . PHP_EOL;

        return $deleteSQL;
    }

    /**
     * Appends new content to the given file.
     *
     * @param string $pathToFile
     * @param string $content
     */
    private function appendSqlToFile($pathToFile, $content)
    {
        $fileSystem = new Filesystem();

        $fileSystem->appendToFile($pathToFile, $content);
    }

    private function getCurrentHooks(): array
    {
        $currentHookXml = file_get_contents($this->projectDir . '/install-dev/data/xml/hook.xml');

        return $this->extractHookNamesFromXML($currentHookXml);
    }

    private function getPreviousHooks(string $previousVersion): array
    {
        $previousHookFile = sprintf('https://raw.githubusercontent.com/PrestaShop/PrestaShop/refs/tags/%s/install-dev/data/xml/hook.xml', $previousVersion);
        $response = $this->httpClient->request('GET', $previousHookFile);
        if ($response->getStatusCode() !== Response::HTTP_OK) {
            throw new RuntimeException('Could not get previous hook information ' . $previousHookFile);
        }

        return $this->extractHookNamesFromXML($response->getContent());
    }

    private function extractHookNamesFromXML(string $xmlContent): array
    {
        $xmlFileContent = new SimpleXMLElement($xmlContent);

        if (!isset($xmlFileContent->entities, $xmlFileContent->entities->hook)) {
            throw new RuntimeException('Invalid hook fixtures files could not find hooks node');
        }

        $hookNames = [];
        foreach ($xmlFileContent->entities->hook as $hook) {
            if (!isset($hook->name)) {
                continue;
            }

            $hookNames[] = $hook->name->__toString();
        }

        return $hookNames;
    }

    private function extractHookDescriptions(array $extractedHooks): array
    {
        $currentHookXml = file_get_contents($this->projectDir . '/install-dev/data/xml/hook.xml');
        $xmlFileContent = new SimpleXMLElement($currentHookXml);

        if (!isset($xmlFileContent->entities, $xmlFileContent->entities->hook)) {
            throw new RuntimeException('Invalid hook fixtures files could not find hooks node');
        }

        $hookNames = [];
        foreach ($xmlFileContent->entities->hook as $hook) {
            if (!isset($hook->name)) {
                continue;
            }
            $hookName = $hook->name->__toString();
            if (!in_array($hookName, $extractedHooks)) {
                continue;
            }

            $hookNames[] = new HookDescription(
                $hook->name->__toString(),
                $hook->title->__toString(),
                $hook->description->__toString()
            );
        }

        return $hookNames;
    }
}
