.-.-.-.-.-

<?php

namespace ether\seo\services;

use Craft;
use craft\base\Component;
use craft\events\ExceptionEvent;
use craft\helpers\ArrayHelper;
use craft\helpers\UrlHelper;
use ether\seo\records\RedirectRecord;
use Exception;
use Throwable;
use Twig\Error\RuntimeError;
use yii\base\ExitException;
use yii\db\StaleObjectException;
use yii\web\HttpException;

class RedirectsService extends Component
{

// Public Methods
	// =========================================================================

// Event Handlers
	// -------------------------------------------------------------------------

/**
	 * Handles 404 exceptions
	 *
	 * @param ExceptionEvent $event
	 *
	 * @return void
	 * @throws \yii\base\Exception
	 * @throws ExitException
	 */
	public function onException (ExceptionEvent $event)
	{
		$exception = $event->exception;
		$craft = Craft::$app;

if (!($exception instanceof HttpException) || $exception->statusCode !== 404)
		{
			// Account for `{% exit 404 %}` in twig templates
			$prev = $exception->getPrevious();

if (
				!($exception instanceof RuntimeError)
				|| !($prev instanceof HttpException)
				|| $prev->statusCode !== 404
			) return;
		}

$path = $craft->request->getFullPath();
		$query = $craft->request->getQueryStringWithoutPath();

if ($query)
			$path .= '?' . $query;

if ($redirect = $this->findRedirectByPath($path))
		{
			$event->handled = true;
			$craft->response->redirect($redirect['to'], $redirect['type'])
			                ->send();
			$craft->end();
		}
	}

// Finders
	// -------------------------------------------------------------------------

/**
	 * Returns all the redirects
	 *
	 * @param bool $currentSiteOnly
	 *
	 * @return array
	 */
	public function findAllRedirects ($currentSiteOnly = false)
	{
		if ($currentSiteOnly)
			return RedirectRecord::find()->where(
				'[[siteId]] IS NULL OR [[siteId]] = ' .
				Craft::$app->sites->currentSite->id
			)->orderBy('order asc')->all();

return array_reduce(
			RedirectRecord::find()->orderBy('order asc')->all(),
			function ($a, RedirectRecord $record) {
				$a[$record->siteId ?? 'null'][] = $record;
				return $a;
			},
			array_reduce(
				Craft::$app->sites->allSiteIds,
				function ($a, $id) {
					$a[$id] = [];
					return $a;
				},
				[]
			)
		);
	}

/**
	 * Finds a redirect matching the given path
	 *
	 * @param $path
	 *
	 * @return array|bool
	 * @throws \yii\base\Exception
	 */
	public function findRedirectByPath ($path)
	{
		$redirects = $this->findAllRedirects(true);

foreach ($redirects as $redirect)
		{
			$to = false;

if (trim($redirect['uri'], '/') == $path)
				$to = $redirect['to'];

elseif ($uri = $this->_isRedirectRegex($redirect['uri']))
				if (preg_match($uri, $path))
					$to = preg_replace($uri, $redirect['to'], $path);

if ($to)
			{
				return [
					'to' => strpos($to, '://') !== false
						? $to
						: UrlHelper::siteUrl($to),
					'type' => $redirect['type'],
				];
			}
		}

return false;
	}

// Save / Update / Delete
	// -------------------------------------------------------------------------

/**
	 * Saves the redirect
	 *
	 * @param int      $order
	 * @param string   $uri
	 * @param string   $to
	 * @param string   $type
	 * @param null     $siteId
	 * @param int|null $id
	 *
	 * @return array|int|string
	 */
	public function save ($order, $uri, $to, $type, $siteId = null, $id = null)
	{
		if ($siteId === 'null')
			$siteId = null;

if ($id)
		{
			$record = RedirectRecord::findOne(compact('id'));

if (!$record)
				return 'Unable to find redirect with ID: ' . $id;
		}
		else
		{
			// Find case in-sensitive
			$b = Craft::$app->getDb()->getIsMysql() ? 'BINARY ' : '';
			$existing = RedirectRecord::find()
				->where($b . '[[uri]]=:uri', ['uri' => $uri])
				->andWhere(['siteId' => $siteId])
				->one();

if ($existing)
				return 'A redirect with that URI already exists!';

$record = new RedirectRecord();
		}

$record->order  = $order;
		$record->uri    = $uri;
		$record->to     = $to;
		$record->type   = $type;
		if ($siteId !== false)
			$record->siteId = $siteId;

if (!$record->save())
			return $record->getErrors();

return $record->id;
	}

/**
	 * Bulk creates redirects
	 *
	 * @param      $redirects
	 * @param      $separator
	 * @param      $type
	 * @param      $siteId
	 *
	 * @return array
	 */
	public function bulk ($redirects, $separator, $type, $siteId)
	{
		if ($siteId === 'null')
			$siteId = null;

$rawRedirects = array_map(function ($line) use ($separator) {
			return str_getcsv($line, $separator);
		}, explode(PHP_EOL, $redirects));

$newFormatted = [];

$order = RedirectRecord::find()->where(['siteId' => $siteId])->count();

foreach ($rawRedirects as $redirect)
		{
			$record = new RedirectRecord();
			$record->order = $order++;
			$record->uri = $redirect[0];
			$record->to = $redirect[1];
			$record->type = array_key_exists(2, $redirect) ? $redirect[2] : $type;
			$record->siteId = $siteId;
			$record->save();

$newFormatted[] = [
				'id'     => $record->id,
				'order'  => $record->order,
				'uri'    => $record->uri,
				'to'     => $record->to,
				'type'   => $record->type,
				'siteId' => $record->siteId,
			];
		}

return [$newFormatted, false];
	}

public function sort ($order)
	{
		$table = RedirectRecord::$tableName;

$db = Craft::$app->getDb();
		$transaction = $db->beginTransaction();

try {
			foreach ($order as $row) {
				$db->createCommand()
				   ->update($table, ['order' => $row['order']], ['id' => $row['id']])
				   ->execute();
			}

$transaction->commit();
		} catch (Exception $e) {
			$transaction->rollBack();
			return $e->getMessage();
		}

return false;
	}

/**
	 * Deletes the redirect with the given ID
	 *
	 * @param int $id
	 *
	 * @return bool|string
	 * @throws Exception
	 * @throws Throwable
	 * @throws StaleObjectException
	 */
	public function delete ($id)
	{
		$redirect = RedirectRecord::findOne(compact('id'))->delete();

if ($redirect === false)
			return 'Unable find redirect with ID: ' . $id;

return false;
	}

// Private Methods
	// =========================================================================

// Helpers
	// -------------------------------------------------------------------------

/**
	 * Checks if the redirect URI is a regex
	 *
	 * @param string $uri
	 *
	 * @return bool|mixed|string
	 */
	private function _isRedirectRegex ($uri)
	{
		// If the URI doesn't look like a regex...
		if (preg_match('/\/(.*)\/([g|m|i|x|X|s|u|U|A|J|D]+)/m', $uri) === 0)
		{
			// Escape all non-escaped `?` not inside parentheses
			$i = preg_match_all(
				'/(?<!\\\\)\?(?![^(]*\))/',
				$uri,
				$matches,
				PREG_OFFSET_CAPTURE
			);

while ($i--)
			{
				$x   = $matches[0][$i][1];
				$uri = substr_replace($uri, '\?', $x, 1);
			}

// Escape all non-escaped `/` not inside parentheses
			$i = preg_match_all(
				'/(?<!\\\\)\/(?![^(]*\))/',
				$uri,
				$matches,
				PREG_OFFSET_CAPTURE
			);

while ($i--)
			{
				$x   = $matches[0][$i][1];
				$uri = substr_replace($uri, '\/', $x, 1);
			}
		}

// Check if contains a valid regex
		if (@preg_match($uri, null) === false)
			$uri = '/^' . $uri . '$/i';

if (@preg_match($uri, null) !== false)
			return $uri;

return false;
	}

}

/srv/users/craft4/apps/craft4-newsite-space/./vendor/ether/seo/./src/services/RedirectsService.php