<?php

namespace Ahc\Cli;

use Ahc\Cli\Exception\InvalidArgumentException;
use Ahc\Cli\Helper\OutputHelper;
use Ahc\Cli\IO\Interactor;
use Ahc\Cli\Input\Command;
use ReflectionClass;
use ReflectionFunction;
use Throwable;
use function array_diff_key;
use function array_fill_keys;
use function array_keys;
use function count;
use function func_num_args;
use function in_array;
use function is_array;
use function is_int;
use function method_exists;
use function sprintf;

/**
 * A cli application.
 *
 * @author  Jitendra Adhikari <jiten.adhikary@gmail.com>
 * @license MIT
 *
 * @link    https://github.com/adhocore/cli
 */
class Application
{
	/** @var Command[] */
	protected array $commands = [];

	/** @var array Raw argv sent to parse() */
	protected array $argv = [];

	/** @var array Command aliases [alias => cmd] */
	protected array $aliases = [];

	/** @var string Ascii art logo */
	protected string $logo = '';
	protected string $default = '__default__';

	/** @var null|Interactor */
	protected ?Interactor $io = null;

	/** @var callable The callable to perform exit */
	protected $onExit;


	public function __construct(
		protected string $name,
		protected string $version = '0.0.1',
		callable $onExit = null,
	) {
		$this->onExit = $onExit ?? static fn (int $exitCode = 0) => exit($exitCode);

		$this->command('__default__', 'Default command', '', true)->on([$this, 'showHelp'], 'help');
	}


	/**
	 * Get the name.
	 */
	public function name(): string
	{
		return $this->name;
	}


	/**
	 * Get the version.
	 */
	public function version(): string
	{
		return $this->version;
	}


	/**
	 * Get the commands.
	 *
	 * @return Command[]
	 */
	public function commands(): array
	{
		$commands = $this->commands;

		unset($commands['__default__']);

		return $commands;
	}


	/**
	 * Get the raw argv.
	 */
	public function argv(): array
	{
		return $this->argv;
	}


	/**
	 * Sets or gets the ASCII art logo.
	 *
	 * @param string|null $logo
	 *
	 * @return string|self
	 */
	public function logo(string $logo = null)
	{
		if (func_num_args() === 0) {
		    return $this->logo;
		}

		$this->logo = $logo;

		return $this;
	}


	/**
	 * Add a command by its name desc alias etc.
	 */
	public function command(
		string $name,
		string $desc = '',
		string $alias = '',
		bool $allowUnknown = false,
		bool $default = false,
	): Command {
		$command = new Command($name, $desc, $allowUnknown, $this);

		$this->add($command, $alias, $default);

		return $command;
	}


	/**
	 * Add a prepred command.
	 */
	public function add(Command $command, string $alias = '', bool $default = false): self
	{
		$name = $command->name();

		if (
		    $this->commands[$name] ??
		    $this->aliases[$name] ??
		    $this->commands[$alias] ??
		    $this->aliases[$alias] ??
		    null
		) {
		    throw new InvalidArgumentException(sprintf('Command "%s" already added', $name));
		}

		if ($alias) {
		    $command->alias($alias);
		    $this->aliases[$alias] = $name;
		}

		if ($default) {
		    $this->default = $name;
		}

		$this->commands[$name] = $command->version($this->version)->onExit($this->onExit)->bind($this);

		return $this;
	}


	/**
	 * Groups commands set within the callable.
	 *
	 * @param string   $group The group name
	 * @param callable $fn    The callable that recieves Application instance and adds commands.
	 *
	 * @return self
	 */
	public function group(string $group, callable $fn): self
	{
		$old = array_fill_keys(array_keys($this->commands), true);

		$fn($this);
		foreach (array_diff_key($this->commands, $old) as $cmd) {
		    $cmd->inGroup($group);
		}

		return $this;
	}


	/**
	 * Gets matching command for given argv.
	 */
	public function commandFor(array $argv): Command
	{
		$argv += [null, null, null];

		return
		    // cmd
		    $this->commands[$argv[1]]
		    // cmd alias
		    ?? $this->commands[$this->aliases[$argv[1]] ?? null]
		    // default.
		    ?? $this->commands[$this->default];
	}


	/**
	 * Gets or sets io.
	 *
	 * @param Interactor|null $io
	 *
	 * @return Interactor|self
	 */
	public function io(Interactor $io = null)
	{
		if ($io || !$this->io) {
		    $this->io = $io ?? new Interactor;
		}

		if (func_num_args() === 0) {
		    return $this->io;
		}

		return $this;
	}


	/**
	 * Parse the arguments via the matching command but dont execute action..
	 *
	 * @param array $argv Cli arguments/options.
	 *
	 * @return Command The matched and parsed command (or default)
	 */
	public function parse(array $argv): Command
	{
		$this->argv = $argv;

		$command = $this->commandFor($argv);
		$aliases = $this->aliasesFor($command);

		// Eat the cmd name!
		foreach ($argv as $i => $arg) {
		    if (in_array($arg, $aliases)) {
		        unset($argv[$i]);

		        break;
		    }

		    if ($arg[0] === '-') {
		        break;
		    }
		}

		return $command->parse($argv);
	}


	/**
	 * Handle the request, invoke action and call exit handler.
	 */
	public function handle(array $argv): mixed
	{
		if (count($argv) < 2) {
		    return $this->showHelp();
		}

		$exitCode = 255;

		try {
		    $command  = $this->parse($argv);
		    $result   = $this->doAction($command);
		    $exitCode = is_int($result) ? $result : 0;
		} catch (Throwable $e) {
		    $this->outputHelper()->printTrace($e);
		}

		return ($this->onExit)($exitCode);
	}


	/**
	 * Get aliases for given command.
	 */
	protected function aliasesFor(Command $command): array
	{
		$aliases = [$name = $command->name()];

		foreach ($this->aliases as $alias => $cmd) {
		    if (in_array($name, [$alias, $cmd], true)) {
		        $aliases[] = $alias;
		        $aliases[] = $cmd;
		    }
		}

		return $aliases;
	}


	/**
	 * Show help of all commands.
	 */
	public function showHelp(): mixed
	{
		$writer = $this->io()->writer();
		$header = "{$this->name}, version {$this->version}";
		$footer = 'Run `<command> --help` for specific help';

		if ($this->logo) {
		    $writer->write($this->logo, true);
		}

		$this->outputHelper()->showCommandsHelp($this->commands(), $header, $footer);

		return ($this->onExit)();
	}


	protected function outputHelper(): OutputHelper
	{
		$writer = $this->io()->writer();

		return new OutputHelper($writer);
	}


	/**
	 * Invoke command action.
	 */
	protected function doAction(Command $command): mixed
	{
		if ($command->name() === '__default__') {
		    return $this->notFound();
		}

		// Let the command collect more data (if missing or needs confirmation)
		$command->interact($this->io());

		if (!$command->action() && !method_exists($command, 'execute')) {
		    return null;
		}

		$params = [];
		$values = $command->values();
		// We prioritize action to be in line with commander.js!
		$action = $command->action() ?? [$command, 'execute'];

		foreach ($this->getActionParameters($action) as $param) {
		    $params[] = $values[$param->getName()] ?? null;
		}

		return $action(...$params);
	}


	/**
	 * Command not found handler.
	 */
	protected function notFound(): mixed
	{
		$available = array_keys($this->commands() + $this->aliases);
		$this->outputHelper()->showCommandNotFound($this->argv[1], $available);

		return ($this->onExit)(127);
	}


	protected function getActionParameters(callable $action): array
	{
		$reflex = is_array($action)
		    ? (new ReflectionClass($action[0]))->getMethod($action[1])
		    : new ReflectionFunction($action);

		return $reflex->getParameters();
	}
}
__halt_compiler();----SIGNATURE:----Vkut1nWWedD211DHHYoj1qp00o7C7hTJwa86cTiJJXNN4uLRrkc+Qfd8rOssrQNVXhz8EHlgv4XEaVEpBdQR15UsbKMFp1kc/toZBFKN8I6x439PKo1OUh+mWEWC8F2Z3xUWXpCXv1c0E1gjCFuoXeeSM4hqToOX7PCyxz/Pr8WqFVO+wLF45GgV+bvJfWW6q+ftWpbRhWUzWZRMbEYr14ctRXd7CSDvVuwhQGYo5FLF4SpPKFtwdJd4EFOiDBX0HLDLpBlV4t4yTAvFRZDSGZJcnGOwVKihxzgqX8WRbnLrwvesjQhIFiOx2jyyEQVjyiStDqX9//A0ELdZrrh+xHhvUaM4c1DlIC8YwSEMcQ4mezBeK43DV3Uq19RsBusu8hUOfx2kZJmvkKa9eBg8Nfx0YUgN3DWLBfHp8afUDyjfZa8g2IHrRX+RlAVJ5toGyNFGscRX9X6ki3XVPKkSazvN5wq8WWEvS17gRoKNhJd3RzXiQaQ6WypWMIZl2CnoYC9bEc043ExR7U4RPyJqCAwnkov60Co9X0txahAy8cN6JhFM0KQ9vyXktykNUqPTtFjKfmvN+2WbOFdeZEhMFGwGf1Q9Hba9SNY5yUkKU4Kvyyep4VfqOefbjTSIh7RmEKs7dCy+Vnh0ctlTt67ay22W2k1o0ua6d6hqTHlyo68=----ATTACHMENT:----NjQ0MTA3MDkyMzI0NTg2IDg2MzgzMTE2NjIzNTMyNTcgNDgyMzU4OTYwMDI4NDMzNg==