summaryrefslogtreecommitdiff
path: root/contrib/whoisd
diff options
context:
space:
mode:
authorepochqwert <epoch@hacking.allowed.org>2018-07-22 09:12:56 +0000
committerepochqwert <epoch@hacking.allowed.org>2018-07-22 09:12:56 +0000
commitce19bd715fdbffc81ade3b59dfe4c68559aa41d0 (patch)
treeb1efc9bd483ce36678082d755f0f1d9b9a90b503 /contrib/whoisd
parent3555973daec42ed4cb4c84b11359a44f347227dd (diff)
downloadresdb-ce19bd715fdbffc81ade3b59dfe4c68559aa41d0.tar.gz
resdb-ce19bd715fdbffc81ade3b59dfe4c68559aa41d0.zip
seeing if this change to the whoisd will make it show IP6 registrations based on username
Diffstat (limited to 'contrib/whoisd')
-rwxr-xr-xcontrib/whoisd/whoisd.pl8
1 files changed, 7 insertions, 1 deletions
diff --git a/contrib/whoisd/whoisd.pl b/contrib/whoisd/whoisd.pl
index 6e7eeb7..32f5275 100755
--- a/contrib/whoisd/whoisd.pl
+++ b/contrib/whoisd/whoisd.pl
@@ -89,7 +89,7 @@ sub get_user_from_domain {
sub get_user_from_IPv6 {
chdir("$RESDB/db/ip6") || die "%% error. no resdb/db/ip6\n";
$d=$_[0];
- print "$d";
+ #print "$d";
$d =~ s/[^0-9a-f]//gi;
$d =~ tr/a-z/A-Z/;
foreach(split(//,$d)) {
@@ -235,6 +235,12 @@ sub user_based_lookups {
printf "%-20s %s\n", "cidr" . ":", $_;
}
+ chdir("$RESDB/db/ip6") || die "%% error";
+ foreach(split(/\n/,`grep '^$QUERY\$' -r * | cut -d/ -f1-16 | xargs printf '%s/cidr\n' | xargs cat | uniq`)) {
+ chomp $_;
+ printf "%-20s %s\n", "cidr" . ":", $_;
+ }
+
foreach(split(/\n/,`grep -i -e "^$QUERY\$" "$RESDB/db/dom"/*/*/owner`)) {
$out = $_;
$out =~ s/.*\/db\/dom\/(.+?)\/(.+?)\/owner.*/\2\.\1/;