Mercurial > hg > anonet-resdb
changeset 1143:ca4d35064aa2 draft
fixed the ns.whois.ano thing... don't remember what I did to whoisd.pl. Oh well.
author | epoch <epoch@hacking.allowed.org> |
---|---|
date | Mon, 28 Oct 2013 04:16:16 +0000 |
parents | df0dccdd1901 |
children | 833da8c115a3 b19ced4435be |
files | contrib/whoisd/whoisd.pl db/dom/ano/whois/ns/ns.whois.ano |
diffstat | 2 files changed, 8 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/contrib/whoisd/whoisd.pl Sat Oct 26 12:22:53 2013 +0000 +++ b/contrib/whoisd/whoisd.pl Mon Oct 28 04:16:16 2013 +0000 @@ -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 @@ } # 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)) {