Add support for the new binary installer in PEAR installer, fixes #5117
parent
a188db237b
commit
6a88d49ffb
|
@ -49,7 +49,7 @@ class BinaryInstaller
|
||||||
|
|
||||||
public function installBinaries(PackageInterface $package, $installPath)
|
public function installBinaries(PackageInterface $package, $installPath)
|
||||||
{
|
{
|
||||||
$binaries = $package->getBinaries();
|
$binaries = $this->getBinaries($package);
|
||||||
if (!$binaries) {
|
if (!$binaries) {
|
||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
|
@ -92,6 +92,35 @@ class BinaryInstaller
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
public function removeBinaries(PackageInterface $package)
|
||||||
|
{
|
||||||
|
$this->initializeBinDir();
|
||||||
|
|
||||||
|
$binaries = $this->getBinaries($package);
|
||||||
|
if (!$binaries) {
|
||||||
|
return;
|
||||||
|
}
|
||||||
|
foreach ($binaries as $bin) {
|
||||||
|
$link = $this->binDir.'/'.basename($bin);
|
||||||
|
if (is_link($link) || file_exists($link)) {
|
||||||
|
$this->filesystem->unlink($link);
|
||||||
|
}
|
||||||
|
if (file_exists($link.'.bat')) {
|
||||||
|
$this->filesystem->unlink($link.'.bat');
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
// attempt removing the bin dir in case it is left empty
|
||||||
|
if ((is_dir($this->binDir)) && ($this->filesystem->isDirEmpty($this->binDir))) {
|
||||||
|
Silencer::call('rmdir', $this->binDir);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
protected function getBinaries(PackageInterface $package)
|
||||||
|
{
|
||||||
|
return $package->getBinaries();
|
||||||
|
}
|
||||||
|
|
||||||
protected function installFullBinaries($binPath, $link, $bin, PackageInterface $package)
|
protected function installFullBinaries($binPath, $link, $bin, PackageInterface $package)
|
||||||
{
|
{
|
||||||
// add unixy support for cygwin and similar environments
|
// add unixy support for cygwin and similar environments
|
||||||
|
@ -120,28 +149,6 @@ class BinaryInstaller
|
||||||
file_put_contents($link, $this->generateUnixyProxyCode($binPath, $link));
|
file_put_contents($link, $this->generateUnixyProxyCode($binPath, $link));
|
||||||
}
|
}
|
||||||
|
|
||||||
public function removeBinaries(PackageInterface $package)
|
|
||||||
{
|
|
||||||
$binaries = $package->getBinaries();
|
|
||||||
if (!$binaries) {
|
|
||||||
return;
|
|
||||||
}
|
|
||||||
foreach ($binaries as $bin) {
|
|
||||||
$link = $this->binDir.'/'.basename($bin);
|
|
||||||
if (is_link($link) || file_exists($link)) {
|
|
||||||
$this->filesystem->unlink($link);
|
|
||||||
}
|
|
||||||
if (file_exists($link.'.bat')) {
|
|
||||||
$this->filesystem->unlink($link.'.bat');
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
// attempt removing the bin dir in case it is left empty
|
|
||||||
if ((is_dir($this->binDir)) && ($this->filesystem->isDirEmpty($this->binDir))) {
|
|
||||||
Silencer::call('rmdir', $this->binDir);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
protected function initializeBinDir()
|
protected function initializeBinDir()
|
||||||
{
|
{
|
||||||
$this->filesystem->ensureDirectoryExists($this->binDir);
|
$this->filesystem->ensureDirectoryExists($this->binDir);
|
||||||
|
|
|
@ -0,0 +1,142 @@
|
||||||
|
<?php
|
||||||
|
|
||||||
|
/*
|
||||||
|
* This file is part of Composer.
|
||||||
|
*
|
||||||
|
* (c) Nils Adermann <naderman@naderman.de>
|
||||||
|
* Jordi Boggiano <j.boggiano@seld.be>
|
||||||
|
*
|
||||||
|
* For the full copyright and license information, please view the LICENSE
|
||||||
|
* file that was distributed with this source code.
|
||||||
|
*/
|
||||||
|
|
||||||
|
namespace Composer\Installer;
|
||||||
|
|
||||||
|
use Composer\IO\IOInterface;
|
||||||
|
use Composer\Package\PackageInterface;
|
||||||
|
use Composer\Util\Filesystem;
|
||||||
|
use Composer\Util\Platform;
|
||||||
|
use Composer\Util\ProcessExecutor;
|
||||||
|
use Composer\Util\Silencer;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* Utility to handle installation of package "bin"/binaries for PEAR packages
|
||||||
|
*
|
||||||
|
* @author Jordi Boggiano <j.boggiano@seld.be>
|
||||||
|
*/
|
||||||
|
class PearBinaryInstaller extends BinaryInstaller
|
||||||
|
{
|
||||||
|
private $installer;
|
||||||
|
|
||||||
|
/**
|
||||||
|
* @param IOInterface $io
|
||||||
|
* @param string $binDir
|
||||||
|
* @param string $binCompat
|
||||||
|
* @param Filesystem $filesystem
|
||||||
|
*/
|
||||||
|
public function __construct(IOInterface $io, $binDir, $binCompat, Filesystem $filesystem, PearInstaller $installer)
|
||||||
|
{
|
||||||
|
parent::__construct($io, $binDir, $binCompat, $filesystem);
|
||||||
|
$this->installer = $installer;
|
||||||
|
}
|
||||||
|
|
||||||
|
protected function getBinaries(PackageInterface $package)
|
||||||
|
{
|
||||||
|
$binariesPath = $this->installer->getInstallPath($package) . '/bin/';
|
||||||
|
$binaries = array();
|
||||||
|
if (file_exists($binariesPath)) {
|
||||||
|
foreach (new \FilesystemIterator($binariesPath, \FilesystemIterator::KEY_AS_FILENAME | \FilesystemIterator::CURRENT_AS_FILEINFO) as $fileName => $value) {
|
||||||
|
if (!$value->isDir()) {
|
||||||
|
$binaries[] = 'bin/'.$fileName;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return $binaries;
|
||||||
|
}
|
||||||
|
|
||||||
|
protected function initializeBinDir()
|
||||||
|
{
|
||||||
|
parent::initializeBinDir();
|
||||||
|
file_put_contents($this->binDir.'/composer-php', $this->generateUnixyPhpProxyCode());
|
||||||
|
@chmod($this->binDir.'/composer-php', 0777);
|
||||||
|
file_put_contents($this->binDir.'/composer-php.bat', $this->generateWindowsPhpProxyCode());
|
||||||
|
@chmod($this->binDir.'/composer-php.bat', 0777);
|
||||||
|
}
|
||||||
|
|
||||||
|
protected function generateWindowsProxyCode($bin, $link)
|
||||||
|
{
|
||||||
|
$binPath = $this->filesystem->findShortestPath($link, $bin);
|
||||||
|
if ('.bat' === substr($bin, -4)) {
|
||||||
|
$caller = 'call';
|
||||||
|
} else {
|
||||||
|
$handle = fopen($bin, 'r');
|
||||||
|
$line = fgets($handle);
|
||||||
|
fclose($handle);
|
||||||
|
if (preg_match('{^#!/(?:usr/bin/env )?(?:[^/]+/)*(.+)$}m', $line, $match)) {
|
||||||
|
$caller = trim($match[1]);
|
||||||
|
} else {
|
||||||
|
$caller = 'php';
|
||||||
|
}
|
||||||
|
|
||||||
|
if ($caller === 'php') {
|
||||||
|
return "@echo off\r\n".
|
||||||
|
"pushd .\r\n".
|
||||||
|
"cd %~dp0\r\n".
|
||||||
|
"set PHP_PROXY=%CD%\\composer-php.bat\r\n".
|
||||||
|
"cd ".ProcessExecutor::escape(dirname($binPath))."\r\n".
|
||||||
|
"set BIN_TARGET=%CD%\\".basename($binPath)."\r\n".
|
||||||
|
"popd\r\n".
|
||||||
|
"%PHP_PROXY% \"%BIN_TARGET%\" %*\r\n";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
return "@echo off\r\n".
|
||||||
|
"pushd .\r\n".
|
||||||
|
"cd %~dp0\r\n".
|
||||||
|
"cd ".ProcessExecutor::escape(dirname($binPath))."\r\n".
|
||||||
|
"set BIN_TARGET=%CD%\\".basename($binPath)."\r\n".
|
||||||
|
"popd\r\n".
|
||||||
|
$caller." \"%BIN_TARGET%\" %*\r\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
private function generateWindowsPhpProxyCode()
|
||||||
|
{
|
||||||
|
$binToVendor = $this->filesystem->findShortestPath($this->binDir, $this->vendorDir, true);
|
||||||
|
|
||||||
|
return
|
||||||
|
"@echo off\r\n" .
|
||||||
|
"setlocal enabledelayedexpansion\r\n" .
|
||||||
|
"set BIN_DIR=%~dp0\r\n" .
|
||||||
|
"set VENDOR_DIR=%BIN_DIR%\\".$binToVendor."\r\n" .
|
||||||
|
"set DIRS=.\r\n" .
|
||||||
|
"FOR /D %%V IN (%VENDOR_DIR%\\*) DO (\r\n" .
|
||||||
|
" FOR /D %%P IN (%%V\\*) DO (\r\n" .
|
||||||
|
" set DIRS=!DIRS!;%%~fP\r\n" .
|
||||||
|
" )\r\n" .
|
||||||
|
")\r\n" .
|
||||||
|
"php.exe -d include_path=!DIRS! %*\r\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
private function generateUnixyPhpProxyCode()
|
||||||
|
{
|
||||||
|
$binToVendor = $this->filesystem->findShortestPath($this->binDir, $this->vendorDir, true);
|
||||||
|
|
||||||
|
return
|
||||||
|
"#!/usr/bin/env sh\n".
|
||||||
|
"SRC_DIR=`pwd`\n".
|
||||||
|
"BIN_DIR=`dirname $0`\n".
|
||||||
|
"VENDOR_DIR=\$BIN_DIR/".escapeshellarg($binToVendor)."\n".
|
||||||
|
"DIRS=\"\"\n".
|
||||||
|
"for vendor in \$VENDOR_DIR/*; do\n".
|
||||||
|
" if [ -d \"\$vendor\" ]; then\n".
|
||||||
|
" for package in \$vendor/*; do\n".
|
||||||
|
" if [ -d \"\$package\" ]; then\n".
|
||||||
|
" DIRS=\"\${DIRS}:\${package}\"\n".
|
||||||
|
" fi\n".
|
||||||
|
" done\n".
|
||||||
|
" fi\n".
|
||||||
|
"done\n".
|
||||||
|
"php -d include_path=\".\$DIRS\" $@\n";
|
||||||
|
}
|
||||||
|
}
|
|
@ -19,6 +19,7 @@ use Composer\Repository\InstalledRepositoryInterface;
|
||||||
use Composer\Package\PackageInterface;
|
use Composer\Package\PackageInterface;
|
||||||
use Composer\Util\Platform;
|
use Composer\Util\Platform;
|
||||||
use Composer\Util\ProcessExecutor;
|
use Composer\Util\ProcessExecutor;
|
||||||
|
use Composer\Util\Filesystem;
|
||||||
|
|
||||||
/**
|
/**
|
||||||
* Package installation manager.
|
* Package installation manager.
|
||||||
|
@ -37,7 +38,10 @@ class PearInstaller extends LibraryInstaller
|
||||||
*/
|
*/
|
||||||
public function __construct(IOInterface $io, Composer $composer, $type = 'pear-library')
|
public function __construct(IOInterface $io, Composer $composer, $type = 'pear-library')
|
||||||
{
|
{
|
||||||
parent::__construct($io, $composer, $type);
|
$filesystem = new Filesystem();
|
||||||
|
$binaryInstaller = new PearBinaryInstaller($io, rtrim($composer->getConfig()->get('bin-dir'), '/'), $composer->getConfig()->get('bin-compat'), $filesystem, $this);
|
||||||
|
|
||||||
|
parent::__construct($io, $composer, $type, $filesystem, $binaryInstaller);
|
||||||
}
|
}
|
||||||
|
|
||||||
/**
|
/**
|
||||||
|
@ -52,7 +56,6 @@ class PearInstaller extends LibraryInstaller
|
||||||
protected function installCode(PackageInterface $package)
|
protected function installCode(PackageInterface $package)
|
||||||
{
|
{
|
||||||
parent::installCode($package);
|
parent::installCode($package);
|
||||||
parent::initializeBinDir();
|
|
||||||
|
|
||||||
$isWindows = Platform::isWindows();
|
$isWindows = Platform::isWindows();
|
||||||
$php_bin = $this->binDir . ($isWindows ? '/composer-php.bat' : '/composer-php');
|
$php_bin = $this->binDir . ($isWindows ? '/composer-php.bat' : '/composer-php');
|
||||||
|
@ -79,104 +82,4 @@ class PearInstaller extends LibraryInstaller
|
||||||
$this->io->writeError(' Cleaning up', true, IOInterface::VERBOSE);
|
$this->io->writeError(' Cleaning up', true, IOInterface::VERBOSE);
|
||||||
$this->filesystem->unlink($packageArchive);
|
$this->filesystem->unlink($packageArchive);
|
||||||
}
|
}
|
||||||
|
|
||||||
protected function getBinaries(PackageInterface $package)
|
|
||||||
{
|
|
||||||
$binariesPath = $this->getInstallPath($package) . '/bin/';
|
|
||||||
$binaries = array();
|
|
||||||
if (file_exists($binariesPath)) {
|
|
||||||
foreach (new \FilesystemIterator($binariesPath, \FilesystemIterator::KEY_AS_FILENAME | \FilesystemIterator::CURRENT_AS_FILEINFO) as $fileName => $value) {
|
|
||||||
if (!$value->isDir()) {
|
|
||||||
$binaries[] = 'bin/'.$fileName;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return $binaries;
|
|
||||||
}
|
|
||||||
|
|
||||||
protected function initializeBinDir()
|
|
||||||
{
|
|
||||||
parent::initializeBinDir();
|
|
||||||
file_put_contents($this->binDir.'/composer-php', $this->generateUnixyPhpProxyCode());
|
|
||||||
@chmod($this->binDir.'/composer-php', 0777);
|
|
||||||
file_put_contents($this->binDir.'/composer-php.bat', $this->generateWindowsPhpProxyCode());
|
|
||||||
@chmod($this->binDir.'/composer-php.bat', 0777);
|
|
||||||
}
|
|
||||||
|
|
||||||
protected function generateWindowsProxyCode($bin, $link)
|
|
||||||
{
|
|
||||||
$binPath = $this->filesystem->findShortestPath($link, $bin);
|
|
||||||
if ('.bat' === substr($bin, -4)) {
|
|
||||||
$caller = 'call';
|
|
||||||
} else {
|
|
||||||
$handle = fopen($bin, 'r');
|
|
||||||
$line = fgets($handle);
|
|
||||||
fclose($handle);
|
|
||||||
if (preg_match('{^#!/(?:usr/bin/env )?(?:[^/]+/)*(.+)$}m', $line, $match)) {
|
|
||||||
$caller = trim($match[1]);
|
|
||||||
} else {
|
|
||||||
$caller = 'php';
|
|
||||||
}
|
|
||||||
|
|
||||||
if ($caller === 'php') {
|
|
||||||
return "@echo off\r\n".
|
|
||||||
"pushd .\r\n".
|
|
||||||
"cd %~dp0\r\n".
|
|
||||||
"set PHP_PROXY=%CD%\\composer-php.bat\r\n".
|
|
||||||
"cd ".ProcessExecutor::escape(dirname($binPath))."\r\n".
|
|
||||||
"set BIN_TARGET=%CD%\\".basename($binPath)."\r\n".
|
|
||||||
"popd\r\n".
|
|
||||||
"%PHP_PROXY% \"%BIN_TARGET%\" %*\r\n";
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
return "@echo off\r\n".
|
|
||||||
"pushd .\r\n".
|
|
||||||
"cd %~dp0\r\n".
|
|
||||||
"cd ".ProcessExecutor::escape(dirname($binPath))."\r\n".
|
|
||||||
"set BIN_TARGET=%CD%\\".basename($binPath)."\r\n".
|
|
||||||
"popd\r\n".
|
|
||||||
$caller." \"%BIN_TARGET%\" %*\r\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
private function generateWindowsPhpProxyCode()
|
|
||||||
{
|
|
||||||
$binToVendor = $this->filesystem->findShortestPath($this->binDir, $this->vendorDir, true);
|
|
||||||
|
|
||||||
return
|
|
||||||
"@echo off\r\n" .
|
|
||||||
"setlocal enabledelayedexpansion\r\n" .
|
|
||||||
"set BIN_DIR=%~dp0\r\n" .
|
|
||||||
"set VENDOR_DIR=%BIN_DIR%\\".$binToVendor."\r\n" .
|
|
||||||
"set DIRS=.\r\n" .
|
|
||||||
"FOR /D %%V IN (%VENDOR_DIR%\\*) DO (\r\n" .
|
|
||||||
" FOR /D %%P IN (%%V\\*) DO (\r\n" .
|
|
||||||
" set DIRS=!DIRS!;%%~fP\r\n" .
|
|
||||||
" )\r\n" .
|
|
||||||
")\r\n" .
|
|
||||||
"php.exe -d include_path=!DIRS! %*\r\n";
|
|
||||||
}
|
|
||||||
|
|
||||||
private function generateUnixyPhpProxyCode()
|
|
||||||
{
|
|
||||||
$binToVendor = $this->filesystem->findShortestPath($this->binDir, $this->vendorDir, true);
|
|
||||||
|
|
||||||
return
|
|
||||||
"#!/usr/bin/env sh\n".
|
|
||||||
"SRC_DIR=`pwd`\n".
|
|
||||||
"BIN_DIR=`dirname $0`\n".
|
|
||||||
"VENDOR_DIR=\$BIN_DIR/".escapeshellarg($binToVendor)."\n".
|
|
||||||
"DIRS=\"\"\n".
|
|
||||||
"for vendor in \$VENDOR_DIR/*; do\n".
|
|
||||||
" if [ -d \"\$vendor\" ]; then\n".
|
|
||||||
" for package in \$vendor/*; do\n".
|
|
||||||
" if [ -d \"\$package\" ]; then\n".
|
|
||||||
" DIRS=\"\${DIRS}:\${package}\"\n".
|
|
||||||
" fi\n".
|
|
||||||
" done\n".
|
|
||||||
" fi\n".
|
|
||||||
"done\n".
|
|
||||||
"php -d include_path=\".\$DIRS\" $@\n";
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue