Private
Server IP : 195.201.23.43  /  Your IP : 18.188.46.93
Web Server : Apache
System : Linux webserver2.vercom.be 5.4.0-192-generic #212-Ubuntu SMP Fri Jul 5 09:47:39 UTC 2024 x86_64
User : kdecoratie ( 1041)
PHP Version : 7.1.33-63+ubuntu20.04.1+deb.sury.org+1
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,
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : ON  |  Pkexec : ON
Directory :  /usr/share/webmin/software/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ HOME SHELL ]     

Current File : /usr/share/webmin/software//rhn.cgi
#!/usr/bin/perl
# rhn.cgi
# Display a list of packages available for download from RHN

require './software-lib.pl';
$bgcolor = defined($gconfig{'cs_page'}) ? $gconfig{'cs_page'} : "ffffff";
$link = defined($gconfig{'cs_link'}) ? $gconfig{'cs_link'} : "0000ee";
$text = defined($gconfig{'cs_text'}) ? $gconfig{'cs_text'} : "000000";
&PrintHeader();
print <<EOF;
<html>
<head><title>$text{'rhn_title'}</title>
<script>
function sel(p)
{
window.opener.ifield.value = p;
window.close();
return false;
}
</script>
</head><body bgcolor=#$bgcolor link=#$link vlink=#$link text=#$text>
EOF

$out = `up2date -l 2>&1`;
if ($out =~ /Error Message:/i) {
	print "<pre>$out</pre>\n";
	}
else {
	print "<table width=100%>\n";
	foreach (split(/\n/, $out)) {
		if ($dashes && /^(\S+)\s+(\S+)\s+(\S+)/) {
			if (!$count++) {
				print "<tr> <td><b>$text{'rhn_pack'}</b></td> ",
				      "<td align=right><b>",
				      "$text{'rhn_version'}</b></td> </tr>\n";
				}
			print "<tr>\n";
			print "<td>";
            print &ui_link("#", $1, undef, "onClick='sel(\"$1\");'");
            print "</td>\n";
			print "<td align=right>$2 - $3</td>\n";
			print "</tr>\n";
			}
		elsif (/^----/) {
			last if ($dashes);
			$dashes++;
			}
		}
	print "</table>\n";
	if (!$count) {
		print "<b>$text{'rhn_nonefound'}</b><p>\n";
		}
	}
print "</body></html>\n";

Private