Changeset 679

Timestamp:

01/20/10 17:57:40 (14 years ago)

Author:

nanardon

Message:

• grouper les documentations

Files:

• LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Ajax.pm (modified) (1 diff)
• LATMOS-Accounts-Web/root/html/ajax/check_ug_validty.tt (added)
• LATMOS-Accounts-Web/root/html/create/user.tt (modified) (1 diff)
• LATMOS-Accounts/lib/LATMOS/Accounts/Bases.pm (modified) (1 diff)
• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Dummy/User.pm (modified) (1 diff)
• LATMOS-Accounts/t/10_bases.t (modified) (2 diffs)

LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Ajax.pm

@@ -100 +100 @@
 }
 
+sub check_ug_validity {
+    my ( $self, $c ) = @_;
+    my $val = $c->req->param('val');
+    $c->stash->{validity} = LATMOS::Accounts::Utils::check_ug_validity($val);
+}
+
 sub end : Private {
     my ( $self, $c ) = @_;

LATMOS-Accounts-Web/root/html/create/user.tt

@@ -5 +5 @@
 [% IF step %]
 <tr><td>[% IF idexists %]<img src="[% c.uri_for('/static', 'icons', 'dialog-cancel.png') %]">[% END %]
-Login:</td><td><input type="text" name="id" value="[% c.req.param('id') | html %]"></td></tr>
+Login:</td><td><input type="text" id="name" name="id" value="[% c.req.param('id') | html %]">
+<span id="name_validity"></span>
+</td></tr>
+[% c.prototype.observe_field('name', {
+    url => c.uri_for('/ajax', 'check_ug_validity'),
+    with   => "'val='+value",
+    update => 'name_validity',
+    frequency => 1,
+    min_chars => 1,
+}) %]
 [% END %]
 <tr><td>[% form.attr_label('sn') %]</td><td>[% form.attr_field('sn') %]</td></tr>

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

@@ -231 +231 @@
         return;
     };
+    if (my $chk = (lc($otype) eq 'user' || lc($otype) eq 'group')
+        ? LATMOS::Accounts::Utils::check_ug_validity($id)
+        : LATMOS::Accounts::Utils::check_oid_validity($id)) {
+        $self->log(LA_ERR, "Cannot create $otype with ID $id `%s:'", $chk);
+        return;
+    }
     $self->_create_c_object($otype, $id, %cdata);
 }

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Dummy/User.pm

@@ -17 +17 @@
 }
 
+sub _create {
+    my ($class, $id);
+    return 1;
+}
+
 sub _canonical_fields {
     my ($self) = @_;

LATMOS-Accounts/t/10_bases.t

@@ -1 +1 @@
 use strict;
 use warnings;
-use Test::More tests => 13;
+use Test::More tests => 15;
 
 use_ok('LATMOS::Accounts::Bases');
@@ -22 +22 @@
 is( $dummyb->get_field_name('user', 'homeDirectory'), "home", "can call get_fields_name");
 ok(!$dummyb->is_transactionnal, 'Dummy driver is not transactionnal');
+
+ok($dummyb->create_c_object('user', 'toto'), "Can create object");
+ok(!$dummyb->create_c_object('user', '1toto'), "Can't create object with wrong id");