aboutsummaryrefslogtreecommitdiffstats
path: root/perllib/FixMyStreet
diff options
context:
space:
mode:
Diffstat (limited to 'perllib/FixMyStreet')
-rw-r--r--perllib/FixMyStreet/App/Controller/Council.pm7
-rw-r--r--perllib/FixMyStreet/Cobrand/Buckinghamshire.pm299
-rw-r--r--perllib/FixMyStreet/Map/Buckinghamshire.pm19
3 files changed, 323 insertions, 2 deletions
diff --git a/perllib/FixMyStreet/App/Controller/Council.pm b/perllib/FixMyStreet/App/Controller/Council.pm
index 85976ae45..2e2dce0f7 100644
--- a/perllib/FixMyStreet/App/Controller/Council.pm
+++ b/perllib/FixMyStreet/App/Controller/Council.pm
@@ -51,8 +51,11 @@ sub load_and_check_areas : Private {
# Cobrand may wish to add area types to look up for a point at runtime.
# This can be used for, e.g., parish councils on a particular council
- # cobrand.
- $area_types = $c->cobrand->call_hook("add_extra_area_types" => $area_types) || $area_types;
+ # cobrand. NB three-tier councils break the alerts pages, so don't run the
+ # hook if we're on an alerts page.
+ unless ($c->stash->{area_check_action} eq 'alert') {
+ $area_types = $c->cobrand->call_hook("add_extra_area_types" => $area_types) || $area_types;
+ }
my $all_areas;
diff --git a/perllib/FixMyStreet/Cobrand/Buckinghamshire.pm b/perllib/FixMyStreet/Cobrand/Buckinghamshire.pm
new file mode 100644
index 000000000..49e87a1d0
--- /dev/null
+++ b/perllib/FixMyStreet/Cobrand/Buckinghamshire.pm
@@ -0,0 +1,299 @@
+package FixMyStreet::Cobrand::Buckinghamshire;
+use parent 'FixMyStreet::Cobrand::UKCouncils';
+
+use strict;
+use warnings;
+
+sub council_area_id { return 2217; }
+sub council_area { return 'Buckinghamshire'; }
+sub council_name { return 'Buckinghamshire County Council'; }
+sub council_url { return 'buckinghamshire'; }
+
+sub example_places {
+ return ( 'HP19 7QF', "Walton Road" );
+}
+
+sub disambiguate_location {
+ my $self = shift;
+ my $string = shift;
+
+ my $town = 'Buckinghamshire';
+
+ # The geocoder returns two results for 'Aylesbury', so force the better
+ # result to be used.
+ $town = "$town, HP20 2NH" if $string =~ /[\s]*aylesbury[\s]*/i;
+
+ return {
+ %{ $self->SUPER::disambiguate_location() },
+ town => $town,
+ centre => '51.7852948471218,-0.812140044990842',
+ span => '0.596065946222112,0.664092167105497',
+ bounds => [ 51.4854160129405, -1.1406945585036, 52.0814819591626, -0.476602391398098 ],
+ };
+}
+
+sub pin_colour {
+ my ( $self, $p, $context ) = @_;
+ return 'grey' if $p->state eq 'not responsible';
+ return 'green' if $p->is_fixed || $p->is_closed;
+ return 'red' if $p->state eq 'confirmed';
+ return 'yellow';
+}
+
+sub contact_email {
+ my $self = shift;
+ return join( '@', 'maverill', 'buckscc.gov.uk' );
+}
+
+sub send_questionnaires {
+ return 0;
+}
+
+sub open311_config {
+ my ($self, $row, $h, $params) = @_;
+
+ my $extra = $row->get_extra_fields;
+ push @$extra,
+ { name => 'report_url',
+ value => $h->{url} },
+ { name => 'title',
+ value => $row->title },
+ { name => 'description',
+ value => $row->detail };
+
+ $row->set_extra_fields(@$extra);
+}
+
+sub map_type { 'Buckinghamshire' }
+
+sub default_map_zoom { 3 }
+
+sub enable_category_groups { 1 }
+
+
+# Enable adding/editing of parish councils in the admin
+sub add_extra_areas {
+ my ($self, $areas) = @_;
+
+ # This is a list of all Parish Councils within Buckinghamshire,
+ # taken from https://mapit.mysociety.org/area/2217/covers.json?type=CPC
+ my $parish_ids = [
+ "135493",
+ "135494",
+ "148713",
+ "148714",
+ "53319",
+ "53360",
+ "53390",
+ "53404",
+ "53453",
+ "53486",
+ "53515",
+ "53542",
+ "53612",
+ "53822",
+ "53874",
+ "53887",
+ "53942",
+ "53991",
+ "54003",
+ "54014",
+ "54158",
+ "54174",
+ "54178",
+ "54207",
+ "54289",
+ "54305",
+ "54342",
+ "54355",
+ "54402",
+ "54465",
+ "54479",
+ "54493",
+ "54590",
+ "54615",
+ "54672",
+ "54691",
+ "54721",
+ "54731",
+ "54787",
+ "54846",
+ "54879",
+ "54971",
+ "55290",
+ "55326",
+ "55534",
+ "55638",
+ "55724",
+ "55775",
+ "55896",
+ "55900",
+ "55915",
+ "55945",
+ "55973",
+ "56007",
+ "56091",
+ "56154",
+ "56268",
+ "56350",
+ "56379",
+ "56418",
+ "56432",
+ "56498",
+ "56524",
+ "56592",
+ "56609",
+ "56641",
+ "56659",
+ "56664",
+ "56709",
+ "56758",
+ "56781",
+ "57099",
+ "57138",
+ "57330",
+ "57332",
+ "57366",
+ "57367",
+ "57507",
+ "57529",
+ "57582",
+ "57585",
+ "57666",
+ "57701",
+ "58166",
+ "58208",
+ "58229",
+ "58279",
+ "58312",
+ "58333",
+ "58405",
+ "58523",
+ "58659",
+ "58815",
+ "58844",
+ "58891",
+ "58965",
+ "58980",
+ "59003",
+ "59007",
+ "59012",
+ "59067",
+ "59144",
+ "59152",
+ "59179",
+ "59211",
+ "59235",
+ "59288",
+ "59353",
+ "59491",
+ "59518",
+ "59727",
+ "59763",
+ "59971",
+ "60027",
+ "60137",
+ "60321",
+ "60322",
+ "60438",
+ "60456",
+ "60462",
+ "60532",
+ "60549",
+ "60598",
+ "60622",
+ "60640",
+ "60731",
+ "60777",
+ "60806",
+ "60860",
+ "60954",
+ "61100",
+ "61102",
+ "61107",
+ "61142",
+ "61144",
+ "61167",
+ "61172",
+ "61249",
+ "61268",
+ "61269",
+ "61405",
+ "61445",
+ "61471",
+ "61479",
+ "61898",
+ "61902",
+ "61920",
+ "61964",
+ "62226",
+ "62267",
+ "62296",
+ "62311",
+ "62321",
+ "62431",
+ "62454",
+ "62640",
+ "62657",
+ "62938",
+ "63040",
+ "63053",
+ "63068",
+ "63470",
+ "63476",
+ "63501",
+ "63507",
+ "63517",
+ "63554",
+ "63715",
+ "63723"
+ ];
+ my $ids_string = join ",", @{ $parish_ids };
+
+ my $extra_areas = mySociety::MaPit::call('areas', [ $ids_string ]);
+
+ my %all_areas = (
+ %$areas,
+ %$extra_areas
+ );
+ return \%all_areas;
+}
+
+# Make sure CPC areas are included in point lookups for new reports
+sub add_extra_area_types {
+ my ($self, $types) = @_;
+
+ my @types = (
+ @$types,
+ 'CPC',
+ );
+ return \@types;
+}
+
+sub is_two_tier { 1 }
+
+sub should_skip_sending_update {
+ my ($self, $update ) = @_;
+
+ # Bucks don't want to receive updates into Confirm that were made by anyone
+ # except the original problem reporter.
+ return $update->user_id != $update->problem->user_id;
+}
+
+sub disable_phone_number_entry { 1 }
+
+sub report_sent_confirmation_email { 1 }
+
+sub is_council_with_case_management { 1 }
+
+# Try OSM for Bucks as it provides better disamiguation descriptions.
+sub get_geocoder { 'OSM' }
+
+sub categories_restriction {
+ my ($self, $rs) = @_;
+ # Buckinghamshire is a two-tier council, but only want to display
+ # county-level categories on their cobrand.
+ return $rs->search( { 'body.id' => 2217 } );
+}
+
+1;
diff --git a/perllib/FixMyStreet/Map/Buckinghamshire.pm b/perllib/FixMyStreet/Map/Buckinghamshire.pm
new file mode 100644
index 000000000..b6d86d4b9
--- /dev/null
+++ b/perllib/FixMyStreet/Map/Buckinghamshire.pm
@@ -0,0 +1,19 @@
+# FixMyStreet:Map::Buckinghamshire
+# More JavaScript, for street assets
+
+package FixMyStreet::Map::Buckinghamshire;
+use base 'FixMyStreet::Map::OSM';
+
+use strict;
+
+sub map_javascript { [
+ '/vendor/OpenLayers/OpenLayers.buckinghamshire.js',
+ '/vendor/OpenLayers.Projection.OrdnanceSurvey.js',
+ '/js/map-OpenLayers.js',
+ '/js/map-OpenStreetMap.js',
+ '/cobrands/fixmystreet-uk-councils/roadworks.js',
+ '/cobrands/fixmystreet/assets.js',
+ '/cobrands/buckinghamshire/js.js',
+] }
+
+1;
generated by cgit v1.2.3 (git 2.25.1) at 2025-08-03 06:11:33 +0000