Changeset 1122

Timestamp:

08/18/12 17:25:56 (12 years ago)

Author:

nanardon

Message:

Gecos attribute must be ASCII only

Location:

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases

Files:

• Ad/User.pm (modified) (2 diffs)
• Ldap/User.pm (modified) (2 diffs)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ad/User.pm

@@ -13 +13 @@
 use Net::LDAP::Util     qw( escape_filter_value );
 use LATMOS::Accounts::Log;
+use LATMOS::Accounts::Utils;
 
 our $VERSION = (q$Rev$ =~ /^Rev: (\d+) /)[0];
@@ -248 +249 @@
             return; # nothing more to do
         };
+        /^gecos$/ and do {
+            $value = to_ascii($value);
+        };
     }
     $self->SUPER::_populate_entry($entry, $field, $value, $base);

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Ldap/User.pm

@@ -14 +14 @@
 use LATMOS::Accounts::Log;
 use LATMOS::Accounts::Bases::Ldap::Group;
+use LATMOS::Accounts::Utils;
 
 our $VERSION = (q$Rev: 649 $ =~ /^Rev: (\d+) /)[0];
@@ -243 +244 @@
             next;
         };
+        /^gecos$/ and do {
+            $val = to_ascii($val);
+        };
         /^homeDirectory$/ and $val ||= '/dev/null';
     }