testing/perl-xml-stream: new aport

https://metacpan.org/release/XML-Stream/
XML stream support library for XMPP-like protocols
This commit is contained in:
Celeste 2023-12-29 14:49:30 +00:00 committed by omni
parent 8b0e6d9a41
commit b26f5cf568
2 changed files with 73 additions and 0 deletions

View File

@ -0,0 +1,39 @@
# Automatically generated by apkbuild-cpan, template 3
# Contributor: Celeste <cielesti@protonmail.com>
# Maintainer: Celeste <cielesti@protonmail.com>
pkgname=perl-xml-stream
#_pkgreal is used by apkbuild-cpan to find modules at MetaCpan
_pkgreal=XML-Stream
pkgver=1.24
pkgrel=0
pkgdesc="XML stream support library for XMPP-like protocols"
url="https://metacpan.org/release/XML-Stream/"
arch="noarch"
license="LGPL-2.1-or-later"
depends="perl perl-authen-sasl perl-io-socket-ssl"
makedepends="perl-module-build"
subpackages="$pkgname-doc"
source="https://cpan.metacpan.org/authors/id/D/DA/DAPATRICK/XML-Stream-$pkgver.tar.gz
improvements.patch
"
builddir="$srcdir/$_pkgreal-$pkgver"
build() {
export CFLAGS=$(perl -MConfig -E 'say $Config{ccflags}')
perl Build.PL --installdirs=vendor
./Build
}
check() {
./Build test
}
package() {
./Build install --destdir="$pkgdir"
find "$pkgdir" \( -name perllocal.pod -o -name .packlist \) -delete
}
sha512sums="
f762e09197fa7f36cee8484e30a6ce972e407d92cbe55bdf96bcc0073187aff34630c5d9dd2555a14cd297e506875dc2ff153b09001c971b020c37340886025d XML-Stream-1.24.tar.gz
e7b165c381f80e1db2639a71fa13620b8bcdcb6098d9cb414d5a382d06ee2b28dc8834af07e0d587152ab0bed1aceb4c57b332de933262731bb0e9ec1e658180 improvements.patch
"

View File

@ -0,0 +1,34 @@
https://github.com/dap/XML-Stream/pull/26
https://github.com/dap/XML-Stream/issues/19
https://github.com/dap/XML-Stream/issues/14
--- a/lib/XML/Stream.pm
+++ b/lib/XML/Stream.pm
@@ -205,8 +205,7 @@
XML::Stream::Tools::setup_debug($self, %args);
my $hostname = hostname();
- my $address = gethostbyname($hostname) ||
- die("Cannot resolve $hostname: $!");
+ my $address = gethostbyname($hostname) || "";
my $fullname = gethostbyaddr($address,AF_INET) || $hostname;
$self->debug(1,"new: hostname = ($fullname)");
@@ -220,7 +219,7 @@
$self->{SIDS}->{default}->{ssl} = 0;
$self->{SIDS}->{default}->{_tls} = 0;
$self->{SIDS}->{default}->{ssl_verify} = 0x01; # verify peer by default
- $self->{SIDS}->{default}->{ssl_ca_path} = '';
+ $self->{SIDS}->{default}->{ssl_ca_path} = '/etc/ssl/certs';
$self->{SIDS}->{default}->{namespace} = "";
$self->{SIDS}->{default}->{myhostname} = $fullname;
$self->{SIDS}->{default}->{derivedhostname} = $fullname;
@@ -2164,7 +2163,7 @@
$response = $self->{SIDS}->{$sid}->{sasl}->{client}->client_step($challenge);
}
- my $response64 = MIME::Base64::encode_base64($response,"");
+ my $response64 = defined($response) ? MIME::Base64::encode_base64($response,"") : "";
$self->SASLResponse($sid,$response64);
}