résultat commande dans un tableau

Version imprimable

Voir 40 message(s) de cette discussion en une page

04/12/2009, 13h39
manu7762323
Bonne idée le fichier de test, ça fonctionne :) ! (vu que je développe très rarement j'ai pas ces petits réflexes pratique^^)

Je me doute bien que tu sais déjà ce qu'il va se passer, parce que sinon tu ne me poserai pas la question ainsi :mrgreen:

Bon alors j'ai plusieurs résultats :
Code:

1 2 3 root:/opt/nrpe/scripts#./test_new.pl -w 4 -c 5 Swap CRITICAL -- Swap /dev/vg00/lvol2 = 5% - (w:4/c:5 used) Swap OK -- Swap /dev/vg00/lvol9 = 1% - (w:4/c:5 used)
Je l'ai configuré dans l'interface de supervision pour voir ce que ça donnait parce que je pensais bien qu'il allait y avoir un hic quelque part...effectivement :

Code:

Checkmultiswap test CRITICAL 4m 4s 04/12/2009 13:33:00 2 NRPE: Unable to read output

...Unable to read output...grrrr

Ah ben, vu qu'il fait la boucle 2 fois et qu'il y a 2 valeurs différentes, il ne sait pas lire les 2 "exit_codes", c'est ça ? :roll:
04/12/2009, 14h07
Mr6

Sans l'intégrer, fais un echo $? pour voir le code retour de ton script après exécution.
Le unable to read output est plutot lié à un pb de conf NRPE, style commande mal déclarée dans ton nrpe.cfg, truc dans le genre.

@+
Mr6
04/12/2009, 14h17
manu7762323

echo $? donne 0 ...donc l'état de mon $state du 2e passage dans la boucle... je ne sais pas trop comment faire pour qu'il garde le plus mauvais état après les deux passages dans la boucle..

Ben le truc c'est que j'avais déjà une bonne sortie dans l'interface juste avant qu'on fasse cette étape (quand les deux seuils était OK), enfin quand je dis bonne, il y avait juste écrit "Swap OK -- Swap /dev/vg00/lvol9 = 2% - (w:4/c:5 used)" donc uniquement la ligne du 2e passage...

Donc ne modifier $state que si l'état s'agrave, soit :

Code:

1
2
3
$state = $exit_codes{'CRITICAL'}; #pourquoi tester puisqu'il n'y a pas plus grave ?
$state = 1 if $state < $exit_codes{'WARNING'};
$state = 0 if $state < $exit_codes{'OK'};

Ha mais tiens, quel est l'état par défaut avant le test ? Que se passe-t-il s'y a un problème dans les données retournées par swapinfo ? (maj de la commande, formatage différent des résultats, etc...)
Ne faudrait-il pas garder la possibilité d'un état UNKNOWN ?

Je te propose plutot ca pour parer à toutes les éventualités :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
my $state = -1;
# Tests des seuils
foreach my $id (keys (%infos_hash)) {
  if ($infos_hash{$id}->[4] >= $crit_level){
     print "Swap CRITICAL -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:
$crit_level used)\n";
     $state = $exit_codes{'CRITICAL'};
  }
  elsif ($infos_hash{$id}->[4] >= $warn_level){
     print "Swap WARNING -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$
crit_level used)\n";
    $state = 1 if $state < $exit_codes{'WARNING'};
  }
  elsif ($infos_hash{$id}->[4]){
    print "Swap OK -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$crit_l
evel used)\n";
    $state = 0 if $state < $exit_codes{'OK'};
  }
  else {
    print "Swap UNKNOWN -- Swap $id = $infos_hash{$id}->[4] - (seems to be undef... verify check ?)\n";
  }
}
exit $exit_codes{$state};

04/12/2009, 15h28
manu7762323
Ah ouai, ça c'est du code de pro :ccool:

Mais c'est bien que tu m'aies fait chercher et réfléchir, au moins je comprends ton code et pourquoi ça marche mieux que ce que j'ai fait :)

Dernière chose, Houston, on a un problème ^^

Quand je lance le script en ligne de commande, tout fonctionne bien :
Code:

1 2 3 root:/opt/nrpe/scripts#./check_new.pl -w 3 -c 4 Swap OK -- Swap /dev/vg00/lvol2 = 1% - (w:3/c:4 used) Swap OK -- Swap /dev/vg00/lvol9 = 2% - (w:3/c:4 used)
Le fichier nrpe.cfg est bien configuré (j'ai copié la ligne de commande lancée ci-dessus depuis le fichier) donc normalement, tout devrait baigner...ou pas, car "NRPE : Unable to read output"

A mon avis, il n'aime pas le fait qu'il sorte 2 résultats...ou je sais pas...
04/12/2009, 15h31
Mr6

Je maintiens, il y a un pb de conf. Si ce n'est pas dans le fichier cfg, c'est un problème de droit sur le fichier à exécuter ;)

@+
Mr6

PS : si nagios a le droit d'exécuter le script perl, a-t-il le droit d'exécuter la commande swapinfo ? pas besoin d'un sudo pour ca ?
04/12/2009, 15h57
manu7762323

Probablement...

J'ai retesté en remettant la ligne qui exécute réellement la commande "swapinfo", et ça fonctionne, il y a bien une sortie dans l'interface.

Par contre, avec la ligne qui dit de prendre dans le fichier de test, pas moyen. Il y a bien les droits de lecture pour tous sur ce fichier pourtant.

Juste pour vérifier, la ligne pour prendre dans ce fichier, c'est bien

Code:

open FH, swapinfo or die "probleme executer swapinfo :$!\n";

(mon fichier test avec le résultat de la commande se nomme "swapinfo")
?
04/12/2009, 16h00
Mr6

Code:

open FH, 'swapinfo' or die "probleme executer swapinfo :$!\n";
04/12/2009, 16h05
manu7762323

toujours pareil...

il sort :

Code:

Checkmultiswap test CRITICAL 7m 36s 04/12/2009 16:02:11 3 NRPE: Unable to read output

au moins il y a déjà un état CRITIQUE...donc ça veut dire qu'il va quand même jusqu'à un certain endroit dans le code... non ?

----
PS. Je suis en formation semaine prochaine, tu as le temps souffler ;) ^^
Merci pour ton aide en tout cas :)
04/12/2009, 16h44
Mr6

Il arrive même à lire tout le code, puisqu'il a le bon retour ;)
Chez nous, les seules erreurs de ce type ont toujours été liées à la config NRPE, c'est pour ca que je suis un peu insistant ;) Vive les checks par SSH !

Bon weekend !

@+
Mr6
PS : que vais-je faire la semaine prochaine moi du coup ? :mrgreen:
04/12/2009, 16h49
manu7762323

Bizarre...car sans changer la config NRPE, ça fonctionne avec

Code:

open FH, "swapinfo |" or die "probleme executer swapinfo :$!\n";

mais pas avec

Code:

open FH, 'swapinfo' or die "probleme executer swapinfo :$!\n";

bizarre non ?

Bon week end à toi aussi !

--
PS. La semaine prochaine tu vas travailler ;)
04/12/2009, 17h02
Mr6

Citation:

Envoyé par manu7762323

Bizarre...car sans changer la config NRPE, ça fonctionne avec

Code:

open FH, "swapinfo |" or die "probleme executer swapinfo :$!\n";

mais pas avec

Code:

open FH, 'swapinfo' or die "probleme executer swapinfo :$!\n";

bizarre non ?

Bizarre en effet... je vais sécher sur ce coup je pense vu que le fichier.... on s'en fout :mrgreen:

Citation:

Envoyé par manu7762323

PS. La semaine prochaine tu vas travailler ;)

Prétentieux ! :mouarf:

@+
Mr6

Hello ! Comment ça va depuis la semaine dernière ?

Me voici de retour !

C'est vrai, le fichier on s'en fou, mais ça m'aurait quand même été pratique pour tester, mais bon pas grave, de toute façon chez nous on a l'habitude de tester en prod ^^ lol

Dernier petit détail du code...dans Nagios, le retour est maintenant :

Code:

Swap OK 5h 53s 14/12/2009 15:55:35 1 Swap OK -- Swap /dev/vg00/lvol2 = 2% - (w:30/c:50 used)

On voit ici que le Swap est OK, on voit les seuils définis, mais on ne voit que le % du 1er swap. Comment faire dans la partie qui teste les seuils, on dise qu'il faut afficher l'état des 2 swap ?
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 my $state = -1; # Tests des seuils foreach my $id (keys (%infos_hash)) { if ($infos_hash{$id}->[4] >= $crit_level){ print "Swap CRITICAL -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c: $crit_level used)\n"; $state = $exit_codes{'CRITICAL'}; } elsif ($infos_hash{$id}->[4] >= $warn_level){ print "Swap WARNING -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$ crit_level used)\n"; $state = 1 if $state < $exit_codes{'WARNING'}; } elsif ($infos_hash{$id}->[4]){ print "Swap OK -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$crit_l evel used)\n"; $state = 0 if $state < $exit_codes{'OK'}; } else { print "Swap UNKNOWN -- Swap $id = $infos_hash{$id}->[4] - (seems to be undef... verify check ?)\n"; } } exit $exit_codes{$state};
Histoire qu'on ait :

Code:

Swap OK 5h 53s 14/12/2009 15:55:35 1 Swap OK -- Swap /dev/vg00/lvol2 = 2% - Swap /dev/vg00/lvol9 = 2% - (w:30/c:50 used)

Vala, après ça se sera totalement parfait :) Merci pour ton aide :)

15/12/2009, 07h51
Mr6

Salut !

Il suffit de stocker au lieu d'afficher, tout bêtement ;)
Au choix tout de même, soit un simple $msg .=..., soit $msg[$i]=....
L'un te permettra de faire un print direct, l'autre un print join ' - ', @msg; (pour un plus joli formatage).
Tu afficheras enfin ton texte juste avant l'exit.
Par contre, je sais que Nagios n'est pas très copain avec les résultats trop longs, donc penses à jeter un oeil à sprintf pour tronquer ta ligne si nécessaire. (et là en bonus tu chercheras peut-être à afficher en priorité les résultats critical, puis warning, et enfin ok, car à quoi sert un resultat critical si tu ne vois pas le swap posant pb ?)

@+
Mr6

Ok, donc j'ai fait ce que tu m'a dit comme ceci :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 # Boucle de tests des seuils my $state = -1; foreach my $id (sort keys (%infos_hash)) { if ($infos_hash{$id}->[4] >= $crit_level){ $msg[$i]="Swap CRITICAL -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$crit_level used)\n"; $state = 2; } elsif ($infos_hash{$id}->[4] >= $warn_level){ $msg[$i]="Swap WARNING -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$crit_level used)\n"; $state = 1 if $state < $exit_codes{'WARNING'}; } elsif ($infos_hash{$id}->[4]){ $msg[$i]="Swap OK -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$crit_level used)\n"; $state = 0 if $state < $exit_codes{'OK'}; } else { print "Swap UNKNOWN -- Swap $id = $infos_hash{$id}->[4] - Seems to be undefinied, please verify check_multiswap\n"; } } # Sortie du resultat print $msg[$i]; exit $exit_codes{$state};
Ca stocke en effet le message mais il y a un truc sur lequel je bloque (je pense que tu sais ce que c'est). Là, je stocke uniquement ce qu'il y a en dernier dans "msg".
Ca me sort :

Code:

Swap OK -- Swap /dev/vg00/lvol9 = 2% - (w:30/c:50 used)

Je ne sais toujours pas comment faire pour afficher l'autre valeur de l'autre swap sur la même ligne... j'avoue que j'ai pas mal de mal à comprendre :oops:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
my @msg;
my $i=0;
 
# Boucle de tests des seuils
my $state = -1;
foreach my $id (sort keys (%infos_hash)) {
  if ($infos_hash{$id}->[4] >= $crit_level){
      $msg[$i]="Swap CRITICAL -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$crit_level used)";
     $state = 2;
  }
  elsif ($infos_hash{$id}->[4] >= $warn_level){
    $msg[$i]="Swap WARNING -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$crit_level used)";
    $state = 1 if $state < $exit_codes{'WARNING'};
  }
  elsif ($infos_hash{$id}->[4]){
    $msg[$i]="Swap OK -- Swap $id = $infos_hash{$id}->[4] - (w:$warn_level/c:$crit_level used)";
    $state = 0 if $state < $exit_codes{'OK'};
  }
  else {
    print "Swap UNKNOWN -- Swap $id = $infos_hash{$id}->[4] - Seems to be undefinied, please verify check_multiswap";
  }
  $i++;
}
 
# Sortie du resultat
print join ' -- ', @msg;
exit $exit_codes{$state};

C'est mieux la ?

Oui, c'est mieux merci :)

Par contre j'avais 2 fois "Swap OK" du coup, mais pour faire simple, comme dans la console j'ai déjà un indice qui me dit dans quel état c'est, pas la peine de le réécrire en fin de compte. (et en plus je gagne de la place dans l'affichage nagios !)

Voilà comment j'ai fait au final :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 my @msg; my $i=0; # Boucle de tests des seuils my $state = -1; foreach my $id (sort keys (%infos_hash)) { if ($infos_hash{$id}->[4] >= $crit_level){ $msg[$i]="Swap $id = $infos_hash{$id}->[4]"; $state = 2; } elsif ($infos_hash{$id}->[4] >= $warn_level){ $msg[$i]="Swap $id = $infos_hash{$id}->[4]"; $state = 1 if $state < $exit_codes{'WARNING'}; } elsif ($infos_hash{$id}->[4]){ $msg[$i]="Swap $id = $infos_hash{$id}->[4]"; $state = 0 if $state < $exit_codes{'OK'}; } else { print "Swap UNKNOWN - Seems to be undefinied, please verify check_multiswap\n"; } $i++; } # Sortie du resultat print join ' -- ',@msg; print " - (w:$warn_level/c:$crit_level used)\n"; exit $exit_codes{$state};
Et ça me renvoie dans Nagios :

Code:

Swap OK 2m 1s 15/12/2009 16:40:24 1 Swap /dev/vg00/lvol2 = 2% -- Swap /dev/vg00/lvol9 = 2% - (w:30/c:50 used)

Qu'en penses-tu ? c'est au mieux d'après toi ?

16/12/2009, 07h57
Mr6

C'est toi qui connais les contraintes, je suis mal placé pour dire si c'est au mieux ;)
Est-ce que tu risques d'avoir plus de 2 espaces de swap sur une machine ? Est-ce que ton affichage supporte autant de texte ?
Si tu as un doute sur ces questions, tu dois envisager de prioriser tes retours à afficher comme je t'ai dit. Je te laisse chercher une façon simple de le faire (mais bon, t'as peut-etre du boulot à faire aussi, pas juste jouer avec des scripts :mrgreen:)

@+
Mr6
16/12/2009, 09h28
manu7762323

Non il n'y a jamais plus de 2 swap, et l'affichage supporte bien le texte (il y a même encore de la place ^^).
A priori le script là fonctionne bien (grâce à toi :ccool:) donc je vais le laisser comme ça et le passer sur tous les autres serveurs aujourd'hui.

Merci beaucoup pour ta disponibilité et tes conseils !!! C'était un plaisir de travailler avec toi ;)

Voir 40 message(s) de cette discussion en une page