r60173 - in /trunk/libnet-managesieve-perl: ./ debian/ debian/patches/ debian/source/ lib/Net/
ansgar-guest at users.alioth.debian.org
ansgar-guest at users.alioth.debian.org
Fri Jul 9 14:34:29 UTC 2010
Author: ansgar-guest
Date: Fri Jul 9 14:34:15 2010
New Revision: 60173
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=60173
Log:
* New upstream release.
* debian/copyright: Update years of copyright.
* debian/copyright: Formatting changes for current DEP-5 proposal.
* Use source format 3.0 (quilt); drop README.source and quilt framework.
* Fix spelling errors in the documentation.
+ new patch: spelling.patch
* Bump Standards-Version to 3.9.0 (no changes).
* Add myself to Uploaders.
Added:
trunk/libnet-managesieve-perl/debian/patches/spelling.patch
trunk/libnet-managesieve-perl/debian/source/
trunk/libnet-managesieve-perl/debian/source/format
Removed:
trunk/libnet-managesieve-perl/debian/README.source
Modified:
trunk/libnet-managesieve-perl/Changes
trunk/libnet-managesieve-perl/META.yml
trunk/libnet-managesieve-perl/SIGNATURE
trunk/libnet-managesieve-perl/debian/changelog
trunk/libnet-managesieve-perl/debian/control
trunk/libnet-managesieve-perl/debian/copyright
trunk/libnet-managesieve-perl/debian/patches/series
trunk/libnet-managesieve-perl/debian/rules
trunk/libnet-managesieve-perl/lib/Net/ManageSieve.pm
Modified: trunk/libnet-managesieve-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/Changes?rev=60173&op=diff
==============================================================================
--- trunk/libnet-managesieve-perl/Changes (original)
+++ trunk/libnet-managesieve-perl/Changes Fri Jul 9 14:34:15 2010
@@ -1,4 +1,19 @@
Revision history for Perl extension Net::ManageSieve.
+
+0.10 Fri Jul 8 15:45:42 CEST 2010
+ - fix: authentificate against Cyrus CPAN bug #58192 Rudy Gevaert
+ You can pass different user and authname to auth() now
+ - fix: added missed entry in Changes of v0.09
+ - fix: stall in select() CPAN bug #58235 Rudy Gevaert
+ When the SSL layer buffers data, select() does not return
+ true, hence, is not indicating that pending data. It seems
+ that select() queries the TCP stack only.
+ The now choosen maximal size in sysread() is larger than
+ the block size of Net::SSLeay at the current time of 32KB.
+
+0.09 Thu Sep 24 14:29:07 CEST 2009
+ - fix: CPAN bug#49333: bug in Mangesieve by Oliver Eales
+ base64 encoded password in fallback branch contains line feeds
0.08 Tue Aug 4 13:56:26 CEST 2009
- chg: accept ucfirst options on new() constructor for all options
Modified: trunk/libnet-managesieve-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/META.yml?rev=60173&op=diff
==============================================================================
--- trunk/libnet-managesieve-perl/META.yml (original)
+++ trunk/libnet-managesieve-perl/META.yml Fri Jul 9 14:34:15 2010
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Net-ManageSieve
-version: 0.09
+version: 0.10
abstract: ManageSieve Protocol Client
author:
- Steffen Kaiser <cpan at skaus.info>
Modified: trunk/libnet-managesieve-perl/SIGNATURE
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/SIGNATURE?rev=60173&op=diff
==============================================================================
--- trunk/libnet-managesieve-perl/SIGNATURE (original)
+++ trunk/libnet-managesieve-perl/SIGNATURE Fri Jul 9 14:34:15 2010
@@ -15,15 +15,15 @@
Hash: SHA1
SHA1 9b1e6ccab9aae1f3abbc00a8bbc1a948c92d7dca COPYING
-SHA1 a28bc0e489c4189da665ad846946ba1132cfaf09 Changes
+SHA1 aad08c12fbe75345acba882df3722ed68c318d30 Changes
SHA1 dcaa0c0dc2cbd898152fb57a8b3e1747fd857504 LICENSE
SHA1 a2e4e1d7b15aa75d31c28d4dd3721deaacf5215d MANIFEST
SHA1 f6aafb59d1c051fde474599535891fc5e49bc31b MANIFEST.SKIP
-SHA1 bf755c6099dbcd0dca2c6a6d1ad4819ff06efd7e META.yml
+SHA1 db533235844457c2dd1382c9e133f45bed0428ce META.yml
SHA1 60083cedbf92adea30b31c96c1fa07005f5ca52f Makefile.PL
SHA1 4761910f6e1d95d00a89008dff894a94fc77731a README
SHA1 b810608c247c68111eb2d95d809116e7d6548c92 TODO
-SHA1 21659c86c1738def40bf24952c0a628a7928cc38 lib/Net/ManageSieve.pm
+SHA1 7080c2547c9d4052b4baeef31cb37b34565dfb38 lib/Net/ManageSieve.pm
SHA1 e1fd5931b8c313a295550da26b7914f4fd4c05bc managesieve-test-account.sample
SHA1 e84b212ac2a465c56266c9bb2d3b1f8016ac4b21 t/00-signature.t
SHA1 4bd8d2b8ee556deb6c6151bf7108c731e8004919 t/Net-ManageSieve.t
@@ -32,11 +32,11 @@
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.6 (GNU/Linux)
-iQEVAwUBSrtmljLh+Gx9F1xpAQKnvAf/RCP4wuZn4N5R9VsOCnBRL+uiRCJcrPxr
-mgLJnjt1AiwLwrp+Q28qiwSziCCHdEyTMQAwxGHCJO8aI9ce4+zJrT2n+CWezeHQ
-d3p9SSdtDb/Z/bUeEZA4qVoImwhlkf1ifi7fn6Nqxhom6OZ538jCZcHXp7yF4FCT
-7nz9AGMmtF8NafFMnxlMhWugqsawI3QLTIuuyXMLhW1J8vfWbiBOC00J4l7Vwbt3
-bJMxsiFyQnZJvDUyCGqlrNxk1CJR0DU6wWabuf9V8fukOSQITnatJu4jmR0Du2YR
-5loBvW0gqTy21xLblYId8e2PMh13sZ1inoJKeA8bXYOVLKL8rGX9Mw==
-=sgJq
+iQEVAwUBTDXWzDLh+Gx9F1xpAQKYWAf+JttkzbolMIVZXoU+pYWYbuVb/b9/tE7f
+/XZKejlaZ+Xo0c7nQMvlpZbksHSb3PUEiNIPqhAuhhThMc6r50gBB7kzfHFuhquY
+YIcsiEyI0TkuKWHj+zUTssnwSjbUF4pTFMu1wDhqfgBue/U8YVX92V1tEsgU/IjN
+C5St703XGgzZnvj7nIhXyFbZ6RrX6WH0y6YMdVa0LrxHdP8zhvIKCTD6aXuNS3xN
+/JkwMX4WA5l5/FPoXk49Ly4Ez/VzBtuCXIKz7g7464wcRJVvs65gx0WNrslB3Km1
+1tbQ89+bmmggDLMRjEO1ndE5zwkilTErd40Xves5nb7iaSKa4ZqEjQ==
+=3gmT
-----END PGP SIGNATURE-----
Modified: trunk/libnet-managesieve-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/debian/changelog?rev=60173&op=diff
==============================================================================
--- trunk/libnet-managesieve-perl/debian/changelog (original)
+++ trunk/libnet-managesieve-perl/debian/changelog Fri Jul 9 14:34:15 2010
@@ -1,3 +1,16 @@
+libnet-managesieve-perl (0.10-1) unstable; urgency=low
+
+ * New upstream release.
+ * debian/copyright: Update years of copyright.
+ * debian/copyright: Formatting changes for current DEP-5 proposal.
+ * Use source format 3.0 (quilt); drop README.source and quilt framework.
+ * Fix spelling errors in the documentation.
+ + new patch: spelling.patch
+ * Bump Standards-Version to 3.9.0 (no changes).
+ * Add myself to Uploaders.
+
+ -- Ansgar Burchardt <ansgar at 43-1.org> Fri, 09 Jul 2010 23:33:53 +0900
+
libnet-managesieve-perl (0.09-1) unstable; urgency=low
[ Jonathan Yu ]
Modified: trunk/libnet-managesieve-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/debian/control?rev=60173&op=diff
==============================================================================
--- trunk/libnet-managesieve-perl/debian/control (original)
+++ trunk/libnet-managesieve-perl/debian/control Fri Jul 9 14:34:15 2010
@@ -1,12 +1,12 @@
Source: libnet-managesieve-perl
Section: perl
Priority: optional
-Build-Depends: debhelper (>= 7.0.8), quilt (>= 0.46-7)
+Build-Depends: debhelper (>= 7)
Build-Depends-Indep: perl, libtest-pod-coverage-perl,
libtest-pod-perl
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
-Uploaders: Jonathan Yu <jawnsy at cpan.org>
-Standards-Version: 3.8.3
+Uploaders: Jonathan Yu <jawnsy at cpan.org>, Ansgar Burchardt <ansgar at 43-1.org>
+Standards-Version: 3.9.0
Homepage: http://search.cpan.org/dist/Net-ManageSieve/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libnet-managesieve-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libnet-managesieve-perl/
Modified: trunk/libnet-managesieve-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/debian/copyright?rev=60173&op=diff
==============================================================================
--- trunk/libnet-managesieve-perl/debian/copyright (original)
+++ trunk/libnet-managesieve-perl/debian/copyright Fri Jul 9 14:34:15 2010
@@ -1,18 +1,16 @@
-Format-Specification:
- http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=196
-Upstream-Maintainer: Steffen Kaiser
-Upstream-Source: http://search.cpan.org/dist/Net-ManageSieve/
-Upstream-Name: Net-ManageSieve
+Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135
+Maintainer: Steffen Kaiser
+Source: http://search.cpan.org/dist/Net-ManageSieve/
+Name: Net-ManageSieve
-Files: *
-Copyright: 2008, Steffen Kaiser
-License-Alias: Perl
-License: Artistic | GPL-1+
+Copyright: 2008-2010, Steffen Kaiser
+License: Artistic or GPL-1+
Files: debian/*
-Copyright: 2009, Jonathan Yu <jawnsy at cpan.org>
+Copyright:
+ 2009, Jonathan Yu <jawnsy at cpan.org>
2009, Christoph Berg <myon at debian.org>
-License: Artistic | GPL-1+
+License: Artistic or GPL-1+
License: Artistic
This program is free software; you can redistribute it and/or modify
Modified: trunk/libnet-managesieve-perl/debian/patches/series
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/debian/patches/series?rev=60173&op=diff
==============================================================================
--- trunk/libnet-managesieve-perl/debian/patches/series (original)
+++ trunk/libnet-managesieve-perl/debian/patches/series Fri Jul 9 14:34:15 2010
@@ -1,1 +1,2 @@
disable-signature-test.patch
+spelling.patch
Added: trunk/libnet-managesieve-perl/debian/patches/spelling.patch
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/debian/patches/spelling.patch?rev=60173&op=file
==============================================================================
--- trunk/libnet-managesieve-perl/debian/patches/spelling.patch (added)
+++ trunk/libnet-managesieve-perl/debian/patches/spelling.patch Fri Jul 9 14:34:15 2010
@@ -1,0 +1,35 @@
+From: Ansgar Burchardt <ansgar at 43-1.org>
+Date: Fri, 09 Jul 2010 23:28:08 +0900
+Origin: vendor
+Subject: Fix spelling errors in documentation
+Forwarded: https://rt.cpan.org/Ticket/Display.html?id=59225
+
+--- libnet-managesieve-perl.orig/lib/Net/ManageSieve.pm
++++ libnet-managesieve-perl/lib/Net/ManageSieve.pm
+@@ -308,7 +308,7 @@
+ =item starttls ( %SSL_opts )
+
+ Initiates a TLS session, may be used only before any
+-authentification.
++authentication.
+
+ The C<SSL_opts> is a HASH containing any options you can
+ pass to L<< IO::Socket::SSL->new() >>. No one is passed by default.
+@@ -405,7 +405,7 @@
+ Authentificates as C<USER>.
+
+ If the module L<Authen::SASL> is available, this module is tried first. In
+-this case, the C<USER> paramter may be a C<Authen::SASL> object, that
++this case, the C<USER> parameter may be a C<Authen::SASL> object, that
+ is not furtherly modified. If C<USER> is no C<Authen::SASL> object,
+ C<USER> is passed as C<user>, C<PASSWORD> as C<pass> and C<AUTHNAME>
+ as C<authname> to C<< Authen::SASL->new() >>. If C<AUTHNAME> is
+@@ -566,7 +566,7 @@
+
+ =item capabilities ([reget])
+
+-Returns the capabilites as HASH ref, e.g.:
++Returns the capabilities as HASH ref, e.g.:
+
+ {
+ 'starttls' => 1,
Modified: trunk/libnet-managesieve-perl/debian/rules
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/debian/rules?rev=60173&op=diff
==============================================================================
--- trunk/libnet-managesieve-perl/debian/rules (original)
+++ trunk/libnet-managesieve-perl/debian/rules Fri Jul 9 14:34:15 2010
@@ -1,4 +1,4 @@
#!/usr/bin/make -f
%:
- dh --with quilt $@
+ dh $@
Added: trunk/libnet-managesieve-perl/debian/source/format
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/debian/source/format?rev=60173&op=file
==============================================================================
--- trunk/libnet-managesieve-perl/debian/source/format (added)
+++ trunk/libnet-managesieve-perl/debian/source/format Fri Jul 9 14:34:15 2010
@@ -1,0 +1,1 @@
+3.0 (quilt)
Modified: trunk/libnet-managesieve-perl/lib/Net/ManageSieve.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libnet-managesieve-perl/lib/Net/ManageSieve.pm?rev=60173&op=diff
==============================================================================
--- trunk/libnet-managesieve-perl/lib/Net/ManageSieve.pm (original)
+++ trunk/libnet-managesieve-perl/lib/Net/ManageSieve.pm Fri Jul 9 14:34:15 2010
@@ -115,7 +115,7 @@
use IO::Socket;
use Encode;
-$VERSION = "0.09";
+$VERSION = "0.10";
@ISA = qw();
@@ -400,13 +400,17 @@
return $_[0]->{fh}->peer_certificate(@_);
}
-=item auth (USER [, PASSWORD ])
+=item auth (USER [, PASSWORD [, AUTHNAME ] ])
Authentificates as C<USER>.
-If the module L<Authen::SASL> is available, this module is tried first. In this
-case, the C<USER> paramter may be a C<Authen::SASL> object, that is not furtherly
-modified, C<PASSWORD> is ignored in this case.
+If the module L<Authen::SASL> is available, this module is tried first. In
+this case, the C<USER> paramter may be a C<Authen::SASL> object, that
+is not furtherly modified. If C<USER> is no C<Authen::SASL> object,
+C<USER> is passed as C<user>, C<PASSWORD> as C<pass> and C<AUTHNAME>
+as C<authname> to C<< Authen::SASL->new() >>. If C<AUTHNAME> is
+undefined, C<USER> is passed as C<authname>. This way you can
+authentificate against Cyrus: C<auth('cyrus', $password, $username)>.
If L<Authen::SASL> is I<not> available or the initialization of it fails,
this function attempts to authentificate via the C<PLAIN> method.
@@ -431,8 +435,7 @@
return $r;
}
sub auth {
- my ($self, $username, $password) = @_;
-
+ my ($self, $username, $password, $authname) = @_;
if(my $mech = $self->{capabilities}{sasl}) {
# If the server does not announce SASL, we try PLAIN anyway
@@ -453,6 +456,9 @@
unless(length $username) {
$self->_set_error("need username or Authen::SASL object");
return undef;
+ }
+ unless(defined $authname) {
+ $authname = $username;
}
# for unknown reason to pass in a space
# separated string leads to the problem
@@ -466,8 +472,8 @@
$sasl = Authen::SASL->new(mechanism=> "".$mech, # without "". the behaviour is funny
callback => { user => $username,
pass => $password,
- password => $password,
- authname => $username,
+ password => $password, # needed it to work properly
+ authname => $authname,
}
);
}
@@ -989,7 +995,7 @@
until(scalar(@{$self->{line_buffer}})) {
if(select($out, undef, undef, $timeout)) {
- unless(sysread($fh, $buf, 2048, length($buf))) {
+ unless(sysread($fh, $buf, 64 * 1024, length($buf))) {
$self->_set_error("socket empty although there is data pending: $!");
$self->close();
return undef;
@@ -1215,7 +1221,7 @@
=head1 COPYRIGHT
-Copyright (c) 2008 Steffen Kaiser. All rights reserved.
+Copyright (c) 2008-2010 Steffen Kaiser. All rights reserved.
This program is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
More information about the Pkg-perl-cvs-commits
mailing list