feat(apps::backup::rubkrik::graphql::plugin): new plugin (#6180)

Refs: CTOR-2250

Author: scresto31

src/apps/backup/rubrik/graphql/mode/jobs.pm

@@ -27,7 +27,7 @@ use warnings;
 
 use DateTime;
 use centreon::plugins::templates::catalog_functions qw(catalog_status_threshold_ng);
-use centreon::plugins::misc qw/is_excluded change_seconds flatten_arrays/;
+use centreon::plugins::misc qw/is_excluded change_seconds flatten_arrays disco_escape/;
 use apps::backup::rubrik::graphql::common qw/timerange_check_options $timerange_filters/;
 use centreon::plugins::constants qw(:counters);
 use POSIX qw/floor/;
@@ -416,7 +416,7 @@ sub disco_show {
 
     foreach my $job (@{$jobs}) {
         $self->{output}->add_disco_entry(
-            jobId => $job->{fid}, jobName => $job->{objectName}, jobType => $job->{lastActivityType}, locationName => $job->{location} // ''
+            jobId => $job->{fid}, jobName => disco_escape($job->{objectName}), jobType => $job->{lastActivityType}, locationName => disco_escape($job->{location} // '')
         );
     }
 }

src/centreon/plugins/misc.pm

@@ -37,6 +37,7 @@ our @EXPORT_OK = qw/change_seconds
                     check_security_whitelist
                     convert_bytes
                     date_xm_ago_utc
+                    disco_escape
                     execute
                     flatten_arrays
                     flatten_to_hash
@@ -1076,6 +1077,15 @@ sub date_xm_ago_utc {
     return sprintf( "%04d-%02d-%02dT%02d:%02d:%02dZ", $t[5] + 1900, $t[4] + 1, $t[3], $t[2], $t[1], $t[0]);
 }
 
+# Escape a string to be used by the discovery module
+sub disco_escape($;$) {
+    my ($value, $sub) = @_;
+
+    $sub //= '_';
+
+    return $value =~ s/[~!\$%\^&\*"'\|<>?,()=]/$sub/gr;
+}
+
 1;
 
 __END__
@@ -1758,6 +1768,20 @@ Attempts to format a MAC address into a human-readable format
 
 =back
 
+=head2 disco_escape
+
+    my $value = centreon::plugins::misc::disco_escape($value, $sub);
+
+Replace characters not allowed by centengine/discovery with $sub
+
+=over 4
+
+=item * C<$value> - label
+
+=item * C<$sub> - replacement character ( default: '_' )
+
+=back
+
 =head2 json_to_sha256
 
     my $hash = centreon::plugins::misc::json_to_sha256(%options);