AnonSec Shell

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

Server IP : 31.31.79.131 / Your IP : 172.18.0.1 [ Reverse IP ]
Web Server : Apache/2.4.38 (Debian)
System : Linux a1822d00732a 4.15.0-39-generic #42-Ubuntu SMP Tue Oct 23 15:48:01 UTC 2018 x86_64
User : www-data ( 33)
PHP Version : 7.1.33
Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,
Domains : 0 Domains
MySQL : OFF | cURL : ON | WGET : OFF | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF
Directory : /usr/share/bug/apache2/

Upload File :

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

Current File : /usr/share/bug/apache2/script

#!/usr/bin/perl -w

use strict;
use Text::Wrap;
$Text::Wrap::columns = 70;

#open (my $out, ">&=3") or die "could not open FD 3\n";
open (my $out, ">&=0") or die "could not open FD 3\n";

our $AQUERY = 0;
our $PHP = 0;

if (-x "/usr/sbin/a2query")
{
	$AQUERY = "/usr/sbin/a2query";
}

if ($AQUERY)
{
		my $mpm = `$AQUERY -M`;
		chomp($mpm);
		print $out "Enabled MPM: $mpm\n";
}


my @modules;
if ($AQUERY)
{
	print $out "List of enabled modules:\n";
	@modules = `$AQUERY -m`;
}
else
{
	print $out "a2query is not available.\n";
	@modules = sort glob("/etc/apache2/mods-enabled/*.load");
	map { s{^/etc/apache2/mods-enabled/(.*)\.load$}{$1} } @modules;
	print $out "List of /etc/apache2/mods-enabled/*.load:\n";
}
if (! scalar @modules) {
	print $out "Could not determine module list\n";
}
else {
	my $missing;
	foreach my $m (@modules) {
                my ($m, @desc) = split(/\s+/, $m);
		if (-e "/etc/apache2/mods-available/$m.conf" and
		    ! -e "/etc/apache2/mods-enabled/$m.conf") {
			$m .= "*";
			$missing = 1;
		}
		if ($m =~ /^(php\d)/) {
			$PHP = $1;
		}
	}

	print $out wrap("  ", "  ", "@modules\n");

	print $out
	    wrap("  ", "   ", 
		"(A * means that the .conf file for that module is not " .
		"enabled in /etc/apache2/mods-enabled/)\n") 
	    if $missing;
}

if (defined $PHP) {
	my @exts = qx{egrep ^extension= /etc/$PHP/apache2/php.ini /etc/$PHP/apache2/conf.d/* 2>/dev/null};
	if (scalar @exts) {
		chomp @exts;
		@exts = grep { ! m{\.dpkg-(?:bak|dist):} } @exts;
		@exts = sort grep { s{^.*:extension=(\S+)\.\S+}{$1} } @exts;
		print $out "List of enabled $PHP extensions:\n";
		print $out wrap("  ", "  ", "@exts\n");
	}
}


if ($AQUERY)
{
		my @confs;
		print $out "List of enabled configurations:\n";
		@confs = `$AQUERY -c`;
		print $out wrap("  ", "  ", "@confs\n");
}

Anon7 - 2022
AnonSec Team