From 79efb2166e4fb0d27366ad088b78294ffa3de4cd Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Wed, 28 Jan 2015 20:23:19 +0100
Subject: [PATCH] use gnt-node to get list of nodes

---
 gnt-i | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

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 );
-- 
2.20.1