loncom/cgi/lonauthcgi.pm - diff

Return to lonauthcgi.pm CVS log

Up to [LON-CAPA] / loncom / cgi

version 1.14, 2015/05/04 15:43:57	version 1.16, 2018/12/22 21:04:56
Line 197 sub check_domain_ip {	Line 197 sub check_domain_ip {
my %remote_doms;	my %remote_doms;
my $allowed;	my $allowed;
if ($remote_ip ne '') {	if ($remote_ip ne '') {
if (&Apache::lonnet::hostname($remote_ip) ne '') {	my @remote_hosts = &Apache::lonnet::get_hosts_from_ip($remote_ip);
	if (@remote_hosts) {
my @poss_domains = &Apache::lonnet::current_machine_domains();	my @poss_domains = &Apache::lonnet::current_machine_domains();
if (@poss_domains > 0) {	if (@poss_domains > 0) {
my @remote_hosts = &Apache::lonnet::get_hosts_from_ip($remote_ip);
foreach my $hostid (@remote_hosts) {	foreach my $hostid (@remote_hosts) {
my $hostdom = &Apache::lonnet::host_domain($hostid);	my $hostdom = &Apache::lonnet::host_domain($hostid);
if ($hostdom ne '') {	if ($hostdom ne '') {
Line 383 sub serverstatus_titles {	Line 383 sub serverstatus_titles {
'checksums' => 'LON-CAPA Module Checking',	'checksums' => 'LON-CAPA Module Checking',
'diskusage' => 'Course/Community Disk Usage',	'diskusage' => 'Course/Community Disk Usage',
'clusterstatus' => 'Domain status',	'clusterstatus' => 'Domain status',
	'certstatus' => 'LON-CAPA SSL Certificates Status',
'metadata_keywords' => 'Display Metadata Keywords',	'metadata_keywords' => 'Display Metadata Keywords',
'metadata_harvest' => 'Harvest Metadata Searches',	'metadata_harvest' => 'Harvest Metadata Searches',
'takeoffline' => 'Offline - replace Log-in page',	'takeoffline' => 'Offline - replace Log-in page',