r50229 - in /trunk/libauthen-krb5-perl: COPYRIGHT Changes Krb5.pm Krb5.xs README debian/changelog debian/compat debian/control debian/examples debian/libauthen-krb5-perl.examples debian/rules
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Tue Jan 5 04:10:30 UTC 2010
Author: jawnsy-guest
Date: Tue Jan 5 04:10:23 2010
New Revision: 50229
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=50229
Log:
* New upstream release
* Move examples -> libauthen-krb5-perl.examples
* Use new debhelper 7 short rules file
* Add myself to Uploaders and Copyright
* Standards-Version 3.8.3 (drop perl version dep)
* Slight rewrite of control description
* debian/control: Added: ${misc:Depends} to Depends: field.
Added:
trunk/libauthen-krb5-perl/debian/libauthen-krb5-perl.examples
- copied unchanged from r50228, trunk/libauthen-krb5-perl/debian/examples
Removed:
trunk/libauthen-krb5-perl/debian/examples
Modified:
trunk/libauthen-krb5-perl/COPYRIGHT
trunk/libauthen-krb5-perl/Changes
trunk/libauthen-krb5-perl/Krb5.pm
trunk/libauthen-krb5-perl/Krb5.xs
trunk/libauthen-krb5-perl/README
trunk/libauthen-krb5-perl/debian/changelog
trunk/libauthen-krb5-perl/debian/compat
trunk/libauthen-krb5-perl/debian/control
trunk/libauthen-krb5-perl/debian/rules
Modified: trunk/libauthen-krb5-perl/COPYRIGHT
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/COPYRIGHT?rev=50229&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/COPYRIGHT (original)
+++ trunk/libauthen-krb5-perl/COPYRIGHT Tue Jan 5 04:10:23 2010
@@ -1,3 +1,3 @@
-Copyright (c) 2000-2008 Jeff Horwitz (jeff at smashing.org). All rights reserved.
+Copyright (c) 2000-2010 Jeff Horwitz (jeff at smashing.org). All rights reserved.
This module is free software; you can redistribute it and/or modify it under
the same terms as Perl itself.
Modified: trunk/libauthen-krb5-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/Changes?rev=50229&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/Changes (original)
+++ trunk/libauthen-krb5-perl/Changes Tue Jan 5 04:10:23 2010
@@ -1,4 +1,6 @@
Revision history for Perl extension Krb5.
+
+1.9 Add Authen::Krb5::Creds object (tom.jones at oucs.ox.ac.uk)
1.8 Fix broken get_in_tkt_with_password implementation (rra at debian.org)
Add some missing prototypes (rra at debian.org)
Modified: trunk/libauthen-krb5-perl/Krb5.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/Krb5.pm?rev=50229&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/Krb5.pm (original)
+++ trunk/libauthen-krb5-perl/Krb5.pm Tue Jan 5 04:10:23 2010
@@ -52,7 +52,7 @@
KRB5_NT_UNKNOWN
KRB5_TGS_NAME
);
-$VERSION = '1.8';
+$VERSION = '1.9';
sub KRB5_TGS_NAME() { return "krbtgt"; }
@@ -558,6 +558,47 @@
=back
+=item Authen::Krb5::Creds
+
+Object representing a credential.
+
+=over 4
+
+=item o starttime()
+
+Returns the starttime time property of the credential.
+
+=item o authtime()
+
+Returns the authtime time property of the credential.
+
+=item o endtime()
+
+Returns the endtime time property of the credential.
+
+=item o renew_till()
+
+Returns the renew_till time property of the credential.
+
+=item o server()
+
+Returns the name of the service principal the credential is for.
+
+=item o client()
+
+Returns the client principal name (will usually be identical for all
+credentials in a credential cache).
+
+=item o ticket()
+
+Returns the Authen::Krb5::Ticket for this credential.
+
+=item o keyblock()
+
+Returns the keyblock of the credential.
+
+=back
+
=head1 AUTHOR
Jeff Horwitz (jeff at smashing.org)
Modified: trunk/libauthen-krb5-perl/Krb5.xs
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/Krb5.xs?rev=50229&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/Krb5.xs (original)
+++ trunk/libauthen-krb5-perl/Krb5.xs Tue Jan 5 04:10:23 2010
@@ -8,7 +8,12 @@
/* We currently provide some private functions and probably shouldn't. */
#define KRB5_PRIVATE 1
#include <krb5.h>
-#include <com_err.h>
+
+/* Recent versions of Kerberos include com_err on their own. Uncomment if you
+ * have an older version and the complier complains about missing headers.
+ */
+/* #include <com_err.h> */
+
#include <errno.h>
#include "krb5_constants.c"
@@ -1286,6 +1291,123 @@
MODULE = Authen::Krb5 PACKAGE = Authen::Krb5::Creds
+krb5_timestamp
+starttime(cred)
+ Authen::Krb5::Creds cred
+
+ CODE:
+ if (!cred->times.starttime)
+ cred->times.starttime = cred->times.authtime;
+ RETVAL = cred->times.starttime;
+
+ OUTPUT:
+ RETVAL
+
+krb5_timestamp
+authtime(cred)
+ Authen::Krb5::Creds cred
+
+ CODE:
+ RETVAL = cred->times.authtime;
+
+ OUTPUT:
+ RETVAL
+
+krb5_timestamp
+endtime(cred)
+ Authen::Krb5::Creds cred
+
+ CODE:
+ RETVAL = cred->times.endtime;
+
+ OUTPUT:
+ RETVAL
+
+krb5_timestamp
+renew_till(cred)
+ Authen::Krb5::Creds cred
+
+ CODE:
+ RETVAL = cred->times.renew_till;
+
+ OUTPUT:
+ RETVAL
+
+char *
+server(cred)
+ Authen::Krb5::Creds cred
+
+ PREINIT:
+ krb5_error_code retval;
+ char *sname;
+
+ CODE:
+ retval = krb5_unparse_name(context, cred->server, &sname);
+ if (retval) {
+ com_err("Authen::Krb5::Creds", retval, "while unparsing server name");
+ return;
+ }
+
+ RETVAL = sname;
+
+ OUTPUT:
+ RETVAL
+
+char *
+client(cred)
+ Authen::Krb5::Creds cred
+
+ PREINIT:
+ krb5_error_code retval;
+ char *name;
+
+ CODE:
+ retval = krb5_unparse_name(context, cred->client, &name);
+ if (retval) {
+ com_err("Authen::Krb5::Creds", retval, "while unparsing client name");
+ return;
+ }
+
+ RETVAL = name;
+
+ OUTPUT:
+ RETVAL
+
+Authen::Krb5::Ticket
+ticket(cred)
+ Authen::Krb5::Creds cred
+
+ PREINIT:
+ krb5_error_code retval;
+ krb5_ticket *t;
+
+ CODE:
+ if (!New(0,t,1,krb5_ticket)) XSRETURN_UNDEF;
+
+ retval = krb5_decode_ticket(&cred->ticket, &t);
+
+ RETVAL = t;
+
+ can_free((SV *)RETVAL);
+
+ OUTPUT:
+ RETVAL
+
+Authen::Krb5::Keyblock
+keyblock(cred)
+ Authen::Krb5::Creds cred
+
+ CODE:
+ RETVAL = &cred->keyblock;
+
+ can_free((SV *)RETVAL);
+
+ OUTPUT:
+ RETVAL
+
+# TODO: Authen::Krb5::Address
+# addresses(cred)
+
void
DESTROY(creds)
Authen::Krb5::Creds creds
Modified: trunk/libauthen-krb5-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/README?rev=50229&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/README (original)
+++ trunk/libauthen-krb5-perl/README Tue Jan 5 04:10:23 2010
@@ -1,6 +1,10 @@
Krb5 provides an object oriented interface to the most commonly used
functions included in the Kerberos 5 API. It was developed and tested
using Perl 5.005_03 and MIT Kerberos 5 version 1.0.5 and 1.1.1.
+
+NOTE: This module is very out of date, though it should still work with recent
+Kerberos 5 libraries. Version 2.0 will be a well deserved, complete rewrite.
+Following version 1.9, only bug fixes will be released for the 1.x series.
Your comments and bug reports are welcome. Please send them to me at
jeff at smashing.org.
Modified: trunk/libauthen-krb5-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/debian/changelog?rev=50229&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/debian/changelog (original)
+++ trunk/libauthen-krb5-perl/debian/changelog Tue Jan 5 04:10:23 2010
@@ -1,18 +1,24 @@
-libauthen-krb5-perl (1.8-2) UNRELEASED; urgency=low
+libauthen-krb5-perl (1.9-1) UNRELEASED; urgency=low
+
+ [ Jonathan Yu ]
+ * New upstream release
+ * Move examples -> libauthen-krb5-perl.examples
+ * Use new debhelper 7 short rules file
+ * Add myself to Uploaders and Copyright
+ * Standards-Version 3.8.3 (drop perl version dep)
+ * Slight rewrite of control description
[ gregor herrmann ]
* Add debian/README.source to document quilt usage, as required by
Debian Policy since 3.8.0.
* debian/control: Changed: Switched Vcs-Browser field to ViewSVN
(source stanza).
+ * debian/control: Added: ${misc:Depends} to Depends: field.
[ Maximilian Gaß ]
* Added patch for manpage-has-errors-from-pod2man
- [ gregor herrmann ]
- * debian/control: Added: ${misc:Depends} to Depends: field.
-
- -- gregor herrmann <gregoa at debian.org> Wed, 06 Aug 2008 21:33:22 -0300
+ -- Jonathan Yu <jawnsy at cpan.org> Mon, 04 Jan 2010 23:05:03 -0500
libauthen-krb5-perl (1.8-1) unstable; urgency=low
Modified: trunk/libauthen-krb5-perl/debian/compat
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/debian/compat?rev=50229&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/debian/compat (original)
+++ trunk/libauthen-krb5-perl/debian/compat Tue Jan 5 04:10:23 2010
@@ -1,1 +1,1 @@
-6
+7
Modified: trunk/libauthen-krb5-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/debian/control?rev=50229&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/debian/control (original)
+++ trunk/libauthen-krb5-perl/debian/control Tue Jan 5 04:10:23 2010
@@ -1,10 +1,10 @@
Source: libauthen-krb5-perl
Section: perl
Priority: optional
-Build-Depends: perl (>= 5.8.0-7), debhelper (>= 6), libkrb5-dev, quilt
+Build-Depends: perl, debhelper (>= 7.0.8), quilt (>= 0.46-7), libkrb5-dev
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
-Uploaders: Russ Allbery <rra at debian.org>
-Standards-Version: 3.7.3
+Uploaders: Russ Allbery <rra at debian.org>, Jonathan Yu <jawnsy at cpan.org>
+Standards-Version: 3.8.3
Homepage: http://search.cpan.org/dist/Authen-Krb5/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libauthen-krb5-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libauthen-krb5-perl/
@@ -12,11 +12,11 @@
Package: libauthen-krb5-perl
Architecture: any
Depends: ${misc:Depends}, ${perl:Depends}, ${shlibs:Depends}
-Description: Perl extension for Kerberos 5 API
- Authen::Krb5 is an object-oriented interface to the Kerberos 5 API. It
- rearranges the API slightly to provide an object-oriented view, but
- otherwise closely matches the C interface. While basic documentation is
- provided, use may require previous experience with Kerberos 5
- programming or reference to the Kerberos 5 API documentation.
+Description: Perl interface to Kerberos 5 API
+ Authen::Krb5 is a Perl module providing an object-oriented interface to the
+ Kerberos 5 API. It rearranges the API slightly to provide an object-oriented
+ view, but otherwise closely matches the C interface. Use may require previous
+ experience with Kerberos 5 programming or reference to the Kerberos 5 API
+ documentation.
.
This package is built against the MIT Kerberos 5 libraries.
Modified: trunk/libauthen-krb5-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libauthen-krb5-perl/debian/rules?rev=50229&op=diff
==============================================================================
--- trunk/libauthen-krb5-perl/debian/rules (original)
+++ trunk/libauthen-krb5-perl/debian/rules Tue Jan 5 04:10:23 2010
@@ -1,78 +1,4 @@
#!/usr/bin/make -f
-#
-# Based on the Perl package template:
-#
-# This debian/rules file is provided as a template for normal perl
-# packages. It was created by Marc Brockschmidt <marc at dch-faq.de> for
-# the Debian Perl Group (http://pkg-perl.alioth.debian.org/) but may
-# be used freely wherever it is useful.
-include /usr/share/quilt/quilt.make
-
-# Uncomment this to turn on verbose mode.
-# export DH_VERBOSE=1
-
-# If set to a true value then MakeMaker's prompt function will
-# always return the default without waiting for user input.
-export PERL_MM_USE_DEFAULT=1
-
-PACKAGE = $(shell dh_listpackages)
-TMP = $(CURDIR)/debian/$(PACKAGE)
-PERL ?= /usr/bin/perl
-
-CFLAGS = -Wall -g
-ifneq (,$(findstring noopt,$(DEB_BUILD_OPTIONS)))
- CFLAGS += -O0
-else
- CFLAGS += -O2
-endif
-
-build: build-arch build-indep
-build-indep:
-build-arch: build-stamp
-build-stamp: $(QUILT_STAMPFN)
- dh_testdir
- $(PERL) Makefile.PL INSTALLDIRS=vendor
- $(MAKE) OPTIMIZE="$(CFLAGS)"
- $(MAKE) test
- touch $@
-
-clean: unpatch
- dh_testdir
- dh_testroot
- rm -f build-stamp install-stamp
- [ ! -f Makefile ] || touch Makefile
- [ ! -f Makefile ] || $(MAKE) distclean
- dh_clean
-
-install: install-stamp
-install-stamp:
- dh_testdir
- dh_testroot
- dh_clean -k
- $(MAKE) install DESTDIR=$(TMP) PREFIX=/usr
- [ ! -d $(TMP)/usr/share/perl5 ] \
- || rmdir --ignore-fail-on-non-empty --parents --verbose \
- $(TMP)/usr/share/perl5
- touch $@
-
-binary: binary-arch binary-indep
-binary-indep:
-binary-arch: build install
- dh_testdir
- dh_testroot
- dh_installdocs README TODO
- dh_installchangelogs Changes
- dh_installexamples
- dh_perl
- dh_strip
- dh_compress
- dh_fixperms
- dh_installdeb
- dh_shlibdeps
- dh_gencontrol
- dh_md5sums
- dh_builddeb
-
-.PHONY: binary binary-arch binary-indep build build-arch build-indep clean
-.PHONY: install
+%:
+ dh --with quilt $@
More information about the Pkg-perl-cvs-commits
mailing list