#!/usr/bin/env php
<?php
/**
 * Fedora Drupal 8 RPM find requires.
 *
 * Copyright (c) 2016-2019 Shawn Iwinski <shawn@iwin.ski>
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 * SOFTWARE.
 *
 * @copyright Copyright (c) 2016-2019, Shawn Iwinski <shawn@iwin.ski>
 * @license http://opensource.org/licenses/MIT MIT
 */
namespace FedoraDrupal8Rpmbuild;

require_once '__PHPDIR__/Symfony3/Component/Console/autoload.php';
require_once '__PHPDIR__/Symfony3/Component/Yaml/autoload.php';

use Symfony\Component\Console\Application;
use Symfony\Component\Console\Command\Command;
use Symfony\Component\Console\Input\InputInterface;
use Symfony\Component\Console\Input\InputOption;
use Symfony\Component\Console\Output\OutputInterface;
use Symfony\Component\Yaml\Yaml;

/**
 * Outputs Drupal 8 requires from file provided via STDIN.
 */
class FindRequires extends Command
{
    const PHP_MIN_VER = '__DRUPAL8_PHP_MIN_VER__';

    /**
     * Configures command.
     */
    protected function configure()
    {
        $this
            ->setName('find-requires')
            ->setDescription('Finds RPM requires')
            // --drupal8-project
            ->addOption(
                'drupal8-project',
                null,
                InputOption::VALUE_REQUIRED,
                'Drupal 8 project name (i.e. https://www.drupal.org/project/<info>DRUPAL8-PROJECT</info>)'
            );
    }

    /**
     * Outputs Drupal 8 requires from file provided via STDIN.
     *
     * Starts with "drupal8(core)" and adds {@link executeDrupal8()}.
     *
     * @param InputInterface  $input  An InputInterface instance.
     * @param OutputInterface $output An OutputInterface instance.
     */
    protected function execute(InputInterface $input, OutputInterface $output)
    {
        $requires = ['drupal8(core)'];

        $file = trim(fgets(STDIN));
        if (!empty($file) && is_file($file)) {
            $drupal8Requires = $this->executeDrupal8($input, $output, $file);
            if (!empty($drupal8Requires)) {
                if (is_array($drupal8Requires)) {
                    $requires = array_merge($requires, $drupal8Requires);
                } else {
                    $requires[] = $drupal8Requires;
                }
            }
        }

        foreach ($requires as $r) {
            $output->writeln($r);
        }
    }

    /**
     * Returns requires from a Drupal project's main *.info.yml file.
     *
     * @param InputInterface  $input  An InputInterface instance.
     * @param OutputInterface $output An OutputInterface instance.
     * @param string          $file   A file name (full path).
     *
     * @return string|null Requires or null
     */
    private function executeDrupal8(InputInterface $input, OutputInterface $output, $file)
    {
        $drupalProject = $input->getOption('drupal8-project');
        if (empty($drupalProject)) {
            return;
        }

        $drupalProjectFilename = sprintf(
            '/%s/%s.info.yml',
            $drupalProject,
            $drupalProject
        );

        if (!preg_match('/'.preg_quote($drupalProjectFilename, '/').'$/', $file)) {
            return;
        }

        $info = Yaml::parse(file_get_contents($file));

        if (!empty($info['hidden']) || empty($info['dependencies'])) {
            return;
        }

        $requires = [];

        foreach ($info['dependencies'] as $dependency) {
            // See https://www.drupal.org/node/2299747
            $matches = [];
            if (preg_match('/^([^:]+:)?(\S+)\s*(\(([<>]?=?)\s*([^\)]+)\))?/', $dependency, $matches)) {
                // Matches example "project:module (>=version)":
                //     [0] => project:module (>=version)
                //     [1] => project:
                //     [2] => module
                //     [3] => (>=version)
                //     [4] => >=
                //     [5] => version

                // Dependency with version constraint
                if (!empty($matches[4]) && !empty($matches[5])) {
                    // PHP language dependency?
                    if ('php' == $matches[2]) {
                        // Greater version dependency than Drupal 8's min?
                        if (version_compare($matches[5], static::PHP_MIN_VER, '>')) {
                            $requires[] = sprintf('php(language) %s %s', $matches[4], $matches[5]);
                        }
                    // Non-PHP language dependency
                    } else {
                        $requires[] = sprintf('php-composer(packages.drupal.org/%s) %s %s', $matches[2], $matches[4], $matches[5]);
                    }
                // Dependency without version constraint
                } elseif ('php' != $matches[2]) {
                    $requires[] = sprintf('php-composer(packages.drupal.org/%s)', $matches[2]);
                }
            }
        }

        return $requires;
    }
}

// Create application, add command, and run
$application = new Application('Fedora Drupal 8 RPM find requires', '__SPEC_VERSION__-__SPEC_RELEASE__');
$application->add(new FindRequires());
$application->run();