summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorepoch <epoch@hacking.allowed.ano>2017-02-19 13:07:13 +0000
committerepoch <epoch@hacking.allowed.ano>2017-02-19 13:07:13 +0000
commitefe5787b95d471755055b5fa0cbef1b843e0dc83 (patch)
tree6f4a149188ff00ea28e4f4afd4b559b29af4b4a7
parent2cce5212e49f7da676670446db8aa4fc176d7f1d (diff)
downloadresdb-efe5787b95d471755055b5fa0cbef1b843e0dc83.tar.gz
resdb-efe5787b95d471755055b5fa0cbef1b843e0dc83.zip
made a couple error messages more informative
-rwxr-xr-xcontrib/whoisd/whoisd.pl15
1 files changed, 7 insertions, 8 deletions
diff --git a/contrib/whoisd/whoisd.pl b/contrib/whoisd/whoisd.pl
index 60ce11f..3ef38e0 100755
--- a/contrib/whoisd/whoisd.pl
+++ b/contrib/whoisd/whoisd.pl
@@ -37,8 +37,8 @@ sub get_user_from_ASN {
my $AS=$_[0];
my $user;
chdir("$RESDB/db/as") || die "%% error";
- if(chdir($AS) || die "%% error") {
- open(FILE,"owner") || die "%% ASN not found.";
+ if(chdir($AS) || die "%% ASN not found.") {
+ open(FILE,"owner") || die "%% ASN's owner not found.";
$user=<FILE>;
close(FILE);
} else {
@@ -204,7 +204,6 @@ sub IPv6_lookup {
}
}
-# default to assuming it is a name.
sub user_lookup {
printf "%% user section for '%s'\n", $QUERY unless $HACK;
@@ -272,8 +271,8 @@ printf "%%%% found user: %s for the query.\n", $user;
#k. we got user... now to find stuff belonging to that user.
-#ASN_lookup($user);
-#IPv4_lookup($user);
-#domain_lookup($user);
-#IPv6_lookup($user);
-user_lookup();
+ASN_lookup($user);
+IPv4_lookup($user);
+domain_lookup($user);
+IPv6_lookup($user);
+#user_lookup();