| Server IP : 79.136.114.73 / Your IP : 18.224.37.168 Web Server : Apache/2.4.7 (Ubuntu) PHP/5.5.9-1ubuntu4.29 OpenSSL/1.0.1f System : Linux b8009 3.13.0-170-generic #220-Ubuntu SMP Thu May 9 12:40:49 UTC 2019 x86_64 User : www-data ( 33) PHP Version : 5.5.9-1ubuntu4.29 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority, MySQL : ON | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/bin/ |
Upload File : |
#!/usr/bin/perl -w
=head1 NAME
dh_phpcomposer - calculates PHP Composer substvars
=head1 SYNOPSIS
B<dh_phpcomposer> [S<I<debhelper options>>]
=head1 DESCRIPTION
B<dh_phpcomposer> is a debhelper program that is responsible for generating
the B<${phpcomposer:*}> substitutions and adding them to substvars files.
The program will look for F<composer.json> file in your package root,
and will use this information to generate:
This feature requires pkg-php-tools (>= 1.7~).
=over 2
=item *
B<${phpcomposer:name}> and B<${phpcomposer:description}>
=item *
B<${phpcomposer:Debian-require}>, B<${phpcomposer:Debian-require-dev}>,
B<${phpcomposer:Debian-conflict}>, B<${phpcomposer:Debian-replace}>,
B<${phpcomposer:Debian-provide}> and B<${phpcomposer:Debian-suggest}>
=back
Those variables will be substituted into your package's F<control>
file wherever you place the token B<${phpcomposer:*}>.
=head1 FILES
=over 4
=item debian/pkg-php-tools-overrides
Package that don't want to follow automatic Composer package name to Debian package
name conversion can override the conversion by creating this file.
More information is available L<dh_phppear(1)>
=back
=cut
use strict;
use Config;
use Debian::Debhelper::Dh_Lib;
use Text::Wrap;
sub _shell_exec {
my $command=shift;
my $output = `$command`;
if ($? == -1) {
error("$command failed to execute: $!");
}
elsif ($? & 127) {
error("$command died with signal ".($? & 127));
}
elsif ($? != 0) {
error("$command returned exit code ".($? >> 8));
}
return $output;
}
init();
foreach my $package (@{$dh{DOPACKAGES}}) {
if (-e "composer.json") {
my $substvars = _shell_exec('/usr/share/pkg-php-tools/scripts/phppkginfo -d composer_substvars .');
for (split /^/, $substvars) {
if (/^([\w-]+):\s*(.*)$/) {
if ($1 eq 'description') {
local($Text::Wrap::separator) = '${Newline}';
# Wrap and replace empty lines with a dot
my $description = join('${Newline}.${Newline}', split('${Newline}${Newline}', wrap("", "", $2)));
addsubstvar($package, "phpcomposer:description", $description);
} else {
addsubstvar($package, "phpcomposer:".$1, $2);
}
} else {
warning("Malformed line: $_");
}
}
}
}
=head1 CONFORMS TO
Debian policy, version 3.9.4
PHP PEAR policy, version yet-to-be-written
=head1 SEE ALSO
F</usr/share/doc/pkg-php-tools/README.Composer>, L<pkg-php-tools(7)>
L<debhelper(7)> (Note: This program is not part of debhelper)
=head1 AUTHOR
Mathieu Parent <sathieu@debian.org>