r51403 - in /trunk/libauthen-krb5-perl/debian: changelog patches/fix-init_context.patch patches/series

[ansgar-guest at users.alioth.debian.org]

Author: ansgar-guest
Date: Sun Jan 24 05:56:43 2010
New Revision: 51403

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=51403
Log:
Introduce patch to make init_context() return the context as documented.
(new patch: fix-init_context.patch)

Added:
    trunk/libauthen-krb5-perl/debian/patches/fix-init_context.patch
Modified:
    trunk/libauthen-krb5-perl/debian/changelog
    trunk/libauthen-krb5-perl/debian/patches/series

Modified: trunk/libauthen-krb5-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/debian/changelog?rev=51403&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/debian/changelog (original)
+++ trunk/libauthen-krb5-perl/debian/changelog Sun Jan 24 05:56:43 2010
@@ -1,3 +1,10 @@
+libauthen-krb5-perl (1.9-2) UNRELEASED; urgency=low
+
+  * Introduce patch to make init_context() return the context as documented.
+    (new patch: fix-init_context.patch)
+
+ -- Ansgar Burchardt <ansgar at 43-1.org>  Sun, 24 Jan 2010 14:55:05 +0900
+
 libauthen-krb5-perl (1.9-1) unstable; urgency=low
 
   [ Jonathan Yu ]

Added: trunk/libauthen-krb5-perl/debian/patches/fix-init_context.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/debian/patches/fix-init_context.patch?rev=51403&op=file
==============================================================================
--- trunk/libauthen-krb5-perl/debian/patches/fix-init_context.patch (added)
+++ trunk/libauthen-krb5-perl/debian/patches/fix-init_context.patch Sun Jan 24 05:56:43 2010
@@ -1,0 +1,51 @@
+From: Ansgar Burchardt <ansgar at 43-1.org>
+Origin: vendor
+Subject: init_context() should return context
+
+Make init_context() really return the context as documented.  We also make it
+safe to call init_context() several times in case one wants to access the
+context object later.
+--- libauthen-krb5-perl.orig/Krb5.xs
++++ libauthen-krb5-perl/Krb5.xs
+@@ -25,6 +25,7 @@
+ #define KRB5_DEFAULT_LIFE 60*60*10
+ 
+ typedef krb5_ccache		Authen__Krb5__Ccache;
++typedef krb5_context		Authen__Krb5__Context;
+ typedef krb5_principal		Authen__Krb5__Principal;
+ typedef krb5_auth_context	Authen__Krb5__AuthContext;
+ typedef krb5_rcache		Authen__Krb5__Rcache;
+@@ -121,14 +122,18 @@
+ 		SvIOK_on(ST(0));
+ 	}
+ 
+-void
++Authen::Krb5::Context
+ krb5_init_context()
+ 
+ 	CODE:
+-	if (context) croak("Authen::Krb5 already initialized");
+-	err = krb5_init_context(&context);
+-	if (err) XSRETURN_UNDEF;
+-	XSRETURN_YES;
++	if (!context) {
++		err = krb5_init_context(&context);
++		if (err) XSRETURN_UNDEF;
++	}
++	RETVAL = context;
++
++	OUTPUT:
++	RETVAL
+ 
+ void
+ krb5_free_context()
+--- libauthen-krb5-perl.orig/typemap
++++ libauthen-krb5-perl/typemap
+@@ -1,6 +1,7 @@
+ TYPEMAP
+ 
+ Authen::Krb5::Ccache		T_PTROBJ_NU
++Authen::Krb5::Context		T_PTROBJ_NU
+ Authen::Krb5::Principal		T_PTROBJ_NU
+ Authen::Krb5::AuthContext	T_PTROBJ_NU
+ Authen::Krb5::Rcache		T_PTROBJ_NU

Modified: trunk/libauthen-krb5-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/debian/patches/series?rev=51403&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/debian/patches/series (original)
+++ trunk/libauthen-krb5-perl/debian/patches/series Sun Jan 24 05:56:43 2010
@@ -1,2 +1,3 @@
 better-compiler-flags
 fix_pod
+fix-init_context.patch