Hello community,
here is the log from the commit of package perl-Net-Whois-Raw for
openSUSE:Factory checked in at 2014-03-11 07:38:51
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Net-Whois-Raw (Old)
and /work/SRC/openSUSE:Factory/.perl-Net-Whois-Raw.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Net-Whois-Raw"
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Net-Whois-Raw/perl-Net-Whois-Raw.changes
2014-02-12 09:48:37.000000000 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Net-Whois-Raw.new/perl-Net-Whois-Raw.changes
2014-03-11 07:38:53.000000000 +0100
@@ -1,0 +2,12 @@
+Mon Mar 10 07:07:02 UTC 2014 - [email protected]
+
+- updated to 2.57
+ - Handling exceed limits of whois.name.com
+ and in recursive queries ( set $CHECK_EXCEED = 2 )
+ - TODAY whois server added
+ - Add whois server for gtld, managed by Sugar Glen, LLC (http://donuts.co)
+ - RT#91930 Boilerplate stripping
+ - new tlds XN--D1ACJ3B, XN--80ASWG, XN--80ASEHDB
+ - Fix whois server for .BZ
+
+-------------------------------------------------------------------
Old:
----
Net-Whois-Raw-2.51.tar.gz
New:
----
Net-Whois-Raw-2.57.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Net-Whois-Raw.spec ++++++
--- /var/tmp/diff_new_pack.0oLUY2/_old 2014-03-11 07:38:53.000000000 +0100
+++ /var/tmp/diff_new_pack.0oLUY2/_new 2014-03-11 07:38:53.000000000 +0100
@@ -17,14 +17,14 @@
Name: perl-Net-Whois-Raw
-Version: 2.51
+Version: 2.57
Release: 0
%define cpan_name Net-Whois-Raw
Summary: Get Whois information for domains
-License: Artistic-1.0 or GPL-1.0+
+License: GPL-1.0+ or Artistic-1.0
Group: Development/Libraries/Perl
Url: http://search.cpan.org/dist/Net-Whois-Raw/
-Source:
http://www.cpan.org/authors/id/D/DE/DESPAIR/%{cpan_name}-%{version}.tar.gz
+Source:
http://www.cpan.org/authors/id/N/NA/NALOBIN/%{cpan_name}-%{version}.tar.gz
BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
BuildRequires: perl
@@ -32,11 +32,10 @@
BuildRequires: perl(HTTP::Headers)
BuildRequires: perl(HTTP::Request)
BuildRequires: perl(LWP::UserAgent)
-BuildRequires: perl(Module::Build) >= 0.4200
+BuildRequires: perl(Module::Build)
BuildRequires: perl(Net::IDN::Punycode) >= 1
BuildRequires: perl(Regexp::IPv6)
BuildRequires: perl(URI::URL)
-
Requires: perl(HTTP::Headers)
Requires: perl(HTTP::Request)
Requires: perl(LWP::UserAgent)
++++++ Net-Whois-Raw-2.51.tar.gz -> Net-Whois-Raw-2.57.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-Whois-Raw-2.51/Build.PL
new/Net-Whois-Raw-2.57/Build.PL
--- old/Net-Whois-Raw-2.51/Build.PL 2014-01-18 14:53:25.000000000 +0100
+++ new/Net-Whois-Raw-2.57/Build.PL 2014-03-05 09:29:52.000000000 +0100
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
use strict;
use Module::Build;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-Whois-Raw-2.51/Changes
new/Net-Whois-Raw-2.57/Changes
--- old/Net-Whois-Raw-2.51/Changes 2014-01-18 14:53:25.000000000 +0100
+++ new/Net-Whois-Raw-2.57/Changes 2014-03-05 09:32:24.000000000 +0100
@@ -499,16 +499,37 @@
2.50 Jan 13 2014 Alexander Nalobin
- Handling exceed limits of whois.nic.cz
+ - IO whois updated.
+ - BY whois added.
2.51 Jan 16 2014 Victor Efimov
- RT#60339 fixed regexp for parsing .TJ web whois
- RT#64960 extend regexp for ReferralServer parsing (for recursive whois)
- Several timeout/alarm issues:
- Fix race-condition between ALRM handler cleared and
- alarm timer cleared (could result process to exit with signalal - i.e. not
possible
- to catch as die(), and no destructions called).
- Fix action-at-distance - we were clearing alarm timer to zero, if alarm is
- not used (i.e if TIMEOUT zero).
- Substract time spent in request from outer alarm
+ Fix race-condition between ALRM handler cleared and
+ alarm timer cleared (could result process to exit with signalal -
i.e.
+ not possible to catch as die(), and no destructions called).
+ Fix action-at-distance - we were clearing alarm timer to zero, if
alarm is
+ not used (i.e if TIMEOUT zero).
+ Substract time spent in request from outer alarm
- Fixed: unicode whois was damaging when using caching
- Under POSIX systems pwhois now uses TMPDIR env, not TEMP.
+ Under POSIX systems pwhois now uses TMPDIR env, not TEMP.
+
+2.52 Jan 24 2014 Alexander Nalobin
+ - Handling exceed limits of whois.name.com
+ and in recursive queries ( set $CHECK_EXCEED = 2 )
+
+2.53 Feb 07 2014 Alexander Nalobin
+ - TODAY whois server added
+
+2.54 Feb 18 2014 Dmitriy Seluzhitskiy
+ - Add whois server for gtld, managed by Sugar Glen, LLC (http://donuts.co)
+
+2.55 Feb 24 2014 Alexander Nalobin
+ - RT#91930 Boilerplate stripping
+
+2.56 Feb 25 2014 Anton Chuvashev
+ - new tlds XN--D1ACJ3B, XN--80ASWG, XN--80ASEHDB
+
+2.57 Feb 25 2014 Victor Efimov
+ - Fix whois server for .BZ
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-Whois-Raw-2.51/META.json
new/Net-Whois-Raw-2.57/META.json
--- old/Net-Whois-Raw-2.51/META.json 2014-01-18 14:53:25.000000000 +0100
+++ new/Net-Whois-Raw-2.57/META.json 2014-03-05 09:36:45.000000000 +0100
@@ -1,20 +1,33 @@
{
- "abstract" : "Get Whois information for domains",
- "author" : [],
+ "abstract" : "unknown",
+ "author" : [
+ "unknown"
+ ],
"dynamic_config" : 1,
- "generated_by" : "Module::Build version 0.4202",
+ "generated_by" : "ExtUtils::MakeMaker version 6.78, CPAN::Meta::Converter
version 2.120351",
"license" : [
- "perl_5"
+ "unknown"
],
"meta-spec" : {
"url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";,
"version" : "2"
},
"name" : "Net-Whois-Raw",
+ "no_index" : {
+ "directory" : [
+ "t",
+ "inc"
+ ]
+ },
"prereqs" : {
+ "build" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "0"
+ }
+ },
"configure" : {
"requires" : {
- "Module::Build" : "0.42"
+ "ExtUtils::MakeMaker" : "0"
}
},
"runtime" : {
@@ -28,28 +41,10 @@
"Net::IDN::Punycode" : "1",
"Regexp::IPv6" : "0",
"Test::More" : "0",
- "URI::URL" : "0",
- "perl" : "5.008001"
+ "URI::URL" : "0"
}
}
},
- "provides" : {
- "Net::Whois::Raw" : {
- "file" : "lib/Net/Whois/Raw.pm",
- "version" : "2.51"
- },
- "Net::Whois::Raw::Common" : {
- "file" : "lib/Net/Whois/Raw/Common.pm"
- },
- "Net::Whois::Raw::Data" : {
- "file" : "lib/Net/Whois/Raw/Data.pm"
- }
- },
"release_status" : "stable",
- "resources" : {
- "license" : [
- "http://dev.perl.org/licenses/";
- ]
- },
- "version" : "2.51"
+ "version" : "2.57"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-Whois-Raw-2.51/META.yml
new/Net-Whois-Raw-2.57/META.yml
--- old/Net-Whois-Raw-2.51/META.yml 2014-01-18 14:53:25.000000000 +0100
+++ new/Net-Whois-Raw-2.57/META.yml 2014-03-05 09:36:45.000000000 +0100
@@ -1,25 +1,22 @@
---
-abstract: 'Get Whois information for domains'
+abstract: unknown
author:
- unknown
-build_requires: {}
+build_requires:
+ ExtUtils::MakeMaker: 0
configure_requires:
- Module::Build: 0.42
+ ExtUtils::MakeMaker: 0
dynamic_config: 1
-generated_by: 'Module::Build version 0.4202, CPAN::Meta::Converter version
2.132830'
-license: perl
+generated_by: 'ExtUtils::MakeMaker version 6.78, CPAN::Meta::Converter version
2.120351'
+license: unknown
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: 1.4
name: Net-Whois-Raw
-provides:
- Net::Whois::Raw:
- file: lib/Net/Whois/Raw.pm
- version: 2.51
- Net::Whois::Raw::Common:
- file: lib/Net/Whois/Raw/Common.pm
- Net::Whois::Raw::Data:
- file: lib/Net/Whois/Raw/Data.pm
+no_index:
+ directory:
+ - t
+ - inc
requires:
Encode: 0
File::Temp: 0
@@ -31,7 +28,4 @@
Regexp::IPv6: 0
Test::More: 0
URI::URL: 0
- perl: 5.008001
-resources:
- license: http://dev.perl.org/licenses/
-version: 2.51
+version: 2.57
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-Whois-Raw-2.51/README
new/Net-Whois-Raw-2.57/README
--- old/Net-Whois-Raw-2.51/README 2014-01-18 14:53:25.000000000 +0100
+++ new/Net-Whois-Raw-2.57/README 2014-02-24 14:07:29.000000000 +0100
@@ -1,6 +1,6 @@
NAME
Net::Whois::Raw - Get Whois information for domains
-
+
SYNOPSIS
use Net::Whois::Raw;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-Whois-Raw-2.51/lib/Net/Whois/Raw/Common.pm
new/Net-Whois-Raw-2.57/lib/Net/Whois/Raw/Common.pm
--- old/Net-Whois-Raw-2.51/lib/Net/Whois/Raw/Common.pm 2014-01-18
14:53:25.000000000 +0100
+++ new/Net-Whois-Raw-2.57/lib/Net/Whois/Raw/Common.pm 2014-02-24
14:07:29.000000000 +0100
@@ -99,6 +99,8 @@
}
}
+ $whois = _strip_trailer_lines( $whois ) if $OMIT_MSG;
+
if ( $CHECK_FAIL || $OMIT_MSG ) {
my %notfound = %Net::Whois::Raw::Data::notfound;
@@ -151,6 +153,17 @@
return $whois, undef;
}
+# Tries to strip trailer lines of whois
+sub _strip_trailer_lines {
+ my ( $whois ) = @_;
+
+ for my $re ( @Net::Whois::Raw::Data::strip_regexps ) {
+ $whois =~ s/$re/$1/;
+ }
+
+ return $whois;
+}
+
# get whois-server for domain / tld
sub get_server {
my ($dom, $is_ns, $tld) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-Whois-Raw-2.51/lib/Net/Whois/Raw/Data.pm
new/Net-Whois-Raw-2.57/lib/Net/Whois/Raw/Data.pm
--- old/Net-Whois-Raw-2.51/lib/Net/Whois/Raw/Data.pm 2014-01-18
14:53:25.000000000 +0100
+++ new/Net-Whois-Raw-2.57/lib/Net/Whois/Raw/Data.pm 2014-03-05
09:29:52.000000000 +0100
@@ -16,6 +16,10 @@
RU whois.ripn.net
SU whois.ripn.net
XN--P1AI whois.ripn.net
+ XN--D1ACJ3B whois.ripn.net
+
+ XN--80ASWG whois.online.rs.corenic.net
+ XN--80ASEHDB whois.online.rs.corenic.net
COM.RU whois.nic.ru
NET.RU whois.nic.ru
@@ -142,6 +146,81 @@
TEL whois-tel.neustar.biz
TRAVEL whois.nic.travel
+ VENTURES whois.donuts.co
+ SINGLES whois.donuts.co
+ BIKE whois.donuts.co
+ HOLDINGS whois.donuts.co
+ PLUMBING whois.donuts.co
+ GURU whois.donuts.co
+ CLOTHING whois.donuts.co
+ CAMERA whois.donuts.co
+ EQUIPMENT whois.donuts.co
+ ESTATE whois.donuts.co
+ GALLERY whois.donuts.co
+ GRAPHICS whois.donuts.co
+ LIGHTING whois.donuts.co
+ PHOTOGRAPHY whois.donuts.co
+ CONTRACTORS whois.donuts.co
+ LAND whois.donuts.co
+ TECHNOLOGY whois.donuts.co
+ CONSTRUCTION whois.donuts.co
+ DIRECTORY whois.donuts.co
+ KITCHEN whois.donuts.co
+ TODAY whois.donuts.co
+ DIAMONDS whois.donuts.co
+ ENTERPRISES whois.donuts.co
+ TIPS whois.donuts.co
+ VOYAGE whois.donuts.co
+ SHOES whois.donuts.co
+ CAREERS whois.donuts.co
+ PHOTOS whois.donuts.co
+ RECIPES whois.donuts.co
+ LIMO whois.donuts.co
+ DOMAINS whois.donuts.co
+ CAB whois.donuts.co
+ COMPANY whois.donuts.co
+ COMPUTER whois.donuts.co
+ CENTER whois.donuts.co
+ SYSTEMS whois.donuts.co
+ ACADEMY whois.donuts.co
+ MANAGEMENT whois.donuts.co
+ TRAINING whois.donuts.co
+ SOLUTIONS whois.donuts.co
+ SUPPORT whois.donuts.co
+ BUILDERS whois.donuts.co
+ EMAIL whois.donuts.co
+ EDUCATION whois.donuts.co
+ INSTITUTE whois.donuts.co
+ REPAIR whois.donuts.co
+ CAMP whois.donuts.co
+ GLASS whois.donuts.co
+ SOLAR whois.donuts.co
+ COFFEE whois.donuts.co
+ INTERNATIONAL whois.donuts.co
+ HOUSE whois.donuts.co
+ FLORIST whois.donuts.co
+ HOLIDAY whois.donuts.co
+ MARKETING whois.donuts.co
+ VIAJES whois.donuts.co
+ FARM whois.donuts.co
+ CODES whois.donuts.co
+ CHEAP whois.donuts.co
+ ZONE whois.donuts.co
+ AGENCY whois.donuts.co
+ BARGAINS whois.donuts.co
+ BOUTIQUE whois.donuts.co
+ COOL whois.donuts.co
+ WATCH whois.donuts.co
+ WORKS whois.donuts.co
+ EXPERT whois.donuts.co
+ FOUNDATION whois.donuts.co
+ EXPOSED whois.donuts.co
+ VILLAS whois.donuts.co
+ FLIGHTS whois.donuts.co
+ RENTALS whois.donuts.co
+ CRUISES whois.donuts.co
+ VACATIONS whois.donuts.co
+
TV whois.nic.tv
WS whois.worldsite.ws
NF whois.nic.cx
@@ -476,7 +555,7 @@
BIZ.NS whois.biz
NAME.NS whois.nic.name
SO whois.nic.so
- BZ whois.enom.com
+ BZ whois2.afilias-grs.net
XXX whois.nic.xxx
);
@@ -561,6 +640,7 @@
'whois.registrypro.pro' => '^No match',
'whois.worldsite.ws' => 'No match for',
'whois.nic.travel' => 'Not found: \S+',
+ 'whois.donuts.co' => 'Domain not found',
'whois.nic.ag' => 'NOT FOUND',
'whois.nic.as' => 'Domain Not Found',
@@ -721,6 +801,21 @@
'www_whois' => '(Available|no records found|is free|Not
Registered)',
'whois.nic.xxx' => 'NOT FOUND',
+
+ 'whois.online.rs.corenic.net' => 'no matching objects found',
+);
+
+# Common whois stripping REs
+our @strip_regexps = (
+ qr{
+ (.+)
+ ^ (?:
+ \W* Last \s update \s of \s WHOIS \s database
+ | Database \s last \s updated
+ | \W* Whois \s database \s was \s last \s updated \s on
+ )
+ \b .+ \z
+ }xmsi,
);
our %strip = (
@@ -2028,6 +2123,10 @@
'^NOTE: FAILURE TO LOCATE A RECORD',
'^OF THE AVAILABILITY OF A DOMAIN NAME',
],
+ 'whois.donuts.co' => [
+ '^Terms of Use:',
+ '>>> Last update of WHOIS database',
+ ],
'whois.nic.ht' => [
'^TERMS OF USE: You are not authorized',
'^database through the use of electronic',
@@ -2163,6 +2262,9 @@
'^the right to modify these terms at any time. By submitting this
query,',
'^you agree to abide by this policy.',
],
+ 'whois.online.rs.corenic.net' => [
+ '^%',
+ ],
);
our %exceed = (
@@ -2184,6 +2286,7 @@
'whois.nic.li' => 'You have exceeded this limit',
'whois.nic.ch' => 'You have exceeded this limit',
'whois.nic.cz' => 'Your connection limit exceeded',
+ 'whois.name.com' => 'Too many connection attempts. Please try again in a
few seconds.',
);
our $default_ban_time = 60;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-Whois-Raw-2.51/lib/Net/Whois/Raw.pm
new/Net-Whois-Raw-2.57/lib/Net/Whois/Raw.pm
--- old/Net-Whois-Raw-2.51/lib/Net/Whois/Raw.pm 2014-01-18 14:53:25.000000000
+0100
+++ new/Net-Whois-Raw-2.57/lib/Net/Whois/Raw.pm 2014-03-05 09:29:52.000000000
+0100
@@ -14,7 +14,7 @@
our @EXPORT = qw( whois get_whois );
-our $VERSION = '2.51';
+our $VERSION = '2.57';
our ($OMIT_MSG, $CHECK_FAIL, $CHECK_EXCEED, $CACHE_DIR, $TIMEOUT, $DEBUG) =
(0) x 7;
our $CACHE_TIME = 60;
@@ -135,16 +135,19 @@
my @processed_whois;
my $level = 0;
- foreach my $whois_rec (@{$raw_whois}) {
+ for my $whois_rec ( @$raw_whois ) {
$whois_rec->{level} = $level;
- my ($text, $error) = Net::Whois::Raw::Common::process_whois(
+ my ( $text, $error ) = Net::Whois::Raw::Common::process_whois(
$dom,
$whois_rec->{srv},
$whois_rec->{text},
$CHECK_FAIL, $OMIT_MSG, $CHECK_EXCEED,
);
- die $error if $level == 0 && $error && $error eq 'Connection rate
exceeded';
- if ($text || $level == 0) {
+
+ die $error if $error && $error eq 'Connection rate exceeded'
+ && ( $level == 0 || $CHECK_EXCEED == 2 );
+
+ if ( $text || $level == 0 ) {
$whois_rec->{text} = $text;
push @processed_whois, $whois_rec;
}
@@ -434,10 +437,11 @@
# sorted by servers.
# Default is to give the textual response.
- $Net::Whois::Raw::CHECK_EXCEED = 1;
- # When this option is set, "die" will be called
+ $Net::Whois::Raw::CHECK_EXCEED = 0 | 1 | 2;
+ # When this option is true, "die" will be called
# if connection rate to specific whois server have been
- # exceeded
+ # exceeded.
+ # If set to 2, will die in recursive queries too.
$Net::Whois::Raw::CACHE_DIR = "/var/spool/pwhois/";
# Whois information will be
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Net-Whois-Raw-2.51/t/01-local.t
new/Net-Whois-Raw-2.57/t/01-local.t
--- old/Net-Whois-Raw-2.51/t/01-local.t 2014-01-18 14:53:25.000000000 +0100
+++ new/Net-Whois-Raw-2.57/t/01-local.t 2014-02-24 14:07:29.000000000 +0100
@@ -1,11 +1,12 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
use strict;
+use warnings;
-use Test::More tests => 26;
+use Test::More tests => 29;
-use_ok('Net::Whois::Raw');
-use_ok('Net::Whois::Raw::Common');
+use_ok 'Net::Whois::Raw';
+use_ok 'Net::Whois::Raw::Common';
ok( Net::Whois::Raw::Common::domain_level( 'reg.ru' ) == 2, 'domain_level'
);
ok( Net::Whois::Raw::Common::domain_level(' www.reg.ru' ) == 3, 'domain_level'
);
@@ -59,3 +60,33 @@
my ($res) = Net::Whois::Raw::_referral_server();
is $res, 'some-host.com', "_referral_server should work for whois://
without port";
}
+
+is Net::Whois::Raw::Common::_strip_trailer_lines( q{
+blah-blah-blah
+
+>>> Last update of WHOIS database: 2014-02-24T04:01:25-0800 <<<
+
+The Data in MarkMonitor.com's WHOIS database is provided by MarkMonitor.com for
+ } ),
+ "\nblah-blah-blah\n\n", '_strip_trailer_lines';
+
+is Net::Whois::Raw::Common::_strip_trailer_lines( q{
+Record created on 24-Sep-1998
+Database last updated on 12-Sep-2013
+
+The Data in the Safenames Registrar WHOIS database is provided by Safenames for
+information purposes only, and to assist persons in obtaining information about
+or related to a domain name registration record. Safenames does not guarantee
+its accuracy. Additionally, the data may not reflect updates to billing
+contact information.} ),
+ "\nRecord created on 24-Sep-1998\n", '_strip_trailer_lines';
+
+
+is Net::Whois::Raw::Common::_strip_trailer_lines( q{
+Domain Last Updated Date: Sat Jun 04 15:25:01 GMT 2011
+
+>>>> Whois database was last updated on: Mon Feb 24 12:49:50 GMT 2014 <<<<
+
+NeuStar, Inc., the Registry Operator for .BIZ, has collected this information}
),
+ "\nDomain Last Updated Date: Sat Jun 04 15:25:01 GMT
2011\n\n",
+ '_strip_trailer_lines';
\ No newline at end of file
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
