+++ /dev/null
-<?php
-/**
- * @file
- * Functions for the generate makefile command.
- */
-
-use Drush\Log\LogLevel;
-
-/**
- * Generate the actual contents of the .make file.
- */
-function _drush_make_generate_makefile_contents($projects, $libraries = array(), $core_version = NULL, $defaults = array()) {
- if (is_null($core_version)) {
- $core_version = drush_get_drupal_core_compatibility();
- }
-
- $header = array();
- $header[] = '; This file was auto-generated by drush make';
- $header['core'] = $core_version;
- $header['api'] = MAKE_API;
- $header[] = '';
- if (!empty($defaults)) {
- _drush_make_generate_defaults($defaults, $header);
- $header[] = '';
- }
- $header[] = '; Core';
-
- return _drush_make_generate_makefile_body($projects, $header) . _drush_make_generate_makefile_body($libraries);
-}
-
-function _drush_make_generate_makefile_body($projects, $output = array()) {
- $custom = FALSE;
- $previous_type = 'core';
- if (isset($projects)) {
- foreach ($projects as $name => $project) {
- $type = (isset($project['type']) && ($project['type'] == 'library')) ? 'libraries' : 'projects';
- if ($previous_type != $project['_type']) {
- $previous_type = $project['_type'];
- $output[] = '; ' . ucfirst($previous_type) . 's';
- }
- unset($project['_type']);
- if (!$project && is_string($name)) {
- $output[] = $type . '[] = "' . $name . '"';
- continue;
- }
- $base = $type . '[' . $name . ']';
- if (isset($project['custom_download'])) {
- $custom = TRUE;
- $output[] = '; Please fill the following out. Type may be one of get, git, bzr or svn,';
- $output[] = '; and url is the url of the download.';
- $output[$base . '[download][type]'] = '""';
- $output[$base . '[download][url]'] = '""';
- unset($project['custom_download']);
- }
-
- $output = array_merge($output, _drush_make_generate_lines($base, $project));
- $output[] = '';
- }
- }
- $string = '';
- foreach ($output as $k => $v) {
- if (!is_numeric($k)) {
- $string .= $k . ' = ' . $v;
- }
- else {
- $string .= $v;
- }
- $string .= "\n";
- }
- if ($custom) {
- drush_log(dt('Some of the properties in your makefile will have to be manually edited. Please do that now.'), LogLevel::WARNING);
- }
- return $string;
-}
-
-/**
- * Write a makefile based on data parsed from a previous makefile.
- *
- * @param $file
- * The path to the file to write our generated makefile to, or TRUE to
- * print to the terminal.
- * @param $makefile
- * A makefile on which to base our generated one.
- */
-function make_generate_from_makefile($file, $makefile) {
- if (!$info = make_parse_info_file($makefile)) {
- return drush_set_error('MAKE_GENERATE_FAILED_PARSE', dt('Failed to parse makefile :makefile.', array(':makefile' => $makefile)));
- }
- $projects = drush_get_option('DRUSH_MAKE_PROJECTS', FALSE);
- if ($projects === FALSE) {
- $projects = make_prepare_projects(FALSE, $info);
- if (isset($projects['contrib'])) {
- $projects = array_merge($projects['core'], $projects['contrib']);
- }
- }
-
- $defaults = isset($info['defaults']) ? $info['defaults'] : array();
- $core = current($projects);
- $core = $core['core'];
- foreach ($projects as $name => $project) {
- // If a specific revision was requested, do not set the version.
- if (!isset($project['revision'])) {
- $projects[$name]['version'] = isset($project['download']['full_version']) ? $project['download']['full_version'] : '';
- if ($project['type'] != 'core' && strpos($projects[$name]['version'], $project['core']) === 0) {
- $projects[$name]['version'] = substr($projects[$name]['version'], strlen($project['core'] . '-'));
- }
- }
- else {
- unset($projects[$name]['version']);
- }
- $projects[$name]['_type'] = $project['type'];
-
- if ($project['download']['type'] == 'git') {
- drush_make_resolve_git_refs($projects[$name]);
- }
-
- // Don't clutter the makefile with defaults
- if (is_array($defaults)) {
- foreach ($defaults as $type => $defs) {
- if ($type == 'projects') {
- foreach ($defs as $key => $value) {
- if (isset($project[$key]) && $project[$key] == $value) {
- unset($projects[$name][$key]);
- }
- }
- }
- }
- }
- if ($project['name'] == $name) {
- unset($projects[$name]['name']);
- }
- if ($project['type'] == 'module' && !isset($info[$name]['type'])) {
- unset($projects[$name]['type']); // Module is the default
- }
- if (!(isset($project['download']['type'])) || ($project['download']['type'] == 'pm')) {
- unset($projects[$name]['download']); // PM is the default
- }
- $ignore = array('build_path', 'contrib_destination', 'core', 'make_directory', 'l10n_url', 'download_type');
- foreach ($ignore as $key) {
- unset($projects[$name][$key]);
- }
-
- // Remove the location if it's the default.
- if ($projects[$name]['location'] == 'https://updates.drupal.org/release-history') {
- unset($projects[$name]['location']);
- }
-
- // Remove empty entries (e.g. 'directory_name')
- $projects[$name] = _make_generate_array_filter($projects[$name]);
- }
-
- $libraries = drush_get_option('DRUSH_MAKE_LIBRARIES', FALSE);
- if ($libraries === FALSE) {
- $libraries = isset($info['libraries']) ? $info['libraries'] : array();
- }
- if (is_array($libraries)) {
- foreach ($libraries as $name => $library) {
- $libraries[$name]['type'] = 'library';
- $libraries[$name]['_type'] = 'librarie';
-
- if ($library['download']['type'] == 'git') {
- drush_make_resolve_git_refs($libraries[$name]);
- }
- }
- }
-
- $contents = make_generate_makefile_contents($projects, $libraries, $core, $defaults);
-
- // Write or print our makefile.
- $file = $file !== TRUE ? $file : NULL;
- make_generate_print($contents, $file);
-}
-
-/**
- * Resolve branches and revisions for git-based projects.
- */
-function drush_make_resolve_git_refs(&$project) {
- if (!isset($project['download']['branch'])) {
- $project['download']['branch'] = drush_make_resolve_git_branch($project);
- }
- if (!isset($project['download']['revision'])) {
- $project['download']['revision'] = drush_make_resolve_git_revision($project);
- }
-}
-
-/**
- * Resolve branch for a git-based project.
- */
-function drush_make_resolve_git_branch($project) {
- drush_log(dt('Resolving default branch for repo at: :repo', array(':repo' => $project['download']['url'])));
- if (drush_shell_exec("git ls-remote %s HEAD", $project['download']['url'])) {
- $head_output = drush_shell_exec_output();
- list($head_commit) = explode("\t", $head_output[0]);
-
- drush_log(dt('Scanning branches in repo at: :repo', array(':repo' => $project['download']['url'])));
- drush_shell_exec("git ls-remote --heads %s", $project['download']['url']);
- $heads_output = drush_shell_exec_output();
- $branches = array();
- foreach ($heads_output as $key => $head) {
- list($commit, $ref) = explode("\t", $head);
- $branches[$commit] = explode("/", $ref)[2];
- }
-
- $branch = $branches[$head_commit];
- drush_log(dt('Resolved git branch to: :branch', array(':branch' => $branch)));
- return $branch;
- }
- else {
- drush_log(dt('Could not resolve branch for `:project` using git repo at :repo', array(':project' => $project['name'], ':repo' => $project['download']['url'])), 'warning');
- }
-}
-
-/**
- * Resolve revision for a git-based project.
- */
-function drush_make_resolve_git_revision($project) {
- drush_log(dt('Resolving head commit on `:branch` branch for repo at: :repo', array(':branch' => $project['download']['branch'], ':repo' => $project['download']['url'])));
- if (drush_shell_exec("git ls-remote %s %s", $project['download']['url'], $project['download']['branch'])) {
- $head_output = drush_shell_exec_output();
- list($revision) = explode("\t", $head_output[0]);
- drush_log(dt('Resolved git revision to: :revision', array(':revision' => $revision)));
- return $revision;
- }
- else {
- drush_log(dt('Could not resolve head commit for `:project` using git repo at :repo', array(':project' => $project['name'], ':repo' => $project['download']['url'])), 'warning');
- }
-}
-
-/**
- * Generate makefile contents in the appropriate format.
- */
-function make_generate_makefile_contents($projects, $libraries = array(), $core = NULL, $defaults = array()) {
- $format = drush_get_option('format', 'yaml');
- $func = "make_generate_makefile_contents_$format";
- if (function_exists($func)) {
- $contents = call_user_func($func, $projects, $libraries, $core, $defaults);
- }
- else {
- return drush_set_error('MAKE_UNKNOWN_OUTPUT_FORMAT', dt('Generating makefiles in the :format output format is not yet supported. Implement :func() to add such support.', array(':format' => $format, ':func' => $func)));
- }
- return $contents;
-}
-
-/**
- * Generate makefile contents in (legacy) INI format.
- */
-function make_generate_makefile_contents_ini($projects, $libraries, $core, $defaults) {
- return _drush_make_generate_makefile_contents($projects, $libraries, $core, $defaults);
-}
-
-/**
- * Generate makefile contents in YAML format.
- */
-function make_generate_makefile_contents_yaml($projects, $libraries, $core, $defaults) {
- $info = array(
- 'core' => $core,
- 'api' => MAKE_API,
- 'defaults' => $defaults,
- 'projects' => $projects,
- 'libraries' => $libraries,
- );
-
- $info = _make_generate_array_filter($info);
- $info = _make_generate_array_filter_key('_type', $info);
- $dumper = drush_load_engine('outputformat', 'yaml');
- $yaml = $dumper->format($info, array());
-
- return $yaml;
-}
-
-/**
- * Helper function to recursively remove empty values from an array (but not
- * '0'!).
- */
-function _make_generate_array_filter($haystack) {
- foreach ($haystack as $key => $value) {
- if (is_array($value)) {
- $haystack[$key] = _make_generate_array_filter($haystack[$key]);
- }
- if (empty($value) && $value !== '0') {
- unset($haystack[$key]);
- }
- }
- return $haystack;
-}
-
-/**
- * Helper function to recursively remove elements matching a specific key from an array.
- */
-function _make_generate_array_filter_key($needle, $haystack) {
- foreach ($haystack as $key => $value) {
- if ($key === $needle) {
- unset($haystack[$key]);
- }
- elseif (is_array($value)) {
- $haystack[$key] = _make_generate_array_filter_key($needle, $haystack[$key]);
- }
- }
- return $haystack;
-}
-
-/**
- * Print the generated makefile to the terminal, or write it to a file.
- *
- * @param $contents
- * The formatted contents of a makefile.
- * @param $file
- * (optional) The path to write the makefile.
- */
-function make_generate_print($contents, $file = NULL) {
- if (!$file) {
- drush_print($contents);
- }
- elseif (file_put_contents($file, $contents)) {
- drush_log(dt("Wrote .make file @file", array('@file' => $file)), LogLevel::OK);
- }
- else {
- make_error('FILE_ERROR', dt("Unable to write .make file !file", array('!file' => $file)));
- }
-}
-
-/**
- * Utility function to generate the line or lines for a key/value pair in the
- * make file.
- *
- * @param $base
- * The base for the configuration lines. Values will be appended to it as
- * [$key] = $value, or if value is an array itself it will expand into as many
- * lines as required.
- * @param $values
- * May be a single value or an array.
- * @return
- * An array of strings that represent lines for the make file.
- */
-function _drush_make_generate_lines($base, $values) {
- $output = array();
-
- if (is_array($values)) {
- foreach ($values as $key => $value) {
- $newbase = $base . '[' . $key . ']';
- $output = array_merge($output, _drush_make_generate_lines($newbase, $value));
- }
- }
- else {
- $output[$base] = '"' . $values . '"';
- }
-
- return $output;
-}
-
-function _drush_make_generate_defaults($defaults, &$output = array()) {
- $output[] = '; Defaults';
- foreach ($defaults as $name => $project) {
- $type = 'defaults';
- if (!$project && is_string($name)) {
- $output[] = $type . '[] = "' . $name . '"';
- continue;
- }
- $base = $type . '[' . $name . ']';
-
- $output = array_merge($output, _drush_make_generate_lines($base, $project));
- }
-}
-