1 package Reaction::UI::Controller::Collection;
5 use base 'Reaction::UI::Controller';
8 use aliased 'Reaction::UI::ViewPort::ListView';
9 use aliased 'Reaction::UI::ViewPort::Object';
11 has 'model_name' => (isa => 'Str', is => 'rw', required => 1);
12 has 'collection_name' => (isa => 'Str', is => 'rw', required => 1);
14 has action_viewport_map => (isa => 'HashRef', is => 'rw', lazy_build => 1);
15 has action_viewport_args => (isa => 'HashRef', is => 'rw', lazy_build => 1);
17 sub _build_action_viewport_map {
24 sub _build_action_viewport_args {
28 #XXX candidate for futre optimization, should cache reader?
31 my $model = $c->model( $self->model_name );
32 my $attr = $model->meta->find_attribute_by_name( $self->collection_name );
33 my $reader = $attr->get_read_method;
34 return $model->$reader;
37 sub base :Action :CaptureArgs(0) {
41 sub object :Chained('base') :PathPart('id') :CaptureArgs(1) {
42 my ($self, $c, $key) = @_;
43 my $object = $self->get_collection($c)->find($key);
44 $c->detach("/error_404") unless $object;
45 $c->stash(object => $object);
48 sub list :Chained('base') :PathPart('') :Args(0) {
50 $self->basic_page($c, [{ collection => $self->get_collection($c) }]);
53 sub view :Chained('object') :Args(0) {
55 $self->basic_page($c, [{ model => $c->stash->{object} }]);
59 my ($self, $c, $vp_args) = @_;
60 my $action_name = $c->stack->[-1]->name;
61 return $self->push_viewport
63 $self->action_viewport_map->{$action_name},
65 %{ $self->action_viewport_args->{$action_name} || {} },
76 Reaction::UI::Widget::Controller
80 Controller class used to make displaying collections easier.
81 Inherits from L<Reaction::UI::Controller>.
87 The name of the model this controller will use as it's data source. Should be a name
88 that can be passed to C<$C-E<gt>model>
90 =head2 collection_name
92 The name of the collection whithin the model that this Controller will be utilizing.
94 =head2 action_viewport_map
98 =item B<_build_action_viewport_map> - Provided builder method, see METHODS
100 =item B<has_action_viewport_map> - Auto generated predicate
102 =item B<clear_action_viewport_map>- Auto generated clearer method
106 Read-write lazy building hashref. The keys should match action names in the Controller
107 and the value should be the ViewPort class that this action should use.
108 See method C<basic_page> for more info.
110 =head action_viewport_args
112 Read-write lazy building hashref. Additional ViewPort arguments for the action named
113 as the key in the controller. See method C<basic_page> for more info.
117 =item B<_build_action_viewport_args> - Provided builder method, see METHODS
119 =item B<has_action_viewport_args> - Auto generated predicate
121 =item B<clear_action_viewport_args>- Auto generated clearer method
127 =head2 get_collection $c
129 Returns an instance of the collection this controller uses.
131 =head2 _build_action_viewport_map
133 Provided builder for C<action_viewport_map>. Returns a hash with two items:
135 list => 'Reaction::UI::ViewPort::ListView',
136 view => 'Reaction::UI::ViewPort::Object',
138 =head2 _build_action_viewport_args
140 Returns an empty hashref.
150 Chain link, chained to C<base> forwards to basic page passing one custom argument,
151 C<collection> which includes an instance of the current collection.
153 The default ViewPort for this action is C<Reaction::UI::ViewPort::ListView> and can be
154 changed by altering the C<action_viewport_map> attribute hash.
158 Chain link, chained to C<base>, captures one argument, 'id'. Attempts to find a single
159 object by searching for a member of the current collection which has a Primary Key or
160 Unique constraint matching that argument. If the object is found it is stored in the
161 stash under the C<object> key.
165 Chain link, chained to C<object>. Forwards to C<basic page> with one custom vp argument
166 of C<object>, which is the object located in the previous chain link of the same name.
168 The default ViewPort for this action is C<Reaction::UI::ViewPort::Object> and can be
169 changed by altering the C<action_viewport_map> attribute hash.
173 Private action, accepts one argument, a hashref of viewport arguments (C<$vp_args>).
174 It will automatically determine the action name using the catalyst stack and call
175 C<push_viewport> with the ViewPort class name contained in the C<action_viewport_map>
176 and arguments of C<$vp_args> and the arguments contained in C<action_viewport_args>,
181 See L<Reaction::Class> for authors.
185 See L<Reaction::Class> for the license.