check_nwc_health: Update to 7.0.1.3

check_nwc_health/check_nwc_health-7.0.1.1/plugins-scripts/Classes/IFMIB.pm

@@ -1,4 +0,0 @@
-package Classes::IFMIB;
-our @ISA = qw(Classes::Device);
-use strict;
-

check_nwc_health/check_nwc_health-7.0.1.3/ChangeLog

@@ -1,3 +1,7 @@
+* 2018-04-29 7.0.1.3
+  bugfix in cisco global shared memory > 9.3.2
+* 2018-03-31 7.0.1.2
+  fix a bug in link-aggregation-availability
 * 2018-03-13 7.0.1.1
   fix a bug in cisco enhanced mempool mib and posixmem (thx sabedevops)
 * 2018-03-07 7.0.1

check_nwc_health/check_nwc_health-7.0.1.3/GLPlugin/lib/Monitoring/GLPlugin.pm

@@ -20,7 +20,7 @@ eval {
   $Data::Dumper::Sparseseen = 1;
 };
 our $AUTOLOAD;
-*VERSION = \'3.0.2.2';
+*VERSION = \'3.0.2.5';
 
 use constant { OK => 0, WARNING => 1, CRITICAL => 2, UNKNOWN => 3 };
 
@@ -165,7 +165,9 @@ sub add_default_args {
   $self->add_arg(
       spec => 'mitigation=s',
       help => "--mitigation
-   The parameter allows you to change a critical error to a warning.",
+   The parameter allows you to change a critical error to a warning.
+   It works only for specific checks. Which ones? Try it out or look in the code.
+   --mitigation warning ranks an error as warning which by default would be critical.",
       required => 0,
   );
   $self->add_arg(
@@ -573,6 +575,18 @@ sub accentfree {
     'ef' => 'i', 'f0' => 'o', 'f1' => 'n', 'f2' => 'o', 'f3' => 'o', 'f4' => 'o',
     'f5' => 'o', 'f6' => 'o', 'f8' => 'o', 'f9' => 'u', 'fa' => 'u', 'fb' => 'u',
     'fc' => 'u', 'fd' => 'y', 'ff' => 'y',
+    '8a' => 'S', '8c' => 'CE', '9a' => 's', '9c' => 'oe', '9f' => 'Y', 'a2' => 'o', 'aa' => 'a',
+    'b2' => '2', 'b3' => '3', 'b9' => '1', 'bc' => '1/4', 'bd' => '1/2', 'be' => '3/4',
+    'c0' => 'A', 'c1' => 'A', 'c2' => 'A', 'c3' => 'A', 'c4' => 'A', 'c5' => 'A', 'c6' => 'AE',
+    'c7' => 'C', 'c8' => 'E', 'c9' => 'E', 'ca' => 'E', 'cb' => 'E',
+    'cc' => 'I', 'cd' => 'I', 'ce' => 'I', 'cf' => 'I', 'd0' => 'D', 'd1' => 'N',
+    'd2' => 'O', 'd3' => 'O', 'd4' => 'O', 'd5' => 'O', 'd6' => 'O',
+    'd8' => 'O', 'd9' => 'U', 'da' => 'U', 'db' => 'U', 'dc' => 'U', 'dd' => 'Y',
+    'df' => 'ss', 'e0' => 'a', 'e1' => 'a', 'e2' => 'a', 'e3' => 'a', 'e4' => 'a', 'e5' => 'a',
+    'e6' => 'ae', 'e7' => 'c', 'e8' => 'e', 'e9' => 'e', 'ea' => 'e', 'eb' => 'e',
+    'ec' => 'i', 'ed' => 'i', 'ee' => 'i', 'ef' => 'i', 'f1' => 'n',
+    'f2' => 'o', 'f3' => 'o', 'f4' => 'o', 'f5' => 'o', 'f6' => 'o', 'f8' => 'o',
+    'f9' => 'u', 'fa' => 'u', 'fb' => 'u', 'fc' => 'u', 'fd' => 'y', 'ff' => 'yy',
   );
   my @letters = split //, $text;;
   for (my $i = 0; $i <= $#letters; $i++) {
@@ -580,7 +594,9 @@ sub accentfree {
     $letters[$i] = $replace{$hex} if (exists $replace{$hex});
   }
   push @transformed, @letters;
-  return join '', @transformed;
+  $text = join '', @transformed;
+  $text =~ s/[[:^ascii:]]//g;
+  return $text;
 }
 
 sub dump {