From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Wed, 28 Jan 2015 19:23:19 +0000 (+0100)
Subject: use gnt-node to get list of nodes
X-Git-Url: http://git.rot13.org/?p=gnt-info;a=commitdiff_plain;h=79efb2166e4fb0d27366ad088b78294ffa3de4cd;ds=sidebyside

use gnt-node to get list of nodes
---

diff --git a/gnt-i b/gnt-i
index 19beadc..918ee48 100755
--- a/gnt-i
+++ b/gnt-i
@@ -15,10 +15,14 @@ my $stat;
 my $mac_to_name;
 my $lines;
 
-next_argv:
+my @nodes = @ARGV;
+
+@nodes = map { chomp ; $_ } `gnt-node list -o name --no-header` unless @nodes;
+
+next_node:
 my $ssh = '';
-if ( @ARGV ) {
-	$hostname = shift @ARGV;
+if ( @nodes ) {
+	$hostname = shift @nodes;
 	$ssh = "ssh $hostname ";
 }
 
@@ -99,7 +103,7 @@ while(<$ip>) {
 	}
 }
 
-goto next_argv if @ARGV;
+goto next_node if @nodes;
 
 warn "# stat ", Dumper( $stat ) if $DEBUG;
 XXX( @ps_cols );