From: root <sys@15gifts.com>
Date: Tue, 25 Jul 2017 13:58:59 +0000 (+0100)
Subject: bin/ovh-api
X-Git-Url: https://git.nbdom.net/?a=commitdiff_plain;h=b46e36027717ba4468389429b0d71ef6273faf46;p=nb.git

bin/ovh-api
---

diff --git a/bin/ovh-api b/bin/ovh-api
index c2a73aed..804d7a1e 100755
--- a/bin/ovh-api
+++ b/bin/ovh-api
@@ -147,10 +147,24 @@ sub ip_routed {
           my $routed = ip_routed($server->{address});
           next if $dbl{$routed->[0][0]}++;
 
+# NB 25.07.17: Handle muttiple status 
+        if (1) {
+          my $status;
+          for (my $i=0; $i<scalar(@{ $server->{serverState} }); $i++) {
+            $status = lc($server->{serverState}[$i]{status});
+            last if $status eq 'down';
+          }
+          #my $status = 'slave' if $server->{backup} and ! grep { $_ eq 'down' } @server;
+          #use Data::Dumper; warn Dumper($server);
+          $status = 'slave' if $server->{backup} and $status eq 'up';
+          $routed->[0][1] = $status if $status ne 'up';
+        } else {
           my $status = lc($server->{serverState}[0]{status});
+          #warn $server->{address} . ' ' . $status;
           $status = 'slave' if $server->{backup} and $status eq 'up';
 
           $routed->[0][1] = $status if $status ne 'up';
+        }
 
           push @routed,@$routed;
         }