Catalyst::Enzyme - CRUD framework for Catalyst
#Create database ... left as an exercise for the reader (actually, see the tutorial) ... #Create app catalyst BookShelf #Create View script\bookshelf_create.pl view TT Enzyme::TT #Create Models for all tables script\bookshelf_create.pl model BookShelfDB Enzyme::CDBI dbi:SQLite:dbname=db/bookshelf.db #Create Controller script\bookshelf_create.pl controller Book Enzyme::CRUD BookShelfDB::Book
Browse to http://localhost:3000/book and see what it looks like without any configuration.
See the "TUTORIAL" below for a detailed example of the BookDB.
Catalyst::Enzyme is a layer on top of the Catalyst framework providing CRUD functionality for Class::DBI models.
Enzyme uses convention and configuration to provide e.g. extensible CRUD out-of-the-box, and a common way of dealing with error handling etc.
It's not completely unlike Maypole in this regard. However, at this point Enzyme isn't as feature-rich as Maypole.
Enzyme is one way of bringing many Catalyst modules and concepts together into a unified whole. There are other ways to do this (obviously. This is, like... uh, Perl).
Enzyme came about when I created Scaffolding CRUD code for some tables. There was much duplication, both in Controllers and in templates.
So I refactored.
The templates duplication resulted in Catalyst::View::TT::ControllerLocal, which allows you to override templates or template fragments by placing them in a directory specific to the Controller.
The Controller code duplication resulted in the class Catalyst::Controller::CRUD::Base. This has since grown significantly and now includes uniform presentation of status and messages to the user.
Your application uses Class::DBI based model classes.
You want CRUD functionality.
You are willing to read and understand the source (both code and templates) in order to modify them. While Enzyme can get you started faster and with less code, you need to make this your own framework. Change it, adapt it to your needs.
Refactoring meant moving details out of templates and into general components. Sometimes this involved moving metadata out of the application.
This information must be provided somehow, and the best we can do (if it can't be figured out automatically) is to put it in one place. This is done in the Model class' config->{crud} hash ref.
(Granted, some configurations are View related and really should be in the View (i.e.the template?), but I don't see a way to do that right now.)
See Catalyst::Enzyme::Model::CRUD for details on what parameters you should set.
Add new actions for new behaviour: Look at the existing ones.
Change existing actions: Copy-paste from the base class, then refactor.
Disable actions.
Enzyme uses Catalyst::View::TT::ControlleraLocal, so templates are overridden per Controller directory.
Change layout from the off-the-shelf look: Edit templates in ./base/
Change layout per class: Copy template in ./base/ and put it in ./YOURCLASS/. Edit and refactor as needed.
$c->stash->{message}
css: .message
Template: header.tt
Data::FormValidator
css: .error_text
$c->stash->{message}, $c->stash->{error}
Enzyme will redirect (as opposed to forward) after any data modifying action (the do_* actions).
The reason for this is that there shouldn't be any destructive url lingering in the Location field in the browser (whappens when the user reloads the /book/destroy/34 URL? It fails if course).
Not supported at the moment. There are a few texts coming from the Controllers, but almost all text is in the templates.
Read up on the config for your Model classes: Catalyst::Enzyme::Model::CRUD
Read the source of Catalyst::Enzyme::CRUD::Controller to understand how you can use, adapt, and extend it.
Let's take the Catalyst example BookDB application and see what it looks like with only a CRUD layer on top of the database.
Browse to http://localhost:3000/ at regular intervals during the setup to see the current state of the application.
catalyst BookShelf ... created files ... cd BookShelf script\bookshelf_server.pl
Browsing to http://localhost:3000/ gets us the welcome screen.
Add DefaultEnd and FormValidator
use Catalyst qw/-Debug Static::Simple DefaultEnd FormValidator/;
Remove the welcome message from the default action
# Hello World $c->response->body( $c->welcome_message );
and replace it with
$c->res->redirect("/book");
This url doesn't exist yet, but we'll create it soon.
script\bookshelf_create.pl view TT Enzyme::TT ... created files ...
This created a special Enzyme TT View, standard templates in ./root/base/, as well as a css file in ./root/static/css/ .
The Enzyme TT View allows for overloading template fragments based on the Controller (e.g. BookShelf::Controller::Book). It also provides a few utility methods for the templates.
You'll probably want to modify the templates and the style sheet later on to alter the global look of the application.
You'll probably want to copy some standard templates from ./root/base/ to e.g. <./root/book/) and modify them in order to alter the web pages for only that part of the application.
./root/base/
Note: Make sure you have DBI::Shell installed before running dbish.
dbish
mkdir db dbish dbi:SQLite:dbname=db/bookshelf.db < ..\database\bookdb.sql
(the bookdb.sql file is available in the tutorial/database directory)
tutorial/database
script\bookshelf_create.pl model BookShelfDB Enzyme::CDBI dbi:SQLite:dbname=db/bookshelf.db ... created files ...
This created the main CDBI class BookShelfDB, and table classes for each table in the database.
While they work fine as it is, Enzyme could use some extra meta data about the Model classes.
lib\BookShelf\Model\BookShelfDB\Book.pm
Add Add Class::DBI configuration:
__PACKAGE__->columns(Stringify => "title");
Add crud configuration:
__PACKAGE__->config( crud => { moniker => "Book", column_monikers => { __PACKAGE__->default_column_monikers, isbn => "ISBN" }, rows_per_page => 10, data_form_validator => { optional => [ __PACKAGE__->columns ], required => [ qw/ title format genre /], constraint_methods => { isbn => { name => "fv_isbn", constraint => qr/^[\d-]+$/ }, }, missing_optional_valid => 1, msgs => { format => '%s', constraints => { fv_isbn => "Not an ISBN number", }, }, }, }, );
A few things to note:
The Moniker is optional and would have defaulted to Book anyway. But that's how to do it. So now you know.
Moniker
The column_monikers is optional, and except for the ISBN, this was also unnecessary. But since we had to override it, we had to start with the deafult column monikers.
The rows_per_page controls paging in when listing the Books. The deafult is 20 rows, but Books take a little more vertical space, so we'll go with 10. Actually, if you'd like to see the paging feature right away, set it to 3. Or you could just add a few books...
(Yes, this should really be a View configuration somehow.)
There are other model classes, but let's just finish the table book by adding a CRUD controller.
book
script\bookshelf_create.pl controller Book Enzyme::CRUD BookShelfDB::Book ... created files ...
When you surf around and check out all the books you may notice that Borrower is a number, and so is Genre. That's because we haven't configured the other Models yet.
When you add new Books, note how the title is mandatory. See what happens if you omit it.
title
Also note how the ISBN number is optional, but if there is anything entered, it must abide by the constraint. (I have no idea whether that's actually a proper constraint for ISBN numbers).
Edit the root/base/header.tt and add this inside the content div:
<a href="/book/">Book</a> | <a href="/borrower/">Borrower</a> | <a href="/genre/">Genre</a> | <a href="/format/">Format</a> <br />
use Data::FormValidator::Constraints qw(:regexp_common); __PACKAGE__->columns(Stringify=> qw/name/); __PACKAGE__->config( crud => { data_form_validator => { optional => [ __PACKAGE__->columns ], required => [ "name" ], constraint_methods => { url => FV_URI(), email => Data::FormValidator::Constraints::email(), }, missing_optional_valid => 1, msgs => { format => '%s', constraints => { FV_URI => "Not a URL", email => "Not an email", }, }, }, }, );
A few notes:
The normal way to import the default FormValidator::Constraints would be
use Data::FormValidator::Constraints qw(:regexp_common :closures);
but that imports subs like email and phone into this namespace. But... since this is our model class, there is already field accessors by that names in our symbol table, and that will clash. Hence the use of Data::FormValidator::Constraints::email.
__PACKAGE__->columns(Stringify=>qw/name/);
script\bookshelf_create.pl controller Borrower Enzyme::CRUD BookShelfDB::Borrower script\bookshelf_create.pl controller Genre Enzyme::CRUD BookShelfDB::Genre script\bookshelf_create.pl controller Format Enzyme::CRUD BookShelfDB::Format
That's all folks!
Now read the rest of the documentation to learn how to modify the application further and perhaps start building on top of it.
Tests, lots of tests!
Yes, there's a todo-list.
Johan Lindstrom <johanl ÄT cpan.org>
This library is free software . You can redistribute it and/or modify it under the same terms as perl itself.
1 POD Error
The following errors were encountered while parsing the POD:
Non-ASCII character seen before =encoding in 'ÄT'. Assuming CP1252
To install Catalyst::Enzyme, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Catalyst::Enzyme
CPAN shell
perl -MCPAN -e shell install Catalyst::Enzyme
For more information on module installation, please visit the detailed CPAN module installation guide.