<?php

namespace Bitrix\Main\Web;

use Bitrix\Main\Config;

class Cookie extends Http\Cookie
{
	public const SPREAD_SITES = 1;
	public const SPREAD_DOMAIN = 2;

	protected $spread;
	protected $originalName;

	/**
	 * Cookie constructor.
	 * @param string $name The cooke name
	 * @param string|null $value The cooke value
	 * @param int $expires Timestamp
	 * @param bool $addPrefix Name prefix, usually BITRIX_SM_
	 */
	public function __construct($name, $value, $expires = null, $addPrefix = true)
	{
		$this->name = ($addPrefix ? static::generateCookieName($name) : $name);
		$this->originalName = $name;
		$this->value = $value;
		$this->expires = ($expires === null ? time() + 31104000 : $expires); //60*60*24*30*12
		$this->spread = static::SPREAD_DOMAIN | static::SPREAD_SITES;
		$this->setDefaultsFromConfig();
	}

	protected static function generateCookieName($name)
	{
		static $cookiePrefix = null;

		if ($cookiePrefix === null)
		{
			$cookiePrefix = Config\Option::get("main", "cookie_name", "BITRIX_SM")."_";
		}
		if (strpos($name, $cookiePrefix) !== 0)
		{
			$name = $cookiePrefix . $name;
		}
		return $name;
	}

	protected function setDefaultsFromConfig()
	{
		$cookiesSettings = Config\Configuration::getValue('cookies');

		$this->secure = ($cookiesSettings['secure'] ?? false);
		$this->httpOnly = ($cookiesSettings['http_only'] ?? true);
		if (isset($cookiesSettings['samesite']))
		{
			$this->sameSite = $cookiesSettings['samesite'];
		}
	}

	public function getDomain(): ?string
	{
		if ($this->domain === null)
		{
			$this->domain = static::getCookieDomain();
		}

		return $this->domain;
	}

	public function getOriginalName(): string
	{
		return $this->originalName;
	}

	public function setSpread($spread)
	{
		$this->spread = $spread;
		return $this;
	}

	public function getSpread()
	{
		return $this->spread;
	}

	/**
	 * Returns the domain from the sites settings to use with cookies.
	 *
	 * @return string
	 * @throws \Bitrix\Main\Db\SqlQueryException
	 * @throws \Bitrix\Main\SystemException
	 */
	public static function getCookieDomain()
	{
		static $domain = null;

		if ($domain !== null)
		{
			return $domain;
		}

		$request = \Bitrix\Main\Context::getCurrent()->getRequest();

		$httpHost = $request->getHttpHost();

		$cacheFlags = Config\Configuration::getValue('cache_flags');
		$cacheTtl = ($cacheFlags['site_domain'] ?? 0);

		if ($cacheTtl === false)
		{
			$connection = \Bitrix\Main\Application::getConnection();
			$sqlHelper = $connection->getSqlHelper();

			$sql = "SELECT DOMAIN ".
				"FROM b_lang_domain ".
				"WHERE '".$sqlHelper->forSql('.'.$httpHost)."' like ".$sqlHelper->getConcatFunction("'%.'", "DOMAIN")." ".
				"ORDER BY ".$sqlHelper->getLengthFunction("DOMAIN")." ";
			$recordset = $connection->query($sql);
			if ($record = $recordset->fetch())
			{
				$domain = $record['DOMAIN'];
			}
		}
		else
		{
			$managedCache = \Bitrix\Main\Application::getInstance()->getManagedCache();

			if ($managedCache->read($cacheTtl, 'b_lang_domain', 'b_lang_domain'))
			{
				$arLangDomain = $managedCache->get('b_lang_domain');
			}
			else
			{
				$arLangDomain = ['DOMAIN' => [], 'LID' => []];

				$connection = \Bitrix\Main\Application::getConnection();
				$sqlHelper = $connection->getSqlHelper();

				$recordset = $connection->query(
					"SELECT * ".
					"FROM b_lang_domain ".
					"ORDER BY ".$sqlHelper->getLengthFunction("DOMAIN")
				);
				while ($record = $recordset->fetch())
				{
					//it's a bit tricky, the cache is used somewhere else, that's why we have the LID key here.
					$arLangDomain['DOMAIN'][] = $record;
					$arLangDomain['LID'][$record['LID']][] = $record;
				}
				$managedCache->set('b_lang_domain', $arLangDomain);
			}

			foreach ($arLangDomain['DOMAIN'] as $record)
			{
				if (strcasecmp(mb_substr('.'.$httpHost, -(mb_strlen($record['DOMAIN']) + 1)), ".".$record['DOMAIN']) == 0)
				{
					$domain = $record['DOMAIN'];
					break;
				}
			}
		}

		if ($domain === null)
		{
			$domain = '';
		}

		return $domain;
	}
}