From bfd4bb8ce681a6a75fc8b049d49281c9082c5072 Mon Sep 17 00:00:00 2001
From: Tomas Plesnik <plesnik@ics.muni.cz>
Date: Thu, 24 Apr 2014 13:43:06 +0200
Subject: [PATCH] zruseno zjistovani portu na kterem warden server bezi, kvuli
 nepresnostem => odstraneni kontroly superuzivatele

---
 src/warden-server/bin/getStatus.pl | 8 --------
 1 file changed, 8 deletions(-)

diff --git a/src/warden-server/bin/getStatus.pl b/src/warden-server/bin/getStatus.pl
index 24e1651..c7659aa 100755
--- a/src/warden-server/bin/getStatus.pl
+++ b/src/warden-server/bin/getStatus.pl
@@ -75,12 +75,6 @@ if ($script_version) {
   version;
 }
 
-# superuser controle
-my $UID = $<;
-if ($UID != 0) {
-  WardenCommon::errMsg("You must be root for running this script!");
-}
-
 # connect to DB
 my $dbh = WardenCommon::connectDB($WardenCommon::DB_NAME, $WardenCommon::DB_HOST, $WardenCommon::DB_USER, $WardenCommon::DB_PASS);
 
@@ -90,7 +84,6 @@ my $package_version 	= WardenCommon::trim(`cat /opt/warden-server/etc/package_ve
 my $version 		= substr($package_version, 14);
 my $hostname 		= WardenCommon::trim(`hostname -f`);
 my $ip_address 		= WardenCommon::trim(`hostname -i`);
-my $port		= WardenCommon::trim(`netstat -pln | grep apache | cut -f 4 -d ":"`);
 my ($syslog, $syslog_verbose);
 if ($WardenCommon::SYSLOG == 1) {
   $syslog = "enabled";
@@ -216,7 +209,6 @@ print "========================\n";
 print "SERVER_VERSION:\t\t$version\n";
 print "HOSTNAME:\t\t$hostname\n";
 print "IP_ADDRESS:\t\t$ip_address\n";
-print "PORT:\t\t\t$port\n";
 print "BASEDIR:\t\t$WardenCommon::BASEDIR\n";
 print "DB_NAME:\t\t$WardenCommon::DB_NAME\n";
 print "DB_USER:\t\t$WardenCommon::DB_USER\n";
-- 
GitLab