webadmin/bpfire
1
0
Fork 0
mirror of https://github.com/vincentmli/bpfire.git synced 2026-04-09 18:45:54 +02:00
Code Issues Packages Projects Releases Wiki Activity

Core Update 169: Drop entropy.cgi

Browse Source 
Since the kernel now always reports 256 bits of entropy to be available,
this CGI does not show any useful information anymore. To avoid
confusions, it will hereby be removed entirely.

Fixes: #12893
Signed-off-by: Peter Müller <peter.mueller@ipfire.org>
This commit is contained in:
Peter Müller
2022-06-29 20:28:38 +00:00
parent b55842c26a
commit 8000bc0a43
21 changed files with 252 additions and 266 deletions
Download Patch File Download Diff File Expand all files Collapse all files

95
html/cgi-bin/entropy.cgi
View File

@@ -1,95 +0,0 @@
#!/usr/bin/perl
###############################################################################
# #
# IPFire.org - A linux based firewall #
# Copyright (C) 2005-2010 IPFire Team #
# #
# This program is free software: you can redistribute it and/or modify #
# it under the terms of the GNU General Public License as published by #
# the Free Software Foundation, either version 3 of the License, or #
# (at your option) any later version. #
# #
# This program is distributed in the hope that it will be useful, #
# but WITHOUT ANY WARRANTY; without even the implied warranty of #
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the #
# GNU General Public License for more details. #
# #
# You should have received a copy of the GNU General Public License #
# along with this program. If not, see <http://www.gnu.org/licenses/>. #
# #
###############################################################################
use strict;
# enable only the following on debugging purpose
#use warnings;
#use CGI::Carp 'fatalsToBrowser';
require '/var/ipfire/general-functions.pl';
require "${General::swroot}/lang.pl";
require "${General::swroot}/header.pl";
require "${General::swroot}/graphs.pl";
&Header::showhttpheaders();
&Header::openpage($Lang::tr{'entropy'}, 1, '');
&Header::openbigbox('100%', 'left');
&Header::openbox('100%', 'center', $Lang::tr{'entropy'});
&Graphs::makegraphbox("entropy.cgi", "entropy", "day");
&Header::closebox();
# Check for hardware support.
my $message;
my $message_colour = $Header::colourred;
if (&has_rdrand()) {
$message = $Lang::tr{'system has rdrand'};
$message_colour = $Header::colourgreen;
}
my $rngd_status = "<td align='center' bgcolor='${Header::colourred}'><font color='white'><b>$Lang::tr{'stopped'}</b></font></td>";
if (&rngd_is_running()) {
$rngd_status = "<td align='center' bgcolor='${Header::colourgreen}'><font color='white'><b>$Lang::tr{'running'}</b></font></td>";
}
&Header::openbox('100%', 'center', $Lang::tr{'hardware support'});
if ($message) {
print <<EOF;
<p style="color: $message_colour; text-align: center;">$message</p>
EOF
}
print <<EOF;
<table width='80%' cellspacing='1' class='tbl'>
<tr>
<th align='center'><b>$Lang::tr{'service'}</b></th>
<th align='center'><b>$Lang::tr{'status'}</b></th>
</tr>
<tr>
<td align='center'>
$Lang::tr{'random number generator daemon'}
</td>
$rngd_status
</tr>
</table>
EOF
&Header::closebox();
&Header::closebigbox();
&Header::closepage();
sub has_rdrand() {
open(FILE, "/proc/cpuinfo") or return 0;
my @cpuinfo = <FILE>;
close(FILE);
my @result = grep(/rdrand/, @cpuinfo);
if (@result) {
return 1;
}
return 0;
}
sub rngd_is_running() {
return (-e "/var/run/rngd.pid");
}