--- asused-3.72.orig/debian/README.Debian +++ asused-3.72/debian/README.Debian @@ -0,0 +1,45 @@ +asused for Debian +----------------- + +RIPE NCC announced the introdution of 32 Bit ASN, this version is not prepared +to support this, since the 'support [...] is discontinued'. So if you are own +an 32 Bit ASN, this software will not work for you! +Feel free to provide patches to fix this issue. + + -- Jan Wagner Thu, 25 Jan 2007 07:10:37 +0100 + +Statement by RIPE NCC: + +"Dear 'asused' users! + +Please, note, that support of this program is discontinued and +that RIPE NCC is coming with the new improved program as a +replacement." + +Unfortunately the improved the replacement can't be found yet. So hopefully we +live with what we have yet. + +Before you start, you need to setup a global config /etc/asused.conf or a +.asusedrc in your home. An example can be found in +/usr/share/doc/asused/examples/ + +Registry Information File +------------------------- + +To use asused, you need to fill a config file with your registry +information. You can put it into the asused.conf file in the current +working directory, or into .asusedrc in your home directory. +Alternatively, you can specify an arbitrary file location on the asused +command line with the --config switch. + +The config file should contain: + +REGID = your registry ID, as it was assigned by RIPE NCC + +ALLOC = a set of strings, each of them should have one allocation + string in a prefixed notation. + +There is a file called asused.conf in this distribution containing +example data. + + -- Jan Wagner Sun, 5 Nov 2006 14:03:07 +0100 --- asused-3.72.orig/debian/control +++ asused-3.72/debian/control @@ -0,0 +1,17 @@ +Source: asused +Section: utils +Priority: optional +Maintainer: Jan Wagner +Build-Depends: debhelper (>= 5), dpatch +Build-Depends-Indep: perl +Homepage: http://www.ripe.net/tools/ +Vcs-Browser: https://scm.uncompleted.org/projects/debian/repository/show/asused +Vcs-Svn: https://scm.uncompleted.org/svn/debian/asused/trunk/ +Standards-Version: 3.8.4 + +Package: asused +Architecture: all +Depends: ${perl:Depends}, ${misc:Depends} +Description: To run a check on the usage of your registry's allocations + This is a tool used for checking various aspects of IP allocations and + assignments as stored in the RIPE database. --- asused-3.72.orig/debian/README.source +++ asused-3.72/debian/README.source @@ -0,0 +1,3 @@ +We use dpatch for patch handling inside our package(s). Please see +/usr/share/doc/dpatch/README.source.gz (if you have installed dpatch) for +documentation about dpatch. --- asused-3.72.orig/debian/watch +++ asused-3.72/debian/watch @@ -0,0 +1,2 @@ +version=3 +ftp://ftp.ripe.net/tools/asused-(.*)\.tar\.gz --- asused-3.72.orig/debian/changelog +++ asused-3.72/debian/changelog @@ -0,0 +1,72 @@ +asused (3.72-9) unstable; urgency=low + + * Fix broken Vcs information + + -- Jan Wagner Wed, 10 Mar 2010 08:39:20 +0100 + +asused (3.72-8) unstable; urgency=low + + * Updating standards version to 3.8.4 + - Add README.source + * Removed "our" out of the description + * Add "Copyright" to all copyrights in debian/copyright + * Change Vcs information + * Fix detection of 10/8 with adding 05_fix_priv_range.dpatch, thanks + Jan Krajdl (Closes: #557666) + * Add 1.0 to debian/source/format + * Add ${misc:Depends} to dependencies + + -- Jan Wagner Tue, 09 Mar 2010 23:54:19 +0100 + +asused (3.72-7) unstable; urgency=low + + * Updating standards version to 3.8.0, no changes needed + * implement machine-interpretable copyright file + * move perl to Build-Depends-Indep + + -- Jan Wagner Sun, 20 Jul 2008 12:38:03 +0200 + +asused (3.72-6) unstable; urgency=low + + * add 04_drop_network_tests.dpatch to remove tests requiring network + access (Closes: #479916) + + -- Jan Wagner Thu, 08 May 2008 12:39:09 +0000 + +asused (3.72-5) unstable; urgency=low + + * fixed minor typo in cwhois.3 + * bump copyright of packaging to 2008 + + -- Jan Wagner Mon, 14 Apr 2008 22:32:06 +0200 + +asused (3.72-4) unstable; urgency=low + + * added Vcs- fields, moved Homepage into source header's field + * bump standards version to 3.7.3 + * use binary-indep instead of binary-arch + * fix FTBFS with Perl 5.10 by unconditional rmdir of /usr/lib/perl5 in + debian/rules, thanks Niko Tyni for reporting and + providing a solution (Closes: #468198) + + -- Jan Wagner Wed, 27 Feb 2008 18:43:31 +0100 + +asused (3.72-3) unstable; urgency=low + + * install cwhois manpage proper + * fix clean target in rules + + -- Jan Wagner Thu, 08 Nov 2007 09:05:55 +0100 + +asused (3.72-2) unstable; urgency=low + + * added manpage for cwhois + * update README.Debian to hint about 32 Bit ASN + + -- Jan Wagner Sun, 5 Nov 2006 23:50:15 +0100 + +asused (3.72-1) unstable; urgency=low + + * Initial release (Closes: #397236). + + -- Jan Wagner Sun, 5 Nov 2006 14:03:07 +0100 --- asused-3.72.orig/debian/copyright +++ asused-3.72/debian/copyright @@ -0,0 +1,51 @@ +Format-Specification: http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=196 +Packaged-By: Jan Wagner +Packaged-Date: Sun, 5 Nov 2006 14:03:07 +0100 +Upstream-Name: asused +Upstream-Maintainer: RIPE +Upstream-Source: ftp://ftp.ripe.net/tools/ + +Files: * +Copyright: Copyright 1998-2003 software group RIPE NCC + Copyright 1998-2003 Monica Cortes + Copyright 1998-2003 Antony Antony + Copyright 1998-2003 Timur Bakeyev +License: MIT + +Files: debian/* +Copyright: Copyright (C) 2006, 2008 Jan Wagner +License: GPL-2+ + +License: MIT + Permission to use, copy, modify, and distribute this software and its + documentation for any purpose and without fee is hereby granted, + provided that the above copyright notice appear in all copies and that + both that copyright notice and this permission notice appear in + supporting documentation, and that the name of the author not be + used in advertising or publicity pertaining to distribution of the + software without specific, written prior permission. + + THE AUTHOR DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING + ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS; IN NO EVENT SHALL + AUTHOR BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY + DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN + AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF + OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. + +License: GPL-2+ + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA + + On Debian systems, the complete text of the GNU General Public License can be + found in /usr/share/common-licenses/GPL-2 file. --- asused-3.72.orig/debian/rules +++ asused-3.72/debian/rules @@ -0,0 +1,75 @@ +#!/usr/bin/make -f +# written by Jan Wagner + +# Uncomment this to turn on verbose mode. +# export DH_VERBOSE=1 + +include /usr/share/dpatch/dpatch.make + +PACKAGE=$(shell dh_listpackages) + +ifndef PERL +PERL = /usr/bin/perl +endif + +ifndef DESTDIR +DESTDIR=.. +endif +TMP =$(CURDIR)/debian/$(PACKAGE) + +build: build-stamp +build-stamp: patch-stamp + dh_testdir + + # Add here commands to compile the package. + $(PERL) Makefile.PL INSTALLDIRS=vendor + $(MAKE) OPTIMIZE="-O2 -g -Wall" + $(MAKE) test + + touch $@ + +clean: unpatch + dh_testdir + dh_testroot + rm -f build-stamp + + # Cleaning source, if there is a Makefile. If not, source SHOULD be clean! + [ ! -f Makefile ] || $(MAKE) realclean + + dh_clean + +install: build + dh_testdir + dh_testroot + dh_clean -k + dh_installdirs + + # Add here commands to install the package into debian/asused. + $(MAKE) install PREFIX=$(TMP)/usr + [ ! -d $(TMP)/usr/lib/perl5 ] || rmdir --ignore-fail-on-non-empty --parents --verbose $(TMP)/usr/lib/perl5 + # remove broken man + rm -rf debian/asused/usr/share/man/man1 + # drop manpage + install -D -m 0644 debian/cwhois.3 debian/asused/usr/share/man/man3 + +# Build architecture-independent files here. +binary-indep: build install + dh_testdir + dh_testroot + dh_installchangelogs Changes + dh_installdocs + dh_installexamples asused.conf + dh_compress + dh_fixperms + dh_perl + dh_installdeb + dh_gencontrol + dh_md5sums + dh_builddeb --destdir=$(DESTDIR) + +# Build architecture-dependent files here. +binary-arch: build install +# We have nothing to do by default. + +binary: binary-indep binary-arch +.PHONY: build clean binary-indep binary-arch binary --- asused-3.72.orig/debian/compat +++ asused-3.72/debian/compat @@ -0,0 +1 @@ +5 --- asused-3.72.orig/debian/cwhois.3 +++ asused-3.72/debian/cwhois.3 @@ -0,0 +1,89 @@ +.TH CWHOIS 3 "2006-11-03" "1.10" "whois client" + +.SH NAME +CWHOIS \- whois client + +.SH SYNOPSIS +.B cwhois +.RB [\| \-a \||\| \-F \||\| \-L \||\| \-m \||\| \-M \||\| \-r \||\| \-S \||\| \-R \|] +.RB [\| \-h +.IR hostname \|] +.RB [\| \-s +.IR source[\|[\|,source\|]...\|] \|] +.RB [\| \-T +.IR type[\|[\|,type\|]...\|] \|] +.RB [\| \-i +.IR attr[\|[\|,attr\|]...\|] \|] +keys + +.B cwhois +.RB [\| \-t +.IR type \|] + +.B cwhois +.RB [\| \-v +.IR type \|] + +.SH DESCRIPTION +.B cwhois +Simple whois client that gives you back output, compatiable with RIPE DB v2, if +you'll ask it to. + +.SH OPTIONS +.B +.TP +.B \-a +search all databases +.TP +.B \-F +fast raw output +.TP +.B \-L +find all Less specific matches +.TP +.B \-m +find first level more specific matches +.TP +.B \-M +find all More specific matches +.TP +.B \-r +turn off recursive lookups +.TP +.B \-S +tell server to leave out 'syntactic sugar' +.TP +.B \-R +force to show local copy of the domain object even if it contains referral +.TP +.B \-h hostname +search alternate server +.TP +.B \-s source[\|[\|,source\|]...\|] +search databases with source 'source' +.TP +.B \-T type[\|[\|,type\|]...\|] +only look for objects of type 'type' +.TP +.B \-i attr[\|[\|,attr\|]...\|] +do an inverse lookup for specified attributes +.TP +.B \-t type +requests template for object of type 'type' +.TP +.B \-v type +requests verbose template for object of type 'type' + +.SH HINT +Please note that most of these flags are NOT understood by +non RIPE whois servers! + +.SH SEE ALSO +.B Website + + +.SH AUTHOR +CWHOIS was written by Timur Bakeyev . +.PP +This manual page was written by Jan Wagner , +for the Debian project (but may be used by others). --- asused-3.72.orig/debian/source/format +++ asused-3.72/debian/source/format @@ -0,0 +1 @@ +1.0 --- asused-3.72.orig/debian/patches/04_drop_network_tests.dpatch +++ asused-3.72/debian/patches/04_drop_network_tests.dpatch @@ -0,0 +1,113 @@ +#!/bin/sh /usr/share/dpatch/dpatch-run +## 04_drop_network_tests.dpatch by Jan Wagner +## +## DP: disable tests requiring network access + +@DPATCH@ + +diff -Nur asused-3.72.orig/Net/RIPEWhois/in/test.pl asused-3.72/Net/RIPEWhois/in/test.pl +--- asused-3.72.orig/Net/RIPEWhois/in/test.pl 2001-04-18 15:56:09.000000000 +0000 ++++ asused-3.72/Net/RIPEWhois/in/test.pl 2008-05-08 12:49:00.000000000 +0000 +@@ -20,15 +20,3 @@ + # (correspondingly "not ok 13") depending on the success of chunk 13 + # of the test code): + +-my $whois = new RipeWhois('FormatMode' => 1); +- +-my $assign = new Net::RIPEWhois::in(Whois => $whois); +- +-my @assign = $assign->getIn('212.22/16', '-r -M -T in'); +- +-foreach my $inetnum (sort(@assign)) { +- print "$inetnum:\n"; +- print "\tna: ", $assign->{$inetnum}{'na'}, "\n"; +- print "\tac: ", join('; ', @{$assign->{$inetnum}{'ac'}}), "\n"; +- print "\ttc: ", join('; ', @{$assign->{$inetnum}{'tc'}}), "\n"; +-} +\ No newline at end of file +diff -Nur asused-3.72.orig/Whois/ArinWhois/test.pl asused-3.72/Whois/ArinWhois/test.pl +--- asused-3.72.orig/Whois/ArinWhois/test.pl 2001-04-20 14:29:14.000000000 +0000 ++++ asused-3.72/Whois/ArinWhois/test.pl 2008-05-08 12:50:01.000000000 +0000 +@@ -28,17 +28,6 @@ + exit; + } + +-my @result = $whois->QueryObjects("BT235-ARIN"); +- +-unless(@result) { +- printf("Query error: %s\n", $whois->GetErrorString()); +- print "not ok 3\n"; +- exit; +-} +-else { +- print "ok 3\n"; +-} +- + print "-" x 30, "\n"; + + foreach (@result) { +diff -Nur asused-3.72.orig/Whois/RipeWhois/test.pl asused-3.72/Whois/RipeWhois/test.pl +--- asused-3.72.orig/Whois/RipeWhois/test.pl 2001-04-18 17:01:20.000000000 +0000 ++++ asused-3.72/Whois/RipeWhois/test.pl 2008-05-08 12:50:26.000000000 +0000 +@@ -36,25 +36,3 @@ + else { + print "ok 3\n"; + } +- +-my $test = 4; +- +-foreach my $object (qw(BAT-RIPE TIB-RIPE CREW-RIPE)) { +- +- my @result = $whois->QueryObjects($object); +- +- unless(@result) { +- printf("Query error: %s\n", $whois->GetErrorString()); +- print "not ok $test\n"; +- exit; +- } +- else { +- print "ok $test\n"; +- print "-" x 30, "\n"; +- foreach (@result) { +- print "$_\n"; +- print "-" x 30, "\n"; +- } +- } +- $test++; +-} +diff -Nur asused-3.72.orig/Whois/test.pl asused-3.72/Whois/test.pl +--- asused-3.72.orig/Whois/test.pl 2001-08-28 14:04:34.000000000 +0000 ++++ asused-3.72/Whois/test.pl 2008-05-08 12:51:02.000000000 +0000 +@@ -46,32 +46,3 @@ + else { + print "ok 5\n"; + } +- +-my $test = 6; +- +-foreach my $object (qw(BAT-RIPE TIB-RIPE)) { +- if($whois->Query($object)) { +- printf("Query error: %s\n", $whois->GetError()); +- print "not ok $test\n"; +- exit; +- } +- else { +- print "ok $test\n"; +- } +- +- $test++; +- +- my $result = $whois->GetResult(); +- +- if($result) { +- print "ok $test\n"; +- print "-" x 30, "\n"; +- print $result; +- print "-" x 30, "\n"; +- } +- else { +- print "not ok $test\n"; +- exit; +- } +- $test++; +-} --- asused-3.72.orig/debian/patches/01_whois_new_query_fix.dpatch +++ asused-3.72/debian/patches/01_whois_new_query_fix.dpatch @@ -0,0 +1,19 @@ +#!/bin/sh /usr/share/dpatch/dpatch-run +## 01_whois_new_query_fix.dpatch by Jan Wagner +## +## DP: Make use of -B parameter of ripe whois. + +@DPATCH@ + +--- asused-3.72.orig/Whois/RipeWhois/RipeWhois.pm 2001-04-18 19:01:20.000000000 +0200 ++++ asused-3.72/Whois/RipeWhois/RipeWhois.pm 2005-05-02 16:19:05.000000000 +0200 +@@ -133,6 +133,9 @@ + my $self = shift; + # Filter out empty paramters + my @query = grep { /\S+/ } @_; ++ ++ # Fix for new whois query defaults (2 May 2005) ZS. ++ unshift(@query, '-B', '-G'); + + # Add keep-alive flag if necessary + if($self->{'KeepAlive'}) { --- asused-3.72.orig/debian/patches/03_interpreter_fix.dpatch +++ asused-3.72/debian/patches/03_interpreter_fix.dpatch @@ -0,0 +1,15 @@ +#!/bin/sh /usr/share/dpatch/dpatch-run +## 03_interpreter_fix.dpatch by Jan Wagner +## +## DP: fix interpreter + +@DPATCH@ + +--- asused-3.72.orig/Reg/Asused/Asused.pm 2006-11-05 21:34:43.000000000 +0100 ++++ asused-3.72/Reg/Asused/Asused.pm 2006-11-05 21:37:45.000000000 +0100 +@@ -1,5 +1,3 @@ +-#!/usr/local/bin/perl5.00502 +-# + # Copyright (c) 1999, 2000 RIPE NCC + # + # All Rights Reserved --- asused-3.72.orig/debian/patches/02_typo_fix.dpatch +++ asused-3.72/debian/patches/02_typo_fix.dpatch @@ -0,0 +1,18 @@ +#!/bin/sh /usr/share/dpatch/dpatch-run +## 02_typo_fix.dpatch by Jan Wagner +## +## DP: fix typo. + +@DPATCH@ + +--- asused-3.72.orig/asused.PL 2003-10-07 17:46:23.000000000 +0200 ++++ asused-3.72/asused.PL 2005-05-09 15:42:14.000000000 +0200 +@@ -1135,7 +1135,7 @@ + # print warnings if any + unless($opt{'summary'}) { + if($sWarning) { +- printf "\nPay attension on this WARNINGS:\n"; ++ printf "\nPay attention on this WARNINGS:\n"; + printf $sWarning; + } + } --- asused-3.72.orig/debian/patches/05_fix_priv_range.dpatch +++ asused-3.72/debian/patches/05_fix_priv_range.dpatch @@ -0,0 +1,18 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 05_fix_priv_range.dpatch by Jan Krajdl +## +## DP: Fix detection of 10/8. + +@DPATCH@ +diff -urNad asused-3.72~/ipv4pack/ipv4pack.pm asused-3.72/ipv4pack/ipv4pack.pm +--- asused-3.72~/ipv4pack/ipv4pack.pm 2001-10-10 17:23:32.000000000 +0200 ++++ asused-3.72/ipv4pack/ipv4pack.pm 2009-11-23 20:18:44.000000000 +0100 +@@ -271,7 +271,7 @@ + + # check for a valid range: no CLASS-D and upper (223-255), no 127/8 + # and no private networks allowed (10/8) +- return ("", $O_PRIVATERANGE) if ($1 =~ /^10|127$/); ++ return ("", $O_PRIVATERANGE) if ($1 eq "10" || $1 eq "127"); + return ("", $O_RESERVEDCLASS) if ($1 > 223); + + if ($3 eq '/') { # range is in format quad/prefix --- asused-3.72.orig/debian/patches/00list +++ asused-3.72/debian/patches/00list @@ -0,0 +1,5 @@ +01_whois_new_query_fix.dpatch +02_typo_fix.dpatch +03_interpreter_fix.dpatch +04_drop_network_tests.dpatch +05_fix_priv_range.dpatch