<?php

declare(strict_types=1);

namespace Evomedien\Vitec\UserFunc;

use Doctrine\DBAL\ParameterType;
use Evomedien\Vitec\Domain\Repository\ProductRepository;
use Psr\Http\Message\ServerRequestInterface;
use TYPO3\CMS\Core\Database\Connection;
use TYPO3\CMS\Core\Imaging\ImageManipulation\CropVariantCollection;
use TYPO3\CMS\Core\Resource\FileReference;
use TYPO3\CMS\Core\Resource\ResourceFactory;
use TYPO3\CMS\Core\Service\FlexFormService;
use TYPO3\CMS\Core\Utility\GeneralUtility;
use TYPO3\CMS\Extbase\Service\ImageService;

/**
 * UserFunc to render product list as JSON for headless
 */
class ProductListJsonRenderer
{
    public function render(string $content, array $conf): string
    {
        // IMPORTANT: Headless creates new cObj contexts when rendering JSON fields,
        // losing the current content element context. Also, Extbase repositories don't work
        // in UserFunc context because the full Extbase framework isn't bootstrapped.
        //
        // Solution: Query tt_content directly to find the plugin configuration,
        // then use direct database queries for products instead of Extbase repositories.

        // Get current page UID
        $pageId = (int)($GLOBALS['TSFE']->id ?? 0);

        // Query tt_content for vitec_productlist on this page
        $queryBuilder = GeneralUtility::makeInstance(\TYPO3\CMS\Core\Database\ConnectionPool::class)
            ->getQueryBuilderForTable('tt_content');

        $contentElements = $queryBuilder
            ->select('*')
            ->from('tt_content')
            ->where(
                $queryBuilder->expr()->eq('pid', $queryBuilder->createNamedParameter($pageId, ParameterType::INTEGER)),
                $queryBuilder->expr()->eq('list_type', $queryBuilder->createNamedParameter('vitec_productlist', ParameterType::STRING)),
                $queryBuilder->expr()->eq('deleted', 0),
                $queryBuilder->expr()->eq('hidden', 0)
            )
            ->executeQuery()
            ->fetchAllAssociative();

        if (empty($contentElements)) {
            return json_encode(['debug' => 'No vitec_productlist on page ' . $pageId]);
        }

        // Take the first one (there should typically be only one)
        $contentElement = $contentElements[0];

        // Parse FlexForm
        $flexFormService = GeneralUtility::makeInstance(FlexFormService::class);
        $flexFormData = $flexFormService->convertFlexFormContentToArray($contentElement['pi_flexform'] ?? '');
        $settings = $flexFormData['settings'] ?? [];

        // Extract category UIDs and debug setting
        $categoryUids = array_filter(
            array_map('intval', explode(',', (string)($settings['categories'] ?? '')))
        );
        $debugMode = (bool)($settings['debug'] ?? false);
        $allProducts = (bool)($settings['allproducts'] ?? false);

        // Extbase repositories don't work in UserFunc context
        // Use direct database query instead
        $productQueryBuilder = GeneralUtility::makeInstance(\TYPO3\CMS\Core\Database\ConnectionPool::class)
            ->getQueryBuilderForTable('tx_vitec_domain_model_product');

        $productQuery = $productQueryBuilder
            ->select('p.*')
            ->from('tx_vitec_domain_model_product', 'p')
            ->where(
                $productQueryBuilder->expr()->eq('p.deleted', 0),
                $productQueryBuilder->expr()->eq('p.hidden', 0),
                $productQueryBuilder->expr()->eq('p.legacy', 0),
                $productQueryBuilder->expr()->eq('p.supportproduct', 0),
                $productQueryBuilder->expr()->eq('p.hideonwebsite', 0),
                $productQueryBuilder->expr()->eq('p.hideonproducts', 0),
                $productQueryBuilder->expr()->eq('p.subproduct', 0)
            );

        // Add category filter if specified and allProducts is not enabled
        if (!empty($categoryUids) && !$allProducts) {
            // Join with sys_category_record_mm to filter by categories
            $productQuery
                ->join(
                    'p',
                    'sys_category_record_mm',
                    'mm',
                    'mm.uid_foreign = p.uid AND mm.tablenames = ' . $productQueryBuilder->createNamedParameter('tx_vitec_domain_model_product', ParameterType::STRING) . ' AND mm.fieldname = ' . $productQueryBuilder->createNamedParameter('categories', ParameterType::STRING)
                )
                ->andWhere(
                    $productQueryBuilder->expr()->in('mm.uid_local', $productQueryBuilder->createNamedParameter($categoryUids, Connection::PARAM_INT_ARRAY))
                )
                ->groupBy('p.uid');
        }

        $products = $productQuery->executeQuery()->fetchAllAssociative();

        // Serialize products (they're already associative arrays from the query)
        $productsData = [];
        foreach ($products as $product) {
            $productsData[] = $this->serializeProduct($product);
        }

        // If debug mode is enabled, return object with products and debug info
        if ($debugMode) {
            return json_encode([
                'products' => $productsData,
                'debug' => [
                    'pageId' => $pageId,
                    'categoryUids' => $categoryUids,
                    'productCount' => count($productsData),
                    'settings' => $settings
                ]
            ]);
        }

        // Otherwise return products array directly (backward compatible)
        return json_encode($productsData);
    }

    /**
     * Serialize a single product DB row to the full headless JSON structure.
     *
     * Includes every field declared on the Product domain model
     * (Evomedien\Vitec\Domain\Model\Product) plus all fully resolved
     * relations (categories, productimage, downloads, ogimage, relatedprodukt).
     *
     * DB-only columns that are NOT part of the domain model
     * (cta, links, sorting1-5, key1-3, apptext1-3, productlayout, image,
     * relatedimage, system fields) are intentionally omitted.
     *
     * @param array<string,mixed> $product Associative DB row of tx_vitec_domain_model_product
     * @return array<string,mixed>
     */
    protected function serializeProduct(array $product): array
    {
        $uid = (int)$product['uid'];

        return [
            // --- identifier ---
            'uid' => $uid,

            // --- scalar string fields (Product domain model) ---
            'title' => (string)($product['title'] ?? ''),
            'slug' => (string)($product['slug'] ?? ''),
            'urltitle' => (string)($product['urltitle'] ?? ''),
            'seotitle' => (string)($product['seotitle'] ?? ''),
            'seometa' => (string)($product['seometa'] ?? ''),
            'keywords' => (string)($product['keywords'] ?? ''),
            'structureddata' => (string)($product['structureddata'] ?? ''),
            'teaser' => (string)($product['teaser'] ?? ''),
            'subtitle' => (string)($product['subtitle'] ?? ''),
            'video' => (string)($product['video'] ?? ''),
            'applications' => (string)($product['applications'] ?? ''),
            'description' => (string)($product['description'] ?? ''),
            'highlights' => (string)($product['highlights'] ?? ''),
            'shortcutpid' => (string)($product['shortcutpid'] ?? ''),
            'contentelement' => (string)($product['contentelement'] ?? ''),
            'contentelementcta' => (string)($product['contentelementcta'] ?? ''),

            // --- boolean flags (Product domain model) ---
            'hideonapp' => (bool)($product['hideonapp'] ?? false),
            'hideonwebsite' => (bool)($product['hideonwebsite'] ?? false),
            'hideondatasheets' => (bool)($product['hideondatasheets'] ?? false),
            'hideonproducts' => (bool)($product['hideonproducts'] ?? false),
            'shortcut' => (bool)($product['shortcut'] ?? false),
            'legacy' => (bool)($product['legacy'] ?? false),
            'supportproduct' => (bool)($product['supportproduct'] ?? false),
            'subproduct' => (bool)($product['subproduct'] ?? false),

            // --- convenience link (kept for backward compatibility) ---
            'link' => '/product/' . (string)($product['slug'] ?? ''),

            // --- fully resolved relations ---
            'categories' => $this->getProductCategories($uid),
            'images' => $this->getProductImages($uid),
            'downloads' => $this->getProductDownloads($uid),
            'ogimage' => $this->getProductOgImage($uid),
            'relatedprodukt' => $this->getRelatedProducts($uid),
        ];
    }

    /**
     * Get product images from FAL (sys_file_reference)
     * Processes images through ImageService and generates srcset for responsive images
     */
    protected function getProductImages(int $productUid): array
    {
        $queryBuilder = GeneralUtility::makeInstance(\TYPO3\CMS\Core\Database\ConnectionPool::class)
            ->getQueryBuilderForTable('sys_file_reference');

        $fileReferences = $queryBuilder
            ->select('sfr.uid', 'sfr.uid_local', 'sfr.title', 'sfr.description', 'sfr.alternative', 'sfr.crop')
            ->from('sys_file_reference', 'sfr')
            ->where(
                $queryBuilder->expr()->eq('sfr.tablenames', $queryBuilder->createNamedParameter('tx_vitec_domain_model_product', ParameterType::STRING)),
                $queryBuilder->expr()->eq('sfr.fieldname', $queryBuilder->createNamedParameter('productimage', ParameterType::STRING)),
                $queryBuilder->expr()->eq('sfr.uid_foreign', $queryBuilder->createNamedParameter($productUid, ParameterType::INTEGER)),
                $queryBuilder->expr()->eq('sfr.deleted', 0),
                $queryBuilder->expr()->eq('sfr.hidden', 0)
            )
            ->orderBy('sfr.sorting_foreign')
            ->executeQuery()
            ->fetchAllAssociative();

        $imageService = GeneralUtility::makeInstance(ImageService::class);
        $resourceFactory = GeneralUtility::makeInstance(ResourceFactory::class);

        $images = [];
        foreach ($fileReferences as $fileRefData) {
            try {
                // Get FAL FileReference object
                $fileReference = $resourceFactory->getFileReferenceObject((int)$fileRefData['uid']);

                // Define image sizes for srcset
                $sizes = [
                    'small' => ['width' => 400, 'height' => null],
                    'medium' => ['width' => 800, 'height' => null],
                    'large' => ['width' => 1200, 'height' => null],
                    'xlarge' => ['width' => 1600, 'height' => null],
                ];

                $srcset = [];
                foreach ($sizes as $sizeName => $dimensions) {
                    $processedImage = $imageService->applyProcessingInstructions(
                        $fileReference,
                        [
                            'width' => $dimensions['width'],
                            'height' => $dimensions['height'],
                            'crop' => $fileRefData['crop'] ?? null
                        ]
                    );

                    $imageUri = $imageService->getImageUri($processedImage);
                    $srcset[] = [
                        'url' => $imageUri,
                        'width' => $dimensions['width'],
                        'descriptor' => $dimensions['width'] . 'w'
                    ];
                }

                // Get original/default image
                $defaultProcessed = $imageService->applyProcessingInstructions(
                    $fileReference,
                    ['width' => 800, 'crop' => $fileRefData['crop'] ?? null]
                );

                $images[] = [
                    'uid' => (int)$fileRefData['uid'],
                    'url' => $imageService->getImageUri($defaultProcessed),
                    'title' => $fileRefData['title'] ?? '',
                    'alternative' => $fileRefData['alternative'] ?? '',
                    'description' => $fileRefData['description'] ?? '',
                    'srcset' => $srcset,
                    'properties' => [
                        'width' => $fileReference->getProperty('width'),
                        'height' => $fileReference->getProperty('height'),
                        'mimeType' => $fileReference->getProperty('mime_type')
                    ]
                ];
            } catch (\Exception $e) {
                // Skip images that can't be processed
                continue;
            }
        }

        return $images;
    }

    /**
     * Get the single Open Graph image (ogimage) for a product, or null.
     *
     * @return array<string,mixed>|null
     */
    protected function getProductOgImage(int $productUid): ?array
    {
        $queryBuilder = GeneralUtility::makeInstance(\TYPO3\CMS\Core\Database\ConnectionPool::class)
            ->getQueryBuilderForTable('sys_file_reference');

        $fileRefData = $queryBuilder
            ->select('sfr.uid', 'sfr.title', 'sfr.description', 'sfr.alternative', 'sfr.crop')
            ->from('sys_file_reference', 'sfr')
            ->where(
                $queryBuilder->expr()->eq('sfr.tablenames', $queryBuilder->createNamedParameter('tx_vitec_domain_model_product', ParameterType::STRING)),
                $queryBuilder->expr()->eq('sfr.fieldname', $queryBuilder->createNamedParameter('ogimage', ParameterType::STRING)),
                $queryBuilder->expr()->eq('sfr.uid_foreign', $queryBuilder->createNamedParameter($productUid, ParameterType::INTEGER)),
                $queryBuilder->expr()->eq('sfr.deleted', 0),
                $queryBuilder->expr()->eq('sfr.hidden', 0)
            )
            ->orderBy('sfr.sorting_foreign')
            ->setMaxResults(1)
            ->executeQuery()
            ->fetchAssociative();

        if (!$fileRefData) {
            return null;
        }

        try {
            $resourceFactory = GeneralUtility::makeInstance(ResourceFactory::class);
            $imageService = GeneralUtility::makeInstance(ImageService::class);
            $fileReference = $resourceFactory->getFileReferenceObject((int)$fileRefData['uid']);

            $processed = $imageService->applyProcessingInstructions(
                $fileReference,
                ['width' => 1200, 'crop' => $fileRefData['crop'] ?? null]
            );

            return [
                'uid' => (int)$fileRefData['uid'],
                'url' => $imageService->getImageUri($processed),
                'title' => $fileRefData['title'] ?? '',
                'alternative' => $fileRefData['alternative'] ?? '',
                'description' => $fileRefData['description'] ?? '',
                'properties' => [
                    'width' => $fileReference->getProperty('width'),
                    'height' => $fileReference->getProperty('height'),
                    'mimeType' => $fileReference->getProperty('mime_type'),
                ],
            ];
        } catch (\Exception $e) {
            return null;
        }
    }

    /**
     * Get categories for a product (resolved sys_category records).
     */
    protected function getProductCategories(int $productUid): array
    {
        $queryBuilder = GeneralUtility::makeInstance(\TYPO3\CMS\Core\Database\ConnectionPool::class)
            ->getQueryBuilderForTable('sys_category');

        $categories = $queryBuilder
            ->select('c.uid', 'c.title', 'c.description')
            ->from('sys_category', 'c')
            ->join(
                'c',
                'sys_category_record_mm',
                'mm',
                'mm.uid_local = c.uid AND mm.tablenames = ' .
                $queryBuilder->createNamedParameter('tx_vitec_domain_model_product', ParameterType::STRING) .
                ' AND mm.fieldname = ' .
                $queryBuilder->createNamedParameter('categories', ParameterType::STRING)
            )
            ->where(
                $queryBuilder->expr()->eq('mm.uid_foreign', $queryBuilder->createNamedParameter($productUid, ParameterType::INTEGER)),
                $queryBuilder->expr()->eq('c.deleted', 0),
                $queryBuilder->expr()->eq('c.hidden', 0)
            )
            ->orderBy('mm.sorting', 'ASC')
            ->executeQuery()
            ->fetchAllAssociative();

        return array_map(static function ($cat) {
            return [
                'uid' => (int)$cat['uid'],
                'title' => $cat['title'] ?? '',
                'description' => $cat['description'] ?? '',
            ];
        }, $categories);
    }

    /**
     * Get all downloads for a product (resolved via tx_vitec_product_download_mm).
     */
    protected function getProductDownloads(int $productUid): array
    {
        $queryBuilder = GeneralUtility::makeInstance(\TYPO3\CMS\Core\Database\ConnectionPool::class)
            ->getQueryBuilderForTable('tx_vitec_domain_model_download');

        $downloads = $queryBuilder
            ->select('d.*')
            ->from('tx_vitec_domain_model_download', 'd')
            ->join(
                'd',
                'tx_vitec_product_download_mm',
                'mm',
                'mm.uid_foreign = d.uid'
            )
            ->where(
                $queryBuilder->expr()->eq('mm.uid_local', $queryBuilder->createNamedParameter($productUid, ParameterType::INTEGER)),
                $queryBuilder->expr()->eq('d.deleted', 0),
                $queryBuilder->expr()->eq('d.hidden', 0),
                $queryBuilder->expr()->eq('d.hideonwebsite', 0)
            )
            ->orderBy('mm.sorting', 'ASC')
            ->executeQuery()
            ->fetchAllAssociative();

        $result = [];
        foreach ($downloads as $download) {
            $fileInfo = null;

            // Get file information from FAL if file reference exists
            if (!empty($download['file'])) {
                $fileQueryBuilder = GeneralUtility::makeInstance(\TYPO3\CMS\Core\Database\ConnectionPool::class)
                    ->getQueryBuilderForTable('sys_file_reference');

                $fileRef = $fileQueryBuilder
                    ->select('fr.uid', 'f.uid as file_uid', 'f.identifier', 'f.name', 'f.size', 'f.extension', 'f.mime_type')
                    ->from('sys_file_reference', 'fr')
                    ->join('fr', 'sys_file', 'f', 'fr.uid_local = f.uid')
                    ->where(
                        $fileQueryBuilder->expr()->eq('fr.uid_foreign', $fileQueryBuilder->createNamedParameter((int)$download['uid'], ParameterType::INTEGER)),
                        $fileQueryBuilder->expr()->eq('fr.tablenames', $fileQueryBuilder->createNamedParameter('tx_vitec_domain_model_download', ParameterType::STRING)),
                        $fileQueryBuilder->expr()->eq('fr.fieldname', $fileQueryBuilder->createNamedParameter('file', ParameterType::STRING)),
                        $fileQueryBuilder->expr()->eq('fr.deleted', 0),
                        $fileQueryBuilder->expr()->eq('f.missing', 0)
                    )
                    ->orderBy('fr.sorting_foreign', 'ASC')
                    ->setMaxResults(1)
                    ->executeQuery()
                    ->fetchAssociative();

                if ($fileRef) {
                    $fileInfo = [
                        'uid' => (int)$fileRef['file_uid'],
                        'name' => $fileRef['name'],
                        'url' => '/fileadmin' . $fileRef['identifier'],
                        'size' => (int)$fileRef['size'],
                        'extension' => $fileRef['extension'],
                        'mimeType' => $fileRef['mime_type'] ?? '',
                    ];
                }
            }

            $result[] = [
                'uid' => (int)$download['uid'],
                'title' => $download['title'] ?? '',
                'slug' => $download['slug'] ?? '',
                'teaser' => $download['teaser'] ?? '',
                'description' => $download['description'] ?? '',
                'keywords' => $download['keywords'] ?? '',
                'icon' => $download['icon'] ?? '',
                'file' => $fileInfo,
            ];
        }

        return $result;
    }

    /**
     * Get related products (resolved via tx_vitec_product_related_mm).
     *
     * Returns a shallow representation (no nested relations) to avoid
     * infinite recursion between mutually related products.
     */
    protected function getRelatedProducts(int $productUid): array
    {
        $queryBuilder = GeneralUtility::makeInstance(\TYPO3\CMS\Core\Database\ConnectionPool::class)
            ->getQueryBuilderForTable('tx_vitec_domain_model_product');

        $related = $queryBuilder
            ->select('p.uid', 'p.title', 'p.slug', 'p.subtitle', 'p.teaser', 'p.description')
            ->from('tx_vitec_domain_model_product', 'p')
            ->join(
                'p',
                'tx_vitec_product_related_mm',
                'mm',
                'mm.uid_foreign = p.uid'
            )
            ->where(
                $queryBuilder->expr()->eq('mm.uid_local', $queryBuilder->createNamedParameter($productUid, ParameterType::INTEGER)),
                $queryBuilder->expr()->eq('p.deleted', 0),
                $queryBuilder->expr()->eq('p.hidden', 0)
            )
            ->orderBy('mm.sorting', 'ASC')
            ->executeQuery()
            ->fetchAllAssociative();

        $result = [];
        foreach ($related as $rel) {
            $relUid = (int)$rel['uid'];
            $images = $this->getProductImages($relUid);

            $result[] = [
                'uid' => $relUid,
                'title' => (string)($rel['title'] ?? ''),
                'slug' => (string)($rel['slug'] ?? ''),
                'subtitle' => (string)($rel['subtitle'] ?? ''),
                'teaser' => (string)($rel['teaser'] ?? ''),
                'description' => (string)($rel['description'] ?? ''),
                'link' => '/product/' . (string)($rel['slug'] ?? ''),
                'images' => $images,
            ];
        }

        return $result;
    }
}