Catalyst::Authentication

[gcc]

сейчас делаю по этому:
http://search.cpan.org/~hkclark/Catalyst-M...thorization.pod
http://search.cpan.org/~hkclark/Catalyst-M...hentication.pod

только использую DBI

не получется настроит Catalyst::Authentication::Store::DBI

какой-то замкнутый круг получается!

такая ошибка:
Caught exception in MyApp::Controller::Login->index "DBD::mysql::st execute failed: MySQL server has gone away at /usr/local/lib/perl5/site_perl/5.8.8/Catalyst/Plugin/Authentication/Store/DBI.pm line 126."

вопрос, отличатеся ли таблицы Catalyst::Authentication::Store::DBI от Catalyst::Plugin::Authentication::Store::DBIC ?


в Catalyst::Authentication::Store::DBI написано:
http://search.cpan.org/~janus/Catalyst-Aut...e/DBI.pm#___top

Код: Выделить всё

 use Catalyst qw(Authentication);

  __PACKAGE__->config->{'authentication'} = {
    'default_realm' => 'default',
    'realms' => {
      'default' => {
        'credential' => {
          'class'               => 'Password',
          'password_field'      => 'password',
          'password_type'       => 'hashed',
          'password_hash_type'  => 'SHA-1',
        },
        'store' => {
          'class'              => 'DBI',
          'user_table'         => 'login',
          'user_key'           => 'id',
          'user_name'          => 'name',
          'role_table'         => 'authority',
          'role_key'           => 'id',
          'role_name'          => 'name',
          'user_role_table'    => 'competence',
          'user_role_user_key' => 'login',
          'user_role_role_key' => 'authority',
        },
      },
    },

что такое 'store' => { ? это структура таблицы? оставить так как есть или поменять? почему в ней нету passwd, что за прикол?

в общем из-за чего такая ошибка в mysql?

может сразу DBIx::Class делать чтобы не париться?

[gcc]

аномалия какая-то

есть код, это файл login.pm

Код: Выделить всё

   sub index :Path :Args(0) {
    my ( $self, $c ) = @_;

        # Get the username and password from form
        my $username = $c->request->params->{username} || "";
        my $password = $c->request->params->{password} || "";

        # If the username and password values were found in form
        if ($username && $password) {
            # Attempt to log the user in
            if ($c->authenticate({ username => $username,
                                   password => $password  } )) {
                # If successful, then let them use the application
                $c->response->redirect($c->uri_for('/database'));
                return;
            } else {
                # Set an error message
               $c->stash->{template} = '/home/data/www/MyApp/root/login.tt';
                $c->stash->{error_msg} = "Bad username or password.";
            }
        }

        # If either of above don't work out, send to the login page
}

ошибка

Код: Выделить всё

Caught exception in MyApp::View::HTML::Template->process "HTML::Template->new() : Cannot open included file login :
 file not found. at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Template.pm line 1658
    HTML::Template::_init_template('HTML::Template=HASH(0x9af7d10)') called at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Template.pm line 1238
    HTML::Template::_init('HTML::Template=HASH(0x9af7d10)') called at /usr/local/lib/perl5/site_perl/5.8.8/HTML/Template.pm line 1124
    HTML::Template::new('HTML::Template', 'filename', 'login', 'path', 'ARRAY(0x9a9ed6c)', 'die_on_bad_params', 0, 'cache', 1, ...)
called at /usr/local/lib/perl5/site_perl/5.8.8/Catalyst/View/HTML/Template.pm line 96
    Catalyst::View::HTML::Template::render('MyApp::View::HTML::Template=HASH(0x9799994)', 'MyApp=HASH(0x9b1e488)', 'login') called
 at /usr/local/lib/perl5/site_perl/5.8.8/Catalyst/View/HTML/Template.pm line 59

почему "login" из param идет в шаблон? шаблон ругается на то что откуда-то взляся login

шаблон работатет, тестовые страницы работают