mirror of
https://github.com/pandorafms/pandorafms.git
synced 2025-07-31 01:35:36 +02:00
Evaluate as 0 undefined values
This commit is contained in:
parent
467796208b
commit
bf513a5c7a
@ -5253,71 +5253,64 @@ sub get_module_status ($$$$) {
|
|||||||
if ($module_type !~ m/_string/) {
|
if ($module_type !~ m/_string/) {
|
||||||
|
|
||||||
# Critical
|
# Critical
|
||||||
if ($critical_min ne $critical_max && defined($module->{'critical_inverse'})) {
|
if ($critical_min ne $critical_max) {
|
||||||
|
|
||||||
# [critical_min, critical_max)
|
|
||||||
if ($module->{'critical_inverse'} == 0) {
|
|
||||||
return 1 if ($data >= $critical_min && $data < $critical_max);
|
|
||||||
return 1 if ($data >= $critical_min && $critical_max < $critical_min);
|
|
||||||
}
|
|
||||||
# (-inf, critical_min), [critical_max, +inf)
|
# (-inf, critical_min), [critical_max, +inf)
|
||||||
else {
|
if (defined($module->{'critical_inverse'}) && $module->{'critical_inverse'} == 1) {
|
||||||
if ($critical_max < $critical_min) {
|
if ($critical_max < $critical_min) {
|
||||||
return 1 if ($data < $critical_min);
|
return 1 if ($data < $critical_min);
|
||||||
} else {
|
} else {
|
||||||
return 1 if ($data < $critical_min || $data >= $critical_max);
|
return 1 if ($data < $critical_min || $data >= $critical_max);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
# [critical_min, critical_max)
|
||||||
|
else {
|
||||||
|
return 1 if ($data >= $critical_min && $data < $critical_max);
|
||||||
|
return 1 if ($data >= $critical_min && $critical_max < $critical_min);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
# Warning
|
# Warning
|
||||||
if ($warning_min ne $warning_max && defined($module->{'warning_inverse'})) {
|
if ($warning_min ne $warning_max) {
|
||||||
|
|
||||||
# [warning_min, warning_max)
|
|
||||||
if ($module->{'warning_inverse'} == 0) {
|
|
||||||
return 2 if ($data >= $warning_min && $data < $warning_max);
|
|
||||||
return 2 if ($data >= $warning_min && $warning_max < $warning_min);
|
|
||||||
}
|
|
||||||
# (-inf, warning_min), [warning_max, +inf)
|
# (-inf, warning_min), [warning_max, +inf)
|
||||||
else {
|
if (defined($module->{'warning_inverse'}) && $module->{'warning_inverse'} == 1) {
|
||||||
if ($warning_max < $warning_min) {
|
if ($warning_max < $warning_min) {
|
||||||
return 2 if ($data < $warning_min);
|
return 2 if ($data < $warning_min);
|
||||||
} else {
|
} else {
|
||||||
return 2 if ($data < $warning_min || $data >= $warning_max);
|
return 2 if ($data < $warning_min || $data >= $warning_max);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
# [warning_min, warning_max)
|
||||||
|
else {
|
||||||
|
return 2 if ($data >= $warning_min && $data < $warning_max);
|
||||||
|
return 2 if ($data >= $warning_min && $warning_max < $warning_min);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
# String
|
# String
|
||||||
else {
|
else {
|
||||||
|
|
||||||
# Critical
|
# Critical
|
||||||
if(defined($module->{'critical_inverse'})){
|
$eval_result = eval {
|
||||||
|
if (defined($module->{'critical_inverse'} && $module->{'critical_inverse'} == 1) {
|
||||||
|
$critical_str ne '' && $data !~ /$critical_str/ ;
|
||||||
|
} else {
|
||||||
|
$critical_str ne '' && $data =~ /$critical_str/ ;
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
$eval_result = eval {
|
return 1 if ($eval_result);
|
||||||
if ($module->{'critical_inverse'} == 0) {
|
|
||||||
$critical_str ne '' && $data =~ /$critical_str/ ;
|
|
||||||
} else {
|
|
||||||
$critical_str ne '' && $data !~ /$critical_str/ ;
|
|
||||||
}
|
|
||||||
};
|
|
||||||
|
|
||||||
return 1 if ($eval_result);
|
|
||||||
}
|
|
||||||
|
|
||||||
# Warning
|
# Warning
|
||||||
if(defined($module->{'warning_inverse'})){
|
$eval_result = eval {
|
||||||
|
if (defined($module->{'warning_inverse'} && $module->{'warning_inverse'} == 1) {
|
||||||
|
$warning_str ne '' && $data !~ /$warning_str/ ;
|
||||||
|
} else {
|
||||||
|
$warning_str ne '' && $data =~ /$warning_str/ ;
|
||||||
|
}
|
||||||
|
};
|
||||||
|
|
||||||
$eval_result = eval {
|
return 2 if ($eval_result);
|
||||||
if ($module->{'warning_inverse'} == 0) {
|
|
||||||
$warning_str ne '' && $data =~ /$warning_str/ ;
|
|
||||||
} else {
|
|
||||||
$warning_str ne '' && $data !~ /$warning_str/ ;
|
|
||||||
}
|
|
||||||
};
|
|
||||||
|
|
||||||
return 2 if ($eval_result);
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
|
||||||
# Normal
|
# Normal
|
||||||
|
Loading…
x
Reference in New Issue
Block a user