summaryrefslogtreecommitdiff
path: root/contrib
diff options
context:
space:
mode:
authorepoch <epoch@hacking.allowed.org>2013-10-28 04:16:16 +0000
committerepoch <epoch@hacking.allowed.org>2013-10-28 04:16:16 +0000
commite4734d7592a11fbb206b4da851f7b1cd8d10b7c8 (patch)
tree521981f2d9d5fe9fa86e95ab99a91fb5f09b3bf7 /contrib
parent964d66b1df7ff08766e24529913fb073549dcb9f (diff)
downloadresdb-e4734d7592a11fbb206b4da851f7b1cd8d10b7c8.tar.gz
resdb-e4734d7592a11fbb206b4da851f7b1cd8d10b7c8.zip
fixed the ns.whois.ano thing... don't remember what I did to whoisd.pl. Oh well.
Diffstat (limited to 'contrib')
-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 158c075..67636c9 100755
--- a/contrib/whoisd/whoisd.pl
+++ b/contrib/whoisd/whoisd.pl
@@ -6,11 +6,17 @@
use strict;
+#maybe chroot this whoisd?
my $RESDB = "/services/resdb/resdb";
my $HACK=0;
my $QUERY=<stdin>;
$QUERY =~ s/\r\n//g;
+$QUERY =~ s/\///g;
+if($QUERY eq '') {
+ printf "%% error. no query. wtf?";
+ exit 0;
+}
my $out;
my $title;
my $value;
@@ -97,7 +103,7 @@ if($QUERY =~ m/\./) {
}
# default to assuming it is a name.
-printf "%% user section for %s\n", $QUERY unless $HACK;
+printf "%% user section for '%s'\n", $QUERY unless $HACK;
chdir("$RESDB/db/usr") || die "%% error";
if(chdir($QUERY)) {