MokoSuiteConstruction/source/script.php

<?php
/**
 * MokoSuite Construction Package Install Script
 *
 * @package     MokoSuite Construction
 * @copyright   Copyright (C) 2026 Moko Consulting. All rights reserved.
 * @license     GPL-3.0-or-later
 */

defined('_JEXEC') or die;

use Joomla\CMS\Factory;
use Joomla\CMS\Installer\InstallerAdapter;
use Joomla\CMS\Log\Log;
use Joomla\Database\DatabaseInterface;

class Pkg_MokoSuiteConstructionInstallerScript
{
	private string $savedDlid = '';

	public function preflight(string $type, InstallerAdapter $adapter): bool
	{
		if ($type === 'update')
		{
			$this->savedDlid = $this->getExistingDlid();
		}

		return true;
	}

	public function postflight(string $type, InstallerAdapter $adapter): void
	{
		if ($this->savedDlid)
		{
			$this->restoreDlid($this->savedDlid);
		}

		if ($type === 'install')
		{
			$missing = $this->verifyChildren($adapter);

			if (!empty($missing))
			{
				Factory::getApplication()->enqueueMessage(
					'<strong>MokoSuite Construction — Incomplete Installation</strong><br>'
					. 'The following extensions failed to install: '
					. implode(', ', $missing)
					. '.<br>Please check file permissions and server logs, then reinstall the package.',
					'error'
				);

				return;
			}

			$this->enablePlugin('system', 'mokosuiteconstruction');
			$this->enablePlugin('webservices', 'mokosuiteconstruction');
		}

		$this->warnMissingLicenseKey();
	}

	private function verifyChildren(InstallerAdapter $adapter): array
	{
		try
		{
			$manifest = $adapter->getParent()->getManifest();
			$files    = $manifest->files->file ?? [];

			if (!$files)
			{
				return [];
			}

			$db      = Factory::getContainer()->get(DatabaseInterface::class);
			$missing = [];

			foreach ($files as $file)
			{
				$type  = (string) ($file['type'] ?? '');
				$id    = (string) ($file['id'] ?? '');
				$group = (string) ($file['group'] ?? '');

				if ($type === '' || $id === '')
				{
					continue;
				}

				$element = ($type === 'plugin' && $group !== '')
					? preg_replace('/^plg_' . preg_quote($group, '/') . '_/', '', $id)
					: $id;

				$query = $db->getQuery(true)
					->select('COUNT(*)')
					->from($db->quoteName('#__extensions'))
					->where($db->quoteName('element') . ' = ' . $db->quote($element))
					->where($db->quoteName('type') . ' = ' . $db->quote($type));

				if ($type === 'plugin' && $group !== '')
				{
					$query->where($db->quoteName('folder') . ' = ' . $db->quote($group));
				}

				$db->setQuery($query);

				if ((int) $db->loadResult() === 0)
				{
					$missing[] = htmlspecialchars($type . ': ' . $id, ENT_QUOTES, 'UTF-8');
				}
			}

			return $missing;
		}
		catch (\Throwable $e)
		{
			return [];
		}
	}

	private function getExistingDlid(): string
	{
		try
		{
			$db = Factory::getContainer()->get(DatabaseInterface::class);
			$db->setQuery(
				$db->getQuery(true)
					->select($db->quoteName('extra_query'))
					->from($db->quoteName('#__update_sites'))
					->where('(' . $db->quoteName('name') . ' LIKE ' . $db->quote('%MokoSuiteConstruction%')
						. ' OR ' . $db->quoteName('location') . ' LIKE ' . $db->quote('%MokoSuiteConstruction%') . ')')
					->setLimit(1)
			);

			$extraQuery = $db->loadResult() ?? '';

			if (preg_match('/dlid=([a-zA-Z0-9]+)/', $extraQuery, $matches))
			{
				return $matches[1];
			}
		}
		catch (\Throwable $e)
		{
			Log::add('Construction install: failed to read DLID — ' . $e->getMessage(), Log::WARNING, 'mokosuite.construction');
		}

		return '';
	}

	private function restoreDlid(string $dlid): void
	{
		try
		{
			$db = Factory::getContainer()->get(DatabaseInterface::class);
			$db->setQuery(
				$db->getQuery(true)
					->update($db->quoteName('#__update_sites'))
					->set($db->quoteName('extra_query') . ' = ' . $db->quote('dlid=' . $dlid))
					->where('(' . $db->quoteName('name') . ' LIKE ' . $db->quote('%MokoSuiteConstruction%')
						. ' OR ' . $db->quoteName('location') . ' LIKE ' . $db->quote('%MokoSuiteConstruction%') . ')')
			);
			$db->execute();
		}
		catch (\Throwable $e)
		{
			Log::add('Construction install: failed to restore DLID — ' . $e->getMessage(), Log::WARNING, 'mokosuite.construction');
		}
	}

	private function enablePlugin(string $group, string $element): void
	{
		try
		{
			$db = Factory::getContainer()->get(DatabaseInterface::class);
			$db->setQuery(
				$db->getQuery(true)
					->update($db->quoteName('#__extensions'))
					->set($db->quoteName('enabled') . ' = 1')
					->where($db->quoteName('type') . ' = ' . $db->quote('plugin'))
					->where($db->quoteName('folder') . ' = ' . $db->quote($group))
					->where($db->quoteName('element') . ' = ' . $db->quote($element))
			);
			$db->execute();
		}
		catch (\Throwable $e)
		{
			Log::add('Construction install: failed to enable ' . $group . '/' . $element . ' — ' . $e->getMessage(), Log::WARNING, 'mokosuite.construction');
		}
	}

	private function warnMissingLicenseKey(): void
	{
		try
		{
			$db  = Factory::getContainer()->get(DatabaseInterface::class);
			$app = Factory::getApplication();

			$query = $db->getQuery(true)
				->select([$db->quoteName('update_site_id'), $db->quoteName('extra_query')])
				->from($db->quoteName('#__update_sites'))
				->where('(' . $db->quoteName('name') . ' LIKE ' . $db->quote('%MokoSuiteConstruction%')
					. ' OR ' . $db->quoteName('location') . ' LIKE ' . $db->quote('%MokoSuiteConstruction%') . ')')
				->setLimit(1);
			$db->setQuery($query);
			$site = $db->loadObject();

			if ($site)
			{
				$extraQuery = (string) ($site->extra_query ?? '');

				if (!empty($extraQuery) && strpos($extraQuery, 'dlid=') !== false)
				{
					parse_str($extraQuery, $parsed);

					if (!empty($parsed['dlid']))
					{
						return;
					}
				}

				$editUrl = 'index.php?option=com_installer&task=updatesite.edit&update_site_id=' . (int) $site->update_site_id;
			}
			else
			{
				$editUrl = 'index.php?option=com_installer&view=updatesites';
			}

			$app->enqueueMessage(
				'<strong>Moko Consulting License Key Required</strong> — '
				. 'No download key is configured. Updates will not be available until a valid license key is entered. '
				. '<a href="' . $editUrl . '" class="btn btn-sm btn-warning ms-2">Enter License Key</a>',
				'warning'
			);
		}
		catch (\Throwable $e)
		{
		}
	}
}