Changeset 2475 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Group.pm

Timestamp:

06/17/21 13:33:50 (3 years ago)

Author:

nanardon

Message:

start samba support: manage sambaSID

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Group.pm (modified) (1 diff)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Group.pm

@@ -194 +194 @@
                 label => l('Member count'),
             },
+
+            # Samba:
+
+            sambaSID => {
+                ro => 1,
+                auto => 1,
+            },
+            _sambaSID => {
+                ro => 1,
+                hide => 1,
+                managed => 1,
+                get => sub {
+                    my ($self) = @_;
+                    my $obj = $self->object;
+                    my $uid = $obj->get_field('gidnumber');
+                    return $obj->base->sambaSID( $uid * 2 + 1001 );
+                }
+            },
+
         }
     )