diff options
Diffstat (limited to 'net-mgmt/ehnt/files/patch-ProcessASN.pl')
-rw-r--r-- | net-mgmt/ehnt/files/patch-ProcessASN.pl | 128 |
1 files changed, 0 insertions, 128 deletions
diff --git a/net-mgmt/ehnt/files/patch-ProcessASN.pl b/net-mgmt/ehnt/files/patch-ProcessASN.pl deleted file mode 100644 index 367b4766d102..000000000000 --- a/net-mgmt/ehnt/files/patch-ProcessASN.pl +++ /dev/null @@ -1,128 +0,0 @@ - -$FreeBSD$ - ---- ProcessASN.pl.orig Tue Oct 22 00:21:49 2002 -+++ ProcessASN.pl Tue Oct 22 00:21:53 2002 -@@ -4,7 +4,7 @@ - - #ftp://ftp.arin.net/netinfo/asn.txt - #ftp://ftp.apnic.net/pub/apnic/dbase/data/apnic.an.gz --#ftp://ftp.ripe.net/ripe/dbase/split/ripe.db.an.gz -+#ftp://ftp.ripe.net/ripe/dbase/split/ripe.db.aut-num.gz - - #and put them all in another file in a dumb format so they can - #be processed by my dumb C program. -@@ -51,28 +51,28 @@ - } - } - --if (! -f "ripe.db.an" ) { -- if (-f "ripe.db.an.gz") { -- system "$gzip -d ripe.db.an.gz"; -+if (! -f "ripe.db.aut-num" ) { -+ if (-f "ripe.db.aut-num.gz") { -+ system "$gzip -d ripe.db.aut-num.gz"; - $r=$?; - if ($r > 0) { -- print "---> Retrieved ripe.db.an.gz, but could not run $gzip!\n"; -+ print "---> Retrieved ripe.db.aut-num.gz, but could not run $gzip!\n"; - print "---> Please get $gzip and try again\n"; - exit(1); - } - } else { -- if ( RetrieveFile("ftp://ftp.ripe.net/ripe/dbase/split/ripe.db.an.gz","ripe.db.an.gz")) { -- system "$gzip -d ripe.db.an.gz"; -+ if ( RetrieveFile("ftp://ftp.ripe.net/ripe/dbase/split/ripe.db.aut-num.gz","ripe.db.aut-num.gz")) { -+ system "$gzip -d ripe.db.aut-num.gz"; - $r=$?; - if ($r > 0) { -- print "---> Retrieved ripe.db.an.gz, but could not run $gzip!\n"; -+ print "---> Retrieved ripe.db.aut-num.gz, but could not run $gzip!\n"; - print "---> Please get $gzip and try again\n"; - exit(1); - } - } else { -- print "---> Cannot retrieve ripe.db.an.gz\n"; -+ print "---> Cannot retrieve ripe.db.aut-num.gz\n"; - print "---> Please download it from\n"; -- print "---> ftp://ftp.ripe.net/ripe/dbase/split/ripe.db.an.gz\n"; -+ print "---> ftp://ftp.ripe.net/ripe/dbase/split/ripe.db.aut-num.gz\n"; - $MissingFile=1; - } - } -@@ -109,7 +109,7 @@ - print "Processed $c ASes from asn.txt\n"; - - ProcessRipeDB("apnic.an"); --ProcessRipeDB("ripe.db.an"); -+ProcessRipeDB("ripe.db.aut-num"); - - $c=0; - open OUTPUT,">asnc.txt"; -@@ -124,7 +124,7 @@ - $c=0; - open APNIC,"<$file"; - while (<APNIC>) { -- if (/^\*an: AS(..*)/) { -+ if (/^(\*an|aut-num):\s+AS(..*)/) { - if ($an) { - if ($aa) { $ASNs{$an}=$aa; $c++; } - elsif ($mb) { $ASNs{$an}=$mb; $c++; } -@@ -133,25 +133,25 @@ - - undef $an; undef $aa; undef $mb; undef $de; - } -- $an=$1; -+ $an=$2; - } -- if (/^\*aa: (..*)/) { -+ if (/^(\*aa|as-name):\s+(..*)/) { - if (! $aa) { -- $aa=$1; -+ $aa=$2; - $aa=~ s/ /_/g; - if ($aa eq 'UNSPECIFIED') { - $aa="AS$an"; # 'an:' is always defined here - } - } - } -- if (/^\*mb: MAINT\-(..*)/) { -+ if (/^(\*mb|mnt-by):\s+MAINT\-(..*)/) { - if (! $mb) { -- $mb=$1; -+ $mb=$2; - $mb=~ s/ /_/g; - } -- } elsif (/^\*mb: (..*)/) { -+ } elsif (/^(\*mb|mnt-by):\s+(..*)/) { - if (! $mb) { -- $mb=$1; -+ $mb=$2; - $mb=~ s/ /_/g; - } - } -@@ -176,20 +176,12 @@ - - print "RetrieveFile: getting $location\n"; - -- $wget="wget"; -- $ncftp="ncftp"; -- $curl="curl"; -- system "$wget -q $location"; -- $r=$?; -- if ($r==0) { print "Got file with $wget.\n"; return 1; } -+ $fetch="fetch"; - -- system "$ncftp $location"; -+ system "$fetch $location"; - $r=$?; -- if ($r==0) { print "Got file with $ncftp.\n"; return 1; } -+ if ($r==0) { print "Got file with $fetch.\n"; return 1; } - -- system "$curl -o $filename $location"; -- $r=$?; -- if ($r==0) { print "Got file with $curl\n"; return 1; } -- if ($r > 0) { print "Could not get $filename with $curl, $wget or $ncftp.\n"; } -+ if ($r > 0) { print "Could not get $filename with $fetch, $curl, $wget or $ncftp.\n"; } - return 0; - } |