Open311 Endpoint mySociety extensions role

 * Get Service Request Updates

This requires a new object ::Service::Request::Update, which of course
is not part of standard spec.  So, in order to make the core not too
contaminated by :

 * the endpoint should instantiate ::Service::Request::mySociety objects
 which know about updates
 * have added a learn_additional_types callback from Schema to Endpoint,
 so that core doesn't need to know about /open311/service_request_update
 * (but ::Spark knows about the exception for updates... meh, but is 1-line)

1 files changed, 29 insertions, 0 deletions

diff --git a/t/open311/endpoint/Endpoint2.pm b/t/open311/endpoint/Endpoint2.pm
new file mode 100644
index 000000000..2b55b1e10
--- /dev/null
+++ b/t/open311/endpoint/Endpoint2.pm
@@ -0,0 +1,29 @@
+package t::open311::endpoint::Endpoint2;
+use Web::Simple;
+extends 't::open311::endpoint::Endpoint1';
+with 'Open311::Endpoint::Role::mySociety';
+
+use Open311::Endpoint::Service::Request::mySociety;
+
+use constant request_class => 'Open311::Endpoint::Service::Request::mySociety';
+
+sub get_service_request_updates {
+    my ($self, $args) = @_;
+
+    my $start_date = $self->maybe_inflate_datetime($args->{start_date});
+    my $end_date   = $self->maybe_inflate_datetime($args->{end_date});
+
+    my @requests = $self->filter_requests( sub { $_[0]->has_updates } );
+
+    return map {
+        $_->filter_updates( sub {
+            my $update = shift;
+            my $updated_datetime = $update->updated_datetime or return;
+            if ($start_date) { return unless $updated_datetime >= $start_date }
+            if ($end_date)   { return unless $updated_datetime <= $end_date }
+            return 1;
+        });
+    } @requests;
+}
+
+1;