Attachment 46182 Details for Bug 11807 – Bug 11807 : Add support for categorycode conversions when updating an user using a LDAP server.

[patch] Bug 11807 : Add support for categorycode conversions when updating an user using a LDAP server.

Bug-11807--Add-support-for-categorycode-conversion.patch (text/plain), 3.25 KB, created by Chris Cormack on 2016-01-04 03:54:40 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Chris Cormack

Created: 2016-01-04 03:54:40 UTC

Size: 3.25 KB

patch

obsolete

>From 02f495c1f44e1b9ded66a886f63f86e02c9543d3 Mon Sep 17 00:00:00 2001
>From: =?UTF-8?q?Fr=C3=A9d=C3=A9rick?= <frederick.capovilla@libeo.com>
>Date: Wed, 19 Feb 2014 12:02:41 -0500
>Subject: [PATCH] Bug 11807 : Add support for categorycode conversions when
> updating an user using a LDAP server.
>
>To test
>
>1/ Apply both patches
>
>2/ This patch lets you easily configure mappings for categorycode values.
>These mapping will be used when updating the user's account after a successful LDAP login.
>
>Here is an example configuration :
>
><config>
>  <ldapserver id="ldapserver>
>    <mapping>
>      <categorycode is="usertype">STU</categorycode>
>      ...
>    </mapping>
>
>    <categorycode_mapping>
>      <categorycode value="STU">STUDENT</categorycode>
>      <categorycode value="EMP">EMPLOYEE</categorycode>
>    </categorycode_mapping>
>  </ldapserver>
></config>
>
>3/ With this configuration, LDAP users with the usertype value "EMP" on the LDAP server should have the "EMPLOYEE" categorycode in Koha.
>
>Signed-off-by: Chris <chris@bigballofwax.co.nz>
>---
> C4/Auth_with_ldap.pm |   22 ++++++++++++++++++++++
> 1 file changed, 22 insertions(+)
>
>diff --git a/C4/Auth_with_ldap.pm b/C4/Auth_with_ldap.pm
>index 58484a2..1c2ec96 100644
>--- a/C4/Auth_with_ldap.pm
>+++ b/C4/Auth_with_ldap.pm
>@@ -27,6 +27,7 @@ use C4::Members qw(AddMember changepassword);
> use C4::Members::Attributes;
> use C4::Members::AttributeTypes;
> use C4::Members::Messaging;
>+use C4::Dates;
> use C4::Auth qw(checkpw_internal);
> use Koha::AuthUtils qw(hash_password);
> use List::MoreUtils qw( any );
>@@ -66,6 +67,15 @@ $debug and print STDERR "Got ", scalar(@mapkeys), " ldap mapkeys (  total  ): ",
> @mapkeys = grep {defined $mapping{$_}->{is}} @mapkeys;
> $debug and print STDERR "Got ", scalar(@mapkeys), " ldap mapkeys (populated): ", join ' ', @mapkeys, "\n";
> 
>+my %categorycode_conversions;
>+my $default_categorycode;
>+if(defined $ldap->{categorycode_mapping}) {
>+    $default_categorycode = $ldap->{categorycode_mapping}->{default};
>+    foreach my $cat (@{$ldap->{categorycode_mapping}->{categorycode}}) {
>+        $categorycode_conversions{$cat->{value}} = $cat->{content};
>+    }
>+}
>+
> my %config = (
> 	anonymous => ($ldapname and $ldappassword) ? 0 : 1,
>     replicate => defined($ldap->{replicate}) ? $ldap->{replicate} : 1,  #    add from LDAP to Koha database for new user
>@@ -263,6 +273,18 @@ sub ldap_entry_2_hash {
>   		. substr($borrower{ 'surname' },0,1)
>   		. " ");
> 
>+    # Date and categorycode conversions
>+    $borrower{'dateexpiry'} = C4::Dates->new($borrower{'dateexpiry'},'sql')->output('iso') if $borrower{'dateexpiry'};
>+    $borrower{'dateofbirth'} = C4::Dates->new($borrower{'dateofbirth'},'sql')->output('iso') if $borrower{'dateofbirth'};
>+    $borrower{'dateenrolled'} = C4::Dates->new($borrower{'dateenrolled'},'sql')->output('iso') if $borrower{'dateenrolled'};
>+
>+    if(defined $categorycode_conversions{$borrower{categorycode}}) {
>+        $borrower{categorycode} = $categorycode_conversions{$borrower{categorycode}};
>+    }
>+    elsif($default_categorycode) {
>+        $borrower{categorycode} = $default_categorycode;
>+    }
>+
> 	# check if categorycode exists, if not, fallback to default from koha-conf.xml
> 	my $dbh = C4::Context->dbh;
> 	my $sth = $dbh->prepare("SELECT categorycode FROM categories WHERE categorycode = ?");
>-- 
>1.7.10.4

Actions: View | Diff | Splinter Review

Attachments on bug 11807: 25526 | 42105 | 46182 | 46183 | 49789 | 49790