pool/perl-RPC-XML
SHA256
8
0
Fork 2
Code Issues Pull Requests Activity

OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-RPC-XML?expand=0&rev=1

Browse Source
This commit is contained in:
OBS User unknown
2007-01-15 23:31:43 +00:00
committed by Git OBS Bridge
commit 9870b51f36
7 changed files with 255 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
.gitattributes vendored Normal file
View File

@@ -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

1
.gitignore vendored Normal file
View File

@@ -0,0 +1 @@
.osc

75
RPC-XML-0.53-ext-daemon-and-header-cb.dif Normal file
View File

@@ -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<tmpdir> method from the B<File::Spec> 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__

3
RPC-XML-0.59.tar.bz2 Normal file
View File

@@ -0,0 +1,3 @@
version https://git-lfs.github.com/spec/v1
oid sha256:53afaedddf1dd44703ae3439ab763775a50737c1188305dca191fa4d345aee90
size 95537

47
perl-RPC-XML.changes Normal file
View File

@@ -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

106
perl-RPC-XML.spec Normal file
View File

@@ -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 <rjray@blackperl.com>
%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

0
ready Normal file
View File