<?php

namespace gipfl\IcingaWeb2;

use Exception;
use Icinga\Application\Icinga;
use Icinga\Exception\ProgrammingError;
use Icinga\Web\Url as WebUrl;
use Icinga\Web\UrlParams;
use InvalidArgumentException;
use Psr\Http\Message\ServerRequestInterface;
use Psr\Http\Message\UriInterface;
use RuntimeException;

/**
 * Class Url
 *
 * The main purpose of this class is to get unit tests running on CLI
 * Little code from Icinga\Web\Url has been duplicated, as neither fromPath()
 * nor getRequest() can be extended in a meaningful way at the time of this
 * writing
 */
class Url extends WebUrl
{
    /**
     * @param string $url
     * @param array $params
     * @param null $request
     * @return Url
     */
    public static function fromPath($url, array $params = array(), $request = null)
    {
        if ($request === null) {
            $request = static::getRequest();
        }

        if (! \is_string($url)) {
            throw new InvalidArgumentException(sprintf(
                'url "%s" is not a string',
                \var_export($url, 1)
            ));
        }

        $self = new static;

        if ($url === '#') {
            return $self->setPath($url);
        }

        $parts = \parse_url($url);

        $self->setBasePath($request->getBaseUrl());
        if (isset($parts['path'])) {
            $self->setPath($parts['path']);
        }

        if (isset($parts['query'])) {
            $params = UrlParams::fromQueryString($parts['query'])->mergeValues($params);
        }

        if (isset($parts['fragment'])) {
            $self->setAnchor($parts['fragment']);
        }

        $self->setParams($params);
        return $self;
    }

    public static function fromUri(UriInterface $uri)
    {
        $query = $uri->getQuery();
        $path = $uri->getPath();
        if (\strlen($query)) {
            $path .= "?$query";
        }

        return static::fromPath($path);
    }

    public static function fromServerRequest(ServerRequestInterface $request)
    {
        return static::fromUri($request->getUri());
    }

    /**
     * Create a new Url class representing the current request
     *
     * If $params are given, those will be added to the request's parameters
     * and overwrite any existing parameters
     *
     * @param   UrlParams|array     $params  Parameters that should additionally be considered for the url
     * @param   \Icinga\Web\Request $request A request to use instead of the default one
     *
     * @return  Url
     */
    public static function fromRequest($params = array(), $request = null)
    {
        if ($request === null) {
            $request = static::getRequest();
        }

        $url = new Url();
        $url->setPath(\ltrim($request->getPathInfo(), '/'));
        $request->getQuery();

        // $urlParams = UrlParams::fromQueryString($request->getQuery());
        if (isset($_SERVER['QUERY_STRING'])) {
            $urlParams = UrlParams::fromQueryString($_SERVER['QUERY_STRING']);
        } else {
            $urlParams = UrlParams::fromQueryString('');
            foreach ($request->getQuery() as $k => $v) {
                $urlParams->set($k, $v);
            }
        }

        foreach ($params as $k => $v) {
            $urlParams->set($k, $v);
        }
        $url->setParams($urlParams);
        $url->setBasePath($request->getBaseUrl());

        return $url;
    }

    public function setBasePath($basePath)
    {
        if (property_exists($this, 'basePath')) {
            parent::setBasePath($basePath);
        } else {
            $this->setBaseUrl($basePath);
        }

        return $this;
    }

    public function setParams($params)
    {
        try {
            return parent::setParams($params);
        } catch (ProgrammingError $e) {
            throw new InvalidArgumentException($e->getMessage(), 0, $e);
        }
    }

    protected static function getRequest()
    {
        try {
            $app = Icinga::app();
        } catch (ProgrammingError $e) {
            throw new RuntimeException($e->getMessage(), 0, $e);
        }
        if ($app->isCli()) {
            try {
                return new FakeRequest();
            } catch (Exception $e) {
                throw new RuntimeException($e->getMessage(), 0, $e);
            }
        } else {
            return $app->getRequest();
        }
    }
}