1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
|
package FixMyStreet::App::Controller::Admin::ResponsePriorities;
use Moose;
use namespace::autoclean;
BEGIN { extends 'Catalyst::Controller'; }
sub begin : Private {
my ( $self, $c ) = @_;
$c->forward('/admin/begin');
}
sub index : Path : Args(0) {
my ( $self, $c ) = @_;
my $user = $c->user;
if ($user->is_superuser) {
$c->forward('/admin/fetch_all_bodies');
} elsif ( $user->from_body ) {
$c->forward('load_user_body', [ $user->from_body->id ]);
$c->res->redirect( $c->uri_for( '', $c->stash->{body}->id ) );
} else {
$c->detach( '/page_error_404_not_found' );
}
}
sub list : Path : Args(1) {
my ($self, $c, $body_id) = @_;
$c->forward('load_user_body', [ $body_id ]);
my @priorities = $c->stash->{body}->response_priorities->search(
undef,
{
order_by => 'name'
}
);
$c->stash->{response_priorities} = \@priorities;
}
sub edit : Path : Args(2) {
my ( $self, $c, $body_id, $priority_id ) = @_;
$c->forward('load_user_body', [ $body_id ]);
my $priority;
if ($priority_id eq 'new') {
$priority = $c->stash->{body}->response_priorities->new({});
}
else {
$priority = $c->stash->{body}->response_priorities->find( $priority_id )
or $c->detach( '/page_error_404_not_found' );
}
$c->forward('/admin/fetch_contacts');
my @contacts = $priority->contacts->all;
my @live_contacts = $c->stash->{live_contacts}->all;
my %active_contacts = map { $_->id => 1 } @contacts;
my @all_contacts = map { {
id => $_->id,
category => $_->category,
active => $active_contacts{$_->id},
} } @live_contacts;
$c->stash->{contacts} = \@all_contacts;
if ($c->req->method eq 'POST') {
$priority->deleted( $c->get_param('deleted') ? 1 : 0 );
$priority->name( $c->get_param('name') );
$priority->update_or_insert;
my @live_contact_ids = map { $_->id } @live_contacts;
my @new_contact_ids = grep { $c->get_param("contacts[$_]") } @live_contact_ids;
$priority->contact_response_priorities->search({
contact_id => { '!=' => \@new_contact_ids },
})->delete;
foreach my $contact_id (@new_contact_ids) {
$priority->contact_response_priorities->find_or_create({
contact_id => $contact_id,
});
}
$c->res->redirect( $c->uri_for( '', $c->stash->{body}->id ) );
}
$c->stash->{response_priority} = $priority;
}
sub load_user_body : Private {
my ($self, $c, $body_id) = @_;
my $has_permission = $c->user->has_body_permission_to('responsepriority_edit') &&
$c->user->from_body->id eq $body_id;
unless ( $c->user->is_superuser || $has_permission ) {
$c->detach( '/page_error_404_not_found' );
}
$c->stash->{body} = $c->model('DB::Body')->find($body_id)
or $c->detach( '/page_error_404_not_found' );
}
__PACKAGE__->meta->make_immutable;
1;
|