diff --git a/src/warden-server/bin/getClients.pl b/src/warden-server/bin/getClients.pl index f2d504091fe8bf6b5433cf45ca4e656dbd09551e..015c769fb5b09b9bef072ef663007dd84d5775d6 100755 --- a/src/warden-server/bin/getClients.pl +++ b/src/warden-server/bin/getClients.pl @@ -71,9 +71,9 @@ $sth->execute or die "Cannot execute statement: " . $sth->errstr; my $hash_ref = $sth->fetchall_hashref("client_id"); # print table of clients -print "+---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+\n"; -print "| Client ID | Hostname | Registered | Requestor | Service | CT | Type | ROE | Description tags | IP Net Client |\n"; -print "+---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+\n"; +print "+-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+\n"; +print "| Client ID | Hostname | Registered | Requestor | Service | CT | Type | ROE | Description tags | IP Net Client | Valid |\n"; +print "+-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+\n"; foreach my $key (sort {$a<=>$b} keys %$hash_ref) { printf("| %-10s ", $hash_ref->{$key}->{client_id} || "unknown"); printf("| %-30s ", $hash_ref->{$key}->{hostname} || "unknown"); @@ -84,9 +84,10 @@ foreach my $key (sort {$a<=>$b} keys %$hash_ref) { printf("| %-15s ", $hash_ref->{$key}->{type} || "-"); printf("| %-4s ", $hash_ref->{$key}->{receive_own_events} || "-"); printf("| %-50s ", $hash_ref->{$key}->{description_tags} || "-"); - printf("| %-18s |\n", $hash_ref->{$key}->{ip_net_client}|| "unknown"); + printf("| %-18s ", $hash_ref->{$key}->{ip_net_client}|| "unknown"); + printf("| %-5s |\n", $hash_ref->{$key}->{valid}|| "unknown"); } -print "+---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+\n"; +print "+-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+\n"; print "\n"; print "Current registered clients in: " . scalar localtime(time) . "\n";