From 430be3e9f3e8ca2313a9b8487a34803edc3aaf2d Mon Sep 17 00:00:00 2001
From: Tomas Cohen Arazi <tomascohen@theke.io>
Date: Mon, 21 Oct 2019 13:26:57 -0300
Subject: [PATCH] Bug 23843: Add mapping to Koha::Library
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

This patch adds a to_api_mapping method to the class. This in effect
enables calling ->to_api on the object. The mapping is borrowed from the
API controller. It is not removed from the controller so we are able to
verify (through the tests) that there is no behavior change.
Once this is pushed we need to implement the counter-wise methods and
clean the controllers.
To test:
1. Run:
   $ kshell
  k$ prove t/db_dependent/api/v1/libraries.t
=> SUCCESS: Tests pass
2. Apply this patch
3. Repeat (1)
=> SUCCESS: Tests still pass!
4. Sign off :-D

Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Joonas Kylmälä <joonas.kylmala@helsinki.fi>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
---
 Koha/Library.pm         | 32 ++++++++++++++++++++++++++++++++
 Koha/REST/V1/Library.pm | 16 +++++++++++++---
 2 files changed, 45 insertions(+), 3 deletions(-)

diff --git a/Koha/Library.pm b/Koha/Library.pm
index 6870e84cc4..dab86e7580 100644
--- a/Koha/Library.pm
+++ b/Koha/Library.pm
@@ -89,6 +89,38 @@ sub cash_registers {
     return Koha::Cash::Registers->_new_from_dbic( $rs );
 }
 
+=head3 to_api_mapping
+
+This method returns the mapping for representing a Koha::Library object
+on the API.
+
+=cut
+
+sub to_api_mapping {
+    return {
+        branchcode       => 'library_id',
+        branchname       => 'name',
+        branchaddress1   => 'address1',
+        branchaddress2   => 'address2',
+        branchaddress3   => 'address3',
+        branchzip        => 'postal_code',
+        branchcity       => 'city',
+        branchstate      => 'state',
+        branchcountry    => 'country',
+        branchphone      => 'phone',
+        branchfax        => 'fax',
+        branchemail      => 'email',
+        branchreplyto    => 'reply_to_email',
+        branchreturnpath => 'return_path_email',
+        branchurl        => 'url',
+        issuing          => undef,
+        branchip         => 'ip',
+        branchprinter    => undef,
+        branchnotes      => 'notes',
+        marcorgcode      => 'marc_org_code',
+    };
+}
+
 =head2 Internal methods
 
 =head3 _type
diff --git a/Koha/REST/V1/Library.pm b/Koha/REST/V1/Library.pm
index 0bf16ee60b..a40e049331 100644
--- a/Koha/REST/V1/Library.pm
+++ b/Koha/REST/V1/Library.pm
@@ -79,7 +79,10 @@ sub get {
                            openapi => { error => "Library not found" } );
     }
 
-    return $c->render( status => 200, openapi => _to_api( $library->TO_JSON ) );
+    return $c->render(
+        status  => 200,
+        openapi => $library->to_api
+    );
 }
 
 =head3 add
@@ -95,7 +98,11 @@ sub add {
         my $library = Koha::Library->new( _to_model( $c->validation->param('body') ) );
         $library->store;
         $c->res->headers->location( $c->req->url->to_string . '/' . $library->branchcode );
-        return $c->render( status => 201, openapi => _to_api( $library->TO_JSON ) );
+
+        return $c->render(
+            status  => 201,
+            openapi => $library->to_api
+        );
     }
     catch {
         unless ( blessed $_ && $_->can('rethrow') ) {
@@ -141,7 +148,10 @@ sub update {
         my $params = $c->req->json;
         $library->set( _to_model($params) );
         $library->store();
-        return $c->render( status => 200, openapi => _to_api($library->TO_JSON) );
+        return $c->render(
+            status  => 200,
+            openapi => $library->to_api
+        );
     }
     catch {
         unless ( blessed $_ && $_->can('rethrow') ) {
-- 
2.39.5