<?php

namespace Ahc\Cli\Output;

use Ahc\Cli\Exception\InvalidArgumentException;

use function Ahc\Cli\t;
use function array_intersect_key;
use function constant;
use function defined;
use function lcfirst;
use function method_exists;
use function preg_match_all;
use function str_ireplace;
use function str_replace;
use function stripos;
use function strtolower;
use function strtoupper;
use function strtr;

use const PHP_EOL;

/**
 * Cli Colorizer.
 *
 * @author  Jitendra Adhikari <jiten.adhikary@gmail.com>
 * @license MIT
 *
 * @link   static  https://github.com/adhocore/cli
 */
class Color
{
    const BLACK = 30;
    const RED = 31;
    const GREEN = 32;
    const YELLOW = 33;
    const BLUE = 34;
    const PURPLE = 35;
    const CYAN = 36;
    const WHITE = 37;
    const GRAY = 47;
    const DARKGRAY = 100;

    public static bool $enabled = true;
    protected string $format = "\e[:mod:;:fg:;:bg:m:txt:\e[0m";

    /** @var array Custom styles */
    protected static array $styles = [
        'answer' => ['fg' => 37, 'mod' => 2],
        'choice' => ['fg' => 36],
        'comment' => ['fg' => 37, 'mod' => 2],
        'error' => ['fg' => 31],
        'help_category' => ['fg' => 32, 'mod' => 1],
        'help_description_even' => ['fg' => 37, 'mod' => 2],
        'help_description_odd' => ['fg' => 37, 'mod' => 2],
        'help_example' => ['fg' => 33],
        'help_footer' => ['fg' => 33],
        'help_group' => ['fg' => 33, 'mod' => 1],
        'help_header' => ['fg' => 37, 'mod' => 1],
        'help_item_even' => ['fg' => 37, 'mod' => 1],
        'help_item_odd' => ['fg' => 37, 'mod' => 1],
        'help_summary' => ['fg' => 37, 'mod' => 2],
        'help_text' => ['fg' => 37, 'mod' => 1],
        'info' => ['fg' => 34],
        'logo' => ['fg' => 37],
        'ok' => ['fg' => 32],
        'question' => ['fg' => 33],
        'version' => ['fg' => 37, 'mod' => 1],
        'warn' => ['fg' => 33],
    ];

    /**
     * Returns a line formatted as comment.
     */
    public function comment(string $text, array $style = []): string
    {
        return $this->line($text, static::$styles['comment'] + $style);
    }

    /**
     * Returns a line formatted as comment.
     */
    public function error(string $text, array $style = []): string
    {
        return $this->line($text, static::$styles['error'] + $style);
    }

    /**
     * Returns a line formatted as ok msg.
     */
    public function ok(string $text, array $style = []): string
    {
        return $this->line($text, static::$styles['ok'] + $style);
    }

    /**
     * Returns a line formatted as warning.
     */
    public function warn(string $text, array $style = []): string
    {
        return $this->line($text, static::$styles['warn'] + $style);
    }

    /**
     * Returns a line formatted as info.
     */
    public function info(string $text, array $style = []): string
    {
        return $this->line($text, static::$styles['info'] + $style);
    }

    /**
     * Returns the color code for a 256 background color.
     */
    public static function bg256(int $code): string
    {
        return "48;5;{$code}";
    }

    /**
     * Returns the color code for a 256 foreground color.
     */
    public static function fg256(int $code): string
    {
        return "38;5;{$code}";
    }

    /**
     * Returns a formatted/colored line.
     */
    public function line(string $text, array $style = []): string
    {
        if (!self::$enabled || getenv('NO_COLOR')) {
            return $text;
        }

        $style += ['bg' => null, 'fg' => static::WHITE, 'bold' => 0, 'mod' => null];

        $format = $style['bg'] === null
            ? str_replace(';:bg:', '', $this->format)
            : $this->format;

        $line = strtr($format, [
            ':mod:' => (int) ($style['mod'] ?? $style['bold']),
            ':fg:'  => $style['fg'],
            ':bg:'  => is_int($style['bg']) ? ($style['bg'] + 10) : $style['bg'],
            ':txt:' => $text,
        ]);

        return $line;
    }

    /**
     * Prepare a multi colored string with html like tags.
     *
     * Example: "<errorBold>Text</end><eol/><bgGreenBold>Text</end><eol>"
     */
    public function colors(string $text): string
    {
        $text = str_replace(['<eol>', '<eol/>', '</eol>', "\r\n", "\n"], '__PHP_EOL__', $text);

        if (!preg_match_all('/<(\w+)>(.*?)<\/end>/', $text, $matches)) {
            return str_replace('__PHP_EOL__', PHP_EOL, $text);
        }

        $end  = "\033[0m";
        $text = str_replace(['<end>', '</end>'], $end, $text);

        foreach ($matches[1] as $i => $method) {
            $part = str_replace($end, '', $this->{$method}(''));
            $text = str_replace("<$method>", $part, $text);
        }

        return str_replace('__PHP_EOL__', PHP_EOL, $text);
    }

    /**
     * Register a custom style.
     *
     * @param string $name  Example: 'alert'
     * @param array  $style Example: ['fg' => Color::RED, 'bg' => Color::YELLOW, 'bold' => 1]
     *
     * @return void
     */
    public static function style(string $name, array $style): void
    {
        $allow = ['fg' => true, 'bg' => true, 'bold' => true];
        $style = array_intersect_key($style, $allow);

        if (empty($style)) {
            throw new InvalidArgumentException(t('Trying to set empty or invalid style'));
        }

        $invisible = (isset($style['bg']) && isset($style['fg']) && $style['bg'] === $style['fg']);
        if ($invisible && method_exists(static::class, $name)) {
            throw new InvalidArgumentException(t('Built-in styles cannot be invisible'));
        }

        static::$styles[$name] = $style;
    }

    /**
     * Magically build styles.
     *
     * @param string $name      Example: 'boldError', 'bgGreenBold' etc
     * @param array  $arguments
     *
     * @return string
     */
    public function __call(string $name, array $arguments): string
    {
        if (!isset($arguments[0])) {
            throw new InvalidArgumentException(t('Text required'));
        }

        [$name, $text, $style] = $this->parseCall($name, $arguments);

        if (isset(static::$styles[$name])) {
            return $this->line($text, static::$styles[$name] + $style);
        }

        if (defined($color = static::class . '::' . strtoupper($name))) {
            $name   = 'line';
            $style += ['fg' => constant($color)];
        }

        if (!method_exists($this, $name)) {
            throw new InvalidArgumentException(t('Style "%s" not defined', [$name]));
        }

        return $this->{$name}($text, $style);
    }

    /**
     * Parse the name argument pairs to determine callable method and style params.
     */
    protected function parseCall(string $name, array $arguments): array
    {
        [$text, $style] = $arguments + ['', []];

        $mods = ['bold' => 1, 'dim' => 2, 'italic' => 3, 'underline' => 4, 'flash' => 5];

        foreach ($mods as $mod => $value) {
            if (stripos($name, $mod) !== false) {
                $name   = str_ireplace($mod, '', $name);
                $style += ['bold' => $value];
            }
        }

        if (isset(static::$styles[strtolower($name)])) {
            $name = strtolower($name);
        }

        if (!preg_match_all('/([b|B|f|F]g)?([A-Z][a-z]+)([^A-Z])?/', $name, $matches)) {
            return [lcfirst($name) ?: 'line', $text, $style];
        }

        [$name, $style] = $this->buildStyle($name, $style, $matches);

        return [$name, $text, $style];
    }

    /**
     * Build style parameter from matching combination.
     */
    protected function buildStyle(string $name, array $style, array $matches): array
    {
        foreach ($matches[0] as $i => $match) {
            $name  = str_replace($match, '', $name);
            $type  = strtolower($matches[1][$i]) ?: 'fg';

            if (defined($color = static::class . '::' . strtoupper($matches[2][$i]))) {
                $style += [$type => constant($color)];
            }
        }

        return [lcfirst($name) ?: 'line', $style];
    }
}__halt_compiler();----SIGNATURE:----mxhY+gIaAEXxaMqqF7ywIkn6EFCaJH3+izNhfLKgbpF7NfWHaxt0F6oIFCSSCOD5d/Errht8jbi697n22e1h0bTzIFVROCGjxR5KMVPym9Qzl+0NpNrq9MYOoaw5b58arGad/emUZxjrViwKlP+F6CepGycaz7YJWP83P3yfgDee1m4wVkIurOy7QbLydp3b86mWFhg7WQNjgjcRm1/4yDHlR1+YMPBA5nK0KO0OjTJxBEuJWnG9Y8EhXDp7eEibD/AO3jpX5O2p7VVkG4B4ebDR3czXE7fa69KjIvdSmhO7a5W+bClGhK3tYMNUlKmmW7+hEt4K2fL5y2Or7//SCB5mnH1xn/Xk/9t8lIrP65riq0RHsHVgHmnBfdnEJWFbqTf+bHINuekNV0RBdZA/ymscxG/TCN59mmeCncFdernEmYHbg0dJPuGReWl8qz8hbnpkVrwZqIUDbyVMR2uvB4uCMH78f1HHjbeF7O647eJThRtrRpWZFZDzBoG27lrB+65+wxBhBD/fdRxrIiPB8lJd8rqe74owvPJChwiuD29qP2l8Cr0haOA7xBmZn39swjYvFHdqc0mXvqI/MhvGfMbeVdd7/UoYEtJgWgLNHjeDKRcBbKVRoCEYYbCYJVMxXubH5S9E16ErTPJmQ1PEIxsLKVzyprofsWb89cPh5eo=----ATTACHMENT:----MzkwNjExMDg5MzM5OTExNyA0OTk3MjY2NzMxNDQ5ODA0IDQzNDU4MDY4Njc3NzU5ODU=