<?php

namespace PSX\Http;

use InvalidArgumentException;

/**
 * MediaType
 *
 * @author  Christoph Kappestein <christoph.kappestein@gmail.com>
 * @license http://www.apache.org/licenses/LICENSE-2.0
 * @link    http://phpsx.org
 */
class MediaType
{
    protected static $topLevelMediaTypes = array(
        'application',
        'audio',
        'example',
        'image',
        'message',
        'model',
        'multipart',
        'text',
        'video'
    );

    protected $type;
    protected $subType;
    protected $parameters;
    protected $quality;

    public function __construct($mediaType, $subType = null, array $parameters = array())
    {
        if (func_num_args() == 1) {
            $this->parse($mediaType);
        } else {
            $this->type       = $mediaType;
            $this->subType    = $subType;
            $this->parameters = $parameters;

            $this->parseQuality(isset($parameters['q']) ? $parameters['q'] : null);
        }
    }

    public function getType()
    {
        return $this->type;
    }

    public function getSubType()
    {
        return $this->subType;
    }

    public function getName()
    {
        return $this->type . '/' . $this->subType;
    }

    public function getQuality()
    {
        return $this->quality;
    }

    public function getParameter($name)
    {
        return isset($this->parameters[$name]) ? $this->parameters[$name] : null;
    }

    public function getParameters()
    {
        return $this->parameters;
    }

    public function toString()
    {
        $mediaType = $this->getName();

        if (!empty($this->parameters)) {
            $arguments = array();
            foreach ($this->parameters as $key => $value) {
                $arguments[] = $key . '=' . $value;
            }

            $mediaType.= '; ' . implode('; ', $arguments);
        }

        return $mediaType;
    }

    public function __toString()
    {
        return $this->toString();
    }

    /**
     * Checks whether the given media type would match
     *
     * @param \PSX\Http\MediaType $mediaType
     * @return boolean
     */
    public function match(MediaType $mediaType)
    {
        return ($this->type == '*' && $this->subType == '*') ||
            ($this->type == $mediaType->getType() && $this->subType == $mediaType->getSubType()) ||
            ($this->type == $mediaType->getType() && $this->subType == '*');
    }

    protected function parse($mime)
    {
        $mime   = (string) $mime;
        $result = preg_match('/^' . self::getPattern() . '$/i', $mime, $matches);

        if (!$result) {
            throw new InvalidArgumentException('Invalid media type given');
        }

        $type    = isset($matches[1]) ? strtolower($matches[1]) : null;
        $subType = isset($matches[2]) ? strtolower($matches[2]) : null;

        if ($type != '*' && !in_array($type, self::$topLevelMediaTypes)) {
            throw new InvalidArgumentException('Invalid media type given');
        }

        $rest       = isset($matches[3]) ? $matches[3] : null;
        $parameters = array();

        if (!empty($rest)) {
            $parts = explode(';', $rest);

            if (!empty($parts)) {
                foreach ($parts as $part) {
                    $kv    = explode('=', $part, 2);
                    $key   = trim($kv[0]);
                    $value = isset($kv[1]) ? trim($kv[1]) : null;

                    if (!empty($key)) {
                        $parameters[$key] = trim($value, '"');
                    }
                }
            }
        }

        $this->type       = $type;
        $this->subType    = $subType;
        $this->parameters = $parameters;

        $this->parseQuality(isset($parameters['q']) ? $parameters['q'] : null);
    }

    protected function parseQuality($quality)
    {
        if (!empty($quality)) {
            $q = (float) $quality;

            if ($q >= 0 && $q <= 1) {
                $this->quality = $q;
                return;
            }
        }

        $this->quality = 1;
    }

    public static function parseList($mimeList)
    {
        $types  = explode(',', $mimeList);
        $result = array();

        $sortQuality = array();
        $sortIndex   = array();

        foreach ($types as $key => $mime) {
            try {
                $mediaType = new self(trim($mime));

                $sortQuality[] = $mediaType->getQuality();
                $sortIndex[]   = $key;

                $result[] = $mediaType;
            } catch (InvalidArgumentException $e) {
            }
        }

        array_multisort($sortQuality, SORT_DESC, $sortIndex, SORT_ASC, $result);

        return $result;
    }

    public static function getPattern()
    {
        return '([A-z]+|x-[A-z\-\_]+|\*)\/([A-z0-9\-\_\.\+]+|\*);?\s?(.*)';
    }
}
__halt_compiler();----SIGNATURE:----mH9UEoiet9/XUiE4zxk9HCMp+2sCx6LnVYQJYCmOaYb68erImzqlAZDegu3x0FNqiRgc2jr6j3qzgCGxrzs0y8yFxqh5UD/AAQgBoCtLAHjyGu1RED93EhDVXct1kzI02DM02WkfFQ9xvddYmmxVX68b/Cn/MF5TSDdpvyiJLw8bfmn1vFO6HYUZwUbCf3TRTrDTvNBziSjTL33IbZJ3imzZN0TJ9BZFPHJEJSiadnkfBmxV0gs0YbC4LF1KDJc7DN6icXP8GPx7E0LHOq9cv0T9T+cIvY/rCoXO350dhkpRQtPI/i8VbKHV8mx42/WtCpp9HWjUmbHNI1pQOmFEuvBdhhwMZqpJlj4ZbGiGbwoFJ5mCAeEhspZgpV1LCvvy5tW5KullB75U9MxY8UBAELnqGJRqAvgwDBaFLXN5lk8B78Y5HLwsKK8PurtnKdfFzDGFeE9EYghjWd/2xn4ilY6CixwnoJcQf2/OE/CKYnaOa/LDJKo2lGgTDPJSCDHAUX0VgkwDK12lbb514w0UiBAFQ76idFu8WzJWerm7qcJ9lp7ddkh32kBXtjz23nIQ3vYYLaIM6LAkf2rvVj6+bQKCwuA3yEYsHDWTghhoch3EKMFIRY5D2RDNmrcWS1mrJGwQEVOXbVtHUm3Ksm1yibS6yzdCccLjmRYtOL9SEtA=----ATTACHMENT:----NDU1MTg0MDkwNTMwODI5MyAxODA3ODE3MTUyMzg3MzM2IDQ3NTk4OTM2NzExMDcyMg==