I found a good solution for that, not by using a filter, but a transformer.

But it can be done directly without creating a custom module, like:

<element>
type Password
name password
label_xml Password<sup>*</sup>:
filter TrimEdges
constraint Required
<transformers>
type Callback
callback Digest::SHA1::sha1_hex
</transformers>
</element>

The method Digest::SHA1::sha1_hex can be used directly as a callback method.

Octavian

----- Original Message ----- From: "David Schmidt" <davew...@gmx.at> To: "HTML Form Creation,Rendering and Validation Framework" <html-formfu@lists.scsys.co.uk>
Sent: Thursday, March 19, 2009 4:43 PM
Subject: Re: [html-formfu] applying a filter


I wrote my own Filter

lib/HTML/FormFu/Filter/myApp/Digest_SHA.pm

package HTML::FormFu::Filter::myApp::Digest_SHA;
use strict;
use warnings;
use base 'HTML::FormFu::Filter';
use Digest::SHA qw/sha1_hex/;

sub filter {
   my ( $self, $value, $params ) = @_;
   return sha1_hex($value);
}

1;

and in my create.yml

   - type: Password
     name: password
     filters:
       - type: "myApp::Digest_SHA"


works fine, but since I also use the repeat_password constraint and
the filter is applied before passwords are compared I will not use
this approach and rather change the password prior to
updating/inserting into the database.

On Sun, Jan 11, 2009 at 10:21 AM, Octavian Rasnita <orasn...@gmail.com> wrote:
Hello,

I am trying to find the best way of storing an encrypted password in the
database (when creating a new user for example).

I thought that using a filter might be the best way for this and using a
callback would be enough:

<filters>
type Callback
callback Digest::SHA1::sha1_hex
</filters>

The single problem is that it doesn't work.

Digest::SHA1::sha1_hex returns the encrypted string, so it should work, but
I don't know why, it doesn't.

I have also tried to use a 'use Digest::SHA1;' in MyApp.pm, even though
without it it didn't give any error, however it still doesn't work, and the
unencrypted string is inserted in the database.

The code I use for inserting the user is:

if ($form->submitted_and_valid) {
my $user = $form->param_value('user');
my $email = $form->param_value('email');
my $hash = sha1_hex($user . $email . time());

my $new_user = $c->model("DB::TempUser")->new_result({hash => $hash});
$form->process;
$form->model->update($new_user);
}

Am I doing something wrong, or the filter can't be used for what I want?

Thanks.

Octavian


_______________________________________________
HTML-FormFu mailing list
HTML-FormFu@lists.scsys.co.uk
http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/html-formfu




--
David Schmidt   |   http://www.fm5.at

_______________________________________________
HTML-FormFu mailing list
HTML-FormFu@lists.scsys.co.uk
http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/html-formfu

_______________________________________________
HTML-FormFu mailing list
HTML-FormFu@lists.scsys.co.uk
http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/html-formfu

Reply via email to