Open311 Endpoint

Subsystems include

 * ::Spark encoding conventions for xml/json
 * ::Schema using Rx to validate form of inputs and outputs,
      including validation for, e.g., dates and CSV as part of Open311

Handles following paths:

 * Open311 attributes for Service Definition
   http://wiki.open311.org/GeoReport_v2#GET_Service_Definition
 * POST service request
 * GET Service Requests
 * GET Service Request

Objects:

 * ::Service
 * ::Service::Request

1 files changed, 53 insertions, 0 deletions

diff --git a/perllib/Open311/Endpoint/Service.pm b/perllib/Open311/Endpoint/Service.pm
new file mode 100644
index 000000000..282e5f921
--- /dev/null
+++ b/perllib/Open311/Endpoint/Service.pm
@@ -0,0 +1,53 @@
+package Open311::Endpoint::Service;
+use Moo;
+use MooX::HandlesVia;
+use Types::Standard ':all';
+use namespace::clean;
+
+has service_name => (
+    is => 'ro',
+    isa => Str,
+);
+
+has service_code => (
+    is => 'ro',
+    isa => Str,
+);
+
+has default_service_notice => (
+    is => 'ro',
+    isa => Maybe[Str],
+    predicate => 1,
+);
+
+has description => (
+    is => 'ro',
+    isa => Str,
+);
+
+has keywords => (
+    is => 'ro',
+    isa => ArrayRef[Str],
+);
+
+has group => (
+    is => 'ro',
+    isa => Str,
+);
+
+has type => (
+    is => 'ro',
+    isa => Enum[qw/ realtime batch blackbox /],
+);
+
+has attributes => (
+    is => 'ro',
+    isa => ArrayRef[ InstanceOf['Open311::Endpoint::Service::Attribute'] ],
+    handles_via => 'Array',
+    handles => {
+        has_attributes => 'count',
+        get_attributes => 'elements',
+    }
+);
+
+1;