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
108
109
110
111
112
113
114
|
use CGI::Simple;
use FixMyStreet::TestMech;
use FixMyStreet::Script::Reports;
use Open311::PopulateServiceList;
my $mech = FixMyStreet::TestMech->new;
my $body = $mech->create_body_ok( 2493, 'Greenwich Council', {
send_method => 'Open311',
endpoint => 'endpoint',
api_key => 'key',
jurisdiction => 'greenwich',
});
my $contact = $mech->create_contact_ok(
body_id => $body->id,
category => 'Pothole',
email => 'HOLE',
);
my $user = $mech->create_user_ok( 'greenwich@example.com' );
my @reports = $mech->create_problems_for_body( 1, $body->id, 'Test', {
category => 'Pothole',
cobrand => 'greenwich',
user => $user,
});
my $report = $reports[0];
subtest 'check services override' => sub {
my $processor = Open311::PopulateServiceList->new();
my $meta_xml = '<?xml version="1.0" encoding="utf-8"?>
<service_definition>
<service_code>HOLE</service_code>
<attributes>
<attribute>
<variable>true</variable>
<code>easting</code>
<datatype>string</datatype>
<required>true</required>
<order>1</order>
<description>Easting</description>
</attribute>
<attribute>
<variable>true</variable>
<code>size</code>
<datatype>string</datatype>
<required>true</required>
<order>2</order>
<description>How big is the pothole</description>
</attribute>
</attributes>
</service_definition>
';
my $o = Open311->new(
jurisdiction => 'mysociety',
endpoint => 'http://example.com',
test_mode => 1,
test_get_returns => { 'services/HOLE.xml' => $meta_xml }
);
$processor->_current_open311( $o );
FixMyStreet::override_config {
ALLOWED_COBRANDS => [ 'greenwich' ],
}, sub {
$processor->_current_body( $body );
};
$processor->_current_service( { service_code => 'HOLE' } );
$processor->_add_meta_to_contact( $contact );
my $extra = [ {
automated => 'server_set',
variable => 'true',
code => 'easting',
datatype => 'string',
required => 'true',
order => 1,
description => 'Easting',
}, {
variable => 'true',
code => 'size',
datatype => 'string',
required => 'true',
order => 2,
description => 'How big is the pothole',
} ];
$contact->discard_changes;
is_deeply $contact->get_extra_fields, $extra, 'Easting has automated set';
};
subtest 'testing special Open311 behaviour', sub {
my $test_data;
FixMyStreet::override_config {
STAGING_FLAGS => { send_reports => 1 },
ALLOWED_COBRANDS => [ 'greenwich' ],
MAPIT_URL => 'http://mapit.uk/',
}, sub {
$test_data = FixMyStreet::Script::Reports::send();
};
$report->discard_changes;
ok $report->whensent, 'Report marked as sent';
is $report->send_method_used, 'Open311', 'Report sent via Open311';
is $report->external_id, 248, 'Report has right external ID';
my $req = $test_data->{test_req_used};
my $c = CGI::Simple->new($req->content);
is $c->param('attribute[external_id]'), $report->id, 'Request had correct ID';
is $c->param('attribute[easting]'), 529025, 'Request had correct easting';
};
done_testing();
|
