remove 5-year-old unmaintained module in favour of a fork whose

maintainer responds within hours ;)  ok jasper@
This commit is contained in:
sthen 2012-07-03 12:56:46 +00:00
parent d575d592e8
commit bf4fd4a2c5
5 changed files with 0 additions and 83 deletions

View File

@ -1,20 +0,0 @@
# $OpenBSD: Makefile,v 1.6 2012/06/30 21:27:53 sthen Exp $
COMMENT= Perl module for SMTP with TLS/AUTH support
MODULES= cpan
DISTNAME= Net-SMTP-TLS-0.12
REVISION= 2
CATEGORIES= net mail
# perl
PERMIT_PACKAGE_CDROM= Yes
PERMIT_PACKAGE_FTP= Yes
PERMIT_DISTFILES_CDROM= Yes
PERMIT_DISTFILES_FTP= Yes
RUN_DEPENDS= security/p5-Digest-HMAC \
security/p5-Net_SSLeay \
security/p5-IO-Socket-SSL
.include <bsd.port.mk>

View File

@ -1,5 +0,0 @@
MD5 (Net-SMTP-TLS-0.12.tar.gz) = qEXro2cOVqGX7NN/Vx0VOg==
RMD160 (Net-SMTP-TLS-0.12.tar.gz) = Db+FpoOpNxom9YbLgxWRiB5Gt8Q=
SHA1 (Net-SMTP-TLS-0.12.tar.gz) = LSQfUNYe1s6y8GA5wJmj+1NLwMM=
SHA256 (Net-SMTP-TLS-0.12.tar.gz) = 7+dyZnrDdwK5a221KXzIJ0J6Ozo4GbekMVsIudRE5KU=
SIZE (Net-SMTP-TLS-0.12.tar.gz) = 5994

View File

@ -1,48 +0,0 @@
$OpenBSD: patch-lib_Net_SMTP_TLS_pm,v 1.2 2012/06/30 21:27:53 sthen Exp $
Add fixes from Net::SMTP::TLS::ButMaintained 0.18 and 0.19
--- lib/Net/SMTP/TLS.pm.orig Tue Jan 17 14:36:34 2006
+++ lib/Net/SMTP/TLS.pm Sat Jun 30 19:45:08 2012
@@ -115,10 +115,14 @@ sub new {
my $me = bless \%args, $pkg;
# read the line immediately after connecting
- my ($rsp,$txt) = $me->_response();
+ my ( $rsp, $txt, $more ) = $me->_response();
if(not $rsp == 220){
croak "Could not connect to SMTP server: $host $txt\n";
}
+
+ # empty the socket of any continuation lines
+ while ( $more eq '-' ) { ( $rsp, $txt, $more ) = $me->_response(); }
+
$me->hello(); # the first hello, 2nd after starttls
$me->starttls() if not $args{NoTLS}; # why we're here, after all
$me->login() if($me->{User} and $me->{Password});
@@ -179,7 +183,7 @@ sub starttls {
croak "Invalid response for STARTTLS: $num $txt\n";
}
if(not IO::Socket::SSL::socket_to_SSL($me->{sock},
- SSL_version => "SSLv3 TLSv1")){
+ SSL_version => "TLSv1")){
croak "Couldn't start TLS: ".IO::Socket::SSL::errstr."\n";
}
$me->hello();
@@ -251,7 +255,7 @@ sub auth_PLAIN{
my $me = shift;
my $user= $me->{User};
my $pass= $me->{Password};
- $me->_command(sprintf("AUTH PLAIN %S",
+ $me->_command(sprintf("AUTH PLAIN %s",
encode_base64("$user\0$user\0$pass","")));
my ($num,$txt) = $me->_response();
if(not $num == 235){
@@ -367,6 +371,7 @@ sub datasend {
return undef;
}
$len -= $w;
+ $offset += $w;
}
else
{

View File

@ -1,5 +0,0 @@
Net::SMTP::TLS is a TLS and AUTH capable SMTP client which offers
an interface that users will find familiar from Net::SMTP.
Net::SMTP::TLS implements a subset of the methods provided by that
module, but certainly not (yet) a complete mirror image of that
API.

View File

@ -1,5 +0,0 @@
@comment $OpenBSD: PLIST,v 1.1.1.1 2009/11/05 13:23:59 sthen Exp $
${P5SITE}/Net/
${P5SITE}/Net/SMTP/
${P5SITE}/Net/SMTP/TLS.pm
@man man/man3p/Net::SMTP::TLS.3p