<?php

declare(strict_types=1);

namespace Evomedien\Vitec\UserFunc;


use TYPO3\CMS\Core\Attribute\AsAllowedCallable;
use TYPO3\CMS\Core\Database\ConnectionPool;
use TYPO3\CMS\Core\Service\FlexFormService;
use TYPO3\CMS\Core\Utility\GeneralUtility;
use TYPO3\CMS\Core\Resource\ResourceFactory;
use TYPO3\CMS\Core\Imaging\ImageManipulation\CropVariantCollection;
use TYPO3\CMS\Core\Resource\FileReference;
use TYPO3\CMS\Core\Imaging\ImageService;
use Doctrine\DBAL\ParameterType;

/**
 * UserFunc to render a single product as JSON for headless output.
 *
 * `render()` performs page discovery (top-level plugin via TypoScript).
 * `renderForRecord()` processes one specific tt_content row and is reused
 * by ContainerChildrenProcessor for product-show plugins nested in a
 * b13 container.
 */
class ProductShowJsonRenderer
{
    #[AsAllowedCallable]
    public function render(string $content, array $conf): string
    {
        // 1) cObj data path
        $row = is_array($this->cObj->data ?? null) ? $this->cObj->data : null;
        if ($row && (string)($row['CType'] ?? '') === 'vitec_productshow') {
            return $this->renderForRecord($row);
        }

        // 2) Page-id via v14 request attribute (TSFE->id is often null in JSON cObj context)
        $pageId = 0;
        $request = $GLOBALS['TYPO3_REQUEST'] ?? null;
        if ($request !== null) {
            $pageInfo = $request->getAttribute('frontend.page.information');
            if ($pageInfo !== null) {
                $pageId = (int)$pageInfo->getId();
            }
        }
        if ($pageId <= 0) {
            $pageId = (int)($GLOBALS['TSFE']->id ?? 0);
        }
        if ($pageId <= 0) {
            return '';
        }

        $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('CType', $queryBuilder->createNamedParameter('vitec_productshow', ParameterType::STRING)),
                $queryBuilder->expr()->eq('deleted', 0),
                $queryBuilder->expr()->eq('hidden', 0)
            )
            ->executeQuery()
            ->fetchAllAssociative();

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

        return $this->renderForRecord($contentElements[0]);
    }


    /**
     * Render exactly the given tt_content row (the product-show plugin element).
     * Exception-safe: returns '' on any failure.
     *
     * @param array<string,mixed> $contentElement
     */
    public function renderForRecord(array $contentElement): string
    {
        try {
            $pageId = (int)($GLOBALS['TSFE']->id ?? 0);

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

            $productUid = (int)($settings['product'] ?? 0);
            $layout = (int)($settings['layout'] ?? 0);
            $debugMode = (bool)($settings['debug'] ?? false);

            if (!$productUid) {
                $routeParams = $GLOBALS['TYPO3_REQUEST']->getQueryParams();
                $productParam = $routeParams['tx_vitec_productshow']['product'] ?? null;

                if ($productParam) {
                    if (!is_numeric($productParam)) {
                        $slugQueryBuilder = GeneralUtility::makeInstance(ConnectionPool::class)
                            ->getQueryBuilderForTable('tx_vitec_domain_model_product');

                        $productBySlug = $slugQueryBuilder
                            ->select('uid')
                            ->from('tx_vitec_domain_model_product')
                            ->where(
                                $slugQueryBuilder->expr()->eq('slug', $slugQueryBuilder->createNamedParameter($productParam)),
                                $slugQueryBuilder->expr()->eq('deleted', 0),
                                $slugQueryBuilder->expr()->eq('hidden', 0)
                            )
                            ->executeQuery()
                            ->fetchAssociative();

                        $productUid = (int)($productBySlug['uid'] ?? 0);
                    } else {
                        $productUid = (int)$productParam;
                    }
                }
            }

            if (!$productUid) {
                return $debugMode
                    ? json_encode(['error' => 'No product selected or found', 'debug' => ['settings' => $settings]])
                    : '';
            }

            $productQueryBuilder = GeneralUtility::makeInstance(ConnectionPool::class)
                ->getQueryBuilderForTable('tx_vitec_domain_model_product');

            $product = $productQueryBuilder
                ->select('*')
                ->from('tx_vitec_domain_model_product')
                ->where(
                    $productQueryBuilder->expr()->eq('uid', $productQueryBuilder->createNamedParameter($productUid, ParameterType::INTEGER)),
                    $productQueryBuilder->expr()->eq('deleted', 0),
                    $productQueryBuilder->expr()->eq('hidden', 0)
                )
                ->executeQuery()
                ->fetchAssociative();

            if (!$product) {
                return $debugMode
                    ? json_encode(['error' => 'Product not found', 'debug' => ['productUid' => $productUid]])
                    : '';
            }

            $response = [
                'product' => $this->serializeProduct($product),
                'layout' => $layout,
                'settings' => [
                    'layout' => $layout,
                ],
            ];

            if ($debugMode) {
                $response['debug'] = [
                    'pageId' => $pageId,
                    'productUid' => $productUid,
                    'layout' => $layout,
                    'settings' => $settings,
                ];
            }

            return json_encode($response);
        } catch (\Throwable $e) {
            return '';
        }
    }

    /**
     * @param array<string,mixed> $product
     * @return array<string,mixed>
     */
    protected function serializeProduct(array $product): array
    {
        $uid = (int)$product['uid'];

        return [
            'uid' => $uid,

            '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' => \Evomedien\Vitec\Service\ContentElementResolver::resolveLink((string)($product['contentelement'] ?? '')),
            'contentelementcta' => \Evomedien\Vitec\Service\ContentElementResolver::resolveLink((string)($product['contentelementcta'] ?? '')),

            '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),
            'showdatapath' => (bool)($product['showdatapath'] ?? false),

            'link' => '/product/' . (string)($product['slug'] ?? ''),

            'categories' => $this->getProductCategories($uid),
            'images' => $this->getProductImages($uid),
            'downloads' => $this->getProductDownloads($uid),
            'ogimage' => $this->getProductOgImage($uid),
            'videofile' => $this->getProductVideoFile($uid),
            'relatedprodukt' => $this->getRelatedProducts($uid),
        ];
    }

    protected function getProductImages(int $productUid): array
    {
        $queryBuilder = GeneralUtility::makeInstance(ConnectionPool::class)
            ->getQueryBuilderForTable('sys_file_reference');

        $fileReferences = $queryBuilder
            ->select('*')
            ->from('sys_file_reference')
            ->where(
                $queryBuilder->expr()->eq('uid_foreign', $queryBuilder->createNamedParameter($productUid, ParameterType::INTEGER)),
                $queryBuilder->expr()->eq('tablenames', $queryBuilder->createNamedParameter('tx_vitec_domain_model_product', ParameterType::STRING)),
                $queryBuilder->expr()->eq('fieldname', $queryBuilder->createNamedParameter('productimage', ParameterType::STRING)),
                $queryBuilder->expr()->eq('deleted', 0),
                $queryBuilder->expr()->eq('hidden', 0)
            )
            ->orderBy('sorting_foreign', 'ASC')
            ->executeQuery()
            ->fetchAllAssociative();

        if (empty($fileReferences)) {
            return [];
        }

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

        foreach ($fileReferences as $fileRef) {
            try {
                $fileReference = $resourceFactory->getFileReferenceObject($fileRef['uid']);
                $originalFile = $fileReference->getOriginalFile();

                $processedImage = $imageService->applyProcessingInstructions(
                    $fileReference,
                    ['width' => '1874c', 'height' => '625c']
                );

                $srcset = [];
                foreach ([400, 800, 1200, 1600] as $width) {
                    $processedVariant = $imageService->applyProcessingInstructions(
                        $fileReference,
                        ['width' => $width . 'c', 'height' => (int)($width / 3) . 'c']
                    );
                    $srcset[] = [
                        'url' => $imageService->getImageUri($processedVariant),
                        'width' => $width,
                        'descriptor' => $width . 'w',
                    ];
                }

                $images[] = [
                    'uid' => $fileRef['uid'],
                    'url' => $imageService->getImageUri($processedImage),
                    'title' => $fileReference->getTitle() ?: '',
                    'alternative' => $fileReference->getAlternative() ?: '',
                    'description' => $fileReference->getDescription() ?: '',
                    'srcset' => $srcset,
                    'properties' => [
                        'width' => $originalFile->getProperty('width'),
                        'height' => $originalFile->getProperty('height'),
                        'mimeType' => $originalFile->getMimeType(),
                    ],
                ];
            } catch (\Exception $e) {
                continue;
            }
        }

        return $images;
    }

    /**
     * @return array<string,mixed>|null
     */
    protected function getProductOgImage(int $productUid): ?array
    {
        $queryBuilder = GeneralUtility::makeInstance(ConnectionPool::class)
            ->getQueryBuilderForTable('sys_file_reference');

        $fileRef = $queryBuilder
            ->select('*')
            ->from('sys_file_reference')
            ->where(
                $queryBuilder->expr()->eq('uid_foreign', $queryBuilder->createNamedParameter($productUid, ParameterType::INTEGER)),
                $queryBuilder->expr()->eq('tablenames', $queryBuilder->createNamedParameter('tx_vitec_domain_model_product', ParameterType::STRING)),
                $queryBuilder->expr()->eq('fieldname', $queryBuilder->createNamedParameter('ogimage', ParameterType::STRING)),
                $queryBuilder->expr()->eq('deleted', 0),
                $queryBuilder->expr()->eq('hidden', 0)
            )
            ->orderBy('sorting_foreign', 'ASC')
            ->setMaxResults(1)
            ->executeQuery()
            ->fetchAssociative();

        if (!$fileRef) {
            return null;
        }

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

            $processedImage = $imageService->applyProcessingInstructions(
                $fileReference,
                ['width' => 1200]
            );

            return [
                'uid' => $fileRef['uid'],
                'url' => $imageService->getImageUri($processedImage),
                'title' => $fileReference->getTitle() ?: '',
                'alternative' => $fileReference->getAlternative() ?: '',
                'description' => $fileReference->getDescription() ?: '',
                'properties' => [
                    'width' => $originalFile->getProperty('width'),
                    'height' => $originalFile->getProperty('height'),
                    'mimeType' => $originalFile->getMimeType(),
                ],
            ];
        } catch (\Exception $e) {
            return null;
        }
    }


    /**
     * Resolve the uploaded video file (single FAL reference, fieldname=videofile).
     *
     * @return array<string,mixed>|null
     */
    protected function getProductVideoFile(int $productUid): ?array
    {
        $queryBuilder = GeneralUtility::makeInstance(\TYPO3\CMS\Core\Database\ConnectionPool::class)
            ->getQueryBuilderForTable('sys_file_reference');

        $row = $queryBuilder
            ->select('fr.uid', 'fr.title', 'fr.description', '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(
                $queryBuilder->expr()->eq('fr.tablenames', $queryBuilder->createNamedParameter('tx_vitec_domain_model_product', \Doctrine\DBAL\ParameterType::STRING)),
                $queryBuilder->expr()->eq('fr.fieldname', $queryBuilder->createNamedParameter('videofile', \Doctrine\DBAL\ParameterType::STRING)),
                $queryBuilder->expr()->eq('fr.uid_foreign', $queryBuilder->createNamedParameter($productUid, \Doctrine\DBAL\ParameterType::INTEGER)),
                $queryBuilder->expr()->eq('fr.deleted', 0),
                $queryBuilder->expr()->eq('fr.hidden', 0),
                $queryBuilder->expr()->eq('f.missing', 0)
            )
            ->orderBy('fr.sorting_foreign', 'ASC')
            ->setMaxResults(1)
            ->executeQuery()
            ->fetchAssociative();

        if (!$row) {
            return null;
        }

        return [
            'uid' => (int)$row['file_uid'],
            'name' => (string)($row['name'] ?? ''),
            'url' => '/fileadmin' . ($row['identifier'] ?? ''),
            'size' => (int)($row['size'] ?? 0),
            'extension' => (string)($row['extension'] ?? ''),
            'mimeType' => (string)($row['mime_type'] ?? ''),
            'title' => (string)($row['title'] ?? ''),
            'description' => (string)($row['description'] ?? ''),
        ];
    }
    protected function getProductCategories(int $productUid): array
    {
        $queryBuilder = GeneralUtility::makeInstance(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(function ($cat) {
            return [
                'uid' => (int)$cat['uid'],
                'title' => $cat['title'],
                'description' => $cat['description'] ?? '',
            ];
        }, $categories);
    }

    protected function getProductDownloads(int $productUid): array
    {
        $queryBuilder = GeneralUtility::makeInstance(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;

            if (!empty($download['file'])) {
                $fileQueryBuilder = GeneralUtility::makeInstance(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;
    }

    protected function getRelatedProducts(int $productUid): array
    {
        $queryBuilder = GeneralUtility::makeInstance(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'];
            $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' => $this->getProductImages($relUid),
            ];
        }

        return $result;
    }
}