From 9870b51f36cb377a6216ffa646853d7d19fb7e02fc7f698b46b54c4bca1732c9 Mon Sep 17 00:00:00 2001 From: OBS User unknown Date: Mon, 15 Jan 2007 23:31:43 +0000 Subject: [PATCH] OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-RPC-XML?expand=0&rev=1 --- .gitattributes | 23 +++++ .gitignore | 1 + RPC-XML-0.53-ext-daemon-and-header-cb.dif | 75 +++++++++++++++ RPC-XML-0.59.tar.bz2 | 3 + perl-RPC-XML.changes | 47 ++++++++++ perl-RPC-XML.spec | 106 ++++++++++++++++++++++ ready | 0 7 files changed, 255 insertions(+) create mode 100644 .gitattributes create mode 100644 .gitignore create mode 100644 RPC-XML-0.53-ext-daemon-and-header-cb.dif create mode 100644 RPC-XML-0.59.tar.bz2 create mode 100644 perl-RPC-XML.changes create mode 100644 perl-RPC-XML.spec create mode 100644 ready diff --git a/.gitattributes b/.gitattributes new file mode 100644 index 0000000..9b03811 --- /dev/null +++ b/.gitattributes @@ -0,0 +1,23 @@ +## Default LFS +*.7z filter=lfs diff=lfs merge=lfs -text +*.bsp filter=lfs diff=lfs merge=lfs -text +*.bz2 filter=lfs diff=lfs merge=lfs -text +*.gem filter=lfs diff=lfs merge=lfs -text +*.gz filter=lfs diff=lfs merge=lfs -text +*.jar filter=lfs diff=lfs merge=lfs -text +*.lz filter=lfs diff=lfs merge=lfs -text +*.lzma filter=lfs diff=lfs merge=lfs -text +*.obscpio filter=lfs diff=lfs merge=lfs -text +*.oxt filter=lfs diff=lfs merge=lfs -text +*.pdf filter=lfs diff=lfs merge=lfs -text +*.png filter=lfs diff=lfs merge=lfs -text +*.rpm filter=lfs diff=lfs merge=lfs -text +*.tbz filter=lfs diff=lfs merge=lfs -text +*.tbz2 filter=lfs diff=lfs merge=lfs -text +*.tgz filter=lfs diff=lfs merge=lfs -text +*.ttf filter=lfs diff=lfs merge=lfs -text +*.txz filter=lfs diff=lfs merge=lfs -text +*.whl filter=lfs diff=lfs merge=lfs -text +*.xz filter=lfs diff=lfs merge=lfs -text +*.zip filter=lfs diff=lfs merge=lfs -text +*.zst filter=lfs diff=lfs merge=lfs -text diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..57affb6 --- /dev/null +++ b/.gitignore @@ -0,0 +1 @@ +.osc diff --git a/RPC-XML-0.53-ext-daemon-and-header-cb.dif b/RPC-XML-0.53-ext-daemon-and-header-cb.dif new file mode 100644 index 0000000..8cae06f --- /dev/null +++ b/RPC-XML-0.53-ext-daemon-and-header-cb.dif @@ -0,0 +1,75 @@ +--- lib/RPC/XML/Server.pm ++++ lib/RPC/XML/Server.pm 2003/12/03 17:53:25 +@@ -124,6 +124,11 @@ + $self->{__host} = $args{host} || ''; + $self->{__port} = $args{port} || ''; + delete @args{qw(host port)}; ++ } elsif( ref($args{http_daemon}) ) { ++ $self->{__daemon} = $args{http_daemon}; ++ $self->{__http_header_parsing_cb} = $args{http_header_parsing_cb}; ++ delete $args{http_daemon}; ++ delete $args{http_header_parsing_cb}; + } + else + { +@@ -142,9 +147,10 @@ + $self->{__host} = $URI->host; + $self->{__port} = $URI->port; + $self->{__daemon} = $http; ++ $self->{__http_header_parsing_cb} = $args{http_header_parsing_cb}; + + # Remove those we've processed +- delete @args{qw(host port queue)}; ++ delete @args{qw(host port queue http_header_parsing_cb)}; + } + $resp = HTTP::Response->new(); + return "${class}::new: Unable to create HTTP::Response object" +@@ -512,6 +518,23 @@ + specific directory in which to open those files. If this is not given, then + the C method from the B package is used, instead. + ++=item daemon ++ ++you can provide a daemon object here, so RPC::XML::Server will not use ++it's own HTTP::Daemon but your provided daemon object. ++This parameter is optional. ++ ++=item http_header_parsing_cb ++ ++must be a code reference which will be called before anything else happens ++to the HTTP data stream. It can be used to parse the HTTP header for HTTP ++authentication checks and stuff like that. ++This callback function will get the request object (HTTP::Request) ++and the connection object (HTTP::Daemon::Clientconn) as parameters. ++If the callback function does not return a true value, no further processing ++of the request will be done. ++This parameter is optional. ++ + =back + + Any other keys in the options hash not explicitly used by the constructor are +@@ -1053,7 +1076,6 @@ + + =cut + +-__END__ + + ############################################################################### + # +@@ -1341,6 +1363,11 @@ + + while ($req = $conn->get_request('headers only')) + { ++ if( ref($self->{__http_header_parsing_cb}) eq 'CODE' ) { ++ # we terminate connection unless header parsing ++ # returns a true value ++ next unless( $self->{__http_header_parsing_cb}->( $req, $conn ) ); ++ } + if ($req->method eq 'HEAD') + { + # The HEAD method will be answered with our return headers, +@@ -2025,3 +2052,4 @@ + } + return $old_timeout; + } ++__END__ diff --git a/RPC-XML-0.59.tar.bz2 b/RPC-XML-0.59.tar.bz2 new file mode 100644 index 0000000..ca8adf9 --- /dev/null +++ b/RPC-XML-0.59.tar.bz2 @@ -0,0 +1,3 @@ +version https://git-lfs.github.com/spec/v1 +oid sha256:53afaedddf1dd44703ae3439ab763775a50737c1188305dca191fa4d345aee90 +size 95537 diff --git a/perl-RPC-XML.changes b/perl-RPC-XML.changes new file mode 100644 index 0000000..6a76a81 --- /dev/null +++ b/perl-RPC-XML.changes @@ -0,0 +1,47 @@ +------------------------------------------------------------------- +Fri Jul 14 13:14:07 CEST 2006 - mc@suse.de + +- version 0.59 +- Fixes to POD documentation +- lib/Apache/RPC/Server.pm: + Fixed the logic around the setting of $no_def in new(); it was + handling the no_default method-argument backwards +- fixed some testcases + +------------------------------------------------------------------- +Wed Jan 25 21:39:56 CET 2006 - mls@suse.de + +- converted neededforbuild to BuildRequires + +------------------------------------------------------------------- +Wed Sep 28 22:16:20 CEST 2005 - dmueller@suse.de + + - add norootforbuild + +------------------------------------------------------------------- +Sun Jul 31 16:09:54 CEST 2005 - cthiel@suse.de + +- update to version 0.58 + +------------------------------------------------------------------- +Fri Apr 1 16:27:55 CEST 2005 - mc@suse.de + +- update to version 0.57 +- remove RPC-XML-0.53-http-compress-fix.dif ; + not needed anymore + +------------------------------------------------------------------- +Mon Aug 9 13:57:18 CEST 2004 - mc@suse.de + +- update to version 0.54 + +------------------------------------------------------------------- +Wed Dec 3 18:59:59 CET 2003 - mc@suse.de + +- fix http compression (RPC-XML-0.53-http-compress-fix.dif) + +------------------------------------------------------------------- +Tue Dec 2 17:35:08 CET 2003 - mc@suse.de + +- initial version 0.53 + diff --git a/perl-RPC-XML.spec b/perl-RPC-XML.spec new file mode 100644 index 0000000..54b1710 --- /dev/null +++ b/perl-RPC-XML.spec @@ -0,0 +1,106 @@ +# +# spec file for package perl-RPC-XML (Version 0.59) +# +# Copyright (c) 2006 SUSE LINUX Products GmbH, Nuernberg, Germany. +# This file and all modifications and additions to the pristine +# package are under the same license as the package itself. +# +# Please submit bugfixes or comments via http://bugs.opensuse.org/ +# + +# norootforbuild + +Name: perl-RPC-XML +BuildRequires: perl-XML-Parser perl-libwww-perl +URL: http://search.cpan.org/search?module=RPC::XML +License: Artistic License +Group: Development/Libraries/Perl +Requires: perl = %{perl_version} perl-XML-Parser perl-libwww-perl +Autoreqprov: on +Summary: A set of classes for core data, message and XML handling +Version: 0.59 +Release: 1 +Source: RPC-XML-%{version}.tar.bz2 +Patch0: RPC-XML-0.53-ext-daemon-and-header-cb.dif +BuildRoot: %{_tmppath}/%{name}-%{version}-build + +%description +The RPC::XML package is a reference implementation of the XML-RPC +standard. + + + +Authors: +-------- + Randy J. Ray + +%prep +%setup -n RPC-XML-%{version} +%patch0 -p0 +# --------------------------------------------------------------------------- + +%build +perl Makefile.PL +make +make test +# --------------------------------------------------------------------------- + +%install +[ "$RPM_BUILD_ROOT" != "/" ] && [ -d $RPM_BUILD_ROOT ] && rm -rf $RPM_BUILD_ROOT; +make DESTDIR=$RPM_BUILD_ROOT \ + INSTALLMAN1DIR=$RPM_BUILD_ROOT/%{_mandir}/man1 \ + INSTALLMAN3DIR=$RPM_BUILD_ROOT/%{_mandir}/man3 \ + install_vendor +%perl_process_packlist + +%files +%defattr(-,root,root) +/usr/bin/make_method +%dir %{perl_vendorlib}/RPC +%dir %{perl_vendorlib}/RPC/XML +%{perl_vendorlib}/RPC/XML.pm +%{perl_vendorlib}/RPC/XML/* +%dir %{perl_vendorlib}/Apache +%dir %{perl_vendorlib}/Apache/RPC +%{perl_vendorlib}/Apache/RPC/* +%dir %{perl_vendorlib}/auto/RPC +%dir %{perl_vendorlib}/auto/RPC/XML +%dir %{perl_vendorlib}/auto/RPC/XML/Server +%dir %{perl_vendorlib}/auto/RPC/XML/Procedure +%dir %{perl_vendorlib}/auto/RPC/XML/Function +%{perl_vendorlib}/auto/RPC/XML/Server/* +%{perl_vendorlib}/auto/RPC/XML/Procedure/* +%{perl_vendorlib}/auto/RPC/XML/Function/* +%dir %{perl_vendorarch}/auto/RPC +%dir %{perl_vendorarch}/auto/RPC/XML +%{perl_vendorarch}/auto/RPC/XML/.packlist +%doc MANIFEST ChangeLog README README.apache2 +%{_mandir}/man3/RPC::XML* +%{_mandir}/man3/Apache::RPC::* +%{_mandir}/man1/make_method.1.gz +/var/adm/perl-modules/%{name} + +%changelog -n perl-RPC-XML +* Fri Jul 14 2006 - mc@suse.de +- version 0.59 +- Fixes to POD documentation +- lib/Apache/RPC/Server.pm: + Fixed the logic around the setting of $no_def in new(); it was + handling the no_default method-argument backwards +- fixed some testcases +* Wed Jan 25 2006 - mls@suse.de +- converted neededforbuild to BuildRequires +* Wed Sep 28 2005 - dmueller@suse.de +- add norootforbuild +* Sun Jul 31 2005 - cthiel@suse.de +- update to version 0.58 +* Fri Apr 01 2005 - mc@suse.de +- update to version 0.57 +- remove RPC-XML-0.53-http-compress-fix.dif ; + not needed anymore +* Mon Aug 09 2004 - mc@suse.de +- update to version 0.54 +* Wed Dec 03 2003 - mc@suse.de +- fix http compression (RPC-XML-0.53-http-compress-fix.dif) +* Tue Dec 02 2003 - mc@suse.de +- initial version 0.53 diff --git a/ready b/ready new file mode 100644 index 0000000..473a0f4