refactor(installer): replace hardcoded extension list with dynamic manifest verification

Read package manifest via $adapter->getParent()->getManifest() to discover
children dynamically instead of maintaining a hardcoded EXPECTED_EXTENSIONS
array. Fail-open pattern wraps verification in try/catch. Only the success
path (plugin enables, license warning) is gated; unconditional housekeeping
(DLID restore) runs regardless.

Claude-Session: https://claude.ai/code/session_01CwLGvFJPjoPTp9BEnSjtJf

source/script.php

@@ -1,9 +1,10 @@
 <?php
 /**
- * @package     MokoSuiteConstruction
+ * MokoSuite Construction Package Install Script
- * @subpackage  pkg_mokosuiteconstruction
+ *
+ * @package     MokoSuite Construction
  * @copyright   Copyright (C) 2026 Moko Consulting. All rights reserved.
- * @license     GNU General Public License version 3 or later; see LICENSE
+ * @license     GPL-3.0-or-later
  */
 
 defined('_JEXEC') or die;
@@ -11,22 +12,185 @@ defined('_JEXEC') or die;
 use Joomla\CMS\Factory;
 use Joomla\CMS\Installer\InstallerAdapter;
 use Joomla\CMS\Log\Log;
+use Joomla\Database\DatabaseInterface;
 
-/**
- * Package installation script for MokoSuiteConstruction.
- */
 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::getDbo();
+			$db  = Factory::getContainer()->get(DatabaseInterface::class);
 			$app = Factory::getApplication();
 
 			$query = $db->getQuery(true)
@@ -68,7 +232,6 @@ class Pkg_MokoSuiteConstructionInstallerScript
 		}
 		catch (\Throwable $e)
 		{
-			// Silent — avoid breaking install if update_sites query fails
 		}
 	}
 }