Changeset 2260

Timestamp:

06/05/19 20:20:19 (5 years ago)

Author:

nanardon

Message:

Allow to set in config monitored attributes

Location:

trunk/LATMOS-Accounts

Files:

• lib/LATMOS/Accounts.pm (modified) (1 diff)
• lib/LATMOS/Accounts/Bases/Attributes.pm (modified) (2 diffs)
• man/man8/latmos-accounts-base-sql.pod (modified) (1 diff)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts.pm

@@ -156 +156 @@
         map { $_ => ($self->val('_defattr_', $_)) }
         $self->Parameters('_defattr_');
+
+    $params{monitored} = {};
+    foreach my $item ($self->val($section, 'monitored')) {
+        $params{monitored}{lc($item)} = 1;
+    }
 
     my $base = LATMOS::Accounts::Bases->new(

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Attributes.pm

@@ -37 +37 @@
         $attributes->{_name} = $attributes->{name};
         $attributes->{_otype} = $otype;
+        $attributes->{monitored} ||= $base->config('monitored')->{ lc( $otype . '.' . $attributes->{name} ) };
+
         return bless($attributes, $class);
     } else {
@@ -45 +47 @@
         $attr_info->{_name} = $attributes;
         $attr_info->{_otype} = $otype;
+        $attr_info->{monitored} ||= $base->config('monitored')->{ lc( $otype . '.' . $attributes ) };
 
         return bless($attr_info, $class);

trunk/LATMOS-Accounts/man/man8/latmos-accounts-base-sql.pod

@@ -28 +28 @@
 Don't compute dynamic attribute at commit but let syncManager do it
 asynchronously.
+
+=head2 monitored
+
+Allow to specify monitored attributes. Monitored attributes will have their
+value logued when changed.
+
+Can be specified multiple times:
+
+    monitored=user.loginShell
+    monitored=nethost.ip
 
 =head1 FEATURES