<?php

namespace WapplerSystems\ABTest2;

/**
 * This file is part of the "abtest2" Extension for TYPO3 CMS.
 *
 * For the full copyright and license information, please read the
 * LICENSE.txt file that was distributed with this source code.
 */

use TYPO3\CMS\Core\Utility\GeneralUtility;
use TYPO3\CMS\Frontend\Controller\TypoScriptFrontendController;
use TYPO3\CMS\Frontend\Page\PageRepository;

/**
 * This class detects which page version (either by cookie or by random) and sets the page content ID accordingly.
 *
 * @package WapplerSystems\ABTest2
 * @author Sven Wapler <typo3YYYYY@wappler.systems>
 */
class Helper
{

    /**
     *
     * @param array $params
     * @param $pObj TypoScriptFrontendController
     * @return void
     * @throws \InvalidArgumentException
     */
    public function determineContentId(array $params, &$pObj)
    {

        // only try to change the page if it's not the googlebot.
        if (false === stripos($_SERVER['HTTP_USER_AGENT'], 'googlebot')) {

            $currentPageId = $targetPageId = $pObj->id;

            // Get the rootpage_id from realurl config.
            $realurlConfig = $pObj->TYPO3_CONF_VARS['EXTCONF']['realurl'];
            if (array_key_exists($_SERVER['SERVER_NAME'], $realurlConfig)) {
                $rootpage_id = $realurlConfig[$_SERVER['SERVER_NAME']]['pagePath']['rootpage_id'];
            } else {
                $rootpage_id = $realurlConfig['_DEFAULT']['pagePath']['rootpage_id'];
            }

            // If the ID is NULL, then we set this value to the rootpage_id. NULL is the "Home"page, ID is a specific sub-page, e.g. www.domain.de (NULL) - www.domain.de/page.html (ID)
            if (!$currentPageId) {
                if ($rootpage_id) {
                    $currentPageId = $rootpage_id;
                } else {
                    // Leave the function because we can not determine the ID.
                    return;
                }
            }

            $pageRepository = GeneralUtility::makeInstance(PageRepository::class);
            $currentPagePropertiesArray = $pageRepository->getPage($currentPageId);

            $pageBPageId = $currentPagePropertiesArray['tx_abtest2_b_id'];
            /* TODO: check if page b exists */
            $cookieLifeTime = $currentPagePropertiesArray['tx_abtest2_cookie_time'];

            if ($pageBPageId) {

                $pageBPropertiesArray = $pageRepository->getPage($pageBPageId);
                $cookieValue = $_COOKIE['abtest2'];

                if ($cookieValue === 'b') {
                    $targetPageId = $pageBPageId;
                    $currentPagePropertiesArray = $pageBPropertiesArray;
                } else if ($cookieValue === 'a') {

                } else {
                    $cookieValue = 'a';
                    /* select least used page */

                    if ((int)$currentPagePropertiesArray['tx_abtest2_counter'] > (int)$pageBPropertiesArray['tx_abtest2_counter']) {
                        /* take b */
                        $targetPageId = $pageBPageId;
                        $currentPagePropertiesArray = $pageBPropertiesArray;
                        $cookieValue = 'b';
                    }

                    /* rise counter */
                    $GLOBALS['TYPO3_DB']->exec_UPDATEquery('pages', 'uid='. (int)$targetPageId, array('tx_abtest2_counter' => $currentPagePropertiesArray['tx_abtest2_counter'] + 1));

                    setcookie('abtest2', $cookieValue, time() + $cookieLifeTime);
                }

                // If current page ID is different from the random page ID we set the correct page ID.
                if ($currentPageId !== $targetPageId) {
                    $pObj->contentPid = $targetPageId;
                    $pObj->page['content_from_pid'] = $targetPageId;
                }

                $pObj->page['no_cache'] = true;


                if ($currentPagePropertiesArray) {
                    $additionalHeaderData = $currentPagePropertiesArray['tx_abtest2_header'];
                    $additionalFooterData = $currentPagePropertiesArray['tx_abtest2_footer'];
                    if ($additionalHeaderData) {
                        $pObj->additionalHeaderData['abtest2'] = $additionalHeaderData;
                    }
                    if ($additionalFooterData) {
                        $pObj->additionalFooterData['abtest2'] = $additionalFooterData;
                    }
                }

            }

        }

    }
}